Frozen Fish 1: Amiga/FrozenFish-Apr94.iso/bbs/alib/d0xx/d034/less.lha/Less/mkfuncs.awk

AWK Script | 1986-09-03 | 163 b | 10 lines

BEGIN { FS="("; state = 0 }

/^      public/ { ftype = $0; state = 1 }

{ if (state == 1)
    state = 2
  else if (state == 2)
    { print ftype,$1,"();"; state = 0 }
}