diff options
| author | Andrew Pinski <pinskia@physics.uc.edu> | 2005-07-28 04:47:23 +0000 |
|---|---|---|
| committer | Andrew Pinski <pinskia@gcc.gnu.org> | 2005-07-27 21:47:23 -0700 |
| commit | b8039bde3e870f731a80bcc54148f03e14449913 (patch) | |
| tree | 3076c0cf448eec6bf034762bc214e8d81cced418 /gcc/fortran/f95-lang.c | |
| parent | 77d1d8e01ff69521974d20c0f3fef75e3c2f8614 (diff) | |
| download | gcc-b8039bde3e870f731a80bcc54148f03e14449913.zip gcc-b8039bde3e870f731a80bcc54148f03e14449913.tar.gz gcc-b8039bde3e870f731a80bcc54148f03e14449913.tar.bz2 | |
f95-lang.c (language_function): Remove named_labels...
2005-07-28 Andrew Pinski <pinskia@physics.uc.edu>
* fortran/f95-lang.c (language_function): Remove
named_labels, shadowed_labels, returns_value, returns_abnormally,
warn_about_return_type, and extern_inline fields.
(named_labels): Remove variable.
(gfc_init_decl_processing): Remove setting of named_labels.
From-SVN: r102460
Diffstat (limited to 'gcc/fortran/f95-lang.c')
| -rw-r--r-- | gcc/fortran/f95-lang.c | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c index de6444d..1c16bb4 100644 --- a/gcc/fortran/f95-lang.c +++ b/gcc/fortran/f95-lang.c @@ -77,12 +77,6 @@ struct language_function GTY(()) { /* struct gfc_language_function base; */ - tree named_labels; - tree shadowed_labels; - int returns_value; - int returns_abnormally; - int warn_about_return_type; - int extern_inline; struct binding_level *binding_level; }; @@ -176,7 +170,6 @@ const char *const tree_code_name[] = { }; #undef DEFTREECODE -static tree named_labels; #define NULL_BINDING_LEVEL (struct binding_level *) NULL @@ -561,7 +554,6 @@ static void gfc_init_decl_processing (void) { current_function_decl = NULL; - named_labels = NULL; current_binding_level = NULL_BINDING_LEVEL; free_binding_level = NULL_BINDING_LEVEL; |