diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2014-06-03 16:41:42 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2014-06-03 16:41:42 +0300 |
| commit | daf5b0c87115b6793c5ac6568009916d4be3152b (patch) | |
| tree | 8f1d3abdb3fe3f929eae8e15a62c0cebf3fd58a7 /awklib/eg/prog/extract.awk | |
| parent | e1995be638c789f513eaf682f2790b3dadf40cd7 (diff) | |
| download | egawk-daf5b0c87115b6793c5ac6568009916d4be3152b.tar.gz egawk-daf5b0c87115b6793c5ac6568009916d4be3152b.tar.bz2 egawk-daf5b0c87115b6793c5ac6568009916d4be3152b.zip | |
More doc improvements.
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 } |