diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2013-10-24 22:08:00 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2013-10-24 22:08:00 +0300 |
| commit | 38bd2eff2ea99abb535ee5d2bd14f2b7b2c303de (patch) | |
| tree | 5d4c774e87954166bc5c8fcfddeaba370f5a5c63 /msg.c | |
| parent | 0307bffa31f7c7b51531bd74b730c035c8f1dfa1 (diff) | |
| parent | 29e3ae329c550b884169b7db20775cd74b95b77a (diff) | |
| download | egawk-38bd2eff2ea99abb535ee5d2bd14f2b7b2c303de.tar.gz egawk-38bd2eff2ea99abb535ee5d2bd14f2b7b2c303de.tar.bz2 egawk-38bd2eff2ea99abb535ee5d2bd14f2b7b2c303de.zip | |
Merge branch 'gawk-4.1-stable'
Diffstat (limited to 'msg.c')
| -rw-r--r-- | msg.c | 17 |
1 files changed, 12 insertions, 5 deletions
@@ -44,15 +44,22 @@ err(bool isfatal, const char *s, const char *emsg, va_list argp) char *file; const char *me; + static bool first = true; + static bool add_src_info = false; + + if (first) { + first = false; + add_src_info = (getenv("GAWK_MSG_SRC") != NULL); + } + (void) fflush(output_fp); me = myname; (void) fprintf(stderr, "%s: ", me); -#ifdef GAWKDEBUG - if (srcfile != NULL) { + + if (srcfile != NULL && add_src_info) { fprintf(stderr, "%s:%d:", srcfile, srcline); srcfile = NULL; } -#endif /* GAWKDEBUG */ if (sourceline > 0) { if (source != NULL) @@ -109,10 +116,10 @@ msg(const char *mesg, ...) va_end(args); } -/* warning --- print a warning message */ +/* r_warning --- print a warning message */ void -warning(const char *mesg, ...) +r_warning(const char *mesg, ...) { va_list args; va_start(args, mesg); |