diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2014-06-03 16:44:09 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2014-06-03 16:44:09 +0300 |
| commit | 337e1e6b1c142c2b800d316e477973d29c0659a1 (patch) | |
| tree | e16550a3275309abdec16c0d31a2ea0d064274c7 /awklib/eg/prog/extract.awk | |
| parent | 757ab2b5d36d3c468022b64acfc696859679107f (diff) | |
| parent | daf5b0c87115b6793c5ac6568009916d4be3152b (diff) | |
| download | egawk-337e1e6b1c142c2b800d316e477973d29c0659a1.tar.gz egawk-337e1e6b1c142c2b800d316e477973d29c0659a1.tar.bz2 egawk-337e1e6b1c142c2b800d316e477973d29c0659a1.zip | |
Merge branch 'gawk-4.1-stable'
Diffstat (limited to 'awklib/eg/prog/extract.awk')
| -rw-r--r-- | awklib/eg/prog/extract.awk | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/awklib/eg/prog/extract.awk b/awklib/eg/prog/extract.awk index dc105728..12e30b54 100644 --- a/awklib/eg/prog/extract.awk +++ b/awklib/eg/prog/extract.awk @@ -10,7 +10,7 @@ BEGIN { IGNORECASE = 1 } /^@c(omment)?[ \t]+system/ \ { if (NF < 3) { - e = (FILENAME ":" FNR) + e = ("extract: " FILENAME ":" FNR) e = (e ": badly formed `system' line") print e > "/dev/stderr" next @@ -19,7 +19,7 @@ BEGIN { IGNORECASE = 1 } $2 = "" stat = system($0) if (stat != 0) { - e = (FILENAME ":" FNR) + e = ("extract: " FILENAME ":" FNR) e = (e ": warning: system returned " stat) print e > "/dev/stderr" } @@ -27,7 +27,7 @@ BEGIN { IGNORECASE = 1 } /^@c(omment)?[ \t]+file/ \ { if (NF != 3) { - e = (FILENAME ":" FNR ": badly formed `file' line") + e = ("extract: " FILENAME ":" FNR ": badly formed `file' line") print e > "/dev/stderr" next } @@ -65,7 +65,7 @@ BEGIN { IGNORECASE = 1 } } function unexpected_eof() { - printf("%s:%d: unexpected EOF or error\n", + printf("extract: %s:%d: unexpected EOF or error\n", FILENAME, FNR) > "/dev/stderr" exit 1 } |