16 lines
314 B
Awk
16 lines
314 B
Awk
|
# ftrans.awk --- handle data file transitions
|
||
|
#
|
||
|
# user supplies beginfile() and endfile() functions
|
||
|
#
|
||
|
# Arnold Robbins, arnold@gnu.org, November 1992
|
||
|
# Public Domain
|
||
|
|
||
|
FNR == 1 {
|
||
|
if (_filename_ != "")
|
||
|
endfile(_filename_)
|
||
|
_filename_ = FILENAME
|
||
|
beginfile(FILENAME)
|
||
|
}
|
||
|
|
||
|
END { endfile(_filename_) }
|