diff options
author | Neil Booth <neil@daikokuya.demon.co.uk> | 2001-11-09 23:30:44 +0000 |
---|---|---|
committer | Neil Booth <neil@gcc.gnu.org> | 2001-11-09 23:30:44 +0000 |
commit | 5d69f816bcfd32f2171b31e09249a8e03acedd5e (patch) | |
tree | e6f8ec22684d9ab1170005e35598dd4cc7f86de1 /gcc/f/com.c | |
parent | 1ee9fb202a1be3e3259935c243242fa6ffa5f62d (diff) | |
download | gcc-5d69f816bcfd32f2171b31e09249a8e03acedd5e.zip gcc-5d69f816bcfd32f2171b31e09249a8e03acedd5e.tar.gz gcc-5d69f816bcfd32f2171b31e09249a8e03acedd5e.tar.bz2 |
Makefile.in: Update.
* Makefile.in: Update.
* c-decl.c (print_lang_decl, print_lang_type): Remove.
(print_lang_identifier): Rename c_print_identifier.
* c-lang.c (LANG_HOOKS_PRINT_IDENTIFIER, LANG_HOOKS_SET_YYDEBUG): New.
(print_lang_statistics, lang_print_xnode): Remove.
* c-parse.in (set_yydebug): Rename c_set_yydebug.
* c-tree.h (c_set_yydebug, c_print_identifier): New.
* langhooks-def.h (lhd_print_tree_nothing, lhd_set_yydebug): New.
LANG_HOOKS_PRINT_STATISTICS, LANG_HOOKS_PRINT_XNODE,
LANG_HOOKS_PRINT_DECL, LANG_HOOKS_PRINT_TYPE,
LANG_HOOKS_PRINT_IDENTIFIER, LANG_HOOKS_SET_YYDEBUG): New.
(LANG_HOOKS_INITIALIZER): Update.
* langhooks.h (struct lang_hooks): New members.
(lang_print_tree_hook): New.
* langhooks.c (lhd_print_tree_nothing, lhd_set_yydebug): New.
* print-tree.c: Include langhooks.h.
(print_node): Update.
* toplev.c (decode_d_option): Update.
* tree.c: Include langhooks.h.
(dump_tree_statistics): Update.
* tree.h (print_lang_statistics, print_lang_decl, print_lang_type,
print_lang_identifier, set_yydebug, lang_print_xnode): Remove.
ada:
* misc.c (gnat_print_decl, gnat_print_type): Renamed.
(LANG_HOOKS_PRINT_DECL, LANG_HOOKS_PRINT_TYPE): Override.
(print_lang_statistics, lang_print_xnode, print_lang_identifier,
set_yydebug): Remove.
cp:
* cp-lang.c (LANG_HOOKS_PRINT_DECL, LANG_HOOKS_PRINT_TYPE,
LANG_HOOKS_PRINT_STATISTICS, LANG_HOOKS_PRINT_XNODE,
LANG_HOOKS_PRINT_IDENTIFIER, LANG_HOOKS_SET_YYDEBUG): Override.
* cp-tree.h (print_class_statistics): Remove.
(cxx_print_statistics, cxx_print_xnode, cxx_print_decl, cxx_print_type,
cxx_print_identifier, cxx_set_yydebug): New.
* lex.c (set_yydebug): Rename c_set_yydebug.
* ptree.c (print_lang_decl, print_lang_type, print_lang_identifier,
lang_print_xnode): Rename.
* tree.c (print_lang_statistics): Rename.
f:
* com.c (ffe_print_identifier): Rename.
(LANG_HOOKS_PRINT_IDENTIFIER): Override.
(lang_print_xnode, print_lang_decl, print_lang_statistics,
print_lang_type, set_yydebug): Remove.
java:
* java-tree.h (java_set_yydebug): New.
* jcf-parse.c (set_yydebug): Rename java_set_yydebug.
* lang.c (LANG_HOOKS_SET_YYDEBUG): Override.
(print_lang_decl, print_lang_type, print_lang_identifier,
print_lang_statistics, lang_print_xnode): Remove.
objc:
* objc-act.c (LANG_HOOKS_PRINT_IDENTIFIER,
LANG_HOOKS_SET_YYDEBUG): Override.
(lang_print_xnode, print_lang_statistics): Remove.
From-SVN: r46907
Diffstat (limited to 'gcc/f/com.c')
-rw-r--r-- | gcc/f/com.c | 50 |
1 files changed, 5 insertions, 45 deletions
diff --git a/gcc/f/com.c b/gcc/f/com.c index 79eadef..ae4201d 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -14256,6 +14256,7 @@ insert_block (block) static void ffe_init PARAMS ((void)); static void ffe_finish PARAMS ((void)); static void ffe_init_options PARAMS ((void)); +static void ffe_print_identifier PARAMS ((FILE *, tree, int)); #undef LANG_HOOKS_NAME #define LANG_HOOKS_NAME "GNU F77" @@ -14267,6 +14268,8 @@ static void ffe_init_options PARAMS ((void)); #define LANG_HOOKS_INIT_OPTIONS ffe_init_options #undef LANG_HOOKS_DECODE_OPTION #define LANG_HOOKS_DECODE_OPTION ffe_decode_option +#undef LANG_HOOKS_PRINT_IDENTIFIER +#define LANG_HOOKS_PRINT_IDENTIFIER ffe_print_identifier /* We do not wish to use alias-set based aliasing at all. Used in the extreme (every object with its own set, with equivalences recorded) it @@ -14278,16 +14281,6 @@ static void ffe_init_options PARAMS ((void)); const struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER; -/* used by print-tree.c */ - -void -lang_print_xnode (file, node, indent) - FILE *file UNUSED; - tree node UNUSED; - int indent UNUSED; -{ -} - static void ffe_finish () { @@ -14542,16 +14535,8 @@ poplevel (keep, reverse, functionbody) return block; } -void -print_lang_decl (file, node, indent) - FILE *file UNUSED; - tree node UNUSED; - int indent UNUSED; -{ -} - -void -print_lang_identifier (file, node, indent) +static void +ffe_print_identifier (file, node, indent) FILE *file; tree node; int indent; @@ -14560,19 +14545,6 @@ print_lang_identifier (file, node, indent) print_node (file, "local", IDENTIFIER_LOCAL_VALUE (node), indent + 4); } -void -print_lang_statistics () -{ -} - -void -print_lang_type (file, node, indent) - FILE *file UNUSED; - tree node UNUSED; - int indent UNUSED; -{ -} - /* Record a decl-node X as belonging to the current lexical scope. Check for errors (such as an incompatible declaration for the same name already seen in the same scope). @@ -14762,18 +14734,6 @@ set_block (block) BLOCK_SUBBLOCKS (block)); } -/* ~~gcc/tree.h *should* declare this, because toplev.c references it. */ - -/* Can't 'yydebug' a front end not generated by yacc/bison! */ - -void -set_yydebug (value) - int value; -{ - if (value) - fprintf (stderr, "warning: no yacc/bison-generated output to debug!\n"); -} - tree signed_or_unsigned_type (unsignedp, type) int unsignedp; |