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/ada/misc.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/ada/misc.c')
-rw-r--r-- | gcc/ada/misc.c | 17 |
1 files changed, 6 insertions, 11 deletions
diff --git a/gcc/ada/misc.c b/gcc/ada/misc.c index 8ef1063..f6ad45b 100644 --- a/gcc/ada/misc.c +++ b/gcc/ada/misc.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * $Revision: 1.8 $ + * $Revision: 1.9 $ * * * Copyright (C) 1992-2001 Free Software Foundation, Inc. * * * @@ -116,6 +116,10 @@ static HOST_WIDE_INT gnat_get_alias_set PARAMS ((tree)); /* Structure giving our language-specific hooks. */ +#undef LANG_HOOKS_NAME +#define LANG_HOOKS_NAME "GNU Ada" +#undef LANG_HOOKS_IDENTIFIER_SIZE +#define LANG_HOOKS_IDENTIFIER_SIZE sizeof (struct tree_identifier) #undef LANG_HOOKS_INIT #define LANG_HOOKS_INIT gnat_init #undef LANG_HOOKS_INIT_OPTIONS @@ -127,7 +131,7 @@ static HOST_WIDE_INT gnat_get_alias_set PARAMS ((tree)); #undef LANG_HOOKS_GET_ALIAS_SET #define LANG_HOOKS_GET_ALIAS_SET gnat_get_alias_set -struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER; +const struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER; /* gnat standard argc argv */ @@ -136,7 +140,6 @@ extern char **gnat_argv; /* Global Variables Expected by gcc: */ -const char * const language_string = "GNU Ada"; int flag_traditional; /* Used by dwarfout.c. */ int ggc_p = 1; @@ -358,14 +361,6 @@ gnat_init () #endif } -/* Return a short string identifying this language to the debugger. */ - -const char * -lang_identify () -{ - return "ada"; -} - /* If DECL has a cleanup, build and return that cleanup here. This is a callback called by expand_expr. */ |