diff options
| author | Steven Bosscher <steven@gcc.gnu.org> | 2012-03-06 19:51:42 +0000 |
|---|---|---|
| committer | Steven Bosscher <steven@gcc.gnu.org> | 2012-03-06 19:51:42 +0000 |
| commit | 87a60f68a9015f0de8e2377e2db09a6360754c8c (patch) | |
| tree | 0595932f0c30a57f889841652942dd6cccd5019a /gcc/fortran/trans.h | |
| parent | ca4adc913ddcaca116b48569ec97c7c7841f2a35 (diff) | |
| download | gcc-87a60f68a9015f0de8e2377e2db09a6360754c8c.zip gcc-87a60f68a9015f0de8e2377e2db09a6360754c8c.tar.gz gcc-87a60f68a9015f0de8e2377e2db09a6360754c8c.tar.bz2 | |
f95-lang.c (yyerror, yylex): Remove.
* f95-lang.c (yyerror, yylex): Remove.
(clear_binding_stack): Remove, fold into its only user.
(LANG_HOOKS_PRINT_IDENTIFIER): Do not re-define.
(ridpointers): Remove.
(gfc_eh_initialized_p): Make static.
(gfc_truthvalue_conversion): Move to convert.c.
(gfc_be_parse_file): Clear binding level stack when done.
(gfc_print_identifier): Remove.
(pushlevel): Remove ignored 'ignore' argument. Update all callers.
(poplevel): Remove unused 'reverse' argument. Update all callers.
(ggc_p): Remove.
(gfc_builtin_function): Make static. Do not attempt to make RTL for
builtin functions.
* convert.c (gfc_truthvalue_conversion): Moved here from f95-lang.c,
and made static.
* trans.h (pushlevel, poplevel): Adjust prototypes.
(gfc_truthvalue_conversion, gfc_builtin_function): Remove prototypes.
* trans-openmp.c: Update calls to pushlevel and poplevel.
* trans.c: Likewise.
* trans-decl.c: Likewise.
From-SVN: r185015
Diffstat (limited to 'gcc/fortran/trans.h')
| -rw-r--r-- | gcc/fortran/trans.h | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index 8beefe1..08a6732 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -427,8 +427,6 @@ int gfc_conv_procedure_call (gfc_se *, gfc_symbol *, gfc_actual_arglist *, void gfc_conv_subref_array_arg (gfc_se *, gfc_expr *, int, sym_intent, bool); -/* gfc_trans_* shouldn't call push/poplevel, use gfc_push/pop_scope */ - /* Generate code for a scalar assignment. */ tree gfc_trans_scalar_assign (gfc_se *, gfc_se *, gfc_typespec, bool, bool, bool); @@ -632,11 +630,9 @@ void gfc_trans_deferred_vars (gfc_symbol*, gfc_wrapped_block *); /* In f95-lang.c. */ tree pushdecl (tree); tree pushdecl_top_level (tree); -void pushlevel (int); -tree poplevel (int, int, int); +void pushlevel (void); +tree poplevel (int, int); tree getdecls (void); -tree gfc_truthvalue_conversion (tree); -tree gfc_builtin_function (tree); /* In trans-types.c. */ struct array_descr_info; |