share/awk/nextfile.awk

# nextfile --- skip remaining records in current file
# correctly handle successive occurrences of the same file
#
# Arnold Robbins, arnold@skeeve.com, Public Domain
# May, 1993

# this should be read in before the "main" awk program

function nextfile()   { _abandon_ = FILENAME; next }

_abandon_ == FILENAME {
      if (FNR == 1)
          _abandon_ = ""
      else
          next
}
Revision:	1046
Committed:	Mon Aug 29 13:19:38 2016 UTC (9 years, 2 months ago) by alloc
File size:	386 byte(s)
Log Message:	Daodan: Added Windows MinGW and build batch file
#	Content
1	# nextfile --- skip remaining records in current file
2	# correctly handle successive occurrences of the same file
3	#
4	# Arnold Robbins, arnold@skeeve.com, Public Domain
5	# May, 1993
6
7	# this should be read in before the "main" awk program
8
9	function nextfile() { _abandon_ = FILENAME; next }
10
11	_abandon_ == FILENAME {
12	if (FNR == 1)
13	_abandon_ = ""
14	else
15	next
16	}