diff options
Diffstat (limited to 'gcc/fortran/trans.h')
| -rw-r--r-- | gcc/fortran/trans.h | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index daf24995..13d4c58 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -183,6 +183,15 @@ typedef enum gfc_ss_type; +typedef struct gfc_ss_info +{ + gfc_ss_type type; +} +gfc_ss_info; + +#define gfc_get_ss_info() XCNEW (gfc_ss_info) + + /* Scalarization State chain. Created by walking an expression tree before creating the scalarization loops. Then passed as part of a gfc_se structure to translate the expression inside the loop. Note that these chains are @@ -193,7 +202,8 @@ gfc_ss_type; typedef struct gfc_ss { - gfc_ss_type type; + gfc_ss_info *info; + gfc_expr *expr; tree string_length; union |