1 #ifndef lint 2 static char sccsid[] = "@(#)token.c 4.3 (Berkeley) 12/08/84"; 3 #endif 4 5 #include "awk.h" 6 struct tok 7 { char *tnm; 8 int yval; 9 } tok[] = { 10 "FIRSTTOKEN", 257, 11 "FINAL", 258, 12 "FATAL", 259, 13 "LT", 260, 14 "LE", 261, 15 "GT", 262, 16 "GE", 263, 17 "EQ", 264, 18 "NE", 265, 19 "MATCH", 266, 20 "NOTMATCH", 267, 21 "APPEND", 268, 22 "ADD", 269, 23 "MINUS", 270, 24 "MULT", 271, 25 "DIVIDE", 272, 26 "MOD", 273, 27 "UMINUS", 274, 28 "ASSIGN", 275, 29 "ADDEQ", 276, 30 "SUBEQ", 277, 31 "MULTEQ", 278, 32 "DIVEQ", 279, 33 "MODEQ", 280, 34 "JUMP", 281, 35 "XBEGIN", 282, 36 "XEND", 283, 37 "NL", 284, 38 "PRINT", 285, 39 "PRINTF", 286, 40 "SPRINTF", 287, 41 "SPLIT", 288, 42 "IF", 289, 43 "ELSE", 290, 44 "WHILE", 291, 45 "FOR", 292, 46 "IN", 293, 47 "NEXT", 294, 48 "EXIT", 295, 49 "BREAK", 296, 50 "CONTINUE", 297, 51 "PROGRAM", 298, 52 "PASTAT", 299, 53 "PASTAT2", 300, 54 "ASGNOP", 301, 55 "BOR", 302, 56 "AND", 303, 57 "NOT", 304, 58 "NUMBER", 305, 59 "VAR", 306, 60 "ARRAY", 307, 61 "FNCN", 308, 62 "SUBSTR", 309, 63 "LSUBSTR", 310, 64 "INDEX", 311, 65 "GETLINE", 312, 66 "RELOP", 313, 67 "MATCHOP", 314, 68 "OR", 315, 69 "STRING", 316, 70 "DOT", 317, 71 "CCL", 318, 72 "NCCL", 319, 73 "CHAR", 320, 74 "CAT", 321, 75 "STAR", 322, 76 "PLUS", 323, 77 "QUEST", 324, 78 "POSTINCR", 325, 79 "PREINCR", 326, 80 "POSTDECR", 327, 81 "PREDECR", 328, 82 "INCR", 329, 83 "DECR", 330, 84 "FIELD", 331, 85 "INDIRECT", 332, 86 "LASTTOKEN", 333, 87 }; 88 89 char *tokname(n) 90 { 91 if (n<=256 || n >= LASTTOKEN) 92 n = 257; 93 return(tok[n-257].tnm); 94 } 95