Print call stack if an error occurs in a user-defined function.

This commit is contained in:
Dianne Skoll
2022-03-25 14:03:06 -04:00
parent 10f5802069
commit df9ef6e13a
6 changed files with 35 additions and 8 deletions
+6 -2
View File
@@ -605,12 +605,16 @@ void Eprint(char const *fmt, ...)
if (FreshLine && FileName) {
FreshLine = 0;
if (strcmp(FileName, "-"))
if (strcmp(FileName, "-")) {
print_callstack(ErrFp);
(void) fprintf(ErrFp, "%s(%d): ", FileName, LineNo);
else
} else {
print_callstack(ErrFp);
(void) fprintf(ErrFp, "-stdin-(%d): ", LineNo);
}
if (DebugFlag & DB_PRTLINE) OutputLine(ErrFp);
} else if (FileName) {
print_callstack(ErrFp);
fprintf(ErrFp, " ");
}