diff options
| author | Neil Booth <neil@daikokuya.demon.co.uk> | 2002-03-31 22:32:05 +0000 |
|---|---|---|
| committer | Neil Booth <neil@gcc.gnu.org> | 2002-03-31 22:32:05 +0000 |
| commit | 7cb32822701d0ce49aae361f576c9c9dc31bb2f3 (patch) | |
| tree | 095a8c71baa85e6ccb7e9e788b0e115460d44314 /gcc/f | |
| parent | 1db02437806fb3155563914b496e26d7a8edfa65 (diff) | |
| download | gcc-7cb32822701d0ce49aae361f576c9c9dc31bb2f3.zip gcc-7cb32822701d0ce49aae361f576c9c9dc31bb2f3.tar.gz gcc-7cb32822701d0ce49aae361f576c9c9dc31bb2f3.tar.bz2 | |
diagnostic.c (print_error_function): Remove.
* diagnostic.c (print_error_function): Remove.
(default_print_error_function): Rename.
(report_error_function): Update.
* diagnostic.h (print_error_function): Remove.
(default_print_error_function): Remove.
* langhooks-def.h (struct diagnostic_context): Predeclare.
(lhd_print_error_function, LANG_HOOKS_PRINT_ERROR_FUNCTION): New.
(LANG_HOOKS_INITIALIZER): Update.
* langhooks.h (struct diagnostic context): Predeclare.
(struct lang_hooks): New hook.
cp:
* Make-lang.in (error.o): Update.
* cp-lang.c (LANG_HOOKS_PRINT_ERROR_FUNCTION): Redefine.
* cp-tree.h (struct diagnostic_context): Predeclare.
(cxx_print_error_function): New.
* error.c: Include langhooks-def.h.
(lang_print_error_function): Rename. Update.
(init_error): Don't set hook.
f:
* com.c (lang_print_error_function): Rename.
(LANG_HOOKS_PRINT_ERROR_FUNCTION): Redefine.
(ffe_init): Don't set hook.
java:
* lang.c (LANG_HOOKS_PRINT_ERROR_FUNCTION): Redefine.
(java_dummy_print): Remove.
(lang_print_error): Rename. Exit early if inhibiting output.
(inhibit_error_printing_function): New.
(java_init): Don't set hook.
(lang_init_source): Use new boolean.
From-SVN: r51672
Diffstat (limited to 'gcc/f')
| -rw-r--r-- | gcc/f/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/f/com.c | 8 |
2 files changed, 11 insertions, 3 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index 74202a6..9719baa 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,9 @@ +Sun Mar 31 23:50:22 2002 Neil Booth <neil@daikokuya.demon.co.uk> + + * com.c (lang_print_error_function): Rename. + (LANG_HOOKS_PRINT_ERROR_FUNCTION): Redefine. + (ffe_init): Don't set hook. + Fri Mar 29 21:59:15 2002 Neil Booth <neil@daikokuya.demon.co.uk> * com.c (LANG_HOOKS_TYPE_FOR_MODE, LANG_HOOKS_TYPE_FOR_SIZE): diff --git a/gcc/f/com.c b/gcc/f/com.c index fcff401..d51fad3 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -367,6 +367,7 @@ static int duplicate_decls (tree newdecl, tree olddecl); static void finish_decl (tree decl, tree init, bool is_top_level); static void finish_function (int nested); static const char *ffe_printable_name (tree decl, int v); +static void ffe_print_error_function (diagnostic_context *, const char *); static tree lookup_name_current_level (tree name); static struct binding_level *make_binding_level (void); static void pop_f_function_context (void); @@ -13655,8 +13656,8 @@ ffe_printable_name (tree decl, int v) an error. */ static void -lang_print_error_function (diagnostic_context *context __attribute__((unused)), - const char *file) +ffe_print_error_function (diagnostic_context *context __attribute__((unused)), + const char *file) { static ffeglobal last_g = NULL; static ffesymbol last_s = NULL; @@ -14227,6 +14228,8 @@ static void ffe_mark_tree (tree); #define LANG_HOOKS_PRINT_IDENTIFIER ffe_print_identifier #undef LANG_HOOKS_DECL_PRINTABLE_NAME #define LANG_HOOKS_DECL_PRINTABLE_NAME ffe_printable_name +#undef LANG_HOOKS_PRINT_ERROR_FUNCTION +#define LANG_HOOKS_PRINT_ERROR_FUNCTION ffe_print_error_function #undef LANG_HOOKS_TYPE_FOR_MODE #define LANG_HOOKS_TYPE_FOR_MODE ffe_type_for_mode #undef LANG_HOOKS_TYPE_FOR_SIZE @@ -14293,7 +14296,6 @@ ffe_init (filename) #endif ffecom_init_decl_processing (); - print_error_function = lang_print_error_function; /* If the file is output from cpp, it should contain a first line `# 1 "real-filename"', and the current design of gcc (toplev.c |