diff options
| author | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2008-04-06 12:17:33 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2008-04-06 12:17:33 +0000 |
| commit | 6c1abb5c58569e9655b1f92fd0d8e9d2e29c9c4f (patch) | |
| tree | 7fa1aa756360ffed20f125a333e3becf3e5e661e /gcc/fortran/scanner.c | |
| parent | 1bde5bc4681ac3713d54d6511cfb6000be57114f (diff) | |
| download | gcc-6c1abb5c58569e9655b1f92fd0d8e9d2e29c9c4f.zip gcc-6c1abb5c58569e9655b1f92fd0d8e9d2e29c9c4f.tar.gz gcc-6c1abb5c58569e9655b1f92fd0d8e9d2e29c9c4f.tar.bz2 | |
dump-parse-tree.c: Use fprintf, fputs and fputc instead of gfc_status and gfc_status_char.
* 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.
From-SVN: r133958
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 b93e1c6..872f350 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 |