diff options
| author | Mikael Morin <mikael@gcc.gnu.org> | 2011-11-03 22:54:37 +0000 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2011-11-03 22:54:37 +0000 |
| commit | 4615abe8569bedef58b8400e881cf10a49e5383c (patch) | |
| tree | 76d69fd45ec296d10eee88ad7f8b62be67d52f31 /gcc/fortran/trans.h | |
| parent | c7bf4f1e646ac15f269ac01128c75cccc2bb05bf (diff) | |
| download | gcc-4615abe8569bedef58b8400e881cf10a49e5383c.zip gcc-4615abe8569bedef58b8400e881cf10a49e5383c.tar.gz gcc-4615abe8569bedef58b8400e881cf10a49e5383c.tar.bz2 | |
trans.h (struct gfc_ss): New field loop.
* trans.h (struct gfc_ss): New field loop.
* trans-array.c (set_ss_loop): New function.
(gfc_add_ss_to_loop): Call set_ss_loop.
From-SVN: r180884
Diffstat (limited to 'gcc/fortran/trans.h')
| -rw-r--r-- | gcc/fortran/trans.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index 02f2b42..62bcc64 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -246,6 +246,9 @@ typedef struct gfc_ss struct gfc_ss *loop_chain; struct gfc_ss *next; + /* The loop this gfc_ss is in. */ + struct gfc_loopinfo *loop; + unsigned is_alloc_lhs:1; } gfc_ss; |