diff options
| author | Mikael Morin <mikael@gcc.gnu.org> | 2011-11-03 23:39:11 +0000 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2011-11-03 23:39:11 +0000 |
| commit | 9d75804367cd7c3aac109d33a98f3a038cbe8020 (patch) | |
| tree | 8ab21cd593692c98e71455dfbf71efa9255df198 /gcc/fortran/trans.h | |
| parent | 06cd4e1b5a55cecb1e19a0302608859429853a12 (diff) | |
| download | gcc-9d75804367cd7c3aac109d33a98f3a038cbe8020.zip gcc-9d75804367cd7c3aac109d33a98f3a038cbe8020.tar.gz gcc-9d75804367cd7c3aac109d33a98f3a038cbe8020.tar.bz2 | |
trans.h (struct gfc_loopinfo): New fields nested and next.
* trans.h (struct gfc_loopinfo): New fields nested and next.
* trans-array.c (gfc_add_ss_to_loop): Update list of nested list if
ss has non-null nested_ss field.
From-SVN: r180897
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 0608879..0549aa7 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -279,6 +279,9 @@ typedef struct gfc_loopinfo /* The SS describing the temporary used in an assignment. */ gfc_ss *temp_ss; + /* Chain of nested loops. */ + struct gfc_loopinfo *nested, *next; + /* The scalarization loop index variables. */ tree loopvar[GFC_MAX_DIMENSIONS]; |