home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / gnuawk.zip / awklib / eg / lib / ftrans.awk < prev    next >
Text File  |  1997-03-15  |  321b  |  16 lines
  1. # ftrans.awk --- handle data file transitions
  2. #
  3. # user supplies beginfile() and endfile() functions
  4. #
  5. # Arnold Robbins, arnold@gnu.ai.mit.edu. November 1992
  6. # Public Domain
  7.  
  8. FNR == 1 {
  9.     if (_filename_ != "")
  10.         endfile(_filename_)
  11.     _filename_ = FILENAME
  12.     beginfile(FILENAME)
  13. }
  14.  
  15. END  { endfile(_filename_) }
  16.