home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 December (Special) / PCWorld_2005-12_Special_cd.bin / Bezpecnost / lsti / lsti.exe / framework-2.5.exe / zerofile.awk < prev    next >
Text File  |  2004-08-02  |  421b  |  20 lines
  1. # zerofile.awk --- library file to process empty input files
  2. #
  3. # Arnold Robbins, arnold@gnu.org, Public Domain
  4. # June 2003
  5.  
  6. BEGIN { Argind = 0 }
  7.  
  8. ARGIND > Argind + 1 {
  9.     for (Argind++; Argind < ARGIND; Argind++)
  10.         zerofile(ARGV[Argind], Argind)
  11. }
  12.  
  13. ARGIND != Argind { Argind = ARGIND }
  14.  
  15. END {
  16.     if (ARGIND > Argind)
  17.         for (Argind++; Argind <= ARGIND; Argind++)
  18.             zerofile(ARGV[Argind], Argind)
  19. }
  20.