diff options
| author | Neil Booth <neil@daikokuya.demon.co.uk> | 2001-07-12 05:56:27 +0000 |
|---|---|---|
| committer | Neil Booth <neil@gcc.gnu.org> | 2001-07-12 05:56:27 +0000 |
| commit | a5a42b92933220e45ac15c4034065c0a2be5b209 (patch) | |
| tree | 40b384a205e08322f34b489f268f42300c96c0bb /gcc/f/lex.c | |
| parent | c177db4bbe9370c05dbcd18220f4c927aea7c94b (diff) | |
| download | gcc-a5a42b92933220e45ac15c4034065c0a2be5b209.zip gcc-a5a42b92933220e45ac15c4034065c0a2be5b209.tar.gz gcc-a5a42b92933220e45ac15c4034065c0a2be5b209.tar.bz2 | |
Makefile.in (final.o): Depend on debug.h.
* Makefile.in (final.o): Depend on debug.h.
* dbxout.c (dbxout_begin_block, dbxout_end_block): New.
(dbx_debug_hooks): Add new hooks.
(xcoff_debug_hooks): New.
* debug.c (debug_nothing_file_int_int): New.
(do_nothing_debug_hooks): Update.
* debug.h (gcc_debug_hooks): New hooks begin_block and end_block.
(debug_nothing_file_int_int): New.
* dwarf2out.c (dwarf2out_begin_block, dwarf2out_end_block): Make
static, update prototype.
(dwarf2_debug_hooks): Update.
* dwarf2out.h (dwarf2out_begin_block, dwarf2out_end_block): Remove.
* dwarfout.c (dwarfout_begin_block, dwarfout_end_block): Make
static, update prototype.
(dwarf_debug_hooks): Update.
* dwarfout.h (dwarfout_begin_block, dwarfout_end_block): Remove.
* final.c: Include debug.h.
(final_scan_insn): Use debug hooks when beginning and ending blocks.
* sdbout.c (sdbout_begin_block, sdbout_end_block): Make
static, update prototype.
(sdb_debug_hooks): Update.
* sdbout.h (sdbout_begin_block, sdbout_end_block): Remove.
* toplev.c: Distinguish between xcoff and dbx.
* f/lex.c (ffelex_file_pop_, ffelex_file_push_, ffelex_hash_):
Call all debug hooks, not just dwarf ones.
From-SVN: r43959
Diffstat (limited to 'gcc/f/lex.c')
| -rw-r--r-- | gcc/f/lex.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/gcc/f/lex.c b/gcc/f/lex.c index 70f666a..05e627b 100644 --- a/gcc/f/lex.c +++ b/gcc/f/lex.c @@ -857,8 +857,7 @@ ffelex_file_pop_ (const char *input_filename) input_file_stack = p->next; free (p); input_file_stack_tick++; - if (write_symbols == DWARF_DEBUG) - (*debug_hooks->end_source_file) (input_file_stack->line); + (*debug_hooks->end_source_file) (input_file_stack->line); } else error ("#-lines for entering and leaving files don't match"); @@ -883,8 +882,7 @@ ffelex_file_push_ (int old_lineno, const char *input_filename) input_file_stack = p; input_file_stack_tick++; - if (write_symbols == DWARF_DEBUG) - (*debug_hooks->start_source_file) (0, input_filename); + (*debug_hooks->start_source_file) (0, input_filename); /* Now that we've pushed or popped the input stack, update the name in the top element. */ @@ -1165,8 +1163,7 @@ ffelex_hash_ (FILE *finput) c = ffelex_get_directive_line_ (&text, finput); - if ((debug_info_level == DINFO_LEVEL_VERBOSE) - && (write_symbols == DWARF_DEBUG)) + if (debug_info_level == DINFO_LEVEL_VERBOSE) (*debug_hooks->define) (lineno, text); goto skipline; @@ -1185,8 +1182,7 @@ ffelex_hash_ (FILE *finput) c = ffelex_get_directive_line_ (&text, finput); - if ((debug_info_level == DINFO_LEVEL_VERBOSE) - && (write_symbols == DWARF_DEBUG)) + if (debug_info_level == DINFO_LEVEL_VERBOSE) (*debug_hooks->undef) (lineno, text); goto skipline; |