made the pack completely portable and wrote relevent bat files to go with it
This commit is contained in:
20
gitportable/usr/share/awk/rewind.awk
Normal file
20
gitportable/usr/share/awk/rewind.awk
Normal file
@@ -0,0 +1,20 @@
|
||||
# rewind.awk --- rewind the current file and start over
|
||||
#
|
||||
# Arnold Robbins, arnold@skeeve.com, Public Domain
|
||||
# September 2000
|
||||
|
||||
function rewind( i)
|
||||
{
|
||||
# shift remaining arguments up
|
||||
for (i = ARGC; i > ARGIND; i--)
|
||||
ARGV[i] = ARGV[i-1]
|
||||
|
||||
# make sure gawk knows to keep going
|
||||
ARGC++
|
||||
|
||||
# make current file next to get done
|
||||
ARGV[ARGIND+1] = FILENAME
|
||||
|
||||
# do it
|
||||
nextfile
|
||||
}
|
||||
Reference in New Issue
Block a user