diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 12:41:09 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 12:41:09 +0300 |
| commit | 8c042f99cc7465c86351d21331a129111b75345d (patch) | |
| tree | 9656e653be0e42e5469cec77635c20356de152c2 /awklib/eg/lib/ftrans.awk | |
| parent | 8ceb5f934787eb7be5fb452fb39179df66119954 (diff) | |
| download | egawk-8c042f99cc7465c86351d21331a129111b75345d.tar.gz egawk-8c042f99cc7465c86351d21331a129111b75345d.tar.bz2 egawk-8c042f99cc7465c86351d21331a129111b75345d.zip | |
Move to gawk-3.0.0.
Diffstat (limited to 'awklib/eg/lib/ftrans.awk')
| -rw-r--r-- | awklib/eg/lib/ftrans.awk | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/awklib/eg/lib/ftrans.awk b/awklib/eg/lib/ftrans.awk new file mode 100644 index 00000000..0d6e8108 --- /dev/null +++ b/awklib/eg/lib/ftrans.awk @@ -0,0 +1,15 @@ +# ftrans.awk --- handle data file transitions +# +# user supplies beginfile() and endfile() functions +# +# Arnold Robbins, arnold@gnu.ai.mit.edu. November 1992 +# Public Domain + +FNR == 1 { + if (_filename_ != "") + endfile(_filename_) + _filename_ = FILENAME + beginfile(FILENAME) +} + +END { endfile(_filename_) } |