diff options
| author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-11-03 20:17:38 +0000 |
|---|---|---|
| committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-11-03 20:17:38 +0000 |
| commit | 2b2b3bd8d96c3193c8d9bc606ee1b5b3c9b47000 (patch) | |
| tree | 81e969bd3646dc338eed81f44730a7c467aebe3b /gcc/fortran/gfortran.h | |
| parent | d4f000ef87b18faf42726f23e17b15a8f14fe618 (diff) | |
| download | gcc-2b2b3bd8d96c3193c8d9bc606ee1b5b3c9b47000.tar.gz | |
2008-11-03 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk r141555
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@141561 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/gfortran.h')
| -rw-r--r-- | gcc/fortran/gfortran.h | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index 42f5516b746..174e9af042c 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -1886,6 +1886,7 @@ typedef struct gfc_code symbol for the interface definition. const char *sub_name; */ gfc_symbol *resolved_sym; + gfc_intrinsic_sym *resolved_isym; union { @@ -1991,6 +1992,7 @@ typedef struct int flag_second_underscore; int flag_implicit_none; int flag_max_stack_var_size; + int flag_max_array_constructor; int flag_range_check; int flag_pack_derived; int flag_repack_arrays; @@ -2091,7 +2093,7 @@ bool gfc_in_match_data (void); void gfc_scanner_done_1 (void); void gfc_scanner_init_1 (void); -void gfc_add_include_path (const char *, bool); +void gfc_add_include_path (const char *, bool, bool); void gfc_add_intrinsic_modules_path (const char *); void gfc_release_include_path (void); FILE *gfc_open_included_file (const char *, bool, bool); @@ -2448,8 +2450,8 @@ bool gfc_traverse_expr (gfc_expr *, gfc_symbol *, bool (*)(gfc_expr *, gfc_symbol *, int*), int); void gfc_expr_set_symbols_referenced (gfc_expr *); - gfc_try gfc_expr_check_typed (gfc_expr*, gfc_namespace*, bool); +void gfc_expr_replace_symbols (gfc_expr *, gfc_symbol *); /* st.c */ extern gfc_code new_st; |