improved symbol table generation when source file has line directives

This commit is contained in:
ceriel 1992-07-02 10:23:46 +00:00
parent 2dde78c197
commit d390121280
2 changed files with 12 additions and 1 deletions

View file

@ -809,6 +809,11 @@ do_line(l)
* Do not attempt to free the old string, since it might * Do not attempt to free the old string, since it might
* be used in a def structure. * be used in a def structure.
*/ */
#ifdef DBSYMTAB
if (options['g'] && strcmp(FileName, tk.tk_bts) != 0) {
C_ms_std(tk.tk_bts, N_SOL, 0);
}
#endif /* DBSYMTAB */
FileName = tk.tk_bts; FileName = tk.tk_bts;
} }
} }

View file

@ -712,6 +712,12 @@ do_line(l)
SkipRestOfLine(); SkipRestOfLine();
LineNumber = l; /* the number of the next input line */ LineNumber = l; /* the number of the next input line */
if (t == STRING) /* is there a filespecifier? */ if (t == STRING) { /* is there a filespecifier? */
#ifdef DBSYMTAB
if (options['g'] && strcmp(FileName, tk.tk_bts) != 0) {
C_ms_std(tk.tk_bts, N_SOL, 0);
}
#endif /* DBSYMTAB */
FileName = tk.tk_bts; FileName = tk.tk_bts;
}
} }