diff options
| author | neil <neil@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-07-12 05:56:27 +0000 |
|---|---|---|
| committer | neil <neil@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-07-12 05:56:27 +0000 |
| commit | 1dff614c85d6899e5442a721e03ae0924db542f0 (patch) | |
| tree | 40b384a205e08322f34b489f268f42300c96c0bb /gcc/f | |
| parent | 037e86757698f1fef8a8b6d4054cc05de488c16f (diff) | |
| download | gcc-1dff614c85d6899e5442a721e03ae0924db542f0.tar.gz | |
* 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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@43959 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/f')
| -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 70f666aaf44..05e627bdc8b 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; |