diff options
author | Neil Booth <neil@daikokuya.demon.co.uk> | 2001-11-09 07:14:20 +0000 |
---|---|---|
committer | Neil Booth <neil@gcc.gnu.org> | 2001-11-09 07:14:20 +0000 |
commit | 3ac88239fc25f4785cbdb4e6c29dd24145fc71d2 (patch) | |
tree | 591f114c0c680e4ec2d6ca91c6e753b8fbeaba3c /gcc/f/com.c | |
parent | 14d269bba70774130beedfa92cc973888f983c42 (diff) | |
download | gcc-3ac88239fc25f4785cbdb4e6c29dd24145fc71d2.zip gcc-3ac88239fc25f4785cbdb4e6c29dd24145fc71d2.tar.gz gcc-3ac88239fc25f4785cbdb4e6c29dd24145fc71d2.tar.bz2 |
c-lang.c (LANG_HOOKS_NAME): New.
* c-lang.c (LANG_HOOKS_NAME): New.
(lang_hooks): Constify.
(c_init_options): Update.
(lang_identify): Remove.
* c-parse.in (language_string): Remove.
* dbxout.c: Include langhooks.h.
(dbxout_symbol_location): Update.
* dwarf2out.c: Include langhooks.h.
(gen_compile_unit_die): Update.
* dwarfout.c: Include langhooks.h.
(prototyped_attribute, output_compile_unit_die): Update.
* langhooks-def.h (LANG_HOOKS_NAME, LANG_HOOKS_IDENTIFIER_SIZE): New.
(LANG_HOOKS_INITIALIZER): Update.
* langhooks.h (struct lang_hooks): New members. Constify.
* stringpool.c: Don't include toplev.h.
(set_identifier_size): Remove.
* toplev.c (toplev_main): Initialize identifier size.
(print_version): Update.
* tree.h (language_string, init_lex, lang_identify,
set_identifier_size): Remove.
* Makefile.in: Update dependencies.
* config/darwin.c: Include langhooks.h.
(func_name_maybe_scoped): Update.
* config/darwin.h (ASM_END_FILE): Update.
* config/nextstep.h (ASM_END_FILE): Update.
* config/nextstep21.h (ASM_END_FILE): Update.
* config/i386/sun386.h (ASM_END_FILE): Update.
* config/rs6000/rs6000.c (ASM_END_FILE): Include langhooks.h.
(rs6000_output_function_epilogue): Update.
ada:
* misc.c (LANG_HOOKS_NAME, LANG_HOOKS_IDENTIFIER_SIZE): Override.
(struct lang_hooks): Constify.
(language_string, lang_identify): Remove.
* utils.c (init_decl_processing): Update.
cp:
* cp-lang.c (LANG_HOOKS_NAME): Override.
(struct lang_hooks): Constify.
* lex.c (cxx_init_options): Update.
(lang_identify): Remove.
* parse.y (language_string): Remove.
f:
* com.c (language_string, lang_identify): Remove.
(struct lang_hooks): Constify.
(LANG_HOOKS_NAME): Override.
(init_parse): Update.
java:
* jcf-parse.c (init_lex): Remove.
* lang.c (language_string, lang_identify): Remove.
(struct lang_hooks): Constify.
(LANG_HOOKS_NAME): Override.
(init_parse): Update.
objc:
* objc-act.c (LANG_HOOKS_NAME): Override.
(struct lang_hooks): Constify.
(objc_init_options): Update.
(lang_identify): Remove.
From-SVN: r46874
Diffstat (limited to 'gcc/f/com.c')
-rw-r--r-- | gcc/f/com.c | 17 |
1 files changed, 3 insertions, 14 deletions
diff --git a/gcc/f/com.c b/gcc/f/com.c index 428458b..79eadef 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -136,11 +136,6 @@ typedef struct { unsigned :16, :16, :16; } vms_ino_t; /* Externals defined here. */ -/* ~~gcc/tree.h *should* declare this, because toplev.c and dwarfout.c - reference it. */ - -const char * const language_string = "GNU F77"; - /* Stream for reading from the input file. */ FILE *finput; @@ -14212,8 +14207,6 @@ init_parse (filename) setvbuf (finput, (char *) xmalloc (IO_BUFFER_SIZE), _IOFBF, IO_BUFFER_SIZE); #endif - /* Make identifier nodes long enough for the language-specific slots. */ - set_identifier_size (sizeof (struct lang_identifier)); decl_printable_name = lang_printable_name; print_error_function = lang_print_error_function; @@ -14264,6 +14257,8 @@ static void ffe_init PARAMS ((void)); static void ffe_finish PARAMS ((void)); static void ffe_init_options PARAMS ((void)); +#undef LANG_HOOKS_NAME +#define LANG_HOOKS_NAME "GNU F77" #undef LANG_HOOKS_INIT #define LANG_HOOKS_INIT ffe_init #undef LANG_HOOKS_FINISH @@ -14281,7 +14276,7 @@ static void ffe_init_options PARAMS ((void)); #undef LANG_HOOKS_GET_ALIAS_SET #define LANG_HOOKS_GET_ALIAS_SET hook_get_alias_set_0 -struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER; +const struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER; /* used by print-tree.c */ @@ -14302,12 +14297,6 @@ ffe_finish () malloc_pool_display (malloc_pool_image ()); } -const char * -lang_identify () -{ - return "f77"; -} - static void ffe_init_options () { |