Celestin Apprentice 5/Apprentice-Release5.iso/Source Code/C/Applications/Moscow ML 1.31/source code/mosml/src/tools/make-jumptbl

Text File | 1996-07-03 | 238 b | 5 lines | [TEXT/R*ch]

/^  /           { printf("  &&lbl_%s\n", $1); ninstr++; }
/^}/            { for (i = ninstr; i < 128; i++) { print ", &&lbl_STOP"; }
                  for (i = 0; i < ninstr;   i++) { print ", &&lbl_EVENT"; }
                  exit(0); }