68 %INTEGERFN CHAR(%INTEGER P) 76 %END 16 78 %ROUTINE PUT CHAR(%INTEGER K) 89 %END 32 91 %ROUTINE FAULT(%INTEGER K) 95 %END 10 97 %ROUTINE PRINT(%INTEGER K) 100 %END 11 102 %ROUTINE PRINT WORD(%INTEGER V) 103 %ROUTINE PRINT HIT(%INTEGER V) 106 %END 16 107 %ROUTINE PRINT1(%INTEGER V) 109 %END 11 111 %END 38 113 %ROUTINE PRINT LOC 117 %END 15 119 %ROUTINE DO NEWLINE 122 %END 12 124 %ROUTINE PRINT LINE 125 %ROUTINE PRINTIT(%INTEGER SUB) 143 %END 73 159 %END 125 161 %ROUTINE PUT WORD(%INTEGER V) 170 %END 39 172 %ROUTINE PLANT VAL 186 %END 48 188 %ROUTINE PLANT(%INTEGER V) 194 %END 18 196 %ROUTINE NEST(%INTEGER K) 199 %END 14 201 %ROUTINE SET LAB(%INTEGER DEST) 234 %END 124 236 %ROUTINE ASSEMBLE 250 %ROUTINE COMBINE 259 %END 58 261 %ROUTINE PLANT JUMP 281 %END 92 283 %ROUTINE SET JUMP(%INTEGER CASE) 295 %END 65 297 %ROUTINE PLANT INST(%INTEGER CODE) 300 %END 11 302 %ROUTINE RELEASE 312 %END 38 314 %INTEGERFN TREG 328 %END 43 330 %ROUTINE LOAD CONST(%INTEGER R) 349 %END 100 351 %ROUTINE LOAD REG(%INTEGER R) 404 %END 256 406 %ROUTINE LOAD TEMP 409 %END 5 411 %ROUTINE SWOP 415 %END 15 432 %PREDICATE TEMP 440 %END 27 642 %END 1498 644 %ROUTINE GET SYM 649 %END 10 651 %PREDICATE S(%INTEGER K) 655 %END 10 657 %PREDICATE SS(%INTEGER K) 662 %END 18 664 %PREDICATE TAG 666 %ROUTINE CODE SYM 675 %END 32 676 %ROUTINE PACK TRIPLE 695 %END 82 707 %END 159 709 %PREDICATE TAGIF 714 %END 23 716 %ROUTINE LOOKUP(%INTEGER CONTROL) 765 %END 179 767 %ROUTINE QUEUE(%INTEGER K) 770 %END 14 772 %ROUTINE GET EXP 882 %END 409 884 %ROUTINE GET COND 915 %END 95 917 %ROUTINE GET INST 926 %END 18 928 %ROUTINE READ LINE 997 %END 204 999 %ROUTINE SCAN ARG 1018 %END 71 1020 %ROUTINE SET ACC 1030 %END 22 1409 %ROUTINE BNEST 1413 %END 29 1445 %ENDOFPROGRAM 4355