diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2014-07-12 23:20:39 -0700 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2014-07-12 23:20:39 -0700 |
commit | de3372f0d98c7137823e7d5630d03429bb77d1f2 (patch) | |
tree | 389fa3f5f107b3ca1178e6d7a65e66ff3644e29c /awklib/eg/prog/extract.awk | |
parent | ebb6772e9eabeb81e3cc9305a6bec7adf7aad450 (diff) | |
parent | df2eaea6a92c7d89d604d0a4e885d064678ce3ed (diff) | |
download | egawk-de3372f0d98c7137823e7d5630d03429bb77d1f2.tar.gz egawk-de3372f0d98c7137823e7d5630d03429bb77d1f2.tar.bz2 egawk-de3372f0d98c7137823e7d5630d03429bb77d1f2.zip |
Merge branch 'master' into comment
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 } |