home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / CMDS / less_332.lzh / less_332 / mkfuncs.awk < prev    next >
Text File  |  1998-03-03  |  158b  |  10 lines
  1. BEGIN { FS="("; state = 0 }
  2.  
  3. /^    public/ { ftype = $0; state = 1 }
  4.  
  5. { if (state == 1)
  6.     state = 2
  7.   else if (state == 2)
  8.     { print ftype,$1,"();"; state = 0 }
  9. }
  10.