1
2 " BEGIN INCLUDE FILE apl_lex_pseudo_chars.incl.alm
3
4 " These are codes which are used by the lex as if they were characters,
5 " for purposes of looking up in the char_index table in apl_lex_tables_.
6 " In this way these codes lead to operator beads.
7 " However these codes are not characters but special pseudo-characters
8 " generated by the lex from multi-character sequences.
9 " At present these codes start at 200 decimal, which is a little above
10 " the end of the regular characters.
11 " 6/18/73 DAM
12 " Modified 740131 by PG for new system variables.
13 " Modified 781115 by PG to add SemiColonCons.
14 " Modified 790207 by William M. York to add file system functions.
15 " Modified 811211 by H. Hoover UofC to add QuadCALL & QuadCALLSemicolon.
16
17 equ SDelta,201
18 equ TDelta,202
19 equ QuadCT,203
20 equ QuadIO,204
21 equ QuadLX,205
22 equ QuadPP,206
23 equ QuadPW,207
24 equ QuadRL,208
25 equ QuadAI,209
26 equ QuadLC,210
27 equ QuadTS,211
28 equ QuadTT,212
29 equ QuadUL,213
30 equ QuadWA,214
31 equ QuadWU,215 extra
32 equ QuadCS,216 extra
33 equ AssignSub,217
34 equ AssignIgnore,218
35 equ RightOprBracket,219
36 equ QuadCR,220
37 equ QuadFX,221
38 equ QuadEX,222
39 equ QuadNL,223
40 equ QuadNC,224
41 equ QuadDL,225
42 equ QuadSVO,226
43 equ QuadSVC,227
44 equ QuadSVQ,228
45 equ QuadSVR,229
46 equ QuadIT,230
47 equ QuadEC,231
48 equ QuadAF,232
49 equ SemiColonCons,233
50 equ QuadFADDACL,234
51 equ QuadFAPPEND,235
52 equ QuadFCREATE,236
53 equ QuadFDELETEACL,237
54 equ QuadFDROP,238
55 equ QuadFERASE,239
56 equ QuadFHOLD,240
57 equ QuadFLIB,241
58 equ QuadFLIM,242
59 equ QuadFLISTACL,243
60 equ QuadFNAMES,244
61 equ QuadFNUMS,245
62 equ QuadFRDCI,246
63 equ QuadFREAD,247
64 equ QuadFRENAME,248
65 equ QuadFREPLACE,249
66 equ QuadFSETACL,250
67 equ QuadFSIZE,251
68 equ QuadFSTIE,252
69 equ QuadFTIE,253
70 equ QuadFUNTIE,254
71 equ QuadCALL,255
72 equ QuadCALLSemicolon,256
73
74 " END INCLUDE FILE apl_lex_pseudo_chars.incl.alm