diff options
author | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-06 12:17:33 +0000 |
---|---|---|
committer | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-06 12:17:33 +0000 |
commit | 6c4b9654c327eb354879a8529766def6203cbb6f (patch) | |
tree | 7fa1aa756360ffed20f125a333e3becf3e5e661e /gcc/fortran/scanner.c | |
parent | eefb83e383c6370f2eb47a16a88f7ed0abfb8fab (diff) | |
download | gcc-6c4b9654c327eb354879a8529766def6203cbb6f.tar.gz |
* dump-parse-tree.c: Use fprintf, fputs and fputc instead of
gfc_status and gfc_status_char. Remove gfc_ prefix of the gfc_show_*
functions and make them static. Add new gfc_dump_parse_tree
function.
* gfortran.h (gfc_option_t): Rename verbose into dump_parse_tree.
(gfc_status, gfc_status_char): Delete prototypes.
* error.c (gfc_status, gfc_status_char): Remove functions.
* scanner.c (gfc_new_file): Use printf instead of gfc_status.
* options.c (gfc_init_options): Rename verbose into dump_parse_tree.
(gfc_handle_module_path_options): Use gfc_fatal_error instead of
gfc_status and exit.
(gfc_handle_option): Rename verbose into dump_parse_tree.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133958 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/scanner.c')
-rw-r--r-- | gcc/fortran/scanner.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c index b93e1c65478..872f35087da 100644 --- a/gcc/fortran/scanner.c +++ b/gcc/fortran/scanner.c @@ -1684,10 +1684,8 @@ gfc_new_file (void) #if 0 /* Debugging aid. */ for (; line_head; line_head = line_head->next) - gfc_status ("%s:%3d %s\n", - LOCATION_FILE (line_head->location), - LOCATION_LINE (line_head->location), - line_head->line); + printf ("%s:%3d %s\n", LOCATION_FILE (line_head->location), + LOCATION_LINE (line_head->location), line_head->line); exit (0); #endif |