1 %EXTERNALROUTINE CHECKINNER(%INTEGER FSTART,FSIZE, %INTEGERNAME PARM) 2 !%EXTERNALLONGREALFNSPEC CPUTIME O LINE 1 "regression-compile-tmp/check.imp" $ DEF CHECKINNER (_CHECKINNER) p1=V_00ad a/tf=7 b/format=0 c/ostate=23 type=0 () form=7 (routine) special=0 () linkage=3 (external) spec=0 indirect=0 unass=1 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} $ DEF FSTART p1=V_00ae a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF FSIZE p1=V_00af a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF PARM p1=V_00b0 a/tf=12 b/format=1 c/ostate=0 type=1 (integer) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=1} 3 %LONGREAL TIME1,TIME2 4 ! 5 !DECLARATION CODES O LINE 3 "regression-compile-tmp/check.imp" $ DEF TIME1 p1=V_00b1 a/tf=21 b/format=4 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF TIME2 p1=V_00b2 a/tf=21 b/format=4 c/ostate=0 type=2 (real) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 6 %CONSTINTEGER STRINGBIT=X'80', REALBITS=X'30', INTBIT=X'40' O LINE 6 "regression-compile-tmp/check.imp" 7 %CONSTINTEGER NUMBITS=X'70' O LINE 7 "regression-compile-tmp/check.imp" 8 %CONSTINTEGER APPMASK=X'FF00' O LINE 8 "regression-compile-tmp/check.imp" 9 %CONSTINTEGER EXP=1, FN=2 O LINE 9 "regression-compile-tmp/check.imp" 10 %CONSTINTEGER RECFORMAT=4, ROUTINE=6 O LINE 10 "regression-compile-tmp/check.imp" 11 %CONSTINTEGER REF=8, VAR=9, MAP=10 O LINE 11 "regression-compile-tmp/check.imp" 12 %CONSTINTEGER LAB=12, JUMPLAB=13 O LINE 12 "regression-compile-tmp/check.imp" 13 %CONSTINTEGER SWITCH=X'10C' O LINE 13 "regression-compile-tmp/check.imp" 14 %CONSTINTEGER IMP1MODES=B'01000011111111000000000000000000' O LINE 14 "regression-compile-tmp/check.imp" 15 %CONSTINTEGER IMPMODES =B'01000011111100000000000000000000' O LINE 15 "regression-compile-tmp/check.imp" 16 %CONSTINTEGER DESTMODES=B'00000000111100000000000000000000' O LINE 16 "regression-compile-tmp/check.imp" 17 %CONSTINTEGER ADRMODES =B'01000000111100000000000000000000' O LINE 17 "regression-compile-tmp/check.imp" 18 %CONSTINTEGER EXPMODES =B'11110000111100000000000000000000' O LINE 18 "regression-compile-tmp/check.imp" 19 %CONSTINTEGER FMATMODES=B'00001000000000000000000000000000' 20 !SYMBOL INIT CODES 21 ! USED EXPLICITLY 22 ! SPACE=0, DIGIT:ISO, LETTER:ISO, QUOTE=127 23 ! PC=128, PCLET OR PUNCT: 128 + KEYDICT INDEX 24 ! KEYDICT INDEX >= PUNCTMIN FOR PUNCT 25 ! KEYDICT INDEX >= SKIP1MIN FOR ! * SEMICOLON NL O LINE 19 "regression-compile-tmp/check.imp" 26 %CONSTINTEGER NLCODE=127; !MASKED FROM 255 ACTUAL 27 !ATOM CODES O LINE 26 "regression-compile-tmp/check.imp" 28 %CONSTINTEGER IDENT=1, CONST=2, LB=11, COMMA=10, RB=12 O LINE 28 "regression-compile-tmp/check.imp" 29 %CONSTINTEGER TERMINATOR=13, JUMP=15 O LINE 29 "regression-compile-tmp/check.imp" 30 %CONSTINTEGER OP3=6, START=53, CYCLE=54 31 ! VERTICAL BAR O LINE 30 "regression-compile-tmp/check.imp" 32 %CONSTINTEGER MARKER=124 33 O LINE 32 "regression-compile-tmp/check.imp" 34 %OWNINTEGER STATS=0, ATOMS=-54, IDENTIFIERS=-54, NUMBERS=0, LOOPS=0 O LINE 34 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 $ DEF STATS p1=V_00b3 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 N PUSHI #0xffffffca $ DEF ATOMS p1=V_00b4 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 N PUSHI #0xffffffca $ DEF IDENTIFIERS p1=V_00b5 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 N PUSHI #0x00000000 $ DEF NUMBERS p1=V_00b6 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 N PUSHI #0x00000000 $ DEF LOOPS p1=V_00b7 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 35 %OWNINTEGER LOOKS=1, TIMES=1 O LINE 35 "regression-compile-tmp/check.imp" N PUSHI #0x00000001 $ DEF LOOKS p1=V_00b8 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 N PUSHI #0x00000001 $ DEF TIMES p1=V_00b9 a/tf=11 b/format=1 c/ostate=21 type=1 (integer) form=1 (simple) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 A INIT 1 36 %INTEGER I,J O LINE 36 "regression-compile-tmp/check.imp" $ DEF I p1=V_00ba a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF J p1=V_00bb a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 37 %INTEGER LINEBASE; !BASE FOR SOURCE LINE (POINTER) O LINE 37 "regression-compile-tmp/check.imp" $ DEF LINEBASE p1=V_00bc a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 38 %INTEGER FPOS; !CURRENT POSITION IN SOURCE (POINTER) O LINE 38 "regression-compile-tmp/check.imp" $ DEF FPOS p1=V_00bd a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 39 %INTEGER FPOS1; !START OF CURRENT ATOM (POINTER) O LINE 39 "regression-compile-tmp/check.imp" $ DEF FPOS1 p1=V_00be a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 40 %INTEGER PRINTPOS; !'LINE-ALREADY-PRINTED' INDIC O LINE 40 "regression-compile-tmp/check.imp" $ DEF PRINTPOS p1=V_00bf a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 41 %INTEGER LINE; !CURRENT LINE NUMBER O LINE 41 "regression-compile-tmp/check.imp" $ DEF LINE p1=V_00c0 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 42 %INTEGER NEXTLINE O LINE 42 "regression-compile-tmp/check.imp" $ DEF NEXTLINE p1=V_00c1 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 43 %INTEGER FMAX; !LAST BYTE IN SOURCE (POINTER) O LINE 43 "regression-compile-tmp/check.imp" $ DEF FMAX p1=V_00c2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 44 %INTEGER FAULTNUM; !FAULTY NUMBER O LINE 44 "regression-compile-tmp/check.imp" $ DEF FAULTNUM p1=V_00c3 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 45 %INTEGER FAULTPOS; !FAULTY ATOM POSITION (POINTER) O LINE 45 "regression-compile-tmp/check.imp" $ DEF FAULTPOS p1=V_00c4 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 46 %INTEGER SYMCODE; !SYMBOL CODE FOR CURRENT SYMBOL O LINE 46 "regression-compile-tmp/check.imp" $ DEF SYMCODE p1=V_00c5 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 47 %INTEGER SKIPMIN; !=SKIP1MIN OR NLCODE 48 !%INTEGER GG; !=GRAM(G) O LINE 47 "regression-compile-tmp/check.imp" $ DEF SKIPMIN p1=V_00c6 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 49 %INTEGER CLASS; !GRAMMAR CLASS O LINE 49 "regression-compile-tmp/check.imp" $ DEF CLASS p1=V_00c7 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 50 %INTEGER G; !INDEX TO GRAM O LINE 50 "regression-compile-tmp/check.imp" $ DEF G p1=V_00c8 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 51 %INTEGER ATOM; !ATOM CODE FOR CURRENT ATOM O LINE 51 "regression-compile-tmp/check.imp" $ DEF ATOM p1=V_00c9 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 52 %INTEGER ATOMTYPE; !TYPE FOR CURREMT ATOM O LINE 52 "regression-compile-tmp/check.imp" $ DEF ATOMTYPE p1=V_00ca a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 53 %INTEGER ATOMVAL; !'VALUE' FOR CURRENT ATOM O LINE 53 "regression-compile-tmp/check.imp" $ DEF ATOMVAL p1=V_00cb a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 54 %INTEGER DECLTYPE; !DECLARATION TYPE O LINE 54 "regression-compile-tmp/check.imp" $ DEF DECLTYPE p1=V_00cc a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 55 %INTEGER MODES; !BIT VECTOR FOR PERMISSIBLE IDENT MODES O LINE 55 "regression-compile-tmp/check.imp" $ DEF MODES p1=V_00cd a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 56 %INTEGER DIMCOUNT; !DIMENSION COUNT O LINE 56 "regression-compile-tmp/check.imp" $ DEF DIMCOUNT p1=V_00ce a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 57 %INTEGER CONSTCOUNT; !CONSTANT COUNT (DOWN) O LINE 57 "regression-compile-tmp/check.imp" $ DEF CONSTCOUNT p1=V_00cf a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 58 %INTEGER STRINGSIZE O LINE 58 "regression-compile-tmp/check.imp" $ DEF STRINGSIZE p1=V_00d0 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 59 %INTEGER PRECISION O LINE 59 "regression-compile-tmp/check.imp" $ DEF PRECISION p1=V_00d1 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 60 %INTEGER LASTTYPE,LASTVAL O LINE 60 "regression-compile-tmp/check.imp" $ DEF LASTTYPE p1=V_00d2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF LASTVAL p1=V_00d3 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 61 %INTEGER TYPE,VAL O LINE 61 "regression-compile-tmp/check.imp" $ DEF TYPE p1=V_00d4 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF VAL p1=V_00d5 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 62 %INTEGER NP; !NEST POINTER (INDEX TO NTYPE,NVAL) O LINE 62 "regression-compile-tmp/check.imp" $ DEF NP p1=V_00d6 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 63 %INTEGERARRAY NTYPE,NVAL(1:50); !NEST O LINE 63 "regression-compile-tmp/check.imp" $ DEF NTYPE p1=V_00d7 a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF NVAL p1=V_00d8 a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 N PUSHI #0x00000001 N PUSHI #0x00000032 d DIM 0001 0002 64 %INTEGER LINKMAX; !GRAMMAR STACK MAX (INDEX TO LINK) O LINE 64 "regression-compile-tmp/check.imp" $ DEF LINKMAX p1=V_00d9 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 65 %INTEGERARRAY LINK(1:20); !GRAMMAR CONTROL STACK O LINE 65 "regression-compile-tmp/check.imp" $ DEF LINK p1=V_00da a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 N PUSHI #0x00000001 N PUSHI #0x00000014 d DIM 0001 0001 66 %RECORDFORMAT BLOCKINF(%INTEGER STACK,LOCAL,BTYPE) O LINE 66 "regression-compile-tmp/check.imp" $ DEF BLOCKINF p1=V_00db a/tf=44 b/format=db c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( RECORDFORMAT $ DEF STACK p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF LOCAL p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF BTYPE p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) 67 %INTEGER LEVEL; !CURRENT BLOCK LEVEL (MAIN=1) O LINE 67 "regression-compile-tmp/check.imp" $ DEF LEVEL p1=V_00dc a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 68 %RECORD(BLOCKINF) C; !INFO FOR CURRENT BLOCK O LINE 68 "regression-compile-tmp/check.imp" $ DEF C p1=V_00dd a/tf=41 b/format=db c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 69 %RECORD(BLOCKINF)%ARRAY HOLD(1:12); !INFO FOR GLOBAL BLOCKS O LINE 69 "regression-compile-tmp/check.imp" $ DEF HOLD p1=V_00de a/tf=4b b/format=db c/ostate=100 type=4 (record) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 N PUSHI #0x00000001 N PUSHI #0x0000000c d DIM 0001 0001 70 %INTEGERARRAY INDEX(0:255); !HASH INDEX TO IDENT DICT O LINE 70 "regression-compile-tmp/check.imp" $ DEF INDEX p1=V_00df a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 N PUSHI #0x00000000 N PUSHI #0x000000ff d DIM 0001 0001 71 %INTEGERNAME HEAD; !HEAD OF IDENT SEARCH LIST O LINE 71 "regression-compile-tmp/check.imp" $ DEF HEAD p1=V_00e0 a/tf=12 b/format=1 c/ostate=0 type=1 (integer) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 72 %INTEGER DPOS; !DICT SEARCH POSITION (POINTER) O LINE 72 "regression-compile-tmp/check.imp" $ DEF DPOS p1=V_00e1 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 73 %INTEGER DLIM; !DICT LIMIT (POINTER) O LINE 73 "regression-compile-tmp/check.imp" $ DEF DLIM p1=V_00e2 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 74 %INTEGER NEWDLIM O LINE 74 "regression-compile-tmp/check.imp" $ DEF NEWDLIM p1=V_00e3 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 75 %INTEGER DBOUND; !DICT UPPER LIMIT (POINTER); O LINE 75 "regression-compile-tmp/check.imp" $ DEF DBOUND p1=V_00e4 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 76 %INTEGER IDENTS; !POS OF FIRST IDENT IN DECL LIST (POINTER) O LINE 76 "regression-compile-tmp/check.imp" $ DEF IDENTS p1=V_00e5 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 77 %INTEGER RECIDENTS; !POS OF FIRST IDENT IN RECORD LIST (POINTER) O LINE 77 "regression-compile-tmp/check.imp" $ DEF RECIDENTS p1=V_00e6 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 78 %INTEGER PIDENTPOS; !POS OF PROCEDURE IDENT (POINTER) O LINE 78 "regression-compile-tmp/check.imp" $ DEF PIDENTPOS p1=V_00e7 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 79 %INTEGER FIDENTPOS; !POS OF FORMAT IDENT (POINTER) O LINE 79 "regression-compile-tmp/check.imp" $ DEF FIDENTPOS p1=V_00e8 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 80 %INTEGER EXTIND; !SET BY %EXTERNAL O LINE 80 "regression-compile-tmp/check.imp" $ DEF EXTIND p1=V_00e9 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 81 %INTEGER CONDIND; !SET FOR START,CYCLE O LINE 81 "regression-compile-tmp/check.imp" $ DEF CONDIND p1=V_00ea a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 82 %INTEGER PARMAX; !CURRENT MAX IN PARTYPE O LINE 82 "regression-compile-tmp/check.imp" $ DEF PARMAX p1=V_00eb a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 83 %INTEGER ADGRAM0, LINK1; !PRE-COMPUTED GRAMMAR VALUES O LINE 83 "regression-compile-tmp/check.imp" $ DEF ADGRAM0 p1=V_00ec a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF LINK1 p1=V_00ed a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 84 %INTEGER APPCONT 85 O LINE 84 "regression-compile-tmp/check.imp" $ DEF APPCONT p1=V_00ee a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 86 %OWNINTEGERARRAY PARTYPE(0:255) = 0, 87 X'00000069', X'01000069', X'02000069', X'03000069', 88 X'04000069', X'05000069', X'00000029', X'01000029', 89 X'00000089', X'00000088', X'000000F8', X'02000029', 90 X'07000029', X'01000088', X'02000088', 0(236), 91 X'FD000069', X'FE0001F8', X'00000000', X'FF000069' 92 O LINE 86 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x000000ff b BOUNDS $ DEF PARTYPE p1=V_00ef a/tf=1b b/format=1 c/ostate=121 type=1 (integer) form=11 (array) special=0 () linkage=1 (own) spec=0 indirect=0 unass=1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000069 A INIT 1 N PUSHI #0x01000069 A INIT 1 N PUSHI #0x02000069 A INIT 1 N PUSHI #0x03000069 A INIT 1 N PUSHI #0x04000069 A INIT 1 N PUSHI #0x05000069 A INIT 1 N PUSHI #0x00000029 A INIT 1 N PUSHI #0x01000029 A INIT 1 N PUSHI #0x00000089 A INIT 1 N PUSHI #0x00000088 A INIT 1 N PUSHI #0x000000f8 A INIT 1 N PUSHI #0x02000029 A INIT 1 N PUSHI #0x07000029 A INIT 1 N PUSHI #0x01000088 A INIT 1 N PUSHI #0x02000088 A INIT 1 N PUSHI #0x00000000 A INIT 236 N PUSHI #0xfd000069 A INIT 1 N PUSHI #0xfe0001f8 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0xff000069 A INIT 1 93 %INTEGERARRAY DICT(1:4000) 94 95 !* GRAMMAR AND KEYWORD DICTIONARY GENERATED BY TAKEON PROGRAM 96 O LINE 93 "regression-compile-tmp/check.imp" $ DEF DICT p1=V_00f0 a/tf=1b b/format=1 c/ostate=100 type=1 (integer) form=11 (array) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 N PUSHI #0x00000001 N PUSHI #0x00000fa0 d DIM 0001 0001 97 %CONSTINTEGER PUNCTMIN = 43, SKIP1MIN = 86 98 O LINE 97 "regression-compile-tmp/check.imp" 99 %CONSTBYTEINTEGERARRAY SYMINIT( 0: 255) = %C 100 129, 129, 129, 129, 129, 129, 129, 129, 101 129, 129, 255, 129, 129, 129, 129, 129, 102 129, 129, 129, 129, 129, 129, 129, 129, 103 129, 129, 129, 129, 129, 129, 129, 129, 104 0, 217, 127, 171, 129, 128, 173, 127, 105 175, 178, 214, 180, 182, 184, 187, 189, 106 48, 49, 50, 51, 52, 53, 54, 55, 107 56, 57, 192, 221, 194, 200, 203, 129, 108 129, 65, 66, 67, 68, 69, 70, 71, 109 72, 73, 74, 75, 76, 77, 78, 79, 110 80, 81, 82, 83, 84, 85, 86, 87, 111 88, 89, 90, 129, 207, 129, 210, 212, 112 129, 65, 66, 67, 68, 69, 70, 71, 113 72, 73, 74, 75, 76, 77, 78, 79, 114 80, 81, 82, 83, 84, 85, 86, 87, 115 88, 89, 90, 129, 207, 129, 210, 212, 116 129, 129, 129, 129, 129, 129, 129, 129, 117 129, 129, 255, 129, 129, 129, 129, 129, 118 129, 129, 129, 129, 129, 129, 129, 129, 119 129, 129, 129, 129, 129, 129, 129, 129, 120 0, 217, 127, 171, 129, 128, 173, 127, 121 175, 178, 214, 180, 182, 184, 187, 189, 122 48, 49, 50, 51, 52, 53, 54, 55, 123 56, 57, 192, 221, 194, 200, 203, 129, 124 129, 130, 132, 134, 138, 139, 142, 129, 125 129, 146, 129, 129, 148, 150, 152, 154, 126 157, 158, 159, 161, 167, 169, 129, 170, 127 129, 129, 129, 129, 207, 129, 210, 212, 128 129, 130, 132, 134, 138, 139, 142, 129, 129 129, 146, 129, 129, 148, 150, 152, 154, 130 157, 158, 159, 161, 167, 169, 129, 170, 131 129, 129, 129, 129, 207, 129, 210, 212 132 O LINE 99 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x000000ff b BOUNDS $ DEF SYMINIT p1=V_00f1 a/tf=1b b/format=2 c/ostate=112 type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000ff A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000000d9 A INIT 1 N PUSHI #0x0000007f A INIT 1 N PUSHI #0x000000ab A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000080 A INIT 1 N PUSHI #0x000000ad A INIT 1 N PUSHI #0x0000007f A INIT 1 N PUSHI #0x000000af A INIT 1 N PUSHI #0x000000b2 A INIT 1 N PUSHI #0x000000d6 A INIT 1 N PUSHI #0x000000b4 A INIT 1 N PUSHI #0x000000b6 A INIT 1 N PUSHI #0x000000b8 A INIT 1 N PUSHI #0x000000bb A INIT 1 N PUSHI #0x000000bd A INIT 1 N PUSHI #0x00000030 A INIT 1 N PUSHI #0x00000031 A INIT 1 N PUSHI #0x00000032 A INIT 1 N PUSHI #0x00000033 A INIT 1 N PUSHI #0x00000034 A INIT 1 N PUSHI #0x00000035 A INIT 1 N PUSHI #0x00000036 A INIT 1 N PUSHI #0x00000037 A INIT 1 N PUSHI #0x00000038 A INIT 1 N PUSHI #0x00000039 A INIT 1 N PUSHI #0x000000c0 A INIT 1 N PUSHI #0x000000dd A INIT 1 N PUSHI #0x000000c2 A INIT 1 N PUSHI #0x000000c8 A INIT 1 N PUSHI #0x000000cb A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000046 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004a A INIT 1 N PUSHI #0x0000004b A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000051 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000055 A INIT 1 N PUSHI #0x00000056 A INIT 1 N PUSHI #0x00000057 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000005a A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000cf A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000d2 A INIT 1 N PUSHI #0x000000d4 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000046 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004a A INIT 1 N PUSHI #0x0000004b A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000051 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000055 A INIT 1 N PUSHI #0x00000056 A INIT 1 N PUSHI #0x00000057 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000005a A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000cf A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000d2 A INIT 1 N PUSHI #0x000000d4 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000ff A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000000d9 A INIT 1 N PUSHI #0x0000007f A INIT 1 N PUSHI #0x000000ab A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000080 A INIT 1 N PUSHI #0x000000ad A INIT 1 N PUSHI #0x0000007f A INIT 1 N PUSHI #0x000000af A INIT 1 N PUSHI #0x000000b2 A INIT 1 N PUSHI #0x000000d6 A INIT 1 N PUSHI #0x000000b4 A INIT 1 N PUSHI #0x000000b6 A INIT 1 N PUSHI #0x000000b8 A INIT 1 N PUSHI #0x000000bb A INIT 1 N PUSHI #0x000000bd A INIT 1 N PUSHI #0x00000030 A INIT 1 N PUSHI #0x00000031 A INIT 1 N PUSHI #0x00000032 A INIT 1 N PUSHI #0x00000033 A INIT 1 N PUSHI #0x00000034 A INIT 1 N PUSHI #0x00000035 A INIT 1 N PUSHI #0x00000036 A INIT 1 N PUSHI #0x00000037 A INIT 1 N PUSHI #0x00000038 A INIT 1 N PUSHI #0x00000039 A INIT 1 N PUSHI #0x000000c0 A INIT 1 N PUSHI #0x000000dd A INIT 1 N PUSHI #0x000000c2 A INIT 1 N PUSHI #0x000000c8 A INIT 1 N PUSHI #0x000000cb A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000082 A INIT 1 N PUSHI #0x00000084 A INIT 1 N PUSHI #0x00000086 A INIT 1 N PUSHI #0x0000008a A INIT 1 N PUSHI #0x0000008b A INIT 1 N PUSHI #0x0000008e A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000092 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000094 A INIT 1 N PUSHI #0x00000096 A INIT 1 N PUSHI #0x00000098 A INIT 1 N PUSHI #0x0000009a A INIT 1 N PUSHI #0x0000009d A INIT 1 N PUSHI #0x0000009e A INIT 1 N PUSHI #0x0000009f A INIT 1 N PUSHI #0x000000a1 A INIT 1 N PUSHI #0x000000a7 A INIT 1 N PUSHI #0x000000a9 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000aa A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000cf A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000d2 A INIT 1 N PUSHI #0x000000d4 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000082 A INIT 1 N PUSHI #0x00000084 A INIT 1 N PUSHI #0x00000086 A INIT 1 N PUSHI #0x0000008a A INIT 1 N PUSHI #0x0000008b A INIT 1 N PUSHI #0x0000008e A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000092 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000094 A INIT 1 N PUSHI #0x00000096 A INIT 1 N PUSHI #0x00000098 A INIT 1 N PUSHI #0x0000009a A INIT 1 N PUSHI #0x0000009d A INIT 1 N PUSHI #0x0000009e A INIT 1 N PUSHI #0x0000009f A INIT 1 N PUSHI #0x000000a1 A INIT 1 N PUSHI #0x000000a7 A INIT 1 N PUSHI #0x000000a9 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000aa A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000cf A INIT 1 N PUSHI #0x00000081 A INIT 1 N PUSHI #0x000000d2 A INIT 1 N PUSHI #0x000000d4 A INIT 1 133 %CONSTSHORTINTEGERARRAY KEYDICT( 0: 487) = %C 134 0, 5,-26642, 6194,-26523, 6329,-26385,-26247, 0, 0, 135 6585,-26132,-26066, 6776,-25887,-25815,-25746, 7151,-25562, 7342, 136 -25367, 7471,-25247, 7599,-25119, 7727,-24978,-24782, 8119, 8178, 137 8245,-24475, 8687,-24024,-23959,-23888,-23820,-23625, 9209,-23512, 138 9330, 9390, 9512, 512, 240, 320, 64,-23231, 704, 0, 139 786, 0, 384, 113, 640, 0,-23074, 384, 114, 384, 140 128,-22961, 320, 48, 1600, 1,-22835,-22692,-22563,-22434, 141 512, 240,-22307, 576, 240,-22179,-22050, 512, 240,-21923, 142 448, 68, 448, 68, 192, 0,-21814, 320, 112,-21695, 143 -21559, 384, 67, 832, 1, 11364, 11506, 11559, 11636,-21075, 144 11758, 11875, 11950, 12019, 12068,-20503, 12340, 12469, 12526, 2496, 145 11, 12594, 1664, 3, 12788, 12851, 12910, 12976, 13102, 13165, 146 13236,-19419, 3264, 1, 2816, 0, 13422, 13545, 13601,-19103, 147 -19037,-18969,-18896,-18829, 14004, 14069, 14127, 14183, 14245,-18463, 148 -18385, 14450, 14505, 14579, 14629, 14709,-18004, 14836, 14889, 3008, 149 0, 960, 0, 320, 64, 576, 0, 256, 64, 512, 150 240, 256, 64, 896, 0, 512, 240, 256, 64, 512, 151 240, 256, 112, 384, 68, 3072, 0, 2752, 0, 14945, 152 15017, 15077, 15149,-17549, 15284, 15340, 15393, 15461,-17169, 3712, 153 0, 15668,-16987, 15858, 15916, 15977,-16723, 3136, 0, 16101, 154 16180, 16295, 2496, 3, 16425, 16485, 2880, 0, 16630, 2048, 155 0, 16686, 16740, 16812, 17007, 17065, 17125, 17205, 17269, 17332, 156 17394, 17454, 17507, 17650, 17712, 17833, 17908, 17972, 18030, 18163, 157 18213, 18281, 18348, 18425, 18606, 18729, 18789, 18868, 18994, 19045, 158 19181, 3328, 1, 19238, 1024, 2, 19442, 19497, 19572, 19699, 159 19745, 19815, 1280, 0,-12887, 19954, 20020, 2240, 1, 20069, 160 20148, 20210,-12493, 1984, 25, 20402, 20467, 20513, 20588, 20658, 161 20713, 20788, 20897, 2624, 1, 20980, 1024, 0, 21102, 21155, 162 21221, 3200, 0, 21300, 21363, 21420, 21541,-11090, 2112, 256, 163 3648, 0, 21742, 21806, 2048, 8, 21871, 3456, 2, 21929, 164 -10778,-10708, 22128, 22190, 22254, 1472, 0, 22312, 22452, 22565, 165 22638, 22693, 22767, 22830, 22900, 22949, -9748, 23086, 23140, 23284, 166 23348, 23476, 23598, 23726, -8983, 23858, 23916, 3392, 1, 24039, 167 24168, 24301, 24421, 24499, 1728, 0, 1728, 0, 24609, 24692, 168 24756, 24876, 24995, 25129, 25193, 25266, 25313, 25395, 3520, 1, 169 2368, 0, 25458, 25588, 25633, 25714, 25908, 26021, 26081, 26159, 170 26223, 2304, 9, 26277, 3584, 0, 1088, 0, 1024, 1, 171 26341, 26478, 26543, 1152, 0, 2176, 137, 1920, 268, 2688, 172 0, 26596, 1664, 3, 26669, 26725, 0, 2, 1344, 0, 173 2688, 0, 26796, 26867, 26927, 26988, 27113, 1984, 105, 27173, 174 27244, -5389, 1152, 0, 3264, 1, 27448, 27500, 27630, 27698, 175 27762, 2560, 6, 27892, 27957, 28016, 28069, 28199, 28261, 28404, 176 28519, 2432, 0, 28579, 28711, 1984, 41, 28788, 28852, 1984, 177 57, 28967, 29101, 1856, 121, 29157, 29236, 29298, 2240, -255, 178 29349, 3776, 0, 1280, 0, 29426, 2048, 0, 29477, 29551, 179 1216, 0, 1408, 32, 29601, 29671, 29737, 29807, 29874, 29985, 180 30066, 30192, 30316, 30437, 30510, 30567, 1984, 73, 30637, 1984, 181 121, 1024, 0, 1408, 0, 30770, 30885, 31026, 3776, 1, 182 1984, 89, 1280, 0, 31073, 31149, 1280, 0 183 O LINE 133 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x000001e7 b BOUNDS $ DEF KEYDICT p1=V_00f2 a/tf=1b b/format=3 c/ostate=112 type=1 (integer) form=11 (array) special=2 (short-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000005 A INIT 1 N PUSHI #0xffff97ee A INIT 1 N PUSHI #0x00001832 A INIT 1 N PUSHI #0xffff9865 A INIT 1 N PUSHI #0x000018b9 A INIT 1 N PUSHI #0xffff98ef A INIT 1 N PUSHI #0xffff9979 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000019b9 A INIT 1 N PUSHI #0xffff99ec A INIT 1 N PUSHI #0xffff9a2e A INIT 1 N PUSHI #0x00001a78 A INIT 1 N PUSHI #0xffff9ae1 A INIT 1 N PUSHI #0xffff9b29 A INIT 1 N PUSHI #0xffff9b6e A INIT 1 N PUSHI #0x00001bef A INIT 1 N PUSHI #0xffff9c26 A INIT 1 N PUSHI #0x00001cae A INIT 1 N PUSHI #0xffff9ce9 A INIT 1 N PUSHI #0x00001d2f A INIT 1 N PUSHI #0xffff9d61 A INIT 1 N PUSHI #0x00001daf A INIT 1 N PUSHI #0xffff9de1 A INIT 1 N PUSHI #0x00001e2f A INIT 1 N PUSHI #0xffff9e6e A INIT 1 N PUSHI #0xffff9f32 A INIT 1 N PUSHI #0x00001fb7 A INIT 1 N PUSHI #0x00001ff2 A INIT 1 N PUSHI #0x00002035 A INIT 1 N PUSHI #0xffffa065 A INIT 1 N PUSHI #0x000021ef A INIT 1 N PUSHI #0xffffa228 A INIT 1 N PUSHI #0xffffa269 A INIT 1 N PUSHI #0xffffa2b0 A INIT 1 N PUSHI #0xffffa2f4 A INIT 1 N PUSHI #0xffffa3b7 A INIT 1 N PUSHI #0x000023f9 A INIT 1 N PUSHI #0xffffa428 A INIT 1 N PUSHI #0x00002472 A INIT 1 N PUSHI #0x000024ae A INIT 1 N PUSHI #0x00002528 A INIT 1 N PUSHI #0x00000200 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0x00000140 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0xffffa541 A INIT 1 N PUSHI #0x000002c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000312 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000180 A INIT 1 N PUSHI #0x00000071 A INIT 1 N PUSHI #0x00000280 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0xffffa5de A INIT 1 N PUSHI #0x00000180 A INIT 1 N PUSHI #0x00000072 A INIT 1 N PUSHI #0x00000180 A INIT 1 N PUSHI #0x00000080 A INIT 1 N PUSHI #0xffffa64f A INIT 1 N PUSHI #0x00000140 A INIT 1 N PUSHI #0x00000030 A INIT 1 N PUSHI #0x00000640 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0xffffa6cd A INIT 1 N PUSHI #0xffffa75c A INIT 1 N PUSHI #0xffffa7dd A INIT 1 N PUSHI #0xffffa85e A INIT 1 N PUSHI #0x00000200 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0xffffa8dd A INIT 1 N PUSHI #0x00000240 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0xffffa95d A INIT 1 N PUSHI #0xffffa9de A INIT 1 N PUSHI #0x00000200 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0xffffaa5d A INIT 1 N PUSHI #0x000001c0 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x000001c0 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x000000c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0xffffaaca A INIT 1 N PUSHI #0x00000140 A INIT 1 N PUSHI #0x00000070 A INIT 1 N PUSHI #0xffffab41 A INIT 1 N PUSHI #0xffffabc9 A INIT 1 N PUSHI #0x00000180 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000340 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00002c64 A INIT 1 N PUSHI #0x00002cf2 A INIT 1 N PUSHI #0x00002d27 A INIT 1 N PUSHI #0x00002d74 A INIT 1 N PUSHI #0xffffadad A INIT 1 N PUSHI #0x00002dee A INIT 1 N PUSHI #0x00002e63 A INIT 1 N PUSHI #0x00002eae A INIT 1 N PUSHI #0x00002ef3 A INIT 1 N PUSHI #0x00002f24 A INIT 1 N PUSHI #0xffffafe9 A INIT 1 N PUSHI #0x00003034 A INIT 1 N PUSHI #0x000030b5 A INIT 1 N PUSHI #0x000030ee A INIT 1 N PUSHI #0x000009c0 A INIT 1 N PUSHI #0x0000000b A INIT 1 N PUSHI #0x00003132 A INIT 1 N PUSHI #0x00000680 A INIT 1 N PUSHI #0x00000003 A INIT 1 N PUSHI #0x000031f4 A INIT 1 N PUSHI #0x00003233 A INIT 1 N PUSHI #0x0000326e A INIT 1 N PUSHI #0x000032b0 A INIT 1 N PUSHI #0x0000332e A INIT 1 N PUSHI #0x0000336d A INIT 1 N PUSHI #0x000033b4 A INIT 1 N PUSHI #0xffffb425 A INIT 1 N PUSHI #0x00000cc0 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000b00 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x0000346e A INIT 1 N PUSHI #0x000034e9 A INIT 1 N PUSHI #0x00003521 A INIT 1 N PUSHI #0xffffb561 A INIT 1 N PUSHI #0xffffb5a3 A INIT 1 N PUSHI #0xffffb5e7 A INIT 1 N PUSHI #0xffffb630 A INIT 1 N PUSHI #0xffffb673 A INIT 1 N PUSHI #0x000036b4 A INIT 1 N PUSHI #0x000036f5 A INIT 1 N PUSHI #0x0000372f A INIT 1 N PUSHI #0x00003767 A INIT 1 N PUSHI #0x000037a5 A INIT 1 N PUSHI #0xffffb7e1 A INIT 1 N PUSHI #0xffffb82f A INIT 1 N PUSHI #0x00003872 A INIT 1 N PUSHI #0x000038a9 A INIT 1 N PUSHI #0x000038f3 A INIT 1 N PUSHI #0x00003925 A INIT 1 N PUSHI #0x00003975 A INIT 1 N PUSHI #0xffffb9ac A INIT 1 N PUSHI #0x000039f4 A INIT 1 N PUSHI #0x00003a29 A INIT 1 N PUSHI #0x00000bc0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000003c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000140 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000240 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000100 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000200 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0x00000100 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000380 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000200 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0x00000100 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000200 A INIT 1 N PUSHI #0x000000f0 A INIT 1 N PUSHI #0x00000100 A INIT 1 N PUSHI #0x00000070 A INIT 1 N PUSHI #0x00000180 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000c00 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000ac0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00003a61 A INIT 1 N PUSHI #0x00003aa9 A INIT 1 N PUSHI #0x00003ae5 A INIT 1 N PUSHI #0x00003b2d A INIT 1 N PUSHI #0xffffbb73 A INIT 1 N PUSHI #0x00003bb4 A INIT 1 N PUSHI #0x00003bec A INIT 1 N PUSHI #0x00003c21 A INIT 1 N PUSHI #0x00003c65 A INIT 1 N PUSHI #0xffffbcef A INIT 1 N PUSHI #0x00000e80 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00003d34 A INIT 1 N PUSHI #0xffffbda5 A INIT 1 N PUSHI #0x00003df2 A INIT 1 N PUSHI #0x00003e2c A INIT 1 N PUSHI #0x00003e69 A INIT 1 N PUSHI #0xffffbead A INIT 1 N PUSHI #0x00000c40 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00003ee5 A INIT 1 N PUSHI #0x00003f34 A INIT 1 N PUSHI #0x00003fa7 A INIT 1 N PUSHI #0x000009c0 A INIT 1 N PUSHI #0x00000003 A INIT 1 N PUSHI #0x00004029 A INIT 1 N PUSHI #0x00004065 A INIT 1 N PUSHI #0x00000b40 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000040f6 A INIT 1 N PUSHI #0x00000800 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x0000412e A INIT 1 N PUSHI #0x00004164 A INIT 1 N PUSHI #0x000041ac A INIT 1 N PUSHI #0x0000426f A INIT 1 N PUSHI #0x000042a9 A INIT 1 N PUSHI #0x000042e5 A INIT 1 N PUSHI #0x00004335 A INIT 1 N PUSHI #0x00004375 A INIT 1 N PUSHI #0x000043b4 A INIT 1 N PUSHI #0x000043f2 A INIT 1 N PUSHI #0x0000442e A INIT 1 N PUSHI #0x00004463 A INIT 1 N PUSHI #0x000044f2 A INIT 1 N PUSHI #0x00004530 A INIT 1 N PUSHI #0x000045a9 A INIT 1 N PUSHI #0x000045f4 A INIT 1 N PUSHI #0x00004634 A INIT 1 N PUSHI #0x0000466e A INIT 1 N PUSHI #0x000046f3 A INIT 1 N PUSHI #0x00004725 A INIT 1 N PUSHI #0x00004769 A INIT 1 N PUSHI #0x000047ac A INIT 1 N PUSHI #0x000047f9 A INIT 1 N PUSHI #0x000048ae A INIT 1 N PUSHI #0x00004929 A INIT 1 N PUSHI #0x00004965 A INIT 1 N PUSHI #0x000049b4 A INIT 1 N PUSHI #0x00004a32 A INIT 1 N PUSHI #0x00004a65 A INIT 1 N PUSHI #0x00004aed A INIT 1 N PUSHI #0x00000d00 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00004b26 A INIT 1 N PUSHI #0x00000400 A INIT 1 N PUSHI #0x00000002 A INIT 1 N PUSHI #0x00004bf2 A INIT 1 N PUSHI #0x00004c29 A INIT 1 N PUSHI #0x00004c74 A INIT 1 N PUSHI #0x00004cf3 A INIT 1 N PUSHI #0x00004d21 A INIT 1 N PUSHI #0x00004d67 A INIT 1 N PUSHI #0x00000500 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0xffffcda9 A INIT 1 N PUSHI #0x00004df2 A INIT 1 N PUSHI #0x00004e34 A INIT 1 N PUSHI #0x000008c0 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00004e65 A INIT 1 N PUSHI #0x00004eb4 A INIT 1 N PUSHI #0x00004ef2 A INIT 1 N PUSHI #0xffffcf33 A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000019 A INIT 1 N PUSHI #0x00004fb2 A INIT 1 N PUSHI #0x00004ff3 A INIT 1 N PUSHI #0x00005021 A INIT 1 N PUSHI #0x0000506c A INIT 1 N PUSHI #0x000050b2 A INIT 1 N PUSHI #0x000050e9 A INIT 1 N PUSHI #0x00005134 A INIT 1 N PUSHI #0x000051a1 A INIT 1 N PUSHI #0x00000a40 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x000051f4 A INIT 1 N PUSHI #0x00000400 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x0000526e A INIT 1 N PUSHI #0x000052a3 A INIT 1 N PUSHI #0x000052e5 A INIT 1 N PUSHI #0x00000c80 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00005334 A INIT 1 N PUSHI #0x00005373 A INIT 1 N PUSHI #0x000053ac A INIT 1 N PUSHI #0x00005425 A INIT 1 N PUSHI #0xffffd4ae A INIT 1 N PUSHI #0x00000840 A INIT 1 N PUSHI #0x00000100 A INIT 1 N PUSHI #0x00000e40 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000054ee A INIT 1 N PUSHI #0x0000552e A INIT 1 N PUSHI #0x00000800 A INIT 1 N PUSHI #0x00000008 A INIT 1 N PUSHI #0x0000556f A INIT 1 N PUSHI #0x00000d80 A INIT 1 N PUSHI #0x00000002 A INIT 1 N PUSHI #0x000055a9 A INIT 1 N PUSHI #0xffffd5e6 A INIT 1 N PUSHI #0xffffd62c A INIT 1 N PUSHI #0x00005670 A INIT 1 N PUSHI #0x000056ae A INIT 1 N PUSHI #0x000056ee A INIT 1 N PUSHI #0x000005c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00005728 A INIT 1 N PUSHI #0x000057b4 A INIT 1 N PUSHI #0x00005825 A INIT 1 N PUSHI #0x0000586e A INIT 1 N PUSHI #0x000058a5 A INIT 1 N PUSHI #0x000058ef A INIT 1 N PUSHI #0x0000592e A INIT 1 N PUSHI #0x00005974 A INIT 1 N PUSHI #0x000059a5 A INIT 1 N PUSHI #0xffffd9ec A INIT 1 N PUSHI #0x00005a2e A INIT 1 N PUSHI #0x00005a64 A INIT 1 N PUSHI #0x00005af4 A INIT 1 N PUSHI #0x00005b34 A INIT 1 N PUSHI #0x00005bb4 A INIT 1 N PUSHI #0x00005c2e A INIT 1 N PUSHI #0x00005cae A INIT 1 N PUSHI #0xffffdce9 A INIT 1 N PUSHI #0x00005d32 A INIT 1 N PUSHI #0x00005d6c A INIT 1 N PUSHI #0x00000d40 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00005de7 A INIT 1 N PUSHI #0x00005e68 A INIT 1 N PUSHI #0x00005eed A INIT 1 N PUSHI #0x00005f65 A INIT 1 N PUSHI #0x00005fb3 A INIT 1 N PUSHI #0x000006c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000006c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00006021 A INIT 1 N PUSHI #0x00006074 A INIT 1 N PUSHI #0x000060b4 A INIT 1 N PUSHI #0x0000612c A INIT 1 N PUSHI #0x000061a3 A INIT 1 N PUSHI #0x00006229 A INIT 1 N PUSHI #0x00006269 A INIT 1 N PUSHI #0x000062b2 A INIT 1 N PUSHI #0x000062e1 A INIT 1 N PUSHI #0x00006333 A INIT 1 N PUSHI #0x00000dc0 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000940 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00006372 A INIT 1 N PUSHI #0x000063f4 A INIT 1 N PUSHI #0x00006421 A INIT 1 N PUSHI #0x00006472 A INIT 1 N PUSHI #0x00006534 A INIT 1 N PUSHI #0x000065a5 A INIT 1 N PUSHI #0x000065e1 A INIT 1 N PUSHI #0x0000662f A INIT 1 N PUSHI #0x0000666f A INIT 1 N PUSHI #0x00000900 A INIT 1 N PUSHI #0x00000009 A INIT 1 N PUSHI #0x000066a5 A INIT 1 N PUSHI #0x00000e00 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000440 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000400 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x000066e5 A INIT 1 N PUSHI #0x0000676e A INIT 1 N PUSHI #0x000067af A INIT 1 N PUSHI #0x00000480 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000880 A INIT 1 N PUSHI #0x00000089 A INIT 1 N PUSHI #0x00000780 A INIT 1 N PUSHI #0x0000010c A INIT 1 N PUSHI #0x00000a80 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000067e4 A INIT 1 N PUSHI #0x00000680 A INIT 1 N PUSHI #0x00000003 A INIT 1 N PUSHI #0x0000682d A INIT 1 N PUSHI #0x00006865 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000002 A INIT 1 N PUSHI #0x00000540 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000a80 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000068ac A INIT 1 N PUSHI #0x000068f3 A INIT 1 N PUSHI #0x0000692f A INIT 1 N PUSHI #0x0000696c A INIT 1 N PUSHI #0x000069e9 A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000069 A INIT 1 N PUSHI #0x00006a25 A INIT 1 N PUSHI #0x00006a6c A INIT 1 N PUSHI #0xffffeaf3 A INIT 1 N PUSHI #0x00000480 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000cc0 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00006b38 A INIT 1 N PUSHI #0x00006b6c A INIT 1 N PUSHI #0x00006bee A INIT 1 N PUSHI #0x00006c32 A INIT 1 N PUSHI #0x00006c72 A INIT 1 N PUSHI #0x00000a00 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00006cf4 A INIT 1 N PUSHI #0x00006d35 A INIT 1 N PUSHI #0x00006d70 A INIT 1 N PUSHI #0x00006da5 A INIT 1 N PUSHI #0x00006e27 A INIT 1 N PUSHI #0x00006e65 A INIT 1 N PUSHI #0x00006ef4 A INIT 1 N PUSHI #0x00006f67 A INIT 1 N PUSHI #0x00000980 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00006fa3 A INIT 1 N PUSHI #0x00007027 A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000029 A INIT 1 N PUSHI #0x00007074 A INIT 1 N PUSHI #0x000070b4 A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000039 A INIT 1 N PUSHI #0x00007127 A INIT 1 N PUSHI #0x000071ad A INIT 1 N PUSHI #0x00000740 A INIT 1 N PUSHI #0x00000079 A INIT 1 N PUSHI #0x000071e5 A INIT 1 N PUSHI #0x00007234 A INIT 1 N PUSHI #0x00007272 A INIT 1 N PUSHI #0x000008c0 A INIT 1 N PUSHI #0xffffff01 A INIT 1 N PUSHI #0x000072a5 A INIT 1 N PUSHI #0x00000ec0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000500 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000072f2 A INIT 1 N PUSHI #0x00000800 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00007325 A INIT 1 N PUSHI #0x0000736f A INIT 1 N PUSHI #0x000004c0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000580 A INIT 1 N PUSHI #0x00000020 A INIT 1 N PUSHI #0x000073a1 A INIT 1 N PUSHI #0x000073e7 A INIT 1 N PUSHI #0x00007429 A INIT 1 N PUSHI #0x0000746f A INIT 1 N PUSHI #0x000074b2 A INIT 1 N PUSHI #0x00007521 A INIT 1 N PUSHI #0x00007572 A INIT 1 N PUSHI #0x000075f0 A INIT 1 N PUSHI #0x0000766c A INIT 1 N PUSHI #0x000076e5 A INIT 1 N PUSHI #0x0000772e A INIT 1 N PUSHI #0x00007767 A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x000077ad A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000079 A INIT 1 N PUSHI #0x00000400 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000580 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00007832 A INIT 1 N PUSHI #0x000078a5 A INIT 1 N PUSHI #0x00007932 A INIT 1 N PUSHI #0x00000ec0 A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x000007c0 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x00000500 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00007961 A INIT 1 N PUSHI #0x000079ad A INIT 1 N PUSHI #0x00000500 A INIT 1 N PUSHI #0x00000000 A INIT 1 184 %CONSTSHORTINTEGERARRAY PHRASE( 109: 126) = %C 185 257, 249, 368, 430, 264, 269, 286, 298, 335, 345, 186 0, 452, 237, 374, 381, 0, 420, 437 187 O LINE 184 "regression-compile-tmp/check.imp" N PUSHI #0x0000006d N PUSHI #0x0000007e b BOUNDS $ DEF PHRASE p1=V_00f3 a/tf=1b b/format=3 c/ostate=112 type=1 (integer) form=11 (array) special=2 (short-integer) linkage=2 (constant) spec=0 indirect=1 unass=0 N PUSHI #0x00000101 A INIT 1 N PUSHI #0x000000f9 A INIT 1 N PUSHI #0x00000170 A INIT 1 N PUSHI #0x000001ae A INIT 1 N PUSHI #0x00000108 A INIT 1 N PUSHI #0x0000010d A INIT 1 N PUSHI #0x0000011e A INIT 1 N PUSHI #0x0000012a A INIT 1 N PUSHI #0x0000014f A INIT 1 N PUSHI #0x00000159 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000001c4 A INIT 1 N PUSHI #0x000000ed A INIT 1 N PUSHI #0x00000176 A INIT 1 N PUSHI #0x0000017d A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000001a4 A INIT 1 N PUSHI #0x000001b5 A INIT 1 188 %CONSTINTEGER INITBASE = 472 189 O LINE 188 "regression-compile-tmp/check.imp" 190 {%CONST}%OWNSHORTINTEGERARRAY GRAM( 0: 531) = %C 191 66, 4084, 4511, 4898, 5028, 6440, 64, 7071, 7330, 5028, 192 64, 11553, 1955, 11685, 11945, 12273, 12321, 2467, 6439, 5617, 193 12429, 2996, 64, 5786, 5557, 5620, 2157, 12575, 12834, 6440, 194 64, 12954, 12955, 6961, 64, 13089, 6439, 5489, 4589, 13345, 195 1955, 12273, 7433, 12429, 64, 6005, 7602, 5557, 64, 7925, 196 13569, 13737, 64, 12429, 5630, 13089, 5489, 7149, 8257, 5557, 197 14068, 3250, 5558, 64, 8442, 8538, 4746, 12429, 64, 9042, 198 9200, 8963, 14217, 14350, 14479, 14617, 9927, 12429, 14763, 66, 199 14970, 15098, 15489, 64, 15729, 16129, 64, 8062, 16378, 5576, 200 12274, 16769, 64, 16897, 64, 5614, 5618, 69, 6439, 64, 201 12653, 5621, 17281, 64, 17409, 64, 17612, 13569, 64, 3124, 202 64, 18154, 18287, 9976, 9956, 116, 5599, 15199, 10378, 18319, 203 64, 18636, 15859, 10762, 12429, 64, 18897, 16479, 11274, 5557, 204 64, 19021, 17105, 17155, 12239, 19276, 19788, 17736, 19851, 19981, 205 64, 20218, 9964, 20225, 64, 20363, 64, 17616, 20619, 64, 206 19443, 22409, 12429, 64, 12275, 22905, 89, 9963, 23126, 23554, 207 64, 20806, 21279, 22306, 21796, 64, 23809, 24609, 24867, 64, 208 25089, 25889, 24867, 64, 21357, 22593, 26125, 26362, 26881, 64, 209 23242, 10378, 12429, 64, 5516, 64, 24014, 24330, 5516, 64, 210 23809, 20806, 27649, 64, 23809, 64, 25294, 28682, 25582, 20618, 211 5516, 64, 28929, 64, 22724, 26458, 22538, 29067, 29197, 64, 212 27084, 27402, 17804, 22905, 26881, 22905, 27854, 24586, 28147, 28426, 213 5516, 64, 27649, 20806, 25089, 64, 29390, 29562, 91, 25459, 214 29663, 29836, 64, 30046, 22538, 29197, 64, 30534, 31135, 31522, 215 31652, 40, 31691, 35, 39, 66, 31213, 35, 64, 32139, 216 64, 32385, 64, 32597, 32780, 64, 88, 33163, 66, 33402, 217 33503, 33676, 64, 98, 34049, 64, 34252, 33802, 66, 34597, 218 34801, 34955, 64, 35194, 35296, 35481, 64, 35677, 35834, 35936, 219 34954, 36236, 64, 36444, 34570, 66, 36875, 64, 37114, 37215, 220 37401, 64, 37608, 37754, 37855, 38028, 64, 99, 39937, 40847, 221 41104, 39569, 39058, 41363, 64, 41602, 12429, 14763, 66, 41737, 222 41870, 64, 40147, 40304, 40067, 14217, 14350, 14479, 9927, 41985, 223 64, 12429, 66, 42114, 64, 41184, 42346, 42479, 42582, 9953, 224 42746, 41196, 42864, 41195, 41162, 43126, 43520, 43691, 43820, 66, 225 67, 44022, 43382, 43691, 66, 44939, 44538, 45448, 45577, 45711, 226 67, 45173, 45824, 12, 64, 46202, 45544, 120, 46604, 64, 227 46313, 46728, 46857, 66, 44539, 47098, 46824, 105, 47361, 64, 228 47569, 47728, 47491, 66, 49281, 48770, 50182, 50311, 50443, 50607, 229 64, 50308, 50693, 51078, 66, 49492, 49648, 49411, 50308, 50693, 230 51078, 66, 51302, 51453, 51578, 51834, 50941, 51972, 49001, 52200, 231 52733, 48873, 48780, 64, 48816, 64, 52861, 52349, 52868, 52997, 232 49129, 52327, 50921, 53501, 53245, 53508, 52457, 52329, 53757, 53225, 233 54401, 2, 54539, 54703, 64, 47572, 45306, 54906, 48, 64, 234 55307, 66, 55546, 55615, 55306, 12, 64, 56175, 56288, 56457, 235 64, 56641, 56826, 56928, 57098, 64, 57338, 57440, 57610, 64, 236 57850, 96, 58057, 58251, 58479, 58618, 58721, 58977, 59142, 64, 237 59276, 64, 59621, 59782, 64, 58251, 64, 60005, 60143, 60257, 238 59142, 66, 0, 8833, 0, 0, 0, 0, 0, 0, 239 0, 0, 0, 0, 0, 0, 0, 40847, 41104, 39569, 240 39058, 41363, 5524, 10261, 5526, 10391, 0, 0, 5786, 6299, 241 0, 10525, 10782, 2079, 928, 0, 3362, 0, 1444, 0, 242 294, 0, 6440, 10921, 3498, 0, 0, 0, 0, 0, 243 0, 11185, 0, 11315, 0, 0, 6838, 2615, 5560, 11449, 244 5562, 59 245 246 !!END OF GENERATED SECTION 247 O LINE 190 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x00000213 b BOUNDS $ DEF GRAM p1=V_00f4 a/tf=1b b/format=3 c/ostate=121 type=1 (integer) form=11 (array) special=2 (short-integer) linkage=1 (own) spec=0 indirect=0 unass=1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00000ff4 A INIT 1 N PUSHI #0x0000119f A INIT 1 N PUSHI #0x00001322 A INIT 1 N PUSHI #0x000013a4 A INIT 1 N PUSHI #0x00001928 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00001b9f A INIT 1 N PUSHI #0x00001ca2 A INIT 1 N PUSHI #0x000013a4 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00002d21 A INIT 1 N PUSHI #0x000007a3 A INIT 1 N PUSHI #0x00002da5 A INIT 1 N PUSHI #0x00002ea9 A INIT 1 N PUSHI #0x00002ff1 A INIT 1 N PUSHI #0x00003021 A INIT 1 N PUSHI #0x000009a3 A INIT 1 N PUSHI #0x00001927 A INIT 1 N PUSHI #0x000015f1 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000bb4 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000169a A INIT 1 N PUSHI #0x000015b5 A INIT 1 N PUSHI #0x000015f4 A INIT 1 N PUSHI #0x0000086d A INIT 1 N PUSHI #0x0000311f A INIT 1 N PUSHI #0x00003222 A INIT 1 N PUSHI #0x00001928 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000329a A INIT 1 N PUSHI #0x0000329b A INIT 1 N PUSHI #0x00001b31 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00003321 A INIT 1 N PUSHI #0x00001927 A INIT 1 N PUSHI #0x00001571 A INIT 1 N PUSHI #0x000011ed A INIT 1 N PUSHI #0x00003421 A INIT 1 N PUSHI #0x000007a3 A INIT 1 N PUSHI #0x00002ff1 A INIT 1 N PUSHI #0x00001d09 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00001775 A INIT 1 N PUSHI #0x00001db2 A INIT 1 N PUSHI #0x000015b5 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00001ef5 A INIT 1 N PUSHI #0x00003501 A INIT 1 N PUSHI #0x000035a9 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x000015fe A INIT 1 N PUSHI #0x00003321 A INIT 1 N PUSHI #0x00001571 A INIT 1 N PUSHI #0x00001bed A INIT 1 N PUSHI #0x00002041 A INIT 1 N PUSHI #0x000015b5 A INIT 1 N PUSHI #0x000036f4 A INIT 1 N PUSHI #0x00000cb2 A INIT 1 N PUSHI #0x000015b6 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000020fa A INIT 1 N PUSHI #0x0000215a A INIT 1 N PUSHI #0x0000128a A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00002352 A INIT 1 N PUSHI #0x000023f0 A INIT 1 N PUSHI #0x00002303 A INIT 1 N PUSHI #0x00003789 A INIT 1 N PUSHI #0x0000380e A INIT 1 N PUSHI #0x0000388f A INIT 1 N PUSHI #0x00003919 A INIT 1 N PUSHI #0x000026c7 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x000039ab A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00003a7a A INIT 1 N PUSHI #0x00003afa A INIT 1 N PUSHI #0x00003c81 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00003d71 A INIT 1 N PUSHI #0x00003f01 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00001f7e A INIT 1 N PUSHI #0x00003ffa A INIT 1 N PUSHI #0x000015c8 A INIT 1 N PUSHI #0x00002ff2 A INIT 1 N PUSHI #0x00004181 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00004201 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000015ee A INIT 1 N PUSHI #0x000015f2 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00001927 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000316d A INIT 1 N PUSHI #0x000015f5 A INIT 1 N PUSHI #0x00004381 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00004401 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000044cc A INIT 1 N PUSHI #0x00003501 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000c34 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000046ea A INIT 1 N PUSHI #0x0000476f A INIT 1 N PUSHI #0x000026f8 A INIT 1 N PUSHI #0x000026e4 A INIT 1 N PUSHI #0x00000074 A INIT 1 N PUSHI #0x000015df A INIT 1 N PUSHI #0x00003b5f A INIT 1 N PUSHI #0x0000288a A INIT 1 N PUSHI #0x0000478f A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000048cc A INIT 1 N PUSHI #0x00003df3 A INIT 1 N PUSHI #0x00002a0a A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000049d1 A INIT 1 N PUSHI #0x0000405f A INIT 1 N PUSHI #0x00002c0a A INIT 1 N PUSHI #0x000015b5 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00004a4d A INIT 1 N PUSHI #0x000042d1 A INIT 1 N PUSHI #0x00004303 A INIT 1 N PUSHI #0x00002fcf A INIT 1 N PUSHI #0x00004b4c A INIT 1 N PUSHI #0x00004d4c A INIT 1 N PUSHI #0x00004548 A INIT 1 N PUSHI #0x00004d8b A INIT 1 N PUSHI #0x00004e0d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00004efa A INIT 1 N PUSHI #0x000026ec A INIT 1 N PUSHI #0x00004f01 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00004f8b A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000044d0 A INIT 1 N PUSHI #0x0000508b A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00004bf3 A INIT 1 N PUSHI #0x00005789 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00002ff3 A INIT 1 N PUSHI #0x00005979 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x000026eb A INIT 1 N PUSHI #0x00005a56 A INIT 1 N PUSHI #0x00005c02 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00005146 A INIT 1 N PUSHI #0x0000531f A INIT 1 N PUSHI #0x00005722 A INIT 1 N PUSHI #0x00005524 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00005d01 A INIT 1 N PUSHI #0x00006021 A INIT 1 N PUSHI #0x00006123 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00006201 A INIT 1 N PUSHI #0x00006521 A INIT 1 N PUSHI #0x00006123 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000536d A INIT 1 N PUSHI #0x00005841 A INIT 1 N PUSHI #0x0000660d A INIT 1 N PUSHI #0x000066fa A INIT 1 N PUSHI #0x00006901 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00005aca A INIT 1 N PUSHI #0x0000288a A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000158c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00005dce A INIT 1 N PUSHI #0x00005f0a A INIT 1 N PUSHI #0x0000158c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00005d01 A INIT 1 N PUSHI #0x00005146 A INIT 1 N PUSHI #0x00006c01 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00005d01 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000062ce A INIT 1 N PUSHI #0x0000700a A INIT 1 N PUSHI #0x000063ee A INIT 1 N PUSHI #0x0000508a A INIT 1 N PUSHI #0x0000158c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00007101 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000058c4 A INIT 1 N PUSHI #0x0000675a A INIT 1 N PUSHI #0x0000580a A INIT 1 N PUSHI #0x0000718b A INIT 1 N PUSHI #0x0000720d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000069cc A INIT 1 N PUSHI #0x00006b0a A INIT 1 N PUSHI #0x0000458c A INIT 1 N PUSHI #0x00005979 A INIT 1 N PUSHI #0x00006901 A INIT 1 N PUSHI #0x00005979 A INIT 1 N PUSHI #0x00006cce A INIT 1 N PUSHI #0x0000600a A INIT 1 N PUSHI #0x00006df3 A INIT 1 N PUSHI #0x00006f0a A INIT 1 N PUSHI #0x0000158c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00006c01 A INIT 1 N PUSHI #0x00005146 A INIT 1 N PUSHI #0x00006201 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000072ce A INIT 1 N PUSHI #0x0000737a A INIT 1 N PUSHI #0x0000005b A INIT 1 N PUSHI #0x00006373 A INIT 1 N PUSHI #0x000073df A INIT 1 N PUSHI #0x0000748c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000755e A INIT 1 N PUSHI #0x0000580a A INIT 1 N PUSHI #0x0000720d A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00007746 A INIT 1 N PUSHI #0x0000799f A INIT 1 N PUSHI #0x00007b22 A INIT 1 N PUSHI #0x00007ba4 A INIT 1 N PUSHI #0x00000028 A INIT 1 N PUSHI #0x00007bcb A INIT 1 N PUSHI #0x00000023 A INIT 1 N PUSHI #0x00000027 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x000079ed A INIT 1 N PUSHI #0x00000023 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00007d8b A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00007e81 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00007f55 A INIT 1 N PUSHI #0x0000800c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x0000818b A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000827a A INIT 1 N PUSHI #0x000082df A INIT 1 N PUSHI #0x0000838c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x00008501 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000085cc A INIT 1 N PUSHI #0x0000840a A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00008725 A INIT 1 N PUSHI #0x000087f1 A INIT 1 N PUSHI #0x0000888b A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000897a A INIT 1 N PUSHI #0x000089e0 A INIT 1 N PUSHI #0x00008a99 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00008b5d A INIT 1 N PUSHI #0x00008bfa A INIT 1 N PUSHI #0x00008c60 A INIT 1 N PUSHI #0x0000888a A INIT 1 N PUSHI #0x00008d8c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00008e5c A INIT 1 N PUSHI #0x0000870a A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000900b A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000090fa A INIT 1 N PUSHI #0x0000915f A INIT 1 N PUSHI #0x00009219 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x000092e8 A INIT 1 N PUSHI #0x0000937a A INIT 1 N PUSHI #0x000093df A INIT 1 N PUSHI #0x0000948c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00000063 A INIT 1 N PUSHI #0x00009c01 A INIT 1 N PUSHI #0x00009f8f A INIT 1 N PUSHI #0x0000a090 A INIT 1 N PUSHI #0x00009a91 A INIT 1 N PUSHI #0x00009892 A INIT 1 N PUSHI #0x0000a193 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000a282 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x000039ab A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000a309 A INIT 1 N PUSHI #0x0000a38e A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x00009cd3 A INIT 1 N PUSHI #0x00009d70 A INIT 1 N PUSHI #0x00009c83 A INIT 1 N PUSHI #0x00003789 A INIT 1 N PUSHI #0x0000380e A INIT 1 N PUSHI #0x0000388f A INIT 1 N PUSHI #0x000026c7 A INIT 1 N PUSHI #0x0000a401 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000308d A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000a482 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000a0e0 A INIT 1 N PUSHI #0x0000a56a A INIT 1 N PUSHI #0x0000a5ef A INIT 1 N PUSHI #0x0000a656 A INIT 1 N PUSHI #0x000026e1 A INIT 1 N PUSHI #0x0000a6fa A INIT 1 N PUSHI #0x0000a0ec A INIT 1 N PUSHI #0x0000a770 A INIT 1 N PUSHI #0x0000a0eb A INIT 1 N PUSHI #0x0000a0ca A INIT 1 N PUSHI #0x0000a876 A INIT 1 N PUSHI #0x0000aa00 A INIT 1 N PUSHI #0x0000aaab A INIT 1 N PUSHI #0x0000ab2c A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x0000abf6 A INIT 1 N PUSHI #0x0000a976 A INIT 1 N PUSHI #0x0000aaab A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000af8b A INIT 1 N PUSHI #0x0000adfa A INIT 1 N PUSHI #0x0000b188 A INIT 1 N PUSHI #0x0000b209 A INIT 1 N PUSHI #0x0000b28f A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x0000b075 A INIT 1 N PUSHI #0x0000b300 A INIT 1 N PUSHI #0x0000000c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000b47a A INIT 1 N PUSHI #0x0000b1e8 A INIT 1 N PUSHI #0x00000078 A INIT 1 N PUSHI #0x0000b60c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000b4e9 A INIT 1 N PUSHI #0x0000b688 A INIT 1 N PUSHI #0x0000b709 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000adfb A INIT 1 N PUSHI #0x0000b7fa A INIT 1 N PUSHI #0x0000b6e8 A INIT 1 N PUSHI #0x00000069 A INIT 1 N PUSHI #0x0000b901 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000b9d1 A INIT 1 N PUSHI #0x0000ba70 A INIT 1 N PUSHI #0x0000b983 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000c081 A INIT 1 N PUSHI #0x0000be82 A INIT 1 N PUSHI #0x0000c406 A INIT 1 N PUSHI #0x0000c487 A INIT 1 N PUSHI #0x0000c50b A INIT 1 N PUSHI #0x0000c5af A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000c484 A INIT 1 N PUSHI #0x0000c605 A INIT 1 N PUSHI #0x0000c786 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000c154 A INIT 1 N PUSHI #0x0000c1f0 A INIT 1 N PUSHI #0x0000c103 A INIT 1 N PUSHI #0x0000c484 A INIT 1 N PUSHI #0x0000c605 A INIT 1 N PUSHI #0x0000c786 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000c866 A INIT 1 N PUSHI #0x0000c8fd A INIT 1 N PUSHI #0x0000c97a A INIT 1 N PUSHI #0x0000ca7a A INIT 1 N PUSHI #0x0000c6fd A INIT 1 N PUSHI #0x0000cb04 A INIT 1 N PUSHI #0x0000bf69 A INIT 1 N PUSHI #0x0000cbe8 A INIT 1 N PUSHI #0x0000cdfd A INIT 1 N PUSHI #0x0000bee9 A INIT 1 N PUSHI #0x0000be8c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000beb0 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000ce7d A INIT 1 N PUSHI #0x0000cc7d A INIT 1 N PUSHI #0x0000ce84 A INIT 1 N PUSHI #0x0000cf05 A INIT 1 N PUSHI #0x0000bfe9 A INIT 1 N PUSHI #0x0000cc67 A INIT 1 N PUSHI #0x0000c6e9 A INIT 1 N PUSHI #0x0000d0fd A INIT 1 N PUSHI #0x0000cffd A INIT 1 N PUSHI #0x0000d104 A INIT 1 N PUSHI #0x0000cce9 A INIT 1 N PUSHI #0x0000cc69 A INIT 1 N PUSHI #0x0000d1fd A INIT 1 N PUSHI #0x0000cfe9 A INIT 1 N PUSHI #0x0000d481 A INIT 1 N PUSHI #0x00000002 A INIT 1 N PUSHI #0x0000d50b A INIT 1 N PUSHI #0x0000d5af A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000b9d4 A INIT 1 N PUSHI #0x0000b0fa A INIT 1 N PUSHI #0x0000d67a A INIT 1 N PUSHI #0x00000030 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000d80b A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000d8fa A INIT 1 N PUSHI #0x0000d93f A INIT 1 N PUSHI #0x0000d80a A INIT 1 N PUSHI #0x0000000c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000db6f A INIT 1 N PUSHI #0x0000dbe0 A INIT 1 N PUSHI #0x0000dc89 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000dd41 A INIT 1 N PUSHI #0x0000ddfa A INIT 1 N PUSHI #0x0000de60 A INIT 1 N PUSHI #0x0000df0a A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000dffa A INIT 1 N PUSHI #0x0000e060 A INIT 1 N PUSHI #0x0000e10a A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000e1fa A INIT 1 N PUSHI #0x00000060 A INIT 1 N PUSHI #0x0000e2c9 A INIT 1 N PUSHI #0x0000e38b A INIT 1 N PUSHI #0x0000e46f A INIT 1 N PUSHI #0x0000e4fa A INIT 1 N PUSHI #0x0000e561 A INIT 1 N PUSHI #0x0000e661 A INIT 1 N PUSHI #0x0000e706 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000e78c A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000e8e5 A INIT 1 N PUSHI #0x0000e986 A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000e38b A INIT 1 N PUSHI #0x00000040 A INIT 1 N PUSHI #0x0000ea65 A INIT 1 N PUSHI #0x0000eaef A INIT 1 N PUSHI #0x0000eb61 A INIT 1 N PUSHI #0x0000e706 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00002281 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00009f8f A INIT 1 N PUSHI #0x0000a090 A INIT 1 N PUSHI #0x00009a91 A INIT 1 N PUSHI #0x00009892 A INIT 1 N PUSHI #0x0000a193 A INIT 1 N PUSHI #0x00001594 A INIT 1 N PUSHI #0x00002815 A INIT 1 N PUSHI #0x00001596 A INIT 1 N PUSHI #0x00002897 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x0000169a A INIT 1 N PUSHI #0x0000189b A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x0000291d A INIT 1 N PUSHI #0x00002a1e A INIT 1 N PUSHI #0x0000081f A INIT 1 N PUSHI #0x000003a0 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000d22 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x000005a4 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000126 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00001928 A INIT 1 N PUSHI #0x00002aa9 A INIT 1 N PUSHI #0x00000daa A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00002bb1 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00002c33 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00001ab6 A INIT 1 N PUSHI #0x00000a37 A INIT 1 N PUSHI #0x000015b8 A INIT 1 N PUSHI #0x00002cb9 A INIT 1 N PUSHI #0x000015ba A INIT 1 N PUSHI #0x0000003b A INIT 1 248 {%CONST}%OWNBYTEINTEGERARRAY PERM(1:518) = %C 249 'A','D','D','R',':',X'0B',X'62', 250 'A','R','C','C','O','S',':',X'07',X'22', 251 'A','R','C','S','I','N',':',X'07',X'22', 252 'A','R','R','A','Y',':',X'FC',X'F8', 253 'A','R','C','T','A','N',':',X'0D',X'22', 254 'B','Y','T','E','I','N','T','E','G','E','R',':',X'01',X'4A', 255 'C','H','A','R','N','O',':',X'0E',X'4A', 256 'C','L','O','S','E','S','T','R','E','A','M',':',X'01',X'06', 257 'C','O','S',':',X'07',X'22', 258 'E','X','P',':',X'07',X'22', 259 'F','R','A','C','P','T',':',X'07',X'22', 260 'F','R','O','M','S','T','R','I','N','G',':',X'0F',X'82', 261 'I','M','O','D',':',X'01',X'62', 262 'I','N','T',':',X'07',X'62', 263 'I','N','T','P','T',':',X'07',X'62', 264 'I','N','T','E','G','E','R',':',X'01',X'6A', 265 'L','E','N','G','T','H',':',X'0A',X'4A', 266 'L','O','G',':',X'07',X'22', 267 'L','O','N','G','R','E','A','L',':',X'01',X'1A', 268 'M','O','D',':',X'07',X'22', 269 'N','E','W','L','I','N','E',':',X'00',X'06', 270 'N','E','W','L','I','N','E','S',':',X'01',X'06', 271 'N','E','W','P','A','G','E',':',X'00',X'06', 272 'N','E','X','T','I','T','E','M',':',X'00',X'82', 273 'N','E','X','T','C','H',':',X'00',X'62', 274 'N','E','X','T','S','Y','M','B','O','L',':',X'00',X'62', 275 'N','L',':',X'00',X'62', 276 'P','I',':',X'00',X'22', 277 'P','R','I','N','T',':',X'0C',X'06', 278 'P','R','I','N','T','C','H',':',X'01',X'06', 279 'P','R','I','N','T','F','L',':',X'08',X'06', 280 'P','R','I','N','T','S','T','R','I','N','G',':',X'09',X'06', 281 'P','R','I','N','T','S','Y','M','B','O','L',':',X'01',X'06', 282 'R','A','D','I','U','S',':',X'0D',X'22', 283 'R','E','A','D',':',X'0B',X'06', 284 'R','E','A','D','C','H',':',X'0B',X'06', 285 'R','E','A','D','I','T','E','M',':',X'0A',X'06', 286 'R','E','A','D','S','T','R','I','N','G',':',X'0A',X'06', 287 'R','E','A','D','S','Y','M','B','O','L',':',X'0B',X'06', 288 'R','E','A','L',':',X'01',X'1A', 289 'R','E','C','O','R','D',':',X'01',X'0A', 290 'S','E','L','E','C','T','I','N','P','U','T',':',X'01',X'06', 291 'S','E','L','E','C','T','O','U','T','P','U','T',':',X'01',X'06', 292 'S','E','T','M','A','R','G','I','N','S',':',X'03',X'06', 293 'S','H','O','R','T','I','N','T','E','G','E','R',':',X'01',X'5A', 294 'S','I','N',':',X'07',X'22', 295 'S','K','I','P','S','Y','M','B','O','L',':',X'00',X'06', 296 'S','P','A','C','E',':',X'00',X'06', 297 'S','P','A','C','E','S',':',X'01',X'06', 298 'S','Q','R','T',':',X'07',X'22', 299 'S','T','R','I','N','G',':',X'01',X'8A', 300 'T','A','N',':',X'07',X'22', 301 'T','O','S','T','R','I','N','G',':',X'01',X'82', 302 'W','R','I','T','E',':',X'02',X'06' 303 304 O LINE 248 "regression-compile-tmp/check.imp" N PUSHI #0x00000001 N PUSHI #0x00000206 b BOUNDS $ DEF PERM p1=V_00f5 a/tf=1b b/format=2 c/ostate=121 type=1 (integer) form=11 (array) special=1 (byte-integer) linkage=1 (own) spec=0 indirect=0 unass=1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000b A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x000000fc A INIT 1 N PUSHI #0x000000f8 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000d A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000004a A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000e A INIT 1 N PUSHI #0x0000004a A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000046 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000046 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000f A INIT 1 N PUSHI #0x00000082 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000006a A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000a A INIT 1 N PUSHI #0x0000004a A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000001a A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000057 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000057 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000057 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000082 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000058 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000062 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000c A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000046 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000008 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000009 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x00000055 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000d A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000b A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000b A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000a A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000a A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x0000000b A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000001a A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000044 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000000a A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000055 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000055 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000055 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000003 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000048 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000005a A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000004b A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000059 A INIT 1 N PUSHI #0x0000004d A INIT 1 N PUSHI #0x00000042 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x0000004c A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000000 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000050 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x00000043 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000006 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000051 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x0000008a A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000041 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000007 A INIT 1 N PUSHI #0x00000022 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x0000004f A INIT 1 N PUSHI #0x00000053 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x0000004e A INIT 1 N PUSHI #0x00000047 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000001 A INIT 1 N PUSHI #0x00000082 A INIT 1 N PUSHI #0x00000057 A INIT 1 N PUSHI #0x00000052 A INIT 1 N PUSHI #0x00000049 A INIT 1 N PUSHI #0x00000054 A INIT 1 N PUSHI #0x00000045 A INIT 1 N PUSHI #0x0000003a A INIT 1 N PUSHI #0x00000002 A INIT 1 N PUSHI #0x00000006 A INIT 1 305 %ROUTINESPEC PRINT SS O LINE 305 "regression-compile-tmp/check.imp" $ DEF PRINTSS (_CHECKINNER_PRINTSS) p1=V_00f6 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} } FINISH ) {lev=1} 306 %ROUTINESPEC REPORT(%INTEGER N) O LINE 306 "regression-compile-tmp/check.imp" $ DEF REPORT (_CHECKINNER_REPORT) p1=V_00f7 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} $ DEF N p1=V_00f8 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=1} 307 %ROUTINESPEC CODE ATOM O LINE 307 "regression-compile-tmp/check.imp" $ DEF CODEATOM (_CHECKINNER_CODEATOM) p1=V_00f8 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} } FINISH ) {lev=1} 308 %ROUTINESPEC POP CONTEXT O LINE 308 "regression-compile-tmp/check.imp" $ DEF POPCONTEXT (_CHECKINNER_POPCONTEXT) p1=V_00f9 a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} } FINISH ) {lev=1} 309 %ROUTINESPEC DEFINE(%INTEGER DISP, VAL) 310 O LINE 309 "regression-compile-tmp/check.imp" $ DEF DEFINE (_CHECKINNER_DEFINE) p1=V_00fa a/tf=7 b/format=0 c/ostate=8 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=1 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} $ DEF DISP p1=V_00fb a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF VAL p1=V_00fc a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=1} 311 %ROUTINE FAULT(%INTEGER N) O LINE 311 "regression-compile-tmp/check.imp" $ DEF FAULT (_CHECKINNER_FAULT) p1=V_00fb a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} $ DEF N p1=V_00fc a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=2} 312 FAULTNUM = N %AND FAULTPOS = FPOS1 %IF FAULTNUM < 0 O LINE 312 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000000 ? JUMPIF >= L_0004 @ PUSH FAULTNUM @ PUSH N S ASSVAL @ PUSH FAULTPOS @ PUSH FPOS1 S ASSVAL : LOCATE L_0004 313 %END 314 315 ! GRAM LAYOUT: LINK<9> CLASS<7> O LINE 313 "regression-compile-tmp/check.imp" ; END _CHECKINNER_FAULT {lev=2 --> 1} 316 %SWITCH A(0:127) O LINE 316 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x0000007f b BOUNDS $ DEF A p1=V_00fc a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 317 %SWITCH X(0:4) O LINE 317 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x00000004 b BOUNDS $ DEF X p1=V_00fd a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 318 TIME1 = CPUTIME O LINE 318 "regression-compile-tmp/check.imp" @ PUSH TIME1 @ PUSH CPUTIME E CALL S ASSVAL 319 %CYCLE I = 0,1,255 O LINE 319 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000001 N PUSHI #0x000000ff N PUSHI #0x00000000 f FOR L_0003 320 INDEX(I) = 0 O LINE 320 "regression-compile-tmp/check.imp" @ PUSH INDEX @ PUSH I a ACCESS N PUSHI #0x00000000 S ASSVAL 321 %REPEAT O LINE 321 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 322 C = 0 O LINE 322 "regression-compile-tmp/check.imp" @ PUSH C N PUSHI #0x00000000 S ASSVAL 323 IDENTS = 0 O LINE 323 "regression-compile-tmp/check.imp" @ PUSH IDENTS N PUSHI #0x00000000 S ASSVAL 324 PRINTPOS = 0; PRECISION = 0; LEVEL = 0 O LINE 324 "regression-compile-tmp/check.imp" @ PUSH PRINTPOS N PUSHI #0x00000000 S ASSVAL O LINE 324 "regression-compile-tmp/check.imp" @ PUSH PRECISION N PUSHI #0x00000000 S ASSVAL O LINE 324 "regression-compile-tmp/check.imp" @ PUSH LEVEL N PUSHI #0x00000000 S ASSVAL 325 NEXTLINE = 1; FAULTNUM = -1; PARMAX = 15 O LINE 325 "regression-compile-tmp/check.imp" @ PUSH NEXTLINE N PUSHI #0x00000001 S ASSVAL O LINE 325 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000001 U NEGATE S ASSVAL O LINE 325 "regression-compile-tmp/check.imp" @ PUSH PARMAX N PUSHI #0x0000000f S ASSVAL 326 ADGRAM0 = ADDR(GRAM(0)); LINK1 = GRAM(1)>>6&1022+ADGRAM0 O LINE 326 "regression-compile-tmp/check.imp" @ PUSH ADGRAM0 @ PUSH ADDR @ PUSH GRAM N PUSHI #0x00000000 a ACCESS p ASSPAR E CALL S ASSVAL O LINE 326 "regression-compile-tmp/check.imp" @ PUSH LINK1 @ PUSH GRAM N PUSHI #0x00000001 a ACCESS N PUSHI #0x00000006 ] RSH N PUSHI #0x000003fe & AND @ PUSH ADGRAM0 + ADD S ASSVAL 327 APPCONT = GRAM(GRAM(PHRASE(112))>>7&511)>>6&1022+ADGRAM0 O LINE 327 "regression-compile-tmp/check.imp" @ PUSH APPCONT @ PUSH GRAM @ PUSH GRAM @ PUSH PHRASE N PUSHI #0x00000070 a ACCESS a ACCESS N PUSHI #0x00000007 ] RSH N PUSHI #0x000001ff & AND a ACCESS N PUSHI #0x00000006 ] RSH N PUSHI #0x000003fe & AND @ PUSH ADGRAM0 + ADD S ASSVAL 328 DLIM = ADDR(DICT(1)); DBOUND = ADDR(DICT(4000)) O LINE 328 "regression-compile-tmp/check.imp" @ PUSH DLIM @ PUSH ADDR @ PUSH DICT N PUSHI #0x00000001 a ACCESS p ASSPAR E CALL S ASSVAL O LINE 328 "regression-compile-tmp/check.imp" @ PUSH DBOUND @ PUSH ADDR @ PUSH DICT N PUSHI #0x00000fa0 a ACCESS p ASSPAR E CALL S ASSVAL 329 FPOS = ADDR(PERM(1))-1; FMAX = ADDR(PERM(518)) O LINE 329 "regression-compile-tmp/check.imp" @ PUSH FPOS @ PUSH ADDR @ PUSH PERM N PUSHI #0x00000001 a ACCESS p ASSPAR E CALL N PUSHI #0x00000001 - SUB S ASSVAL O LINE 329 "regression-compile-tmp/check.imp" @ PUSH FMAX @ PUSH ADDR @ PUSH PERM N PUSHI #0x00000206 a ACCESS p ASSPAR E CALL S ASSVAL 330 %CYCLE I = 1,1,54 O LINE 330 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000001 N PUSHI #0x00000036 N PUSHI #0x00000001 f FOR L_0003 331 SYMCODE = 0 O LINE 331 "regression-compile-tmp/check.imp" @ PUSH SYMCODE N PUSHI #0x00000000 S ASSVAL 332 CODE ATOM; %MONITOR %AND %STOP %IF ATOM # IDENT O LINE 332 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL O LINE 332 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000001 ? JUMPIF = L_0007 m MONITOR s STOP : LOCATE L_0007 333 INTEGER(DLIM) = BYTEINTEGER(FPOS+1)<<8+BYTEINTEGER(FPOS+2) O LINE 333 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM p ASSPAR E CALL @ PUSH BYTEINTEGER @ PUSH FPOS N PUSHI #0x00000001 + ADD p ASSPAR E CALL N PUSHI #0x00000008 [ LSH @ PUSH BYTEINTEGER @ PUSH FPOS N PUSHI #0x00000002 + ADD p ASSPAR E CALL + ADD S ASSVAL 334 FPOS = FPOS+2 O LINE 334 "regression-compile-tmp/check.imp" @ PUSH FPOS @ PUSH FPOS N PUSHI #0x00000002 + ADD S ASSVAL 335 INTEGER(DLIM+4) = 0 O LINE 335 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM N PUSHI #0x00000004 + ADD p ASSPAR E CALL N PUSHI #0x00000000 S ASSVAL 336 INTEGER(DLIM+8) = HEAD; HEAD = DLIM O LINE 336 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM N PUSHI #0x00000008 + ADD p ASSPAR E CALL @ PUSH HEAD S ASSVAL O LINE 336 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH DLIM S ASSVAL 337 DLIM = NEWDLIM O LINE 337 "regression-compile-tmp/check.imp" @ PUSH DLIM @ PUSH NEWDLIM S ASSVAL 338 %REPEAT O LINE 338 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 339 C_LOCAL = DLIM O LINE 339 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 2 @ PUSH DLIM S ASSVAL 340 FPOS = FSTART-1; FMAX = FPOS+FSIZE O LINE 340 "regression-compile-tmp/check.imp" @ PUSH FPOS @ PUSH FSTART N PUSHI #0x00000001 - SUB S ASSVAL O LINE 340 "regression-compile-tmp/check.imp" @ PUSH FMAX @ PUSH FPOS @ PUSH FSIZE + ADD S ASSVAL 341 SYMCODE = 0 O LINE 341 "regression-compile-tmp/check.imp" @ PUSH SYMCODE N PUSHI #0x00000000 S ASSVAL 342 L1: ->ENDED %IF FPOS >= FMAX O LINE 342 "regression-compile-tmp/check.imp" L LABEL L_00fe O LINE 342 "regression-compile-tmp/check.imp" @ PUSH FPOS @ PUSH FMAX ? JUMPIF < L_0004 J JUMP L_00ff : LOCATE L_0004 343 LINEBASE = FPOS; LINE = NEXTLINE O LINE 343 "regression-compile-tmp/check.imp" @ PUSH LINEBASE @ PUSH FPOS S ASSVAL O LINE 343 "regression-compile-tmp/check.imp" @ PUSH LINE @ PUSH NEXTLINE S ASSVAL 344 L3: ATOM = JUMP; !FOR NUMERIC LABEL DETECTION O LINE 344 "regression-compile-tmp/check.imp" L LABEL L_0100 O LINE 344 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x0000000f S ASSVAL 345 SKIPMIN = SKIP1MIN; !TO IGNORE NULL STATEMENTS AND COMMENTS O LINE 345 "regression-compile-tmp/check.imp" @ PUSH SKIPMIN N PUSHI #0x00000056 S ASSVAL 346 CODE ATOM O LINE 346 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL 347 SKIPMIN = NLCODE O LINE 347 "regression-compile-tmp/check.imp" @ PUSH SKIPMIN N PUSHI #0x0000007f S ASSVAL 348 STATS = STATS+1 O LINE 348 "regression-compile-tmp/check.imp" @ PUSH STATS @ PUSH STATS N PUSHI #0x00000001 + ADD S ASSVAL 349 EXTIND = 0; DECLTYPE = 0 O LINE 349 "regression-compile-tmp/check.imp" @ PUSH EXTIND N PUSHI #0x00000000 S ASSVAL O LINE 349 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x00000000 S ASSVAL 350 CONSTCOUNT = 0; DIMCOUNT = 0 O LINE 350 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT N PUSHI #0x00000000 S ASSVAL O LINE 350 "regression-compile-tmp/check.imp" @ PUSH DIMCOUNT N PUSHI #0x00000000 S ASSVAL 351 NP = 51 O LINE 351 "regression-compile-tmp/check.imp" @ PUSH NP N PUSHI #0x00000033 S ASSVAL 352 LINKMAX = 1; LINK(1) = LINK1; !FOR GRATUITOUS PHRASE EXIT O LINE 352 "regression-compile-tmp/check.imp" @ PUSH LINKMAX N PUSHI #0x00000001 S ASSVAL O LINE 352 "regression-compile-tmp/check.imp" @ PUSH LINK N PUSHI #0x00000001 a ACCESS @ PUSH LINK1 S ASSVAL 353 I = GRAM(INITBASE+ATOM) O LINE 353 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH GRAM N PUSHI #0x000001d8 @ PUSH ATOM + ADD a ACCESS S ASSVAL 354 ->ERR %IF I = 0 O LINE 354 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_0101 : LOCATE L_0004 355 G = I>>6&1022+ADGRAM0 O LINE 355 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH I N PUSHI #0x00000006 ] RSH N PUSHI #0x000003fe & AND @ PUSH ADGRAM0 + ADD S ASSVAL 356 ->A(ATOM) O LINE 356 "regression-compile-tmp/check.imp" @ PUSH ATOM W SJUMP 252 357 A(1): !IDENT O LINE 357 "regression-compile-tmp/check.imp" N PUSHI #0x00000001 _ SLABEL 252 358 A(6): !OP3 O LINE 358 "regression-compile-tmp/check.imp" N PUSHI #0x00000006 _ SLABEL 252 359 A(9): !EQ O LINE 359 "regression-compile-tmp/check.imp" N PUSHI #0x00000009 _ SLABEL 252 360 A(13): !NL O LINE 360 "regression-compile-tmp/check.imp" N PUSHI #0x0000000d _ SLABEL 252 361 A(25): !COLON O LINE 361 "regression-compile-tmp/check.imp" N PUSHI #0x00000019 _ SLABEL 252 362 I = SHORTINTEGER(G); G = I>>6&1022+ADGRAM0 O LINE 362 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH SHORTINTEGER @ PUSH G p ASSPAR E CALL S ASSVAL O LINE 362 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH I N PUSHI #0x00000006 ] RSH N PUSHI #0x000003fe & AND @ PUSH ADGRAM0 + ADD S ASSVAL 363 ->A(I&127) O LINE 363 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x0000007f & AND W SJUMP 252 364 A(10): A(11): A(12): A(15): A(18): A(19): A(20): O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x0000000a _ SLABEL 252 O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x0000000b _ SLABEL 252 O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x0000000c _ SLABEL 252 O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x0000000f _ SLABEL 252 O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x00000012 _ SLABEL 252 O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x00000013 _ SLABEL 252 O LINE 364 "regression-compile-tmp/check.imp" N PUSHI #0x00000014 _ SLABEL 252 365 A(21): A(23): A(27): A(37): O LINE 365 "regression-compile-tmp/check.imp" N PUSHI #0x00000015 _ SLABEL 252 O LINE 365 "regression-compile-tmp/check.imp" N PUSHI #0x00000017 _ SLABEL 252 O LINE 365 "regression-compile-tmp/check.imp" N PUSHI #0x0000001b _ SLABEL 252 O LINE 365 "regression-compile-tmp/check.imp" N PUSHI #0x00000025 _ SLABEL 252 366 A(43): A(44): A(45): O LINE 366 "regression-compile-tmp/check.imp" N PUSHI #0x0000002b _ SLABEL 252 O LINE 366 "regression-compile-tmp/check.imp" N PUSHI #0x0000002c _ SLABEL 252 O LINE 366 "regression-compile-tmp/check.imp" N PUSHI #0x0000002d _ SLABEL 252 367 A(47): A(48): A(50): A(57): A(65): O LINE 367 "regression-compile-tmp/check.imp" N PUSHI #0x0000002f _ SLABEL 252 O LINE 367 "regression-compile-tmp/check.imp" N PUSHI #0x00000030 _ SLABEL 252 O LINE 367 "regression-compile-tmp/check.imp" N PUSHI #0x00000032 _ SLABEL 252 O LINE 367 "regression-compile-tmp/check.imp" N PUSHI #0x00000039 _ SLABEL 252 O LINE 367 "regression-compile-tmp/check.imp" N PUSHI #0x00000041 _ SLABEL 252 368 CODE: O LINE 368 "regression-compile-tmp/check.imp" L LABEL L_0102 369 CODE ATOM O LINE 369 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL 370 ON: O LINE 370 "regression-compile-tmp/check.imp" L LABEL L_0103 371 REP:%CYCLE 372 ! LOOPS = LOOPS+1 O LINE 371 "regression-compile-tmp/check.imp" L LABEL L_0104 O LINE 371 "regression-compile-tmp/check.imp" : LOCATE L_0003 373 CLASS = SHORTINTEGER(G)&127 O LINE 373 "regression-compile-tmp/check.imp" @ PUSH CLASS @ PUSH SHORTINTEGER @ PUSH G p ASSPAR E CALL N PUSHI #0x0000007f & AND S ASSVAL 374 %EXIT %IF CLASS >= 60 %OR CLASS = ATOM O LINE 374 "regression-compile-tmp/check.imp" @ PUSH CLASS N PUSHI #0x0000003c ? JUMPIF >= L_0008 @ PUSH CLASS @ PUSH ATOM ? JUMPIF # L_0007 : LOCATE L_0008 F GOTO L_0004 : LOCATE L_0007 375 G = G+2 O LINE 375 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH G N PUSHI #0x00000002 + ADD S ASSVAL 376 %REPEAT O LINE 376 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 377 G = SHORTINTEGER(G)>>6&1022+ADGRAM0 O LINE 377 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH SHORTINTEGER @ PUSH G p ASSPAR E CALL N PUSHI #0x00000006 ] RSH N PUSHI #0x000003fe & AND @ PUSH ADGRAM0 + ADD S ASSVAL 378 ->A(CLASS) O LINE 378 "regression-compile-tmp/check.imp" @ PUSH CLASS W SJUMP 252 379 A(109): A(110): A(111): A(113): A(114): O LINE 379 "regression-compile-tmp/check.imp" N PUSHI #0x0000006d _ SLABEL 252 O LINE 379 "regression-compile-tmp/check.imp" N PUSHI #0x0000006e _ SLABEL 252 O LINE 379 "regression-compile-tmp/check.imp" N PUSHI #0x0000006f _ SLABEL 252 O LINE 379 "regression-compile-tmp/check.imp" N PUSHI #0x00000071 _ SLABEL 252 O LINE 379 "regression-compile-tmp/check.imp" N PUSHI #0x00000072 _ SLABEL 252 380 A(115): A(116): A(117): A(118): A(119): O LINE 380 "regression-compile-tmp/check.imp" N PUSHI #0x00000073 _ SLABEL 252 O LINE 380 "regression-compile-tmp/check.imp" N PUSHI #0x00000074 _ SLABEL 252 O LINE 380 "regression-compile-tmp/check.imp" N PUSHI #0x00000075 _ SLABEL 252 O LINE 380 "regression-compile-tmp/check.imp" N PUSHI #0x00000076 _ SLABEL 252 O LINE 380 "regression-compile-tmp/check.imp" N PUSHI #0x00000077 _ SLABEL 252 381 A(120): A(121): A(122): A(123): A(124): O LINE 381 "regression-compile-tmp/check.imp" N PUSHI #0x00000078 _ SLABEL 252 O LINE 381 "regression-compile-tmp/check.imp" N PUSHI #0x00000079 _ SLABEL 252 O LINE 381 "regression-compile-tmp/check.imp" N PUSHI #0x0000007a _ SLABEL 252 O LINE 381 "regression-compile-tmp/check.imp" N PUSHI #0x0000007b _ SLABEL 252 O LINE 381 "regression-compile-tmp/check.imp" N PUSHI #0x0000007c _ SLABEL 252 382 A(125): A(126): O LINE 382 "regression-compile-tmp/check.imp" N PUSHI #0x0000007d _ SLABEL 252 O LINE 382 "regression-compile-tmp/check.imp" N PUSHI #0x0000007e _ SLABEL 252 383 ENTER: O LINE 383 "regression-compile-tmp/check.imp" L LABEL L_0105 384 LINKMAX = LINKMAX+1; ->ERR %IF LINKMAX > 20 O LINE 384 "regression-compile-tmp/check.imp" @ PUSH LINKMAX @ PUSH LINKMAX N PUSHI #0x00000001 + ADD S ASSVAL O LINE 384 "regression-compile-tmp/check.imp" @ PUSH LINKMAX N PUSHI #0x00000014 ? JUMPIF <= L_0004 J JUMP L_0101 : LOCATE L_0004 385 LINK(LINKMAX) = G O LINE 385 "regression-compile-tmp/check.imp" @ PUSH LINK @ PUSH LINKMAX a ACCESS @ PUSH G S ASSVAL 386 G = PHRASE(CLASS)<<1+ADGRAM0 O LINE 386 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH PHRASE @ PUSH CLASS a ACCESS N PUSHI #0x00000001 [ LSH @ PUSH ADGRAM0 + ADD S ASSVAL 387 ->REP O LINE 387 "regression-compile-tmp/check.imp" J JUMP L_0104 388 A(66): O LINE 388 "regression-compile-tmp/check.imp" N PUSHI #0x00000042 _ SLABEL 252 389 EXIT: O LINE 389 "regression-compile-tmp/check.imp" L LABEL L_0106 390 G = LINK(LINKMAX); LINKMAX = LINKMAX-1 O LINE 390 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH LINK @ PUSH LINKMAX a ACCESS S ASSVAL O LINE 390 "regression-compile-tmp/check.imp" @ PUSH LINKMAX @ PUSH LINKMAX N PUSHI #0x00000001 - SUB S ASSVAL 391 ->REP 392 O LINE 391 "regression-compile-tmp/check.imp" J JUMP L_0104 393 A(67): !ALT (ALTERNATIVE PHRASE RECOGNISED) O LINE 393 "regression-compile-tmp/check.imp" N PUSHI #0x00000043 _ SLABEL 252 394 I = SHORTINTEGER(LINK(LINKMAX)); LINKMAX = LINKMAX-1 O LINE 394 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH SHORTINTEGER @ PUSH LINK @ PUSH LINKMAX a ACCESS p ASSPAR E CALL S ASSVAL O LINE 394 "regression-compile-tmp/check.imp" @ PUSH LINKMAX @ PUSH LINKMAX N PUSHI #0x00000001 - SUB S ASSVAL 395 ->ERR %IF I&127 # 0; !NO ALTERNATIVE O LINE 395 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x0000007f & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 396 G = I>>6&1022+ADGRAM0 O LINE 396 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH I N PUSHI #0x00000006 ] RSH N PUSHI #0x000003fe & AND @ PUSH ADGRAM0 + ADD S ASSVAL 397 ->ON O LINE 397 "regression-compile-tmp/check.imp" J JUMP L_0103 398 A(68): !BREAK (TERMINATOR WITHIN CONST LIST) O LINE 398 "regression-compile-tmp/check.imp" N PUSHI #0x00000044 _ SLABEL 252 399 REPORT(FAULTNUM) %IF FAULTNUM >= 0 O LINE 399 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000000 ? JUMPIF < L_0004 @ PUSH REPORT @ PUSH FAULTNUM p ASSPAR E CALL : LOCATE L_0004 400 %IF ATOMTYPE = 0 %START; !NL O LINE 400 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000000 ? JUMPIF # L_0004 401 LINEBASE = FPOS; LINE = NEXTLINE O LINE 401 "regression-compile-tmp/check.imp" @ PUSH LINEBASE @ PUSH FPOS S ASSVAL O LINE 401 "regression-compile-tmp/check.imp" @ PUSH LINE @ PUSH NEXTLINE S ASSVAL 402 %FINISH O LINE 402 "regression-compile-tmp/check.imp" : LOCATE L_0004 403 ->CODE 404 O LINE 403 "regression-compile-tmp/check.imp" J JUMP L_0102 405 UNKNOWN: O LINE 405 "regression-compile-tmp/check.imp" L LABEL L_0107 406 %WHILE DPOS < 0 %CYCLE O LINE 406 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH DPOS N PUSHI #0x00000000 ? JUMPIF >= L_0004 407 ->IGNORE %IF STRING(-DPOS+4) = STRING(DLIM+12) O LINE 407 "regression-compile-tmp/check.imp" @ PUSH STRING @ PUSH DPOS U NEGATE N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH STRING @ PUSH DLIM N PUSHI #0x0000000c + ADD p ASSPAR E CALL ? JUMPIF # L_0007 J JUMP L_0108 : LOCATE L_0007 408 DPOS = INTEGER(-DPOS) O LINE 408 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH INTEGER @ PUSH DPOS U NEGATE p ASSPAR E CALL S ASSVAL 409 %REPEAT O LINE 409 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 410 FAULT(2) O LINE 410 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000002 p ASSPAR E CALL 411 %CYCLE O LINE 411 "regression-compile-tmp/check.imp" : LOCATE L_0003 412 DBOUND = DBOUND-4; NEWDLIM = NEWDLIM-4 O LINE 412 "regression-compile-tmp/check.imp" @ PUSH DBOUND @ PUSH DBOUND N PUSHI #0x00000004 - SUB S ASSVAL O LINE 412 "regression-compile-tmp/check.imp" @ PUSH NEWDLIM @ PUSH NEWDLIM N PUSHI #0x00000004 - SUB S ASSVAL 413 %EXIT %IF NEWDLIM = DLIM+8 O LINE 413 "regression-compile-tmp/check.imp" @ PUSH NEWDLIM @ PUSH DLIM N PUSHI #0x00000008 + ADD ? JUMPIF # L_0007 F GOTO L_0004 : LOCATE L_0007 414 INTEGER(DBOUND) = INTEGER(NEWDLIM) O LINE 414 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DBOUND p ASSPAR E CALL @ PUSH INTEGER @ PUSH NEWDLIM p ASSPAR E CALL S ASSVAL 415 %REPEAT O LINE 415 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 416 HEAD == INTEGER(HEAD+8) %WHILE HEAD > 0 O LINE 416 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH HEAD N PUSHI #0x00000000 ? JUMPIF <= L_0004 @ PUSH HEAD @ PUSH INTEGER @ PUSH HEAD N PUSHI #0x00000008 + ADD p ASSPAR E CALL Z ASSREF B REPEAT L_0003 : LOCATE L_0004 417 INTEGER(DBOUND) = HEAD; HEAD = -DBOUND O LINE 417 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DBOUND p ASSPAR E CALL @ PUSH HEAD S ASSVAL O LINE 417 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH DBOUND U NEGATE S ASSVAL 418 ->IGNORE O LINE 418 "regression-compile-tmp/check.imp" J JUMP L_0108 419 MODERR: O LINE 419 "regression-compile-tmp/check.imp" L LABEL L_0109 420 FAULT(3) O LINE 420 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000003 p ASSPAR E CALL 421 ->IGNORE O LINE 421 "regression-compile-tmp/check.imp" J JUMP L_0108 422 A(0): A(64): O LINE 422 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 _ SLABEL 252 O LINE 422 "regression-compile-tmp/check.imp" N PUSHI #0x00000040 _ SLABEL 252 423 ERR:FAULTNUM = 0; FAULTNUM = ATOMTYPE %IF ATOM = 0 O LINE 423 "regression-compile-tmp/check.imp" L LABEL L_0101 O LINE 423 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000000 S ASSVAL O LINE 423 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000000 ? JUMPIF # L_0004 @ PUSH FAULTNUM @ PUSH ATOMTYPE S ASSVAL : LOCATE L_0004 424 ->DISASTER %IF FAULTNUM = 99 O LINE 424 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000063 ? JUMPIF # L_0004 J JUMP L_010a : LOCATE L_0004 425 FAULTPOS = FPOS1 O LINE 425 "regression-compile-tmp/check.imp" @ PUSH FAULTPOS @ PUSH FPOS1 S ASSVAL 426 IGNORE: O LINE 426 "regression-compile-tmp/check.imp" L LABEL L_0108 427 I=ATOM %AND CODE ATOM %WHILE ATOM # TERMINATOR O LINE 427 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH ATOM N PUSHI #0x0000000d ? JUMPIF = L_0004 @ PUSH I @ PUSH ATOM S ASSVAL @ PUSH CODEATOM E CALL B REPEAT L_0003 : LOCATE L_0004 428 C_STACK = C_STACK<<2+3 %IF I = START O LINE 428 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000035 ? JUMPIF # L_0004 @ PUSH C n SELECT 1 @ PUSH C n SELECT 1 N PUSHI #0x00000002 [ LSH N PUSHI #0x00000003 + ADD S ASSVAL : LOCATE L_0004 429 C_STACK = C_STACK<<2+2 %IF I = CYCLE O LINE 429 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000036 ? JUMPIF # L_0004 @ PUSH C n SELECT 1 @ PUSH C n SELECT 1 N PUSHI #0x00000002 [ LSH N PUSHI #0x00000002 + ADD S ASSVAL : LOCATE L_0004 430 REPORT(FAULTNUM) %IF FAULTNUM >= 0 O LINE 430 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000000 ? JUMPIF < L_0004 @ PUSH REPORT @ PUSH FAULTNUM p ASSPAR E CALL : LOCATE L_0004 431 %WHILE I = COMMA %AND ATOMTYPE = 0 %CYCLE O LINE 431 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH I N PUSHI #0x0000000a ? JUMPIF # L_0004 @ PUSH ATOMTYPE N PUSHI #0x00000000 ? JUMPIF # L_0004 432 I=ATOM %AND CODE ATOM %UNTIL ATOM = TERMINATOR O LINE 432 "regression-compile-tmp/check.imp" : LOCATE L_0006 @ PUSH I @ PUSH ATOM S ASSVAL @ PUSH CODEATOM E CALL @ PUSH ATOM N PUSHI #0x0000000d ? JUMPIF = L_0007 B REPEAT L_0006 : LOCATE L_0007 433 %REPEAT O LINE 433 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 434 A(69): !FIN O LINE 434 "regression-compile-tmp/check.imp" N PUSHI #0x00000045 _ SLABEL 252 435 FIN:REPORT(FAULTNUM) %IF FAULTNUM >= 0 O LINE 435 "regression-compile-tmp/check.imp" L LABEL L_010b O LINE 435 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000000 ? JUMPIF < L_0004 @ PUSH REPORT @ PUSH FAULTNUM p ASSPAR E CALL : LOCATE L_0004 436 %IF C_BTYPE&1 # 0 %START; !PSEUDO BLOCK ENTRY FOR SPEC O LINE 436 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 3 N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 437 DLIM = C_LOCAL O LINE 437 "regression-compile-tmp/check.imp" @ PUSH DLIM @ PUSH C n SELECT 2 S ASSVAL 438 C = HOLD(LEVEL); LEVEL = LEVEL-1 O LINE 438 "regression-compile-tmp/check.imp" @ PUSH C @ PUSH HOLD @ PUSH LEVEL a ACCESS S ASSVAL O LINE 438 "regression-compile-tmp/check.imp" @ PUSH LEVEL @ PUSH LEVEL N PUSHI #0x00000001 - SUB S ASSVAL 439 %FINISH O LINE 439 "regression-compile-tmp/check.imp" : LOCATE L_0004 440 ->L3 %IF ATOMTYPE # 0; !COLON OR SEMI-COLON O LINE 440 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0100 : LOCATE L_0004 441 ->L1; !NEWLINE O LINE 441 "regression-compile-tmp/check.imp" J JUMP L_00fe 442 DISASTER: O LINE 442 "regression-compile-tmp/check.imp" L LABEL L_010a 443 PRINT STRING("** SPACE EXHAUSTED AT LINE"); WRITE(NEXTLINE,1) O LINE 443 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "** SPACE EXHAUSTED AT LINE" p ASSPAR E CALL O LINE 443 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH NEXTLINE p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL 444 NEWLINE O LINE 444 "regression-compile-tmp/check.imp" @ PUSH NEWLINE E CALL 445 %RETURN 446 O LINE 445 "regression-compile-tmp/check.imp" R RETURN 447 A(74): O LINE 447 "regression-compile-tmp/check.imp" N PUSHI #0x0000004a _ SLABEL 252 448 NAPP: O LINE 448 "regression-compile-tmp/check.imp" L LABEL L_010c 449 -> ON %IF TYPE&APPMASK = 0 O LINE 449 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_0103 : LOCATE L_0004 450 ->ERR O LINE 450 "regression-compile-tmp/check.imp" J JUMP L_0101 451 ER20: O LINE 451 "regression-compile-tmp/check.imp" L LABEL L_010d 452 FAULT(20) O LINE 452 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000014 p ASSPAR E CALL 453 ->NAPP O LINE 453 "regression-compile-tmp/check.imp" J JUMP L_010c 454 ER22: O LINE 454 "regression-compile-tmp/check.imp" L LABEL L_010e 455 FAULT(22) O LINE 455 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000016 p ASSPAR E CALL 456 ->NAPP 457 O LINE 456 "regression-compile-tmp/check.imp" J JUMP L_010c 458 A(22): !PREC O LINE 458 "regression-compile-tmp/check.imp" N PUSHI #0x00000016 _ SLABEL 252 459 PRECISION = ATOMTYPE O LINE 459 "regression-compile-tmp/check.imp" @ PUSH PRECISION @ PUSH ATOMTYPE S ASSVAL 460 ->CODE O LINE 460 "regression-compile-tmp/check.imp" J JUMP L_0102 461 A(38): !EXTERNAL O LINE 461 "regression-compile-tmp/check.imp" N PUSHI #0x00000026 _ SLABEL 252 462 A(42): !SYSTEM,DYNAMIC O LINE 462 "regression-compile-tmp/check.imp" N PUSHI #0x0000002a _ SLABEL 252 463 EXTIND = 1 O LINE 463 "regression-compile-tmp/check.imp" @ PUSH EXTIND N PUSHI #0x00000001 S ASSVAL 464 ->CODE O LINE 464 "regression-compile-tmp/check.imp" J JUMP L_0102 465 A(70): !RESET O LINE 465 "regression-compile-tmp/check.imp" N PUSHI #0x00000046 _ SLABEL 252 466 DECLTYPE = 0 O LINE 466 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x00000000 S ASSVAL 467 ->ON O LINE 467 "regression-compile-tmp/check.imp" J JUMP L_0103 468 A(36): !RECORD O LINE 468 "regression-compile-tmp/check.imp" N PUSHI #0x00000024 _ SLABEL 252 469 RECIDENTS = DLIM O LINE 469 "regression-compile-tmp/check.imp" @ PUSH RECIDENTS @ PUSH DLIM S ASSVAL 470 A(29): !REG O LINE 470 "regression-compile-tmp/check.imp" N PUSHI #0x0000001d _ SLABEL 252 471 A(30): !SWITCH O LINE 471 "regression-compile-tmp/check.imp" N PUSHI #0x0000001e _ SLABEL 252 472 A(31): !NTYPE O LINE 472 "regression-compile-tmp/check.imp" N PUSHI #0x0000001f _ SLABEL 252 473 A(32): !OWN O LINE 473 "regression-compile-tmp/check.imp" N PUSHI #0x00000020 _ SLABEL 252 474 A(33): !ARRAY O LINE 474 "regression-compile-tmp/check.imp" N PUSHI #0x00000021 _ SLABEL 252 475 A(34): !STRING O LINE 475 "regression-compile-tmp/check.imp" N PUSHI #0x00000022 _ SLABEL 252 476 A(35): !NAME O LINE 476 "regression-compile-tmp/check.imp" N PUSHI #0x00000023 _ SLABEL 252 477 A(39): !FM O LINE 477 "regression-compile-tmp/check.imp" N PUSHI #0x00000027 _ SLABEL 252 478 A(40): !ROUTINE O LINE 478 "regression-compile-tmp/check.imp" N PUSHI #0x00000028 _ SLABEL 252 479 A(41): !SPEC O LINE 479 "regression-compile-tmp/check.imp" N PUSHI #0x00000029 _ SLABEL 252 480 DECLTYPE = DECLTYPE!!ATOMTYPE O LINE 480 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE @ PUSH DECLTYPE @ PUSH ATOMTYPE % XOR S ASSVAL 481 DECLTYPE = DECLTYPE!PRECISION %IF DECLTYPE&X'F0' = X'10' O LINE 481 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x000000f0 & AND N PUSHI #0x00000010 ? JUMPIF # L_0004 @ PUSH DECLTYPE @ PUSH DECLTYPE @ PUSH PRECISION ! OR S ASSVAL : LOCATE L_0004 482 IDENTS = DLIM O LINE 482 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH DLIM S ASSVAL 483 MODES = \0; !FOR SPEC LOOKS O LINE 483 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x00000000 \ NOT S ASSVAL 484 ->CODE O LINE 484 "regression-compile-tmp/check.imp" J JUMP L_0102 485 A(75): !NOTYPE O LINE 485 "regression-compile-tmp/check.imp" N PUSHI #0x0000004b _ SLABEL 252 486 DECLTYPE = X'F9'; ! '?' VAR O LINE 486 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x000000f9 S ASSVAL 487 ->ON O LINE 487 "regression-compile-tmp/check.imp" J JUMP L_0103 488 A(78): !IDENT: DC (DECLARE RECORD COMPONENT) O LINE 488 "regression-compile-tmp/check.imp" N PUSHI #0x0000004e _ SLABEL 252 489 HEAD == INTEGER(FIDENTPOS+4); DPOS = HEAD; !ALTER SEARCH LIST O LINE 489 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH INTEGER @ PUSH FIDENTPOS N PUSHI #0x00000004 + ADD p ASSPAR E CALL Z ASSREF O LINE 489 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH HEAD S ASSVAL 490 A(76): !IDENT: D (DECLARE) O LINE 490 "regression-compile-tmp/check.imp" N PUSHI #0x0000004c _ SLABEL 252 491 D1: ->ADD %IF C_BTYPE&1 # 0; !WITHIN SPEC PARAMS O LINE 491 "regression-compile-tmp/check.imp" L LABEL L_010f O LINE 491 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 3 N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0110 : LOCATE L_0004 492 D2: %CYCLE O LINE 492 "regression-compile-tmp/check.imp" L LABEL L_0111 O LINE 492 "regression-compile-tmp/check.imp" : LOCATE L_0003 493 ->NEW %IF DPOS < C_LOCAL O LINE 493 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH C n SELECT 2 ? JUMPIF >= L_0007 J JUMP L_0112 : LOCATE L_0007 494 %EXIT %IF STRING(DPOS+12) = STRING(DLIM+12) O LINE 494 "regression-compile-tmp/check.imp" @ PUSH STRING @ PUSH DPOS N PUSHI #0x0000000c + ADD p ASSPAR E CALL @ PUSH STRING @ PUSH DLIM N PUSHI #0x0000000c + ADD p ASSPAR E CALL ? JUMPIF # L_0007 F GOTO L_0004 : LOCATE L_0007 495 DPOS = INTEGER(DPOS+8) O LINE 495 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000008 + ADD p ASSPAR E CALL S ASSVAL 496 %REPEAT O LINE 496 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 497 ->D5 %IF INTEGER(DPOS)&X'FF'-1 = DECLTYPE %C 498 %AND DECLTYPE&6 # 0 %AND DECLTYPE&1 = 0 O LINE 497 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DPOS p ASSPAR E CALL N PUSHI #0x000000ff & AND N PUSHI #0x00000001 - SUB @ PUSH DECLTYPE ? JUMPIF # L_0004 @ PUSH DECLTYPE N PUSHI #0x00000006 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH DECLTYPE N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_0113 : LOCATE L_0004 499 FAULT(5); !DUPLICATE O LINE 499 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000005 p ASSPAR E CALL 500 NEW:INTEGER(DLIM+8) = HEAD; HEAD = DLIM O LINE 500 "regression-compile-tmp/check.imp" L LABEL L_0112 O LINE 500 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM N PUSHI #0x00000008 + ADD p ASSPAR E CALL @ PUSH HEAD S ASSVAL O LINE 500 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH DLIM S ASSVAL 501 ADD:INTEGER(DLIM) = DECLTYPE; INTEGER(DLIM+4) = 0 O LINE 501 "regression-compile-tmp/check.imp" L LABEL L_0110 O LINE 501 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM p ASSPAR E CALL @ PUSH DECLTYPE S ASSVAL O LINE 501 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM N PUSHI #0x00000004 + ADD p ASSPAR E CALL N PUSHI #0x00000000 S ASSVAL 502 DLIM = NEWDLIM O LINE 502 "regression-compile-tmp/check.imp" @ PUSH DLIM @ PUSH NEWDLIM S ASSVAL 503 ->CODE 504 !PROCEDURE BODY AFTER SPEC, LABEL AFTER JUMP O LINE 503 "regression-compile-tmp/check.imp" J JUMP L_0102 505 D5: INTEGER(DPOS) = DECLTYPE %IF DECLTYPE = LAB O LINE 505 "regression-compile-tmp/check.imp" L LABEL L_0113 O LINE 505 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x0000000c ? JUMPIF # L_0004 @ PUSH INTEGER @ PUSH DPOS p ASSPAR E CALL @ PUSH DECLTYPE S ASSVAL : LOCATE L_0004 506 IDENTS = DPOS O LINE 506 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH DPOS S ASSVAL 507 ->CODE O LINE 507 "regression-compile-tmp/check.imp" J JUMP L_0102 508 A(77): !IDENT: DF (DECLARE RECORD FORMAT) O LINE 508 "regression-compile-tmp/check.imp" N PUSHI #0x0000004d _ SLABEL 252 509 DECLTYPE = RECFORMAT; FIDENTPOS = DLIM O LINE 509 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x00000004 S ASSVAL O LINE 509 "regression-compile-tmp/check.imp" @ PUSH FIDENTPOS @ PUSH DLIM S ASSVAL 510 ->D1 O LINE 510 "regression-compile-tmp/check.imp" J JUMP L_010f 511 A(2): !CONST O LINE 511 "regression-compile-tmp/check.imp" N PUSHI #0x00000002 _ SLABEL 252 512 TYPE = ATOMTYPE; VAL = ATOMVAL O LINE 512 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH ATOMTYPE S ASSVAL O LINE 512 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH ATOMVAL S ASSVAL 513 ->CODE O LINE 513 "regression-compile-tmp/check.imp" J JUMP L_0102 514 A(3): !SUB (ABSORBS FOLLOWING IDENT) O LINE 514 "regression-compile-tmp/check.imp" N PUSHI #0x00000003 _ SLABEL 252 515 -> ERR %IF TYPE&X'FFF4' # 0 %AND TYPE # RECFORMAT; !NOT RECORD O LINE 515 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000fff4 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH TYPE N PUSHI #0x00000004 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 516 CODE ATOM; ->ERR %IF ATOM # IDENT O LINE 516 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL O LINE 516 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000001 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 517 ->IGNORE %IF VAL = 0 O LINE 517 "regression-compile-tmp/check.imp" @ PUSH VAL N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_0108 : LOCATE L_0004 518 DPOS = VAL; HEAD == VAL O LINE 518 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH VAL S ASSVAL O LINE 518 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH VAL Z ASSREF 519 A(81): !IDENT: LOOK O LINE 519 "regression-compile-tmp/check.imp" N PUSHI #0x00000051 _ SLABEL 252 520 LOOK: O LINE 520 "regression-compile-tmp/check.imp" L LABEL L_0114 521 LOOKS = LOOKS+1 O LINE 521 "regression-compile-tmp/check.imp" @ PUSH LOOKS @ PUSH LOOKS N PUSHI #0x00000001 + ADD S ASSVAL 522 %CYCLE O LINE 522 "regression-compile-tmp/check.imp" : LOCATE L_0003 523 TIMES = TIMES+1 O LINE 523 "regression-compile-tmp/check.imp" @ PUSH TIMES @ PUSH TIMES N PUSHI #0x00000001 + ADD S ASSVAL 524 ->UNKNOWN %IF DPOS <= 0 O LINE 524 "regression-compile-tmp/check.imp" @ PUSH DPOS N PUSHI #0x00000000 ? JUMPIF > L_0007 J JUMP L_0107 : LOCATE L_0007 525 %EXIT %IF STRING(DPOS+12) = STRING(DLIM+12) O LINE 525 "regression-compile-tmp/check.imp" @ PUSH STRING @ PUSH DPOS N PUSHI #0x0000000c + ADD p ASSPAR E CALL @ PUSH STRING @ PUSH DLIM N PUSHI #0x0000000c + ADD p ASSPAR E CALL ? JUMPIF # L_0007 F GOTO L_0004 : LOCATE L_0007 526 DPOS = INTEGER(DPOS+8) O LINE 526 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000008 + ADD p ASSPAR E CALL S ASSVAL 527 %REPEAT O LINE 527 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 528 TYPE = INTEGER(DPOS); VAL = INTEGER(DPOS+4) O LINE 528 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH INTEGER @ PUSH DPOS p ASSPAR E CALL S ASSVAL O LINE 528 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000004 + ADD p ASSPAR E CALL S ASSVAL 529 ->CODE %IF MODES<<(TYPE&15) < 0 O LINE 529 "regression-compile-tmp/check.imp" @ PUSH MODES @ PUSH TYPE N PUSHI #0x0000000f & AND [ LSH N PUSHI #0x00000000 ? JUMPIF >= L_0004 J JUMP L_0102 : LOCATE L_0004 530 ->MODERR O LINE 530 "regression-compile-tmp/check.imp" J JUMP L_0109 531 A(82): !IDENT: IMP1LOOK O LINE 531 "regression-compile-tmp/check.imp" N PUSHI #0x00000052 _ SLABEL 252 532 MODES = IMP1MODES O LINE 532 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x43fc0000 S ASSVAL 533 ->LOOK %IF BYTEINTEGER(FPOS) # ':' O LINE 533 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH FPOS p ASSPAR E CALL N PUSHI #0x0000003a ? JUMPIF = L_0004 J JUMP L_0114 : LOCATE L_0004 534 DECLTYPE = LAB O LINE 534 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x0000000c S ASSVAL 535 ->D2 O LINE 535 "regression-compile-tmp/check.imp" J JUMP L_0111 536 A(83): !IDENT: IMPLOOK O LINE 536 "regression-compile-tmp/check.imp" N PUSHI #0x00000053 _ SLABEL 252 537 MODES = IMPMODES O LINE 537 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x43f00000 S ASSVAL 538 ->LOOK O LINE 538 "regression-compile-tmp/check.imp" J JUMP L_0114 539 A(84): !IDENT: EXPLOOK O LINE 539 "regression-compile-tmp/check.imp" N PUSHI #0x00000054 _ SLABEL 252 540 MODES = EXPMODES O LINE 540 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0xf0f00000 S ASSVAL 541 ->LOOK O LINE 541 "regression-compile-tmp/check.imp" J JUMP L_0114 542 A(85): !IDENT: FLOOK O LINE 542 "regression-compile-tmp/check.imp" N PUSHI #0x00000055 _ SLABEL 252 543 MODES = FMATMODES O LINE 543 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x08000000 S ASSVAL 544 ->LOOK O LINE 544 "regression-compile-tmp/check.imp" J JUMP L_0114 545 A(86): !IDENT: JLOOK O LINE 545 "regression-compile-tmp/check.imp" N PUSHI #0x00000056 _ SLABEL 252 546 %WHILE DPOS >= C_LOCAL %CYCLE O LINE 546 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH DPOS @ PUSH C n SELECT 2 ? JUMPIF < L_0004 547 ->JL1 %IF STRING(DPOS+12) = STRING(DLIM+12) O LINE 547 "regression-compile-tmp/check.imp" @ PUSH STRING @ PUSH DPOS N PUSHI #0x0000000c + ADD p ASSPAR E CALL @ PUSH STRING @ PUSH DLIM N PUSHI #0x0000000c + ADD p ASSPAR E CALL ? JUMPIF # L_0007 J JUMP L_0115 : LOCATE L_0007 548 DPOS = INTEGER(DPOS+8) O LINE 548 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000008 + ADD p ASSPAR E CALL S ASSVAL 549 %REPEAT O LINE 549 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 550 INTEGER(DLIM+8) = HEAD; HEAD = DLIM O LINE 550 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM N PUSHI #0x00000008 + ADD p ASSPAR E CALL @ PUSH HEAD S ASSVAL O LINE 550 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH DLIM S ASSVAL 551 INTEGER(DLIM) = JUMPLAB; INTEGER(DLIM+4) = 0 O LINE 551 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM p ASSPAR E CALL N PUSHI #0x0000000d S ASSVAL O LINE 551 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DLIM N PUSHI #0x00000004 + ADD p ASSPAR E CALL N PUSHI #0x00000000 S ASSVAL 552 DPOS = DLIM; DLIM = NEWDLIM O LINE 552 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH DLIM S ASSVAL O LINE 552 "regression-compile-tmp/check.imp" @ PUSH DLIM @ PUSH NEWDLIM S ASSVAL 553 JL1:TYPE = INTEGER(DPOS) O LINE 553 "regression-compile-tmp/check.imp" L LABEL L_0115 O LINE 553 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH INTEGER @ PUSH DPOS p ASSPAR E CALL S ASSVAL 554 ->CODE %IF TYPE&14 = LAB O LINE 554 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000000e & AND N PUSHI #0x0000000c ? JUMPIF # L_0004 J JUMP L_0102 : LOCATE L_0004 555 ->MODERR O LINE 555 "regression-compile-tmp/check.imp" J JUMP L_0109 556 A(79): !RECSPEC O LINE 556 "regression-compile-tmp/check.imp" N PUSHI #0x0000004f _ SLABEL 252 557 ->MODERR %IF TYPE&X'F4' # 0 %OR VAL # 0 %OR DPOS < C_LOCAL O LINE 557 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x000000f4 & AND N PUSHI #0x00000000 ? JUMPIF # L_0005 @ PUSH VAL N PUSHI #0x00000000 ? JUMPIF # L_0005 @ PUSH DPOS @ PUSH C n SELECT 2 ? JUMPIF >= L_0004 : LOCATE L_0005 J JUMP L_0109 : LOCATE L_0004 558 RECIDENTS = -DPOS O LINE 558 "regression-compile-tmp/check.imp" @ PUSH RECIDENTS @ PUSH DPOS U NEGATE S ASSVAL 559 ->ON O LINE 559 "regression-compile-tmp/check.imp" J JUMP L_0103 560 A(88): !FSET O LINE 560 "regression-compile-tmp/check.imp" N PUSHI #0x00000058 _ SLABEL 252 561 IDENTS = RECIDENTS O LINE 561 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH RECIDENTS S ASSVAL 562 %IF IDENTS >= 0 %THEN DEFINE(4,INTEGER(DPOS+4)) %C 563 %ELSE INTEGER(-IDENTS+4) = INTEGER(DPOS+4) O LINE 562 "regression-compile-tmp/check.imp" @ PUSH IDENTS N PUSHI #0x00000000 ? JUMPIF < L_0004 @ PUSH DEFINE N PUSHI #0x00000004 p ASSPAR @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000004 + ADD p ASSPAR E CALL p ASSPAR E CALL F GOTO L_0003 : LOCATE L_0004 @ PUSH INTEGER @ PUSH IDENTS U NEGATE N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000004 + ADD p ASSPAR E CALL S ASSVAL : LOCATE L_0003 564 ->ON O LINE 564 "regression-compile-tmp/check.imp" J JUMP L_0103 565 A(80): !PROCSPEC O LINE 565 "regression-compile-tmp/check.imp" N PUSHI #0x00000050 _ SLABEL 252 566 ->MODERR %IF TYPE&X'FF03' # FN %OR DPOS < C_LOCAL O LINE 566 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff03 & AND N PUSHI #0x00000002 ? JUMPIF # L_0005 @ PUSH DPOS @ PUSH C n SELECT 2 ? JUMPIF >= L_0004 : LOCATE L_0005 J JUMP L_0109 : LOCATE L_0004 567 IDENTS = DPOS O LINE 567 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH DPOS S ASSVAL 568 ->ON O LINE 568 "regression-compile-tmp/check.imp" J JUMP L_0103 569 A(72): !BEG O LINE 569 "regression-compile-tmp/check.imp" N PUSHI #0x00000048 _ SLABEL 252 570 PIDENTPOS = IDENTS O LINE 570 "regression-compile-tmp/check.imp" @ PUSH PIDENTPOS @ PUSH IDENTS S ASSVAL 571 LEVEL = LEVEL+1; ->DISASTER %IF LEVEL > 12 O LINE 571 "regression-compile-tmp/check.imp" @ PUSH LEVEL @ PUSH LEVEL N PUSHI #0x00000001 + ADD S ASSVAL O LINE 571 "regression-compile-tmp/check.imp" @ PUSH LEVEL N PUSHI #0x0000000c ? JUMPIF <= L_0004 J JUMP L_010a : LOCATE L_0004 572 HOLD(LEVEL) = C O LINE 572 "regression-compile-tmp/check.imp" @ PUSH HOLD @ PUSH LEVEL a ACCESS @ PUSH C S ASSVAL 573 C_BTYPE = DECLTYPE O LINE 573 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 3 @ PUSH DECLTYPE S ASSVAL 574 C_STACK = 0 O LINE 574 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 1 N PUSHI #0x00000000 S ASSVAL 575 C_LOCAL = DLIM O LINE 575 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 2 @ PUSH DLIM S ASSVAL 576 ->ON O LINE 576 "regression-compile-tmp/check.imp" J JUMP L_0103 577 A(89): !NL: PARSET O LINE 577 "regression-compile-tmp/check.imp" N PUSHI #0x00000059 _ SLABEL 252 578 IDENTS = C_LOCAL; NP = 51 O LINE 578 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH C n SELECT 2 S ASSVAL O LINE 578 "regression-compile-tmp/check.imp" @ PUSH NP N PUSHI #0x00000033 S ASSVAL 579 %WHILE IDENTS # DLIM %CYCLE O LINE 579 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH IDENTS @ PUSH DLIM ? JUMPIF = L_0004 580 NP = NP-1; NTYPE(NP) = INTEGER(IDENTS) O LINE 580 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 - SUB S ASSVAL O LINE 580 "regression-compile-tmp/check.imp" @ PUSH NTYPE @ PUSH NP a ACCESS @ PUSH INTEGER @ PUSH IDENTS p ASSPAR E CALL S ASSVAL 581 IDENTS = BYTEINTEGER(IDENTS+12)&(\3)+IDENTS+16 O LINE 581 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH BYTEINTEGER @ PUSH IDENTS N PUSHI #0x0000000c + ADD p ASSPAR E CALL N PUSHI #0x00000003 \ NOT & AND @ PUSH IDENTS + ADD N PUSHI #0x00000010 + ADD S ASSVAL 582 %REPEAT O LINE 582 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 583 I = 0 O LINE 583 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000000 S ASSVAL 584 %WHILE NP # 51 %CYCLE O LINE 584 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH NP N PUSHI #0x00000033 ? JUMPIF = L_0004 585 J = I<<24+NTYPE(NP); NP = NP+1 O LINE 585 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH I N PUSHI #0x00000018 [ LSH @ PUSH NTYPE @ PUSH NP a ACCESS + ADD S ASSVAL O LINE 585 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL 586 I = I+1 %UNTIL I > PARMAX %OR PARTYPE(I) = J O LINE 586 "regression-compile-tmp/check.imp" : LOCATE L_0006 @ PUSH I @ PUSH I N PUSHI #0x00000001 + ADD S ASSVAL @ PUSH I @ PUSH PARMAX ? JUMPIF > L_0007 @ PUSH PARTYPE @ PUSH I a ACCESS @ PUSH J ? JUMPIF = L_0007 B REPEAT L_0006 : LOCATE L_0007 587 %IF I > PARMAX %START O LINE 587 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH PARMAX ? JUMPIF <= L_0007 588 ->DISASTER %IF I = 252 O LINE 588 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x000000fc ? JUMPIF # L_000a J JUMP L_010a : LOCATE L_000a 589 PARMAX = I O LINE 589 "regression-compile-tmp/check.imp" @ PUSH PARMAX @ PUSH I S ASSVAL 590 PARTYPE(I) = J O LINE 590 "regression-compile-tmp/check.imp" @ PUSH PARTYPE @ PUSH I a ACCESS @ PUSH J S ASSVAL 591 %FINISH O LINE 591 "regression-compile-tmp/check.imp" : LOCATE L_0007 592 %REPEAT O LINE 592 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 593 %IF C_BTYPE&1 = 0 %AND INTEGER(PIDENTPOS)&1 # 0 %START O LINE 593 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 3 N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 @ PUSH INTEGER @ PUSH PIDENTPOS p ASSPAR E CALL N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 594 FAULT(18) %IF BYTEINTEGER(PIDENTPOS+2) # I O LINE 594 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH PIDENTPOS N PUSHI #0x00000002 + ADD p ASSPAR E CALL @ PUSH I ? JUMPIF = L_0007 @ PUSH FAULT N PUSHI #0x00000012 p ASSPAR E CALL : LOCATE L_0007 595 INTEGER(PIDENTPOS) = C_BTYPE O LINE 595 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH PIDENTPOS p ASSPAR E CALL @ PUSH C n SELECT 3 S ASSVAL 596 %FINISH O LINE 596 "regression-compile-tmp/check.imp" : LOCATE L_0004 597 BYTEINTEGER(PIDENTPOS+2) = I O LINE 597 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH PIDENTPOS N PUSHI #0x00000002 + ADD p ASSPAR E CALL @ PUSH I S ASSVAL 598 INTEGER(PIDENTPOS) = INTEGER(PIDENTPOS)&(\EXTIND) O LINE 598 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH PIDENTPOS p ASSPAR E CALL @ PUSH INTEGER @ PUSH PIDENTPOS p ASSPAR E CALL @ PUSH EXTIND \ NOT & AND S ASSVAL 599 ->FIN O LINE 599 "regression-compile-tmp/check.imp" J JUMP L_010b 600 A(90): !INIT O LINE 600 "regression-compile-tmp/check.imp" N PUSHI #0x0000005a _ SLABEL 252 601 CONSTCOUNT = CONSTCOUNT-1 O LINE 601 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT @ PUSH CONSTCOUNT N PUSHI #0x00000001 - SUB S ASSVAL 602 ->ER20 %IF TYPE&15 # 0 O LINE 602 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000000f & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_010d : LOCATE L_0004 603 ->ER22 %IF TYPE&DECLTYPE = 0 604 !RANGE CHECK O LINE 603 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH DECLTYPE & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010e : LOCATE L_0004 605 DEFINE(4,VAL) %IF DECLTYPE&15 = 0 O LINE 605 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x0000000f & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 @ PUSH DEFINE N PUSHI #0x00000004 p ASSPAR @ PUSH VAL p ASSPAR E CALL : LOCATE L_0004 606 ->ON O LINE 606 "regression-compile-tmp/check.imp" J JUMP L_0103 607 A(91): !NL: INITFIN O LINE 607 "regression-compile-tmp/check.imp" N PUSHI #0x0000005b _ SLABEL 252 608 FAULT(21) %IF CONSTCOUNT # 0 %AND CONSTCOUNT < 1000000 O LINE 608 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH CONSTCOUNT N PUSHI #0x000f4240 ? JUMPIF >= L_0004 @ PUSH FAULT N PUSHI #0x00000015 p ASSPAR E CALL : LOCATE L_0004 609 ->FIN O LINE 609 "regression-compile-tmp/check.imp" J JUMP L_010b 610 A(92): !DIMSET O LINE 610 "regression-compile-tmp/check.imp" N PUSHI #0x0000005c _ SLABEL 252 611 DEFINE(0,DIMCOUNT) O LINE 611 "regression-compile-tmp/check.imp" @ PUSH DEFINE N PUSHI #0x00000000 p ASSPAR @ PUSH DIMCOUNT p ASSPAR E CALL 612 DIMCOUNT = 0 O LINE 612 "regression-compile-tmp/check.imp" @ PUSH DIMCOUNT N PUSHI #0x00000000 S ASSVAL 613 ->ON O LINE 613 "regression-compile-tmp/check.imp" J JUMP L_0103 614 A(93): !COLON: COUNT O LINE 614 "regression-compile-tmp/check.imp" N PUSHI #0x0000005d _ SLABEL 252 615 %IF DIMCOUNT = 6 %THEN FAULT(23) %ELSE DIMCOUNT = DIMCOUNT+1 O LINE 615 "regression-compile-tmp/check.imp" @ PUSH DIMCOUNT N PUSHI #0x00000006 ? JUMPIF # L_0004 @ PUSH FAULT N PUSHI #0x00000017 p ASSPAR E CALL F GOTO L_0003 : LOCATE L_0004 @ PUSH DIMCOUNT @ PUSH DIMCOUNT N PUSHI #0x00000001 + ADD S ASSVAL : LOCATE L_0003 616 ->CODE O LINE 616 "regression-compile-tmp/check.imp" J JUMP L_0102 617 A(94): !REP O LINE 617 "regression-compile-tmp/check.imp" N PUSHI #0x0000005e _ SLABEL 252 618 CONSTCOUNT = CONSTCOUNT-VAL+1 O LINE 618 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT @ PUSH CONSTCOUNT @ PUSH VAL - SUB N PUSHI #0x00000001 + ADD S ASSVAL 619 ->ON O LINE 619 "regression-compile-tmp/check.imp" J JUMP L_0103 620 A(95): !LITINT O LINE 620 "regression-compile-tmp/check.imp" N PUSHI #0x0000005f _ SLABEL 252 621 ->ER20 %IF TYPE&15 # 0 O LINE 621 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000000f & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_010d : LOCATE L_0004 622 A(96): !INT O LINE 622 "regression-compile-tmp/check.imp" N PUSHI #0x00000060 _ SLABEL 252 623 ->ER22 %IF TYPE&INTBIT = 0 O LINE 623 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000040 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010e : LOCATE L_0004 624 ->NAPP O LINE 624 "regression-compile-tmp/check.imp" J JUMP L_010c 625 A(97): !STR O LINE 625 "regression-compile-tmp/check.imp" N PUSHI #0x00000061 _ SLABEL 252 626 ->ER22 %IF TYPE&STRINGBIT = 0 O LINE 626 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000080 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010e : LOCATE L_0004 627 ->NAPP O LINE 627 "regression-compile-tmp/check.imp" J JUMP L_010c 628 A(98): !SIZESET O LINE 628 "regression-compile-tmp/check.imp" N PUSHI #0x00000062 _ SLABEL 252 629 STRINGSIZE = VAL O LINE 629 "regression-compile-tmp/check.imp" @ PUSH STRINGSIZE @ PUSH VAL S ASSVAL 630 ->ON %IF 0 < VAL <= 255 O LINE 630 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 @ PUSH VAL " JUMPIFD >= L_0004 N PUSHI #0x000000ff ? JUMPIF > L_0004 J JUMP L_0103 : LOCATE L_0004 631 FAULT(19); STRINGSIZE = 255 O LINE 631 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000013 p ASSPAR E CALL O LINE 631 "regression-compile-tmp/check.imp" @ PUSH STRINGSIZE N PUSHI #0x000000ff S ASSVAL 632 ->ON O LINE 632 "regression-compile-tmp/check.imp" J JUMP L_0103 633 A(99): !CBSET O LINE 633 "regression-compile-tmp/check.imp" N PUSHI #0x00000063 _ SLABEL 252 634 LASTVAL = NVAL(NP); NP = NP+1 O LINE 634 "regression-compile-tmp/check.imp" @ PUSH LASTVAL @ PUSH NVAL @ PUSH NP a ACCESS S ASSVAL O LINE 634 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL 635 ->CBERR %UNLESS -32768 <= LASTVAL <= 32767 O LINE 635 "regression-compile-tmp/check.imp" N PUSHI #0x00008000 U NEGATE @ PUSH LASTVAL " JUMPIFD > L_0005 N PUSHI #0x00007fff ? JUMPIF <= L_0004 : LOCATE L_0005 J JUMP L_0116 : LOCATE L_0004 636 CONSTCOUNT = VAL-LASTVAL+1 O LINE 636 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT @ PUSH VAL @ PUSH LASTVAL - SUB N PUSHI #0x00000001 + ADD S ASSVAL 637 ->CBERR %UNLESS 0 < CONSTCOUNT <= 32767 O LINE 637 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 @ PUSH CONSTCOUNT " JUMPIFD >= L_0005 N PUSHI #0x00007fff ? JUMPIF <= L_0004 : LOCATE L_0005 J JUMP L_0116 : LOCATE L_0004 638 %IF DECLTYPE = SWITCH %START O LINE 638 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x0000010c ? JUMPIF # L_0004 639 {%UNTIL IDENTS = DLIM} %CYCLE O LINE 639 "regression-compile-tmp/check.imp" : LOCATE L_0006 640 J = DBOUND O LINE 640 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH DBOUND S ASSVAL 641 DBOUND = J-(CONSTCOUNT+63)>>5<<2 O LINE 641 "regression-compile-tmp/check.imp" @ PUSH DBOUND @ PUSH J @ PUSH CONSTCOUNT N PUSHI #0x0000003f + ADD N PUSHI #0x00000005 ] RSH N PUSHI #0x00000002 [ LSH - SUB S ASSVAL 642 ->DISASTER %IF DBOUND <= DLIM O LINE 642 "regression-compile-tmp/check.imp" @ PUSH DBOUND @ PUSH DLIM ? JUMPIF > L_000a J JUMP L_010a : LOCATE L_000a 643 INTEGER(IDENTS+4) = DBOUND O LINE 643 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH IDENTS N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH DBOUND S ASSVAL 644 INTEGER(DBOUND) = LASTVAL<<16+CONSTCOUNT O LINE 644 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DBOUND p ASSPAR E CALL @ PUSH LASTVAL N PUSHI #0x00000010 [ LSH @ PUSH CONSTCOUNT + ADD S ASSVAL 645 %CYCLE O LINE 645 "regression-compile-tmp/check.imp" : LOCATE L_0009 646 J = J-4 O LINE 646 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH J N PUSHI #0x00000004 - SUB S ASSVAL 647 %EXIT %IF J = DBOUND O LINE 647 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH DBOUND ? JUMPIF # L_000d F GOTO L_000a : LOCATE L_000d 648 INTEGER(J) = 0 O LINE 648 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH J p ASSPAR E CALL N PUSHI #0x00000000 S ASSVAL 649 %REPEAT O LINE 649 "regression-compile-tmp/check.imp" B REPEAT L_0009 : LOCATE L_000a 650 IDENTS = BYTEINTEGER(IDENTS+12)&(\3)+IDENTS+16 O LINE 650 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH BYTEINTEGER @ PUSH IDENTS N PUSHI #0x0000000c + ADD p ASSPAR E CALL N PUSHI #0x00000003 \ NOT & AND @ PUSH IDENTS + ADD N PUSHI #0x00000010 + ADD S ASSVAL 651 %REPEAT %UNTIL IDENTS = DLIM O LINE 651 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH DLIM ? JUMPIF = L_0007 B REPEAT L_0006 : LOCATE L_0007 652 %FINISH O LINE 652 "regression-compile-tmp/check.imp" : LOCATE L_0004 653 CB1:IDENTS = DLIM O LINE 653 "regression-compile-tmp/check.imp" L LABEL L_0117 O LINE 653 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH DLIM S ASSVAL 654 ->ON O LINE 654 "regression-compile-tmp/check.imp" J JUMP L_0103 655 CBERR: O LINE 655 "regression-compile-tmp/check.imp" L LABEL L_0116 656 FAULT(23); CONSTCOUNT = 2000000 O LINE 656 "regression-compile-tmp/check.imp" @ PUSH FAULT N PUSHI #0x00000017 p ASSPAR E CALL O LINE 656 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT N PUSHI #0x001e8480 S ASSVAL 657 ->CB1 O LINE 657 "regression-compile-tmp/check.imp" J JUMP L_0117 658 A(100): !COLON: LAB O LINE 658 "regression-compile-tmp/check.imp" N PUSHI #0x00000064 _ SLABEL 252 659 ->FIN %IF DECLTYPE # 0; !SIMPLE LABEL O LINE 659 "regression-compile-tmp/check.imp" @ PUSH DECLTYPE N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_010b : LOCATE L_0004 660 ->ERR %IF TYPE # JUMPLAB; !IE SWITCH + APP O LINE 660 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000000d ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 661 FAULT(20) %AND ->FIN %IF LASTTYPE&15 # 0 O LINE 661 "regression-compile-tmp/check.imp" @ PUSH LASTTYPE N PUSHI #0x0000000f & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH FAULT N PUSHI #0x00000014 p ASSPAR E CALL J JUMP L_010b : LOCATE L_0004 662 ->FIN %IF VAL = 0 O LINE 662 "regression-compile-tmp/check.imp" @ PUSH VAL N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010b : LOCATE L_0004 663 J = LASTVAL-SHORTINTEGER(VAL) O LINE 663 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH LASTVAL @ PUSH SHORTINTEGER @ PUSH VAL p ASSPAR E CALL - SUB S ASSVAL 664 FAULT(19) %AND ->FIN %UNLESS 0 <= J < SHORTINTEGER(VAL+2) O LINE 664 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 @ PUSH J " JUMPIFD > L_0005 @ PUSH SHORTINTEGER @ PUSH VAL N PUSHI #0x00000002 + ADD p ASSPAR E CALL ? JUMPIF < L_0004 : LOCATE L_0005 @ PUSH FAULT N PUSHI #0x00000013 p ASSPAR E CALL J JUMP L_010b : LOCATE L_0004 665 I = VAL+J>>5<<2; J = X'80000000'>>(J&31) O LINE 665 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH VAL @ PUSH J N PUSHI #0x00000005 ] RSH N PUSHI #0x00000002 [ LSH + ADD S ASSVAL O LINE 665 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x80000000 @ PUSH J N PUSHI #0x0000001f & AND ] RSH S ASSVAL 666 FAULT(16) %IF INTEGER(I+4)&J # 0 O LINE 666 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH I N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH J & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH FAULT N PUSHI #0x00000010 p ASSPAR E CALL : LOCATE L_0004 667 INTEGER(I+4) = INTEGER(I+4)!J O LINE 667 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH I N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH INTEGER @ PUSH I N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH J ! OR S ASSVAL 668 ->FIN O LINE 668 "regression-compile-tmp/check.imp" J JUMP L_010b 669 A(101): !OP3: DOT O LINE 669 "regression-compile-tmp/check.imp" N PUSHI #0x00000065 _ SLABEL 252 670 ->ERR %IF ATOMTYPE # STRINGBIT; !IE OP3 # '.' O LINE 670 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000080 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 671 A(60): !FOR O LINE 671 "regression-compile-tmp/check.imp" N PUSHI #0x0000003c _ SLABEL 252 672 MODES = DESTMODES O LINE 672 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x00f00000 S ASSVAL 673 ->CODE O LINE 673 "regression-compile-tmp/check.imp" J JUMP L_0102 674 A(73): !RESOL O LINE 674 "regression-compile-tmp/check.imp" N PUSHI #0x00000049 _ SLABEL 252 675 ->ER22 %IF TYPE&STRINGBIT = 0 O LINE 675 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000080 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010e : LOCATE L_0004 676 MODES = DESTMODES O LINE 676 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x00f00000 S ASSVAL 677 ->ON O LINE 677 "regression-compile-tmp/check.imp" J JUMP L_0103 678 A(102): !OP3: SIGN O LINE 678 "regression-compile-tmp/check.imp" N PUSHI #0x00000066 _ SLABEL 252 679 ->ERR %IF ATOMTYPE&3 = 0; !IE OP3 # '+', '-', '!' O LINE 679 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000003 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_0101 : LOCATE L_0004 680 TYPE = ATOMTYPE; VAL = 0 O LINE 680 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH ATOMTYPE S ASSVAL O LINE 680 "regression-compile-tmp/check.imp" @ PUSH VAL N PUSHI #0x00000000 S ASSVAL 681 ->OP1 O LINE 681 "regression-compile-tmp/check.imp" J JUMP L_0118 682 A(7): !UOP O LINE 682 "regression-compile-tmp/check.imp" N PUSHI #0x00000007 _ SLABEL 252 683 TYPE = ATOMTYPE; VAL = -1 O LINE 683 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH ATOMTYPE S ASSVAL O LINE 683 "regression-compile-tmp/check.imp" @ PUSH VAL N PUSHI #0x00000001 U NEGATE S ASSVAL 684 ->OP1 O LINE 684 "regression-compile-tmp/check.imp" J JUMP L_0118 685 A(8): !COP O LINE 685 "regression-compile-tmp/check.imp" N PUSHI #0x00000008 _ SLABEL 252 686 A(4): !OP1 O LINE 686 "regression-compile-tmp/check.imp" N PUSHI #0x00000004 _ SLABEL 252 687 A(5): !OP2 O LINE 687 "regression-compile-tmp/check.imp" N PUSHI #0x00000005 _ SLABEL 252 688 A(104):!OP3 OR EQ: OP O LINE 688 "regression-compile-tmp/check.imp" N PUSHI #0x00000068 _ SLABEL 252 689 ->ERR %IF TYPE&APPMASK # 0 O LINE 689 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 690 %IF TYPE&X'FF4F' = INTBIT %THEN TYPE=TYPE!15 %ELSE TYPE=TYPE&(\15) O LINE 690 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff4f & AND N PUSHI #0x00000040 ? JUMPIF # L_0004 @ PUSH TYPE @ PUSH TYPE N PUSHI #0x0000000f ! OR S ASSVAL F GOTO L_0003 : LOCATE L_0004 @ PUSH TYPE @ PUSH TYPE N PUSHI #0x0000000f \ NOT & AND S ASSVAL : LOCATE L_0003 691 TYPE = TYPE!REALBITS %IF TYPE&NUMBITS # 0 O LINE 691 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000070 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH TYPE @ PUSH TYPE N PUSHI #0x00000030 ! OR S ASSVAL : LOCATE L_0004 692 OP1:NP = NP-1; NTYPE(NP) = TYPE&ATOMTYPE; NVAL(NP) = VAL O LINE 692 "regression-compile-tmp/check.imp" L LABEL L_0118 O LINE 692 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 - SUB S ASSVAL O LINE 692 "regression-compile-tmp/check.imp" @ PUSH NTYPE @ PUSH NP a ACCESS @ PUSH TYPE @ PUSH ATOMTYPE & AND S ASSVAL O LINE 692 "regression-compile-tmp/check.imp" @ PUSH NVAL @ PUSH NP a ACCESS @ PUSH VAL S ASSVAL 693 ->CODE O LINE 693 "regression-compile-tmp/check.imp" J JUMP L_0102 694 A(105): !EVAL O LINE 694 "regression-compile-tmp/check.imp" N PUSHI #0x00000069 _ SLABEL 252 695 ->ERR %IF TYPE&APPMASK # 0 O LINE 695 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 696 TYPE = TYPE!REALBITS %IF TYPE&NUMBITS # 0 O LINE 696 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000070 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH TYPE @ PUSH TYPE N PUSHI #0x00000030 ! OR S ASSVAL : LOCATE L_0004 697 I = NTYPE(NP); NP = NP+1 O LINE 697 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH NTYPE @ PUSH NP a ACCESS S ASSVAL O LINE 697 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL 698 J = I&TYPE&X'F0' O LINE 698 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH I @ PUSH TYPE & AND N PUSHI #0x000000f0 & AND S ASSVAL 699 ->ER22 %IF J = 0 O LINE 699 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010e : LOCATE L_0004 700 ->X(I&15) %IF TYPE&X'FF4F' = INTBIT O LINE 700 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff4f & AND N PUSHI #0x00000040 ? JUMPIF # L_0004 @ PUSH I N PUSHI #0x0000000f & AND W SJUMP 253 : LOCATE L_0004 701 X(0): O LINE 701 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 _ SLABEL 253 702 TYPE = J+EXP O LINE 702 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH J N PUSHI #0x00000001 + ADD S ASSVAL 703 ->ON O LINE 703 "regression-compile-tmp/check.imp" J JUMP L_0103 704 X(1): VAL = NVAL(NP-1)+VAL O LINE 704 "regression-compile-tmp/check.imp" N PUSHI #0x00000001 _ SLABEL 253 O LINE 704 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH NVAL @ PUSH NP N PUSHI #0x00000001 - SUB a ACCESS @ PUSH VAL + ADD S ASSVAL 705 X1: TYPE = NUMBITS O LINE 705 "regression-compile-tmp/check.imp" L LABEL L_0119 O LINE 705 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000070 S ASSVAL 706 ->ON O LINE 706 "regression-compile-tmp/check.imp" J JUMP L_0103 707 X(2): VAL = NVAL(NP-1)-VAL O LINE 707 "regression-compile-tmp/check.imp" N PUSHI #0x00000002 _ SLABEL 253 O LINE 707 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH NVAL @ PUSH NP N PUSHI #0x00000001 - SUB a ACCESS @ PUSH VAL - SUB S ASSVAL 708 ->X1 O LINE 708 "regression-compile-tmp/check.imp" J JUMP L_0119 709 X(3): VAL = NVAL(NP-1)!VAL O LINE 709 "regression-compile-tmp/check.imp" N PUSHI #0x00000003 _ SLABEL 253 O LINE 709 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH NVAL @ PUSH NP N PUSHI #0x00000001 - SUB a ACCESS @ PUSH VAL ! OR S ASSVAL 710 ->X1 O LINE 710 "regression-compile-tmp/check.imp" J JUMP L_0119 711 X(4): VAL = NVAL(NP-1)!!VAL O LINE 711 "regression-compile-tmp/check.imp" N PUSHI #0x00000004 _ SLABEL 253 O LINE 711 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH NVAL @ PUSH NP N PUSHI #0x00000001 - SUB a ACCESS @ PUSH VAL % XOR S ASSVAL 712 ->X1 O LINE 712 "regression-compile-tmp/check.imp" J JUMP L_0119 713 A(103): !BAR (FIDDLE FOR MOD-SIGN) O LINE 713 "regression-compile-tmp/check.imp" N PUSHI #0x00000067 _ SLABEL 252 714 ->ON %UNLESS NTYPE(NP) = X'43' O LINE 714 "regression-compile-tmp/check.imp" @ PUSH NTYPE @ PUSH NP a ACCESS N PUSHI #0x00000043 ? JUMPIF = L_0004 J JUMP L_0103 : LOCATE L_0004 715 ->ERR %UNLESS ATOM = OP3 %AND ATOMTYPE = X'43' O LINE 715 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000006 ? JUMPIF # L_0005 @ PUSH ATOMTYPE N PUSHI #0x00000043 ? JUMPIF = L_0004 : LOCATE L_0005 J JUMP L_0101 : LOCATE L_0004 716 NP = NP+1; CODE ATOM O LINE 716 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 716 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL 717 ->EXIT O LINE 717 "regression-compile-tmp/check.imp" J JUMP L_0106 718 A(106): !EQ: ASSOP O LINE 718 "regression-compile-tmp/check.imp" N PUSHI #0x0000006a _ SLABEL 252 719 ->ERR %IF TYPE&X'FF0C' # 8 O LINE 719 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff0c & AND N PUSHI #0x00000008 ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 720 SAVE: O LINE 720 "regression-compile-tmp/check.imp" L LABEL L_011a 721 NP = NP-1; NTYPE(NP) = TYPE; NVAL(NP) = VAL O LINE 721 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 - SUB S ASSVAL O LINE 721 "regression-compile-tmp/check.imp" @ PUSH NTYPE @ PUSH NP a ACCESS @ PUSH TYPE S ASSVAL O LINE 721 "regression-compile-tmp/check.imp" @ PUSH NVAL @ PUSH NP a ACCESS @ PUSH VAL S ASSVAL 722 ->CODE O LINE 722 "regression-compile-tmp/check.imp" J JUMP L_0102 723 A(14): !EQEQ O LINE 723 "regression-compile-tmp/check.imp" N PUSHI #0x0000000e _ SLABEL 252 724 MODES = ADRMODES O LINE 724 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x40f00000 S ASSVAL 725 ->SAVE %IF TYPE&15 = REF O LINE 725 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000000f & AND N PUSHI #0x00000008 ? JUMPIF # L_0004 J JUMP L_011a : LOCATE L_0004 726 ->ERR O LINE 726 "regression-compile-tmp/check.imp" J JUMP L_0101 727 A(107): !ASS O LINE 727 "regression-compile-tmp/check.imp" N PUSHI #0x0000006b _ SLABEL 252 728 I = NTYPE(NP); NP = NP+1 O LINE 728 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH NTYPE @ PUSH NP a ACCESS S ASSVAL O LINE 728 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL 729 AS1:%IF I&TYPE&X'C0' = 0 %START O LINE 729 "regression-compile-tmp/check.imp" L LABEL L_011b O LINE 729 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH TYPE & AND N PUSHI #0x000000c0 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 730 I = I&X'F0' O LINE 730 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH I N PUSHI #0x000000f0 & AND S ASSVAL 731 %IF I = 0 %START; !RECORD O LINE 731 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000000 ? JUMPIF # L_0007 732 ->ER22 %UNLESS TYPE&X'F0' = 0 %OR %C 733 (TYPE&X'FF4F'=INTBIT %AND VAL=0) O LINE 732 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x000000f0 & AND N PUSHI #0x00000000 ? JUMPIF = L_000a @ PUSH TYPE N PUSHI #0x0000ff4f & AND N PUSHI #0x00000040 ? JUMPIF # L_000b @ PUSH VAL N PUSHI #0x00000000 ? JUMPIF = L_000a : LOCATE L_000b J JUMP L_010e : LOCATE L_000a 734 %FINISH %ELSE %START O LINE 734 "regression-compile-tmp/check.imp" F GOTO L_0006 : LOCATE L_0007 735 ->ER22 %UNLESS I <= X'30' %AND TYPE&NUMBITS # 0 O LINE 735 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000030 ? JUMPIF > L_000b @ PUSH TYPE N PUSHI #0x00000070 & AND N PUSHI #0x00000000 ? JUMPIF # L_000a : LOCATE L_000b J JUMP L_010e : LOCATE L_000a 736 %FINISH O LINE 736 "regression-compile-tmp/check.imp" : LOCATE L_0006 737 %FINISH O LINE 737 "regression-compile-tmp/check.imp" : LOCATE L_0004 738 ->NAPP O LINE 738 "regression-compile-tmp/check.imp" J JUMP L_010c 739 A(108): !REFASS O LINE 739 "regression-compile-tmp/check.imp" N PUSHI #0x0000006c _ SLABEL 252 740 I = NTYPE(NP); NP = NP+1 O LINE 740 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH NTYPE @ PUSH NP a ACCESS S ASSVAL O LINE 740 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL 741 RA1:FAULT(22) %IF (I!!TYPE)&X'F0' # 0 %C 742 %AND I&X'F0' # X'F0' %AND TYPE&X'F0' # X'F0' O LINE 741 "regression-compile-tmp/check.imp" L LABEL L_011c O LINE 741 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH TYPE % XOR N PUSHI #0x000000f0 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH I N PUSHI #0x000000f0 & AND N PUSHI #0x000000f0 ? JUMPIF = L_0004 @ PUSH TYPE N PUSHI #0x000000f0 & AND N PUSHI #0x000000f0 ? JUMPIF = L_0004 @ PUSH FAULT N PUSHI #0x00000016 p ASSPAR E CALL : LOCATE L_0004 743 ->NAPP %IF I&APPMASK = 0; !SCALAR O LINE 743 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_010c : LOCATE L_0004 744 FAULT(22) %IF TYPE&APPMASK = 0 %OR TYPE&14 = MAP O LINE 744 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF = L_0005 @ PUSH TYPE N PUSHI #0x0000000e & AND N PUSHI #0x0000000a ? JUMPIF # L_0004 : LOCATE L_0005 @ PUSH FAULT N PUSHI #0x00000016 p ASSPAR E CALL : LOCATE L_0004 745 ->ON O LINE 745 "regression-compile-tmp/check.imp" J JUMP L_0103 746 A(17): !RESULT O LINE 746 "regression-compile-tmp/check.imp" N PUSHI #0x00000011 _ SLABEL 252 747 FAULT(25) %IF C_BTYPE&7 # FN O LINE 747 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 3 N PUSHI #0x00000007 & AND N PUSHI #0x00000002 ? JUMPIF = L_0004 @ PUSH FAULT N PUSHI #0x00000019 p ASSPAR E CALL : LOCATE L_0004 748 TYPE = C_BTYPE&X'F8'; TYPE = TYPE+VAR %IF TYPE&8 = 0 O LINE 748 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH C n SELECT 3 N PUSHI #0x000000f8 & AND S ASSVAL O LINE 748 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x00000008 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 @ PUSH TYPE @ PUSH TYPE N PUSHI #0x00000009 + ADD S ASSVAL : LOCATE L_0004 749 VAL = 0 O LINE 749 "regression-compile-tmp/check.imp" @ PUSH VAL N PUSHI #0x00000000 S ASSVAL 750 ->CODE O LINE 750 "regression-compile-tmp/check.imp" J JUMP L_0102 751 A(71): !RCALL O LINE 751 "regression-compile-tmp/check.imp" N PUSHI #0x00000047 _ SLABEL 252 752 ->ON %IF TYPE&X'FFFC' = 4 O LINE 752 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000fffc & AND N PUSHI #0x00000004 ? JUMPIF # L_0004 J JUMP L_0103 : LOCATE L_0004 753 ->ERR O LINE 753 "regression-compile-tmp/check.imp" J JUMP L_0101 754 A(112): !APP O LINE 754 "regression-compile-tmp/check.imp" N PUSHI #0x00000070 _ SLABEL 252 755 ->ON %IF ATOM # LB O LINE 755 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x0000000b ? JUMPIF = L_0004 J JUMP L_0103 : LOCATE L_0004 756 LINKMAX = LINKMAX+1; ->ERR %IF LINKMAX > 20 O LINE 756 "regression-compile-tmp/check.imp" @ PUSH LINKMAX @ PUSH LINKMAX N PUSHI #0x00000001 + ADD S ASSVAL O LINE 756 "regression-compile-tmp/check.imp" @ PUSH LINKMAX N PUSHI #0x00000014 ? JUMPIF <= L_0004 J JUMP L_0101 : LOCATE L_0004 757 LINK(LINKMAX) = G O LINE 757 "regression-compile-tmp/check.imp" @ PUSH LINK @ PUSH LINKMAX a ACCESS @ PUSH G S ASSVAL 758 NP = NP-1; NVAL(NP) = VAL O LINE 758 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 - SUB S ASSVAL O LINE 758 "regression-compile-tmp/check.imp" @ PUSH NVAL @ PUSH NP a ACCESS @ PUSH VAL S ASSVAL 759 AP: ->ERR %IF TYPE&APPMASK = 0 O LINE 759 "regression-compile-tmp/check.imp" L LABEL L_011d O LINE 759 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_0101 : LOCATE L_0004 760 NTYPE(NP) = TYPE O LINE 760 "regression-compile-tmp/check.imp" @ PUSH NTYPE @ PUSH NP a ACCESS @ PUSH TYPE S ASSVAL 761 G = APPCONT O LINE 761 "regression-compile-tmp/check.imp" @ PUSH G @ PUSH APPCONT S ASSVAL 762 CODE ATOM O LINE 762 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL 763 J = PARTYPE(TYPE>>8)&15 O LINE 763 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH PARTYPE @ PUSH TYPE N PUSHI #0x00000008 ] RSH a ACCESS N PUSHI #0x0000000f & AND S ASSVAL 764 CLASS = 122; !EXP O LINE 764 "regression-compile-tmp/check.imp" @ PUSH CLASS N PUSHI #0x0000007a S ASSVAL 765 ->ENTER %IF J = VAR O LINE 765 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000009 ? JUMPIF # L_0004 J JUMP L_0105 : LOCATE L_0004 766 CLASS = 111; MODES = ADRMODES O LINE 766 "regression-compile-tmp/check.imp" @ PUSH CLASS N PUSHI #0x0000006f S ASSVAL O LINE 766 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0x40f00000 S ASSVAL 767 ->ENTER %IF J = REF O LINE 767 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000008 ? JUMPIF # L_0004 J JUMP L_0105 : LOCATE L_0004 768 MODES = X'C0000000'>>J O LINE 768 "regression-compile-tmp/check.imp" @ PUSH MODES N PUSHI #0xc0000000 @ PUSH J ] RSH S ASSVAL 769 ->ENTER O LINE 769 "regression-compile-tmp/check.imp" J JUMP L_0105 770 A(63): !AP O LINE 770 "regression-compile-tmp/check.imp" N PUSHI #0x0000003f _ SLABEL 252 771 J = NTYPE(NP); I = PARTYPE(J>>8) O LINE 771 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH NTYPE @ PUSH NP a ACCESS S ASSVAL O LINE 771 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH PARTYPE @ PUSH J N PUSHI #0x00000008 ] RSH a ACCESS S ASSVAL 772 LASTTYPE = TYPE; LASTVAL = VAL O LINE 772 "regression-compile-tmp/check.imp" @ PUSH LASTTYPE @ PUSH TYPE S ASSVAL O LINE 772 "regression-compile-tmp/check.imp" @ PUSH LASTVAL @ PUSH VAL S ASSVAL 773 TYPE = I>>16+J&X'FF' O LINE 773 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH I N PUSHI #0x00000010 ] RSH @ PUSH J N PUSHI #0x000000ff & AND + ADD S ASSVAL 774 ->AP %IF ATOM = COMMA O LINE 774 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x0000000a ? JUMPIF # L_0004 J JUMP L_011d : LOCATE L_0004 775 ->ERR %IF ATOM # RB O LINE 775 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x0000000c ? JUMPIF = L_0004 J JUMP L_0101 : LOCATE L_0004 776 VAL = NVAL(NP); NP = NP+1 O LINE 776 "regression-compile-tmp/check.imp" @ PUSH VAL @ PUSH NVAL @ PUSH NP a ACCESS S ASSVAL O LINE 776 "regression-compile-tmp/check.imp" @ PUSH NP @ PUSH NP N PUSHI #0x00000001 + ADD S ASSVAL 777 %IF TYPE&APPMASK # 0 %START O LINE 777 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000ff00 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 778 TYPE = TYPE!!APPMASK O LINE 778 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH TYPE N PUSHI #0x0000ff00 % XOR S ASSVAL 779 ->ERR %IF TYPE&X'FE00' # 0 O LINE 779 "regression-compile-tmp/check.imp" @ PUSH TYPE N PUSHI #0x0000fe00 & AND N PUSHI #0x00000000 ? JUMPIF = L_0007 J JUMP L_0101 : LOCATE L_0007 780 %FINISH O LINE 780 "regression-compile-tmp/check.imp" : LOCATE L_0004 781 TYPE = TYPE&X'FFFC'!1 O LINE 781 "regression-compile-tmp/check.imp" @ PUSH TYPE @ PUSH TYPE N PUSHI #0x0000fffc & AND N PUSHI #0x00000001 ! OR S ASSVAL 782 CODE ATOM O LINE 782 "regression-compile-tmp/check.imp" @ PUSH CODEATOM E CALL 783 ->EXIT O LINE 783 "regression-compile-tmp/check.imp" J JUMP L_0106 784 A(16): !SIMP: STOP(0), RETURN(1), EXIT(2) O LINE 784 "regression-compile-tmp/check.imp" N PUSHI #0x00000010 _ SLABEL 252 785 FAULT(25) %IF (ATOMTYPE = 1 %AND C_BTYPE&15 # ROUTINE) %C 786 %OR (ATOMTYPE = 2 %AND (C_STACK!!X'55555555')<<1&C_STACK = 0) O LINE 785 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000001 ? JUMPIF # L_0006 @ PUSH C n SELECT 3 N PUSHI #0x0000000f & AND N PUSHI #0x00000006 ? JUMPIF # L_0005 : LOCATE L_0006 @ PUSH ATOMTYPE N PUSHI #0x00000002 ? JUMPIF # L_0004 @ PUSH C n SELECT 1 N PUSHI #0x55555555 % XOR N PUSHI #0x00000001 [ LSH @ PUSH C n SELECT 1 & AND N PUSHI #0x00000000 ? JUMPIF # L_0004 : LOCATE L_0005 @ PUSH FAULT N PUSHI #0x00000019 p ASSPAR E CALL : LOCATE L_0004 787 ->CODE O LINE 787 "regression-compile-tmp/check.imp" J JUMP L_0102 788 A(54): !CYCLE O LINE 788 "regression-compile-tmp/check.imp" N PUSHI #0x00000036 _ SLABEL 252 789 CONDIND = 2 O LINE 789 "regression-compile-tmp/check.imp" @ PUSH CONDIND N PUSHI #0x00000002 S ASSVAL 790 A(53): !START O LINE 790 "regression-compile-tmp/check.imp" N PUSHI #0x00000035 _ SLABEL 252 791 C_STACK = C_STACK<<2+CONDIND O LINE 791 "regression-compile-tmp/check.imp" @ PUSH C n SELECT 1 @ PUSH C n SELECT 1 N PUSHI #0x00000002 [ LSH @ PUSH CONDIND + ADD S ASSVAL 792 ->CODE O LINE 792 "regression-compile-tmp/check.imp" J JUMP L_0102 793 A(55): !FINISH(1) O LINE 793 "regression-compile-tmp/check.imp" N PUSHI #0x00000037 _ SLABEL 252 794 A(56): !REPEAT(0) O LINE 794 "regression-compile-tmp/check.imp" N PUSHI #0x00000038 _ SLABEL 252 795 CONDIND = C_STACK&3 O LINE 795 "regression-compile-tmp/check.imp" @ PUSH CONDIND @ PUSH C n SELECT 1 N PUSHI #0x00000003 & AND S ASSVAL 796 %IF CONDIND = 0 %OR (CONDIND!!ATOMTYPE)&1 # 0 %C 797 %THEN FAULT(12+ATOMTYPE) %C 798 %ELSE C_STACK = C_STACK>>2 O LINE 796 "regression-compile-tmp/check.imp" @ PUSH CONDIND N PUSHI #0x00000000 ? JUMPIF = L_0005 @ PUSH CONDIND @ PUSH ATOMTYPE % XOR N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 : LOCATE L_0005 @ PUSH FAULT N PUSHI #0x0000000c @ PUSH ATOMTYPE + ADD p ASSPAR E CALL F GOTO L_0003 : LOCATE L_0004 @ PUSH C n SELECT 1 @ PUSH C n SELECT 1 N PUSHI #0x00000002 ] RSH S ASSVAL : LOCATE L_0003 799 ->CODE O LINE 799 "regression-compile-tmp/check.imp" J JUMP L_0102 800 A(52): !ELSE(1) O LINE 800 "regression-compile-tmp/check.imp" N PUSHI #0x00000034 _ SLABEL 252 801 FAULT(25) %IF CONDIND = 1 O LINE 801 "regression-compile-tmp/check.imp" @ PUSH CONDIND N PUSHI #0x00000001 ? JUMPIF # L_0004 @ PUSH FAULT N PUSHI #0x00000019 p ASSPAR E CALL : LOCATE L_0004 802 A(26): !CWORD(3) O LINE 802 "regression-compile-tmp/check.imp" N PUSHI #0x0000001a _ SLABEL 252 803 A(51): !ON(1) O LINE 803 "regression-compile-tmp/check.imp" N PUSHI #0x00000033 _ SLABEL 252 804 CONDIND = ATOMTYPE O LINE 804 "regression-compile-tmp/check.imp" @ PUSH CONDIND @ PUSH ATOMTYPE S ASSVAL 805 ->CODE O LINE 805 "regression-compile-tmp/check.imp" J JUMP L_0102 806 A(58): !END O LINE 806 "regression-compile-tmp/check.imp" N PUSHI #0x0000003a _ SLABEL 252 807 %IF LEVEL = 0 %OR (LEVEL=1 %AND C_BTYPE=0) %THEN FAULT(11) %C 808 %ELSE POP CONTEXT O LINE 807 "regression-compile-tmp/check.imp" @ PUSH LEVEL N PUSHI #0x00000000 ? JUMPIF = L_0005 @ PUSH LEVEL N PUSHI #0x00000001 ? JUMPIF # L_0004 @ PUSH C n SELECT 3 N PUSHI #0x00000000 ? JUMPIF # L_0004 : LOCATE L_0005 @ PUSH FAULT N PUSHI #0x0000000b p ASSPAR E CALL F GOTO L_0003 : LOCATE L_0004 @ PUSH POPCONTEXT E CALL : LOCATE L_0003 809 ->CODE O LINE 809 "regression-compile-tmp/check.imp" J JUMP L_0102 810 A(59): !ENDPROG O LINE 810 "regression-compile-tmp/check.imp" N PUSHI #0x0000003b _ SLABEL 252 811 FPOS1 = FPOS O LINE 811 "regression-compile-tmp/check.imp" @ PUSH FPOS1 @ PUSH FPOS S ASSVAL 812 REPORT(8) %IF LEVEL > ATOMTYPE O LINE 812 "regression-compile-tmp/check.imp" @ PUSH LEVEL @ PUSH ATOMTYPE ? JUMPIF <= L_0004 @ PUSH REPORT N PUSHI #0x00000008 p ASSPAR E CALL : LOCATE L_0004 813 REPORT(11) %IF LEVEL < ATOMTYPE O LINE 813 "regression-compile-tmp/check.imp" @ PUSH LEVEL @ PUSH ATOMTYPE ? JUMPIF >= L_0004 @ PUSH REPORT N PUSHI #0x0000000b p ASSPAR E CALL : LOCATE L_0004 814 POP CONTEXT %WHILE LEVEL > 0 O LINE 814 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH LEVEL N PUSHI #0x00000000 ? JUMPIF <= L_0004 @ PUSH POPCONTEXT E CALL B REPEAT L_0003 : LOCATE L_0004 815 TIME2 = CPUTIME O LINE 815 "regression-compile-tmp/check.imp" @ PUSH TIME2 @ PUSH CPUTIME E CALL S ASSVAL 816 ->ENDOK O LINE 816 "regression-compile-tmp/check.imp" J JUMP L_011e 817 ENDED: O LINE 817 "regression-compile-tmp/check.imp" L LABEL L_00ff 818 TIME2 = CPUTIME O LINE 818 "regression-compile-tmp/check.imp" @ PUSH TIME2 @ PUSH CPUTIME E CALL S ASSVAL 819 PRINT STRING("** END OF FILE AT LINE"); WRITE(NEXTLINE,1) O LINE 819 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "** END OF FILE AT LINE" p ASSPAR E CALL O LINE 819 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH NEXTLINE p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL 820 NEWLINE O LINE 820 "regression-compile-tmp/check.imp" @ PUSH NEWLINE E CALL 821 ENDOK: O LINE 821 "regression-compile-tmp/check.imp" L LABEL L_011e 822 %IF PARM&4 # 0 %START O LINE 822 "regression-compile-tmp/check.imp" @ PUSH PARM N PUSHI #0x00000004 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 823 WRITE(LINE,4); PRINTSYMBOL('L') O LINE 823 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH LINE p ASSPAR N PUSHI #0x00000004 p ASSPAR E CALL O LINE 823 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x0000004c p ASSPAR E CALL 824 WRITE(STATS,4); PRINT SYMBOL('S') O LINE 824 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH STATS p ASSPAR N PUSHI #0x00000004 p ASSPAR E CALL O LINE 824 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000053 p ASSPAR E CALL 825 STATS = 1 %IF STATS = 0 O LINE 825 "regression-compile-tmp/check.imp" @ PUSH STATS N PUSHI #0x00000000 ? JUMPIF # L_0007 @ PUSH STATS N PUSHI #0x00000001 S ASSVAL : LOCATE L_0007 826 PRINT(ATOMS/STATS,2,1); PRINT SYMBOL('A') O LINE 826 "regression-compile-tmp/check.imp" @ PUSH PRINT @ PUSH ATOMS @ PUSH STATS Q DIVIDE p ASSPAR N PUSHI #0x00000002 p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 826 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000041 p ASSPAR E CALL 827 PRINT(NUMBERS/STATS,2,1); PRINT SYMBOL('N') O LINE 827 "regression-compile-tmp/check.imp" @ PUSH PRINT @ PUSH NUMBERS @ PUSH STATS Q DIVIDE p ASSPAR N PUSHI #0x00000002 p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 827 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x0000004e p ASSPAR E CALL 828 PRINT(IDENTIFIERS/STATS,2,1); PRINT SYMBOL('I') O LINE 828 "regression-compile-tmp/check.imp" @ PUSH PRINT @ PUSH IDENTIFIERS @ PUSH STATS Q DIVIDE p ASSPAR N PUSHI #0x00000002 p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 828 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000049 p ASSPAR E CALL 829 PRINT(LOOPS/STATS,2,1); PRINT SYMBOL('C') O LINE 829 "regression-compile-tmp/check.imp" @ PUSH PRINT @ PUSH LOOPS @ PUSH STATS Q DIVIDE p ASSPAR N PUSHI #0x00000002 p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 829 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000043 p ASSPAR E CALL 830 PRINT(TIMES/LOOKS,2,1); PRINT SYMBOL('H') O LINE 830 "regression-compile-tmp/check.imp" @ PUSH PRINT @ PUSH TIMES @ PUSH LOOKS Q DIVIDE p ASSPAR N PUSHI #0x00000002 p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 830 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000048 p ASSPAR E CALL 831 PRINT((TIME2-TIME1)*1000/STATS,3,3); PRINT SYMBOL('M') O LINE 831 "regression-compile-tmp/check.imp" @ PUSH PRINT @ PUSH TIME2 @ PUSH TIME1 - SUB N PUSHI #0x000003e8 * MUL @ PUSH STATS Q DIVIDE p ASSPAR N PUSHI #0x00000003 p ASSPAR N PUSHI #0x00000003 p ASSPAR E CALL O LINE 831 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x0000004d p ASSPAR E CALL 832 NEWLINE O LINE 832 "regression-compile-tmp/check.imp" @ PUSH NEWLINE E CALL 833 %FINISH O LINE 833 "regression-compile-tmp/check.imp" : LOCATE L_0004 834 %IF PARM&8 # 0 %START O LINE 834 "regression-compile-tmp/check.imp" @ PUSH PARM N PUSHI #0x00000008 & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 835 %CYCLE I = 0,1,255 O LINE 835 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000001 N PUSHI #0x000000ff N PUSHI #0x00000000 f FOR L_0006 836 J = INDEX(I) O LINE 836 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH INDEX @ PUSH I a ACCESS S ASSVAL 837 %IF J > 0 %START O LINE 837 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000000 ? JUMPIF <= L_000a 838 WRITE(I,3); PRINT SYMBOL(':') O LINE 838 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH I p ASSPAR N PUSHI #0x00000003 p ASSPAR E CALL O LINE 838 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x0000003a p ASSPAR E CALL 839 %WHILE J > 0 %CYCLE O LINE 839 "regression-compile-tmp/check.imp" : LOCATE L_000c @ PUSH J N PUSHI #0x00000000 ? JUMPIF <= L_000d 840 SPACE; PRINT STRING(STRING(J+12)) O LINE 840 "regression-compile-tmp/check.imp" @ PUSH SPACE E CALL O LINE 840 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING @ PUSH STRING @ PUSH J N PUSHI #0x0000000c + ADD p ASSPAR E CALL p ASSPAR E CALL 841 J = INTEGER(J+8) O LINE 841 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH INTEGER @ PUSH J N PUSHI #0x00000008 + ADD p ASSPAR E CALL S ASSVAL 842 %REPEAT O LINE 842 "regression-compile-tmp/check.imp" B REPEAT L_000c : LOCATE L_000d 843 NEWLINE O LINE 843 "regression-compile-tmp/check.imp" @ PUSH NEWLINE E CALL 844 %FINISH O LINE 844 "regression-compile-tmp/check.imp" : LOCATE L_000a 845 %REPEAT O LINE 845 "regression-compile-tmp/check.imp" B REPEAT L_0006 : LOCATE L_0007 846 %FINISH O LINE 846 "regression-compile-tmp/check.imp" : LOCATE L_0004 847 %RETURN 848 849 ! 850 O LINE 847 "regression-compile-tmp/check.imp" R RETURN 851 %ROUTINE PRINT SS 852 {%SHORTROUTINE} O LINE 851 "regression-compile-tmp/check.imp" $ DEF PRINTSS (_CHECKINNER_PRINTSS) p1=V_00f6 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} } FINISH ) {lev=2} 853 %INTEGER K O LINE 853 "regression-compile-tmp/check.imp" $ DEF K p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 854 %ROUTINE WRITE(%INTEGER V,P) O LINE 854 "regression-compile-tmp/check.imp" $ DEF WRITE (_CHECKINNER_PRINTSS_WRITE) p1=V_0120 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=3 --> 4, nested=0 --> 1} $ DEF V p1=V_0121 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF P p1=V_0122 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=3} 855 %IF V >= 10 %START O LINE 855 "regression-compile-tmp/check.imp" @ PUSH V N PUSHI #0x0000000a ? JUMPIF < L_0004 856 WRITE(V//10,P-1); V = V-10*(V//10) O LINE 856 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH V N PUSHI #0x0000000a / QUOT p ASSPAR @ PUSH P N PUSHI #0x00000001 - SUB p ASSPAR E CALL O LINE 856 "regression-compile-tmp/check.imp" @ PUSH V @ PUSH V N PUSHI #0x0000000a @ PUSH V N PUSHI #0x0000000a / QUOT * MUL - SUB S ASSVAL 857 %FINISH %ELSE SPACES(P-1) O LINE 857 "regression-compile-tmp/check.imp" F GOTO L_0003 : LOCATE L_0004 @ PUSH SPACES @ PUSH P N PUSHI #0x00000001 - SUB p ASSPAR E CALL : LOCATE L_0003 858 PRINT SYMBOL(V+'0') O LINE 858 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL @ PUSH V N PUSHI #0x00000030 + ADD p ASSPAR E CALL 859 %END O LINE 859 "regression-compile-tmp/check.imp" ; END _CHECKINNER_PRINTSS_WRITE {lev=3 --> 2} 860 WRITE(LINE,4); SPACE O LINE 860 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH LINE p ASSPAR N PUSHI #0x00000004 p ASSPAR E CALL O LINE 860 "regression-compile-tmp/check.imp" @ PUSH SPACE E CALL 861 PRINTPOS = LINEBASE O LINE 861 "regression-compile-tmp/check.imp" @ PUSH PRINTPOS @ PUSH LINEBASE S ASSVAL 862 {%UNTIL PRINTPOS = FPOS1} %CYCLE O LINE 862 "regression-compile-tmp/check.imp" : LOCATE L_0003 863 PRINTPOS = PRINTPOS+1 O LINE 863 "regression-compile-tmp/check.imp" @ PUSH PRINTPOS @ PUSH PRINTPOS N PUSHI #0x00000001 + ADD S ASSVAL 864 PRINT SYMBOL(MARKER) %IF PRINTPOS = FAULTPOS O LINE 864 "regression-compile-tmp/check.imp" @ PUSH PRINTPOS @ PUSH FAULTPOS ? JUMPIF # L_0007 @ PUSH PRINTSYMBOL N PUSHI #0x0000007c p ASSPAR E CALL : LOCATE L_0007 865 K = BYTEINTEGER(PRINTPOS) O LINE 865 "regression-compile-tmp/check.imp" @ PUSH K @ PUSH BYTEINTEGER @ PUSH PRINTPOS p ASSPAR E CALL S ASSVAL 866 %IF K = NL %OR 32 <= K <= 126 %THEN PRINT SYMBOL(K) %C 867 %ELSE PRINT SYMBOL('[') %AND WRITE(K,0) %AND PRINT SYMBOL(']') O LINE 866 "regression-compile-tmp/check.imp" @ PUSH K N PUSHI #0x0000000a ? JUMPIF = L_0008 N PUSHI #0x00000020 @ PUSH K " JUMPIFD > L_0007 N PUSHI #0x0000007e ? JUMPIF > L_0007 : LOCATE L_0008 @ PUSH PRINTSYMBOL @ PUSH K p ASSPAR E CALL F GOTO L_0006 : LOCATE L_0007 @ PUSH PRINTSYMBOL N PUSHI #0x0000005b p ASSPAR E CALL @ PUSH WRITE @ PUSH K p ASSPAR N PUSHI #0x00000000 p ASSPAR E CALL @ PUSH PRINTSYMBOL N PUSHI #0x0000005d p ASSPAR E CALL : LOCATE L_0006 868 %REPEAT %UNTIL PRINTPOS = FPOS1 O LINE 868 "regression-compile-tmp/check.imp" @ PUSH PRINTPOS @ PUSH FPOS1 ? JUMPIF = L_0004 B REPEAT L_0003 : LOCATE L_0004 869 NEWLINE %IF K # NL O LINE 869 "regression-compile-tmp/check.imp" @ PUSH K N PUSHI #0x0000000a ? JUMPIF = L_0004 @ PUSH NEWLINE E CALL : LOCATE L_0004 870 %END 871 O LINE 870 "regression-compile-tmp/check.imp" ; END _CHECKINNER_PRINTSS {lev=2 --> 1} 872 %ROUTINE REPORT(%INTEGER N) 873 {%SHORTROUTINE} O LINE 872 "regression-compile-tmp/check.imp" $ DEF REPORT (_CHECKINNER_REPORT) p1=V_00f7 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} $ DEF N p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=2} 874 %SWITCH S(0:25) O LINE 874 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 N PUSHI #0x00000019 b BOUNDS $ DEF S p1=V_0120 a/tf=6 b/format=0 c/ostate=0 type=0 () form=6 (switch) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 875 FAULTPOS = 0 %IF N > 7 O LINE 875 "regression-compile-tmp/check.imp" @ PUSH N N PUSHI #0x00000007 ? JUMPIF <= L_0004 @ PUSH FAULTPOS N PUSHI #0x00000000 S ASSVAL : LOCATE L_0004 876 PRINT SS %IF PRINTPOS # FPOS1 O LINE 876 "regression-compile-tmp/check.imp" @ PUSH PRINTPOS @ PUSH FPOS1 ? JUMPIF = L_0004 @ PUSH PRINTSS E CALL : LOCATE L_0004 877 PRINT SYMBOL('*') O LINE 877 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x0000002a p ASSPAR E CALL 878 ->S(N) O LINE 878 "regression-compile-tmp/check.imp" @ PUSH N W SJUMP 288 879 S(0): PRINT STRING("FORM?"); ->F O LINE 879 "regression-compile-tmp/check.imp" N PUSHI #0x00000000 _ SLABEL 288 O LINE 879 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "FORM?" p ASSPAR E CALL O LINE 879 "regression-compile-tmp/check.imp" J JUMP L_0121 880 S(1): PRINT STRING("ATOM?"); ->F O LINE 880 "regression-compile-tmp/check.imp" N PUSHI #0x00000001 _ SLABEL 288 O LINE 880 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "ATOM?" p ASSPAR E CALL O LINE 880 "regression-compile-tmp/check.imp" J JUMP L_0121 881 S(2): PRINT STRING("NAME?"); ->F O LINE 881 "regression-compile-tmp/check.imp" N PUSHI #0x00000002 _ SLABEL 288 O LINE 881 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "NAME?" p ASSPAR E CALL O LINE 881 "regression-compile-tmp/check.imp" J JUMP L_0121 882 S(3): PRINT STRING("MODE?"); ->F O LINE 882 "regression-compile-tmp/check.imp" N PUSHI #0x00000003 _ SLABEL 288 O LINE 882 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "MODE?" p ASSPAR E CALL O LINE 882 "regression-compile-tmp/check.imp" J JUMP L_0121 883 S(4): PRINT STRING("SIZE?"); ->F O LINE 883 "regression-compile-tmp/check.imp" N PUSHI #0x00000004 _ SLABEL 288 O LINE 883 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "SIZE?" p ASSPAR E CALL O LINE 883 "regression-compile-tmp/check.imp" J JUMP L_0121 884 S(11):PRINT STRING("%BEGIN"); ->M O LINE 884 "regression-compile-tmp/check.imp" N PUSHI #0x0000000b _ SLABEL 288 O LINE 884 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "%BEGIN" p ASSPAR E CALL O LINE 884 "regression-compile-tmp/check.imp" J JUMP L_0122 885 S(12):PRINT STRING("%CYCLE"); ->M O LINE 885 "regression-compile-tmp/check.imp" N PUSHI #0x0000000c _ SLABEL 288 O LINE 885 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "%CYCLE" p ASSPAR E CALL O LINE 885 "regression-compile-tmp/check.imp" J JUMP L_0122 886 S(13):PRINT STRING("%START"); ->M O LINE 886 "regression-compile-tmp/check.imp" N PUSHI #0x0000000d _ SLABEL 288 O LINE 886 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "%START" p ASSPAR E CALL O LINE 886 "regression-compile-tmp/check.imp" J JUMP L_0122 887 S(8): PRINT STRING("%END"); ->M O LINE 887 "regression-compile-tmp/check.imp" N PUSHI #0x00000008 _ SLABEL 288 O LINE 887 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "%END" p ASSPAR E CALL O LINE 887 "regression-compile-tmp/check.imp" J JUMP L_0122 888 S(9): PRINT STRING("%REPEAT"); ->M O LINE 888 "regression-compile-tmp/check.imp" N PUSHI #0x00000009 _ SLABEL 288 O LINE 888 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "%REPEAT" p ASSPAR E CALL O LINE 888 "regression-compile-tmp/check.imp" J JUMP L_0122 889 S(10):PRINT STRING("%FINISH"); ->M O LINE 889 "regression-compile-tmp/check.imp" N PUSHI #0x0000000a _ SLABEL 288 O LINE 889 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "%FINISH" p ASSPAR E CALL O LINE 889 "regression-compile-tmp/check.imp" J JUMP L_0122 890 S(15): PRINT SYMBOL('''') O LINE 890 "regression-compile-tmp/check.imp" N PUSHI #0x0000000f _ SLABEL 288 O LINE 890 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000027 p ASSPAR E CALL 891 PRINT STRING(STRING(DPOS+12)) O LINE 891 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING @ PUSH STRING @ PUSH DPOS N PUSHI #0x0000000c + ADD p ASSPAR E CALL p ASSPAR E CALL 892 PRINT SYMBOL('''') O LINE 892 "regression-compile-tmp/check.imp" @ PUSH PRINTSYMBOL N PUSHI #0x00000027 p ASSPAR E CALL 893 M: PRINT STRING(" MISSING"); ->F O LINE 893 "regression-compile-tmp/check.imp" L LABEL L_0122 O LINE 893 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS " MISSING" p ASSPAR E CALL O LINE 893 "regression-compile-tmp/check.imp" J JUMP L_0121 894 S(23):PRINT STRING("BOUNDS?"); ->F O LINE 894 "regression-compile-tmp/check.imp" N PUSHI #0x00000017 _ SLABEL 288 O LINE 894 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "BOUNDS?" p ASSPAR E CALL O LINE 894 "regression-compile-tmp/check.imp" J JUMP L_0121 895 S(25):PRINT STRING("CONTEXT?"); ->F O LINE 895 "regression-compile-tmp/check.imp" N PUSHI #0x00000019 _ SLABEL 288 O LINE 895 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "CONTEXT?" p ASSPAR E CALL O LINE 895 "regression-compile-tmp/check.imp" J JUMP L_0121 896 S(5): O LINE 896 "regression-compile-tmp/check.imp" N PUSHI #0x00000005 _ SLABEL 288 897 S(16):PRINT STRING("DUPLICATE"); ->F O LINE 897 "regression-compile-tmp/check.imp" N PUSHI #0x00000010 _ SLABEL 288 O LINE 897 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "DUPLICATE" p ASSPAR E CALL O LINE 897 "regression-compile-tmp/check.imp" J JUMP L_0121 898 S(17):PRINT STRING("ORDER?"); ->F O LINE 898 "regression-compile-tmp/check.imp" N PUSHI #0x00000011 _ SLABEL 288 O LINE 898 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "ORDER?" p ASSPAR E CALL O LINE 898 "regression-compile-tmp/check.imp" J JUMP L_0121 899 S(18):PRINT STRING("MATCH?"); ->F O LINE 899 "regression-compile-tmp/check.imp" N PUSHI #0x00000012 _ SLABEL 288 O LINE 899 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "MATCH?" p ASSPAR E CALL O LINE 899 "regression-compile-tmp/check.imp" J JUMP L_0121 900 S(19):PRINT STRING("RANGE?"); ->F O LINE 900 "regression-compile-tmp/check.imp" N PUSHI #0x00000013 _ SLABEL 288 O LINE 900 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "RANGE?" p ASSPAR E CALL O LINE 900 "regression-compile-tmp/check.imp" J JUMP L_0121 901 S(20):PRINT STRING("LITERAL?"); ->F O LINE 901 "regression-compile-tmp/check.imp" N PUSHI #0x00000014 _ SLABEL 288 O LINE 901 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "LITERAL?" p ASSPAR E CALL O LINE 901 "regression-compile-tmp/check.imp" J JUMP L_0121 902 S(21): %IF CONSTCOUNT < 0 %START O LINE 902 "regression-compile-tmp/check.imp" N PUSHI #0x00000015 _ SLABEL 288 O LINE 902 "regression-compile-tmp/check.imp" @ PUSH CONSTCOUNT N PUSHI #0x00000000 ? JUMPIF >= L_0004 903 WRITE(-CONSTCOUNT,1); PRINT STRING(" EXTRA") O LINE 903 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH CONSTCOUNT U NEGATE p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 903 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS " EXTRA" p ASSPAR E CALL 904 %FINISH %ELSE %START O LINE 904 "regression-compile-tmp/check.imp" F GOTO L_0003 : LOCATE L_0004 905 WRITE(CONSTCOUNT,1); PRINT STRING(" MISSING") O LINE 905 "regression-compile-tmp/check.imp" @ PUSH WRITE @ PUSH CONSTCOUNT p ASSPAR N PUSHI #0x00000001 p ASSPAR E CALL O LINE 905 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS " MISSING" p ASSPAR E CALL 906 %FINISH O LINE 906 "regression-compile-tmp/check.imp" : LOCATE L_0003 907 PRINT STRING(" VALUE(S)"); ->F O LINE 907 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS " VALUE(S)" p ASSPAR E CALL O LINE 907 "regression-compile-tmp/check.imp" J JUMP L_0121 908 S(22):PRINT STRING("TYPE?"); ->F O LINE 908 "regression-compile-tmp/check.imp" N PUSHI #0x00000016 _ SLABEL 288 O LINE 908 "regression-compile-tmp/check.imp" @ PUSH PRINTSTRING ' PUSHS "TYPE?" p ASSPAR E CALL O LINE 908 "regression-compile-tmp/check.imp" J JUMP L_0121 909 F: NEWLINE O LINE 909 "regression-compile-tmp/check.imp" L LABEL L_0121 O LINE 909 "regression-compile-tmp/check.imp" @ PUSH NEWLINE E CALL 910 FAULTNUM = -1; PARM = PARM!X'80000000' O LINE 910 "regression-compile-tmp/check.imp" @ PUSH FAULTNUM N PUSHI #0x00000001 U NEGATE S ASSVAL O LINE 910 "regression-compile-tmp/check.imp" @ PUSH PARM @ PUSH PARM N PUSHI #0x80000000 ! OR S ASSVAL 911 %END 912 O LINE 911 "regression-compile-tmp/check.imp" ; END _CHECKINNER_REPORT {lev=2 --> 1} 913 %ROUTINE CODE ATOM 914 {%SHORTROUTINE} O LINE 913 "regression-compile-tmp/check.imp" $ DEF CODEATOM (_CHECKINNER_CODEATOM) p1=V_00f8 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} } FINISH ) {lev=2} 915 {%REGISTER} %INTEGER FP{(5)}; !FILE POS O LINE 915 "regression-compile-tmp/check.imp" $ DEF FP p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 916 {%REGISTER} %INTEGER SC{(6)}; !SYMCODE OR SYM O LINE 916 "regression-compile-tmp/check.imp" $ DEF SC p1=V_0120 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 917 %INTEGER I,J,K,L O LINE 917 "regression-compile-tmp/check.imp" $ DEF I p1=V_0121 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF J p1=V_0122 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF K p1=V_0123 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF L p1=V_0124 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 918 %INTEGER HASH 919 O LINE 918 "regression-compile-tmp/check.imp" $ DEF HASH p1=V_0125 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 920 ATOMS = ATOMS+1 O LINE 920 "regression-compile-tmp/check.imp" @ PUSH ATOMS @ PUSH ATOMS N PUSHI #0x00000001 + ADD S ASSVAL 921 FP = FPOS; SC = SYMCODE O LINE 921 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FPOS S ASSVAL O LINE 921 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMCODE S ASSVAL 922 ->C2 %IF SC # 0 O LINE 922 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0126 : LOCATE L_0004 923 C1: {%UNTIL SC # ' '} %CYCLE O LINE 923 "regression-compile-tmp/check.imp" L LABEL L_0127 O LINE 923 "regression-compile-tmp/check.imp" : LOCATE L_0003 924 FP = FP+1; SC = BYTEINTEGER(FP) O LINE 924 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 924 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 925 %REPEAT %UNTIL SC # ' ' O LINE 925 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000020 ? JUMPIF # L_0004 B REPEAT L_0003 : LOCATE L_0004 926 SC = SYMINIT(SC) O LINE 926 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH SC a ACCESS S ASSVAL 927 C2: FPOS1 = FP O LINE 927 "regression-compile-tmp/check.imp" L LABEL L_0126 O LINE 927 "regression-compile-tmp/check.imp" @ PUSH FPOS1 @ PUSH FP S ASSVAL 928 ->NAMENUM %IF SC < 127 O LINE 928 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000007f ? JUMPIF >= L_0004 J JUMP L_0128 : LOCATE L_0004 929 SC = SC-128 O LINE 929 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SC N PUSHI #0x00000080 - SUB S ASSVAL 930 ->KEYWORD %IF SC > 0 O LINE 930 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 ? JUMPIF <= L_0004 J JUMP L_0129 : LOCATE L_0004 931 ->QUOTEMARK %IF SC # 0 932 !PERCENT O LINE 931 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_012a : LOCATE L_0004 933 FP = FP+1; SC = SYMINIT(BYTEINTEGER(FP)!128) O LINE 933 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 933 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL N PUSHI #0x00000080 ! OR a ACCESS S ASSVAL 934 ->C2 %IF SC # 0 O LINE 934 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_0126 : LOCATE L_0004 935 ->C1 936 937 !LOCATE ATOM IN FIXED DICT 938 !KEYDICT := MORE<5> : LINK<9> : SYM-32<6> 939 ! OR CLASS<7> : 0<6> 940 ! THEN SUBCLASS<16> O LINE 935 "regression-compile-tmp/check.imp" J JUMP L_0127 941 KEYWORD: O LINE 941 "regression-compile-tmp/check.imp" L LABEL L_0129 942 ->NLQ %IF SC >= SKIPMIN; !NL OR EQUIVALENT O LINE 942 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SKIPMIN ? JUMPIF < L_0004 J JUMP L_012b : LOCATE L_0004 943 I = SC; L = 0; L = 128 %IF SC < PUNCTMIN O LINE 943 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH SC S ASSVAL O LINE 943 "regression-compile-tmp/check.imp" @ PUSH L N PUSHI #0x00000000 S ASSVAL O LINE 943 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000002b ? JUMPIF >= L_0004 @ PUSH L N PUSHI #0x00000080 S ASSVAL : LOCATE L_0004 944 %CYCLE O LINE 944 "regression-compile-tmp/check.imp" : LOCATE L_0003 945 %CYCLE O LINE 945 "regression-compile-tmp/check.imp" : LOCATE L_0006 946 FP = FP+1; K = BYTEINTEGER(FP) O LINE 946 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 946 "regression-compile-tmp/check.imp" @ PUSH K @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 947 SC = SYMINIT(K!L) O LINE 947 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH K @ PUSH L ! OR a ACCESS S ASSVAL 948 %EXIT %IF SC&127 # 0 O LINE 948 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000007f & AND N PUSHI #0x00000000 ? JUMPIF = L_000a F GOTO L_0007 : LOCATE L_000a 949 L = SC O LINE 949 "regression-compile-tmp/check.imp" @ PUSH L @ PUSH SC S ASSVAL 950 %REPEAT O LINE 950 "regression-compile-tmp/check.imp" B REPEAT L_0006 : LOCATE L_0007 951 K = K-32 %IF SC&128 # 0 O LINE 951 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000080 & AND N PUSHI #0x00000000 ? JUMPIF = L_0007 @ PUSH K @ PUSH K N PUSHI #0x00000020 - SUB S ASSVAL : LOCATE L_0007 952 %CYCLE O LINE 952 "regression-compile-tmp/check.imp" : LOCATE L_0006 953 J = KEYDICT(I) O LINE 953 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH KEYDICT @ PUSH I a ACCESS S ASSVAL 954 %EXIT %IF J >= 0 %OR J&63 = K O LINE 954 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000000 ? JUMPIF >= L_000b @ PUSH J N PUSHI #0x0000003f & AND @ PUSH K ? JUMPIF # L_000a : LOCATE L_000b F GOTO L_0007 : LOCATE L_000a 955 I = I+1 O LINE 955 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH I N PUSHI #0x00000001 + ADD S ASSVAL 956 %REPEAT O LINE 956 "regression-compile-tmp/check.imp" B REPEAT L_0006 : LOCATE L_0007 957 %EXIT %IF J&63 # K O LINE 957 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x0000003f & AND @ PUSH K ? JUMPIF = L_0007 F GOTO L_0004 : LOCATE L_0007 958 I = J>>6&511 O LINE 958 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH J N PUSHI #0x00000006 ] RSH N PUSHI #0x000001ff & AND S ASSVAL 959 %REPEAT O LINE 959 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 960 ->ERR %IF J&63 # 0 O LINE 960 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x0000003f & AND N PUSHI #0x00000000 ? JUMPIF = L_0004 J JUMP L_012c : LOCATE L_0004 961 ATOMTYPE = KEYDICT(I+1)&X'FFFF' O LINE 961 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE @ PUSH KEYDICT @ PUSH I N PUSHI #0x00000001 + ADD a ACCESS N PUSHI #0x0000ffff & AND S ASSVAL 962 ATOM = J>>6 O LINE 962 "regression-compile-tmp/check.imp" @ PUSH ATOM @ PUSH J N PUSHI #0x00000006 ] RSH S ASSVAL 963 ->KEY5 %IF ATOM = 0 O LINE 963 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000000 ? JUMPIF # L_0004 J JUMP L_012d : LOCATE L_0004 964 FIN:FPOS = FP; SYMCODE = SC O LINE 964 "regression-compile-tmp/check.imp" L LABEL L_012e O LINE 964 "regression-compile-tmp/check.imp" @ PUSH FPOS @ PUSH FP S ASSVAL O LINE 964 "regression-compile-tmp/check.imp" @ PUSH SYMCODE @ PUSH SC S ASSVAL 965 %RETURN O LINE 965 "regression-compile-tmp/check.imp" R RETURN 966 KEY5: O LINE 966 "regression-compile-tmp/check.imp" L LABEL L_012d 967 %IF ATOMTYPE # 0 %START; !%COMMENT O LINE 967 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000000 ? JUMPIF = L_0004 968 ->FIN %IF SKIPMIN # SKIP1MIN O LINE 968 "regression-compile-tmp/check.imp" @ PUSH SKIPMIN N PUSHI #0x00000056 ? JUMPIF = L_0007 J JUMP L_012e : LOCATE L_0007 969 ->SKP O LINE 969 "regression-compile-tmp/check.imp" J JUMP L_012f 970 %FINISH O LINE 970 "regression-compile-tmp/check.imp" : LOCATE L_0004 971 ->ERR %UNLESS BYTEINTEGER(FP) = NL O LINE 971 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL N PUSHI #0x0000000a ? JUMPIF = L_0004 J JUMP L_012c : LOCATE L_0004 972 NEXTLINE = NEXTLINE+1 O LINE 972 "regression-compile-tmp/check.imp" @ PUSH NEXTLINE @ PUSH NEXTLINE N PUSHI #0x00000001 + ADD S ASSVAL 973 ->TERM %IF FP >= FMAX O LINE 973 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FMAX ? JUMPIF < L_0004 J JUMP L_0130 : LOCATE L_0004 974 ->C1 975 O LINE 974 "regression-compile-tmp/check.imp" J JUMP L_0127 976 NLQ: O LINE 976 "regression-compile-tmp/check.imp" L LABEL L_012b 977 ->TERM %IF SKIPMIN # SKIP1MIN; !NOT LEADING ATOM O LINE 977 "regression-compile-tmp/check.imp" @ PUSH SKIPMIN N PUSHI #0x00000056 ? JUMPIF = L_0004 J JUMP L_0130 : LOCATE L_0004 978 SKP: O LINE 978 "regression-compile-tmp/check.imp" L LABEL L_012f 979 FP = FP-1 O LINE 979 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 - SUB S ASSVAL 980 {%UNTIL SC = NL %OR SC = ';'} %CYCLE O LINE 980 "regression-compile-tmp/check.imp" : LOCATE L_0003 981 FP = FP+1; SC = BYTEINTEGER(FP) O LINE 981 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 981 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 982 %REPEAT %UNTIL SC = NL %OR SC = ';' O LINE 982 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000000a ? JUMPIF = L_0004 @ PUSH SC N PUSHI #0x0000003b ? JUMPIF = L_0004 B REPEAT L_0003 : LOCATE L_0004 983 %IF SC = NL %START O LINE 983 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000000a ? JUMPIF # L_0004 984 ->TERM %IF FP >= FMAX O LINE 984 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FMAX ? JUMPIF < L_0007 J JUMP L_0130 : LOCATE L_0007 985 LINEBASE = FP; NEXTLINE = NEXTLINE+1; LINE = NEXTLINE O LINE 985 "regression-compile-tmp/check.imp" @ PUSH LINEBASE @ PUSH FP S ASSVAL O LINE 985 "regression-compile-tmp/check.imp" @ PUSH NEXTLINE @ PUSH NEXTLINE N PUSHI #0x00000001 + ADD S ASSVAL O LINE 985 "regression-compile-tmp/check.imp" @ PUSH LINE @ PUSH NEXTLINE S ASSVAL 986 %FINISH O LINE 986 "regression-compile-tmp/check.imp" : LOCATE L_0004 987 ->C1 988 O LINE 987 "regression-compile-tmp/check.imp" J JUMP L_0127 989 TERM: O LINE 989 "regression-compile-tmp/check.imp" L LABEL L_0130 990 ATOM = TERMINATOR; ATOMTYPE = 0 O LINE 990 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x0000000d S ASSVAL O LINE 990 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000000 S ASSVAL 991 NEXTLINE = NEXTLINE+1; SC = 0 O LINE 991 "regression-compile-tmp/check.imp" @ PUSH NEXTLINE @ PUSH NEXTLINE N PUSHI #0x00000001 + ADD S ASSVAL O LINE 991 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 S ASSVAL 992 SC = 255 %IF FP >= FMAX O LINE 992 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FMAX ? JUMPIF < L_0004 @ PUSH SC N PUSHI #0x000000ff S ASSVAL : LOCATE L_0004 993 ->FIN 994 O LINE 993 "regression-compile-tmp/check.imp" J JUMP L_012e 995 DISASTER: O LINE 995 "regression-compile-tmp/check.imp" L LABEL L_0131 996 ATOMTYPE = 99 O LINE 996 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000063 S ASSVAL 997 ->ER1 O LINE 997 "regression-compile-tmp/check.imp" J JUMP L_0132 998 STRINGERR: O LINE 998 "regression-compile-tmp/check.imp" L LABEL L_0133 999 ATOMTYPE = 4; NEXTLINE = L O LINE 999 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000004 S ASSVAL O LINE 999 "regression-compile-tmp/check.imp" @ PUSH NEXTLINE @ PUSH L S ASSVAL 1000 ER1:FP = FPOS1; SC = 0 O LINE 1000 "regression-compile-tmp/check.imp" L LABEL L_0132 O LINE 1000 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FPOS1 S ASSVAL O LINE 1000 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 S ASSVAL 1001 ->ER2 O LINE 1001 "regression-compile-tmp/check.imp" J JUMP L_0134 1002 ERR:ATOMTYPE = 1 O LINE 1002 "regression-compile-tmp/check.imp" L LABEL L_012c O LINE 1002 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000001 S ASSVAL 1003 ER2:ATOM = 0 O LINE 1003 "regression-compile-tmp/check.imp" L LABEL L_0134 O LINE 1003 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000000 S ASSVAL 1004 ->FIN 1005 O LINE 1004 "regression-compile-tmp/check.imp" J JUMP L_012e 1006 NAMENUM: O LINE 1006 "regression-compile-tmp/check.imp" L LABEL L_0128 1007 ->NUMBER %IF SC <= '9' %AND ATOM # JUMP O LINE 1007 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000039 ? JUMPIF > L_0004 @ PUSH ATOM N PUSHI #0x0000000f ? JUMPIF = L_0004 J JUMP L_0135 : LOCATE L_0004 1008 %IF BYTEINTEGER(FP+1) = '''' %START O LINE 1008 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH FP N PUSHI #0x00000001 + ADD p ASSPAR E CALL N PUSHI #0x00000027 ? JUMPIF # L_0004 1009 ->HEX %IF SC = 'X' O LINE 1009 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000058 ? JUMPIF # L_0007 J JUMP L_0136 : LOCATE L_0007 1010 ->OCT %IF SC = 'K' O LINE 1010 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000004b ? JUMPIF # L_0007 J JUMP L_0137 : LOCATE L_0007 1011 ->BIN %IF SC = 'B' O LINE 1011 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000042 ? JUMPIF # L_0007 J JUMP L_0138 : LOCATE L_0007 1012 ->MULTI %IF SC = 'M' O LINE 1012 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000004d ? JUMPIF # L_0007 J JUMP L_0139 : LOCATE L_0007 1013 %FINISH O LINE 1013 "regression-compile-tmp/check.imp" : LOCATE L_0004 1014 J = DLIM; ->DISASTER %IF J+84 >= DBOUND O LINE 1014 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH DLIM S ASSVAL O LINE 1014 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000054 + ADD @ PUSH DBOUND ? JUMPIF < L_0004 J JUMP L_0131 : LOCATE L_0004 1015 HASH = 0 O LINE 1015 "regression-compile-tmp/check.imp" @ PUSH HASH N PUSHI #0x00000000 S ASSVAL 1016 {%UNTIL SC > 'Z'} %CYCLE O LINE 1016 "regression-compile-tmp/check.imp" : LOCATE L_0003 1017 %IF SC # 0 %START O LINE 1017 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 ? JUMPIF = L_0007 1018 J = J+1; BYTEINTEGER(J+12) = SC O LINE 1018 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH J N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1018 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH J N PUSHI #0x0000000c + ADD p ASSPAR E CALL @ PUSH SC S ASSVAL 1019 HASH = HASH<<1!!SC O LINE 1019 "regression-compile-tmp/check.imp" @ PUSH HASH @ PUSH HASH N PUSHI #0x00000001 [ LSH @ PUSH SC % XOR S ASSVAL 1020 %FINISH O LINE 1020 "regression-compile-tmp/check.imp" : LOCATE L_0007 1021 FP = FP+1; SC = SYMINIT(BYTEINTEGER(FP)) O LINE 1021 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1021 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL a ACCESS S ASSVAL 1022 %REPEAT %UNTIL SC > 'Z' O LINE 1022 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000005a ? JUMPIF > L_0004 B REPEAT L_0003 : LOCATE L_0004 1023 BYTEINTEGER(DLIM+12) = J-DLIM O LINE 1023 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH DLIM N PUSHI #0x0000000c + ADD p ASSPAR E CALL @ PUSH J @ PUSH DLIM - SUB S ASSVAL 1024 NEWDLIM = J&(\3)+16 O LINE 1024 "regression-compile-tmp/check.imp" @ PUSH NEWDLIM @ PUSH J N PUSHI #0x00000003 \ NOT & AND N PUSHI #0x00000010 + ADD S ASSVAL 1025 HEAD == INDEX(HASH&255); DPOS = HEAD; O LINE 1025 "regression-compile-tmp/check.imp" @ PUSH HEAD @ PUSH INDEX @ PUSH HASH N PUSHI #0x000000ff & AND a ACCESS Z ASSREF O LINE 1025 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH HEAD S ASSVAL 1026 ATOM = IDENT; O LINE 1026 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000001 S ASSVAL 1027 IDENTIFIERS = IDENTIFIERS+1 O LINE 1027 "regression-compile-tmp/check.imp" @ PUSH IDENTIFIERS @ PUSH IDENTIFIERS N PUSHI #0x00000001 + ADD S ASSVAL 1028 ->FIN 1029 O LINE 1028 "regression-compile-tmp/check.imp" J JUMP L_012e 1030 NUMBER: O LINE 1030 "regression-compile-tmp/check.imp" L LABEL L_0135 1031 ATOMTYPE = NUMBITS O LINE 1031 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000070 S ASSVAL 1032 ATOMVAL = SC-'0' O LINE 1032 "regression-compile-tmp/check.imp" @ PUSH ATOMVAL @ PUSH SC N PUSHI #0x00000030 - SUB S ASSVAL 1033 %CYCLE O LINE 1033 "regression-compile-tmp/check.imp" : LOCATE L_0003 1034 FP = FP+1; SC = SYMINIT(BYTEINTEGER(FP)) O LINE 1034 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1034 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL a ACCESS S ASSVAL 1035 %EXIT %IF SC > '9' O LINE 1035 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000039 ? JUMPIF <= L_0007 F GOTO L_0004 : LOCATE L_0007 1036 ATOMVAL = (ATOMVAL<<2+ATOMVAL)<<1+SC-'0' %C 1037 %IF SC # 0 %AND ATOMVAL < 1000000 O LINE 1036 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 ? JUMPIF = L_0007 @ PUSH ATOMVAL N PUSHI #0x000f4240 ? JUMPIF >= L_0007 @ PUSH ATOMVAL @ PUSH ATOMVAL N PUSHI #0x00000002 [ LSH @ PUSH ATOMVAL + ADD N PUSHI #0x00000001 [ LSH @ PUSH SC + ADD N PUSHI #0x00000030 - SUB S ASSVAL : LOCATE L_0007 1038 %REPEAT O LINE 1038 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 1039 %IF BYTEINTEGER(FP) = '.' %START O LINE 1039 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL N PUSHI #0x0000002e ? JUMPIF # L_0004 1040 {%UNTIL SC > '9'} %CYCLE O LINE 1040 "regression-compile-tmp/check.imp" : LOCATE L_0006 1041 FP = FP+1; SC = SYMINIT(BYTEINTEGER(FP)) O LINE 1041 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1041 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL a ACCESS S ASSVAL 1042 %REPEAT %UNTIL SC > '9' O LINE 1042 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000039 ? JUMPIF > L_0007 B REPEAT L_0006 : LOCATE L_0007 1043 ATOMTYPE = REALBITS O LINE 1043 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000030 S ASSVAL 1044 %FINISH O LINE 1044 "regression-compile-tmp/check.imp" : LOCATE L_0004 1045 %IF BYTEINTEGER(FP) = '@' %START O LINE 1045 "regression-compile-tmp/check.imp" @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL N PUSHI #0x00000040 ? JUMPIF # L_0004 1046 {%UNTIL SC # ' '} %CYCLE O LINE 1046 "regression-compile-tmp/check.imp" : LOCATE L_0006 1047 FP = FP+1; SC = BYTEINTEGER(FP) O LINE 1047 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1047 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 1048 %REPEAT %UNTIL SC # ' ' O LINE 1048 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000020 ? JUMPIF # L_0007 B REPEAT L_0006 : LOCATE L_0007 1049 %IF SC = '-' %START O LINE 1049 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000002d ? JUMPIF # L_0007 1050 {%UNTIL SC # ' '} %CYCLE O LINE 1050 "regression-compile-tmp/check.imp" : LOCATE L_0009 1051 FP = FP+1; SC = BYTEINTEGER(FP) O LINE 1051 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1051 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 1052 %REPEAT %UNTIL SC # ' ' O LINE 1052 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000020 ? JUMPIF # L_000a B REPEAT L_0009 : LOCATE L_000a 1053 %FINISH O LINE 1053 "regression-compile-tmp/check.imp" : LOCATE L_0007 1054 SC = SYMINIT(SC) O LINE 1054 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH SC a ACCESS S ASSVAL 1055 ->ERR %UNLESS SC <= '9' O LINE 1055 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000039 ? JUMPIF <= L_0007 J JUMP L_012c : LOCATE L_0007 1056 {%UNTIL SC > '9'} %CYCLE O LINE 1056 "regression-compile-tmp/check.imp" : LOCATE L_0006 1057 FP = FP+1; SC = SYMINIT(BYTEINTEGER(FP)) O LINE 1057 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1057 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH SYMINIT @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL a ACCESS S ASSVAL 1058 %REPEAT %UNTIL SC > '9' O LINE 1058 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000039 ? JUMPIF > L_0007 B REPEAT L_0006 : LOCATE L_0007 1059 ATOMTYPE = REALBITS O LINE 1059 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000030 S ASSVAL 1060 %FINISH O LINE 1060 "regression-compile-tmp/check.imp" : LOCATE L_0004 1061 NN: ATOM = CONST O LINE 1061 "regression-compile-tmp/check.imp" L LABEL L_013a O LINE 1061 "regression-compile-tmp/check.imp" @ PUSH ATOM N PUSHI #0x00000002 S ASSVAL 1062 NUMBERS = NUMBERS+1 O LINE 1062 "regression-compile-tmp/check.imp" @ PUSH NUMBERS @ PUSH NUMBERS N PUSHI #0x00000001 + ADD S ASSVAL 1063 ->FIN 1064 O LINE 1063 "regression-compile-tmp/check.imp" J JUMP L_012e 1065 MULTI: O LINE 1065 "regression-compile-tmp/check.imp" L LABEL L_0139 1066 FP = FP+1 O LINE 1066 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL 1067 ATOMTYPE = NUMBITS O LINE 1067 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000070 S ASSVAL 1068 ->Q1 O LINE 1068 "regression-compile-tmp/check.imp" J JUMP L_013b 1069 QUOTEMARK: O LINE 1069 "regression-compile-tmp/check.imp" L LABEL L_012a 1070 ATOMTYPE = STRINGBIT O LINE 1070 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000080 S ASSVAL 1071 Q1: K = BYTEINTEGER(FP); J = -1; L = NEXTLINE O LINE 1071 "regression-compile-tmp/check.imp" L LABEL L_013b O LINE 1071 "regression-compile-tmp/check.imp" @ PUSH K @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL O LINE 1071 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000001 U NEGATE S ASSVAL O LINE 1071 "regression-compile-tmp/check.imp" @ PUSH L @ PUSH NEXTLINE S ASSVAL 1072 ATOMVAL = 0 O LINE 1072 "regression-compile-tmp/check.imp" @ PUSH ATOMVAL N PUSHI #0x00000000 S ASSVAL 1073 %CYCLE O LINE 1073 "regression-compile-tmp/check.imp" : LOCATE L_0003 1074 FP = FP+1; SC = BYTEINTEGER(FP) O LINE 1074 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1074 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 1075 %IF SC = NL %START O LINE 1075 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x0000000a ? JUMPIF # L_0007 1076 NEXTLINE = NEXTLINE+1 O LINE 1076 "regression-compile-tmp/check.imp" @ PUSH NEXTLINE @ PUSH NEXTLINE N PUSHI #0x00000001 + ADD S ASSVAL 1077 ->TERM %IF FP >= FMAX O LINE 1077 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FMAX ? JUMPIF < L_000a J JUMP L_0130 : LOCATE L_000a 1078 %FINISH O LINE 1078 "regression-compile-tmp/check.imp" : LOCATE L_0007 1079 %IF SC = K %START O LINE 1079 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH K ? JUMPIF # L_0007 1080 %EXIT %IF SC # BYTEINTEGER(FP+1) O LINE 1080 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP N PUSHI #0x00000001 + ADD p ASSPAR E CALL ? JUMPIF = L_000a F GOTO L_0004 : LOCATE L_000a 1081 FP = FP+1 O LINE 1081 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL 1082 %FINISH O LINE 1082 "regression-compile-tmp/check.imp" : LOCATE L_0007 1083 ATOMVAL = ATOMVAL<<8+SC O LINE 1083 "regression-compile-tmp/check.imp" @ PUSH ATOMVAL @ PUSH ATOMVAL N PUSHI #0x00000008 [ LSH @ PUSH SC + ADD S ASSVAL 1084 J = J+1; ->STRINGERR %IF J = 255 O LINE 1084 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH J N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1084 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x000000ff ? JUMPIF # L_0007 J JUMP L_0133 : LOCATE L_0007 1085 %REPEAT O LINE 1085 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 1086 %IF ATOMTYPE = STRINGBIT %START; !IE NOT MULTI O LINE 1086 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000080 ? JUMPIF # L_0004 1087 ATOMVAL = J<<8+ATOMVAL&255 O LINE 1087 "regression-compile-tmp/check.imp" @ PUSH ATOMVAL @ PUSH J N PUSHI #0x00000008 [ LSH @ PUSH ATOMVAL N PUSHI #0x000000ff & AND + ADD S ASSVAL 1088 ATOMTYPE = STRINGBIT+NUMBITS %IF J = 0 O LINE 1088 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000000 ? JUMPIF # L_0007 @ PUSH ATOMTYPE N PUSHI #0x00000080 N PUSHI #0x00000070 + ADD S ASSVAL : LOCATE L_0007 1089 %FINISH O LINE 1089 "regression-compile-tmp/check.imp" : LOCATE L_0004 1090 SC = 0 O LINE 1090 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000000 S ASSVAL 1091 ->NN 1092 O LINE 1091 "regression-compile-tmp/check.imp" J JUMP L_013a 1093 HEX:J = 4; ->RAD O LINE 1093 "regression-compile-tmp/check.imp" L LABEL L_0136 O LINE 1093 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000004 S ASSVAL O LINE 1093 "regression-compile-tmp/check.imp" J JUMP L_013c 1094 OCT:J = 3; ->RAD O LINE 1094 "regression-compile-tmp/check.imp" L LABEL L_0137 O LINE 1094 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000003 S ASSVAL O LINE 1094 "regression-compile-tmp/check.imp" J JUMP L_013c 1095 BIN:J = 1 O LINE 1095 "regression-compile-tmp/check.imp" L LABEL L_0138 O LINE 1095 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000001 S ASSVAL 1096 RAD:FP = FP+1 O LINE 1096 "regression-compile-tmp/check.imp" L LABEL L_013c O LINE 1096 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL 1097 ATOMTYPE = NUMBITS; ATOMVAL = 0 O LINE 1097 "regression-compile-tmp/check.imp" @ PUSH ATOMTYPE N PUSHI #0x00000070 S ASSVAL O LINE 1097 "regression-compile-tmp/check.imp" @ PUSH ATOMVAL N PUSHI #0x00000000 S ASSVAL 1098 %CYCLE O LINE 1098 "regression-compile-tmp/check.imp" : LOCATE L_0003 1099 FP = FP+1; SC = BYTEINTEGER(FP) O LINE 1099 "regression-compile-tmp/check.imp" @ PUSH FP @ PUSH FP N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1099 "regression-compile-tmp/check.imp" @ PUSH SC @ PUSH BYTEINTEGER @ PUSH FP p ASSPAR E CALL S ASSVAL 1100 %EXIT %IF SC = '''' O LINE 1100 "regression-compile-tmp/check.imp" @ PUSH SC N PUSHI #0x00000027 ? JUMPIF # L_0007 F GOTO L_0004 : LOCATE L_0007 1101 K = SC-'0' O LINE 1101 "regression-compile-tmp/check.imp" @ PUSH K @ PUSH SC N PUSHI #0x00000030 - SUB S ASSVAL 1102 K = K+('0'-'A'+10) %IF K >= 'A'-'0' O LINE 1102 "regression-compile-tmp/check.imp" @ PUSH K N PUSHI #0x00000041 N PUSHI #0x00000030 - SUB ? JUMPIF < L_0007 @ PUSH K @ PUSH K N PUSHI #0x00000030 N PUSHI #0x00000041 - SUB N PUSHI #0x0000000a + ADD + ADD S ASSVAL : LOCATE L_0007 1103 ->ERR %IF K>>J # 0 O LINE 1103 "regression-compile-tmp/check.imp" @ PUSH K @ PUSH J ] RSH N PUSHI #0x00000000 ? JUMPIF = L_0007 J JUMP L_012c : LOCATE L_0007 1104 ATOMVAL = ATOMVAL<NN 1108 O LINE 1107 "regression-compile-tmp/check.imp" J JUMP L_013a 1109 %END; !CODE ATOM 1110 O LINE 1109 "regression-compile-tmp/check.imp" ; END _CHECKINNER_CODEATOM {lev=2 --> 1} 1111 %ROUTINE POP CONTEXT 1112 {%SHORTROUTINE} O LINE 1111 "regression-compile-tmp/check.imp" $ DEF POPCONTEXT (_CHECKINNER_POPCONTEXT) p1=V_00f9 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} } FINISH ) {lev=2} 1113 %INTEGER I O LINE 1113 "regression-compile-tmp/check.imp" $ DEF I p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1114 DPOS = C_LOCAL; FPOS1 = FPOS O LINE 1114 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH C n SELECT 2 S ASSVAL O LINE 1114 "regression-compile-tmp/check.imp" @ PUSH FPOS1 @ PUSH FPOS S ASSVAL 1115 %WHILE DPOS # DLIM %CYCLE O LINE 1115 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH DPOS @ PUSH DLIM ? JUMPIF = L_0004 1116 I = INTEGER(DPOS) O LINE 1116 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH INTEGER @ PUSH DPOS p ASSPAR E CALL S ASSVAL 1117 %IF I # RECFORMAT %START O LINE 1117 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000004 ? JUMPIF = L_0007 1118 REPORT(15) %IF I&1 # 0 %AND I&6 # 0 O LINE 1118 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000001 & AND N PUSHI #0x00000000 ? JUMPIF = L_000a @ PUSH I N PUSHI #0x00000006 & AND N PUSHI #0x00000000 ? JUMPIF = L_000a @ PUSH REPORT N PUSHI #0x0000000f p ASSPAR E CALL : LOCATE L_000a 1119 %FINISH %ELSE %START O LINE 1119 "regression-compile-tmp/check.imp" F GOTO L_0006 : LOCATE L_0007 1120 DPOS = INTEGER(DPOS+4) %IF INTEGER(DPOS+4) # 0 O LINE 1120 "regression-compile-tmp/check.imp" @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000004 + ADD p ASSPAR E CALL N PUSHI #0x00000000 ? JUMPIF = L_000a @ PUSH DPOS @ PUSH INTEGER @ PUSH DPOS N PUSHI #0x00000004 + ADD p ASSPAR E CALL S ASSVAL : LOCATE L_000a 1121 %FINISH O LINE 1121 "regression-compile-tmp/check.imp" : LOCATE L_0006 1122 DPOS = BYTEINTEGER(DPOS+12)&(\3)+DPOS+16 O LINE 1122 "regression-compile-tmp/check.imp" @ PUSH DPOS @ PUSH BYTEINTEGER @ PUSH DPOS N PUSHI #0x0000000c + ADD p ASSPAR E CALL N PUSHI #0x00000003 \ NOT & AND @ PUSH DPOS + ADD N PUSHI #0x00000010 + ADD S ASSVAL 1123 %REPEAT O LINE 1123 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 1124 REPORT(C_STACK&1+9) %AND C_STACK=C_STACK>>2 %WHILE C_STACK # 0 O LINE 1124 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH C n SELECT 1 N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH REPORT @ PUSH C n SELECT 1 N PUSHI #0x00000001 & AND N PUSHI #0x00000009 + ADD p ASSPAR E CALL @ PUSH C n SELECT 1 @ PUSH C n SELECT 1 N PUSHI #0x00000002 ] RSH S ASSVAL B REPEAT L_0003 : LOCATE L_0004 1125 DLIM = C_LOCAL O LINE 1125 "regression-compile-tmp/check.imp" @ PUSH DLIM @ PUSH C n SELECT 2 S ASSVAL 1126 C = HOLD(LEVEL); LEVEL = LEVEL-1 O LINE 1126 "regression-compile-tmp/check.imp" @ PUSH C @ PUSH HOLD @ PUSH LEVEL a ACCESS S ASSVAL O LINE 1126 "regression-compile-tmp/check.imp" @ PUSH LEVEL @ PUSH LEVEL N PUSHI #0x00000001 - SUB S ASSVAL 1127 %CYCLE I = ADDR(INDEX(0)),4,ADDR(INDEX(255)) O LINE 1127 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000004 @ PUSH ADDR @ PUSH INDEX N PUSHI #0x000000ff a ACCESS p ASSPAR E CALL @ PUSH ADDR @ PUSH INDEX N PUSHI #0x00000000 a ACCESS p ASSPAR E CALL f FOR L_0003 1128 INTEGER(I) = INTEGER(INTEGER(I)+8) %WHILE INTEGER(I) >= DLIM O LINE 1128 "regression-compile-tmp/check.imp" : LOCATE L_0006 @ PUSH INTEGER @ PUSH I p ASSPAR E CALL @ PUSH DLIM ? JUMPIF < L_0007 @ PUSH INTEGER @ PUSH I p ASSPAR E CALL @ PUSH INTEGER @ PUSH INTEGER @ PUSH I p ASSPAR E CALL N PUSHI #0x00000008 + ADD p ASSPAR E CALL S ASSVAL B REPEAT L_0006 : LOCATE L_0007 1129 %REPEAT O LINE 1129 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 1130 %END 1131 O LINE 1130 "regression-compile-tmp/check.imp" ; END _CHECKINNER_POPCONTEXT {lev=2 --> 1} 1132 %ROUTINE DEFINE(%INTEGER DISP,VAL) 1133 {%SHORTROUTINE} O LINE 1132 "regression-compile-tmp/check.imp" $ DEF DEFINE (_CHECKINNER_DEFINE) p1=V_00fa a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} $ DEF DISP p1=V_011f a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF VAL p1=V_0120 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=2} 1134 %WHILE IDENTS # DLIM %CYCLE O LINE 1134 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH IDENTS @ PUSH DLIM ? JUMPIF = L_0004 1135 %IF DISP # 0 %THEN INTEGER(IDENTS+4) = VAL %C 1136 %ELSE BYTEINTEGER(IDENTS+2) = VAL O LINE 1135 "regression-compile-tmp/check.imp" @ PUSH DISP N PUSHI #0x00000000 ? JUMPIF = L_0007 @ PUSH INTEGER @ PUSH IDENTS N PUSHI #0x00000004 + ADD p ASSPAR E CALL @ PUSH VAL S ASSVAL F GOTO L_0006 : LOCATE L_0007 @ PUSH BYTEINTEGER @ PUSH IDENTS N PUSHI #0x00000002 + ADD p ASSPAR E CALL @ PUSH VAL S ASSVAL : LOCATE L_0006 1137 IDENTS = BYTEINTEGER(IDENTS+12)&(\3)+IDENTS+16 O LINE 1137 "regression-compile-tmp/check.imp" @ PUSH IDENTS @ PUSH BYTEINTEGER @ PUSH IDENTS N PUSHI #0x0000000c + ADD p ASSPAR E CALL N PUSHI #0x00000003 \ NOT & AND @ PUSH IDENTS + ADD N PUSHI #0x00000010 + ADD S ASSVAL 1138 %REPEAT O LINE 1138 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 1139 %END 1140 1141 O LINE 1139 "regression-compile-tmp/check.imp" ; END _CHECKINNER_DEFINE {lev=2 --> 1} 1142 %END; !CHECKINNER 1143 O LINE 1142 "regression-compile-tmp/check.imp" ; END _CHECKINNER {lev=1 --> 0} 1144 %EXTERNALROUTINE CHECK(%STRING(63) PARAM) O LINE 1144 "regression-compile-tmp/check.imp" $ DEF CHECK (_CHECK) p1=V_00ae a/tf=7 b/format=0 c/ostate=23 type=0 () form=7 (routine) special=0 () linkage=3 (external) spec=0 indirect=0 unass=1 { START ( FORMAL PARAMETERS {lev=1 --> 2, nested=0 --> 1} $ DEF PARAM p1=V_00af a/tf=31 b/format=3f c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=1} 1145 %RECORDFORMAT FINF(%INTEGER CONAD,FILESIZE, %BYTEINTEGER RUP, %C 1146 EEP,MODE,CONS,ARCH, %STRING(6) TRAN, %C 1147 %SHORTINTEGER FILETYPE,NUMIPERMS, %C 1148 %INTEGER DATASTART,DATAEND, PLISTPTR) O LINE 1145 "regression-compile-tmp/check.imp" $ DEF FINF p1=V_00b0 a/tf=44 b/format=b0 c/ostate=0 type=4 (record) form=4 (record-format) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( RECORDFORMAT $ DEF CONAD p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF FILESIZE p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF RUP p1=V_0000 a/tf=11 b/format=2 c/ostate=0 type=1 (integer) form=1 (simple) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF EEP p1=V_0000 a/tf=11 b/format=2 c/ostate=0 type=1 (integer) form=1 (simple) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF MODE p1=V_0000 a/tf=11 b/format=2 c/ostate=0 type=1 (integer) form=1 (simple) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF CONS p1=V_0000 a/tf=11 b/format=2 c/ostate=0 type=1 (integer) form=1 (simple) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF ARCH p1=V_0000 a/tf=11 b/format=2 c/ostate=0 type=1 (integer) form=1 (simple) special=1 (byte-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF TRAN p1=V_0000 a/tf=31 b/format=6 c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF FILETYPE p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF NUMIPERMS p1=V_0000 a/tf=11 b/format=3 c/ostate=0 type=1 (integer) form=1 (simple) special=2 (short-integer) linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF DATASTART p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF DATAEND p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF PLISTPTR p1=V_0000 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) 1149 {%EXTERNAL}%ROUTINE{SPEC} DEFINE(%STRING(63) S) O LINE 1149 "regression-compile-tmp/check.imp" $ DEF DEFINE (_CHECK_DEFINE) p1=V_00b1 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} $ DEF S p1=V_00b2 a/tf=31 b/format=3f c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=2} 1150 %end O LINE 1150 "regression-compile-tmp/check.imp" ; END _CHECK_DEFINE {lev=2 --> 1} 1151 {%SYSTEM}%ROUTINE{SPEC} CONNECT(%STRING(15) S, %INTEGER A,M,P, %C 1152 %RECORD(FINF)%NAME R, %INTEGERNAME F) O LINE 1151 "regression-compile-tmp/check.imp" $ DEF CONNECT (_CHECK_CONNECT) p1=V_00b2 a/tf=7 b/format=0 c/ostate=0 type=0 () form=7 (routine) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} $ DEF S p1=V_00b3 a/tf=31 b/format=f c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF A p1=V_00b4 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF M p1=V_00b5 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF P p1=V_00b6 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF R p1=V_00b7 a/tf=42 b/format=b0 c/ostate=0 type=4 (record) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF F p1=V_00b8 a/tf=12 b/format=1 c/ostate=0 type=1 (integer) form=2 (name) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 } FINISH ) {lev=2} 1153 %end O LINE 1153 "regression-compile-tmp/check.imp" ; END _CHECK_CONNECT {lev=2 --> 1} 1154 {%EXTERNAL}%STRING(255)%FN{SPEC} SSFMESSAGE O LINE 1154 "regression-compile-tmp/check.imp" $ DEF SSFMESSAGE (_CHECK_SSFMESSAGE) p1=V_00b3 a/tf=38 b/format=ff c/ostate=10 type=3 (string) form=8 (function) special=0 () linkage=0 (auto) spec=0 indirect=1 unass=0 { START ( FORMAL PARAMETERS {lev=2 --> 3, nested=0 --> 1} } FINISH ) {lev=2} 1155 %result="error" ;! I thought I had added this one to the perms..? O LINE 1155 "regression-compile-tmp/check.imp" ' PUSHS "error" V RESULT 1156 %end 1157 O LINE 1156 "regression-compile-tmp/check.imp" ; END _CHECK_SSFMESSAGE {lev=2 --> 1} 1158 %RECORD(FINF) R O LINE 1158 "regression-compile-tmp/check.imp" $ DEF R p1=V_00b4 a/tf=41 b/format=b0 c/ostate=0 type=4 (record) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1159 %INTEGER I,J,FLAG O LINE 1159 "regression-compile-tmp/check.imp" $ DEF I p1=V_00b5 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF J p1=V_00b6 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF FLAG p1=V_00b7 a/tf=11 b/format=1 c/ostate=0 type=1 (integer) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1160 %STRING(63) OPTIONS,OUT O LINE 1160 "regression-compile-tmp/check.imp" $ DEF OPTIONS p1=V_00b8 a/tf=31 b/format=3f c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 $ DEF OUT p1=V_00b9 a/tf=31 b/format=3f c/ostate=0 type=3 (string) form=1 (simple) special=0 () linkage=0 (auto) spec=0 indirect=0 unass=0 1161 OUT = "" %UNLESS PARAM -> PARAM.("/").OUT O LINE 1161 "regression-compile-tmp/check.imp" @ PUSH PARAM @ PUSH PARAM ' PUSHS "/" @ PUSH OUT r RESOLVE flags=0007 t bt L_0004 @ PUSH OUT ' PUSHS "" S ASSVAL : LOCATE L_0004 1162 OPTIONS = "" %UNLESS PARAM -> PARAM.(",").OPTIONS O LINE 1162 "regression-compile-tmp/check.imp" @ PUSH PARAM @ PUSH PARAM ' PUSHS "," @ PUSH OPTIONS r RESOLVE flags=0007 t bt L_0004 @ PUSH OPTIONS ' PUSHS "" S ASSVAL : LOCATE L_0004 1163 CONNECT(PARAM,0,0,0,R,FLAG) O LINE 1163 "regression-compile-tmp/check.imp" @ PUSH CONNECT @ PUSH PARAM p ASSPAR N PUSHI #0x00000000 p ASSPAR N PUSHI #0x00000000 p ASSPAR N PUSHI #0x00000000 p ASSPAR @ PUSH R p ASSPAR @ PUSH FLAG p ASSPAR E CALL 1164 PRINTSTRING(SSFMESSAGE) %AND %RETURN %IF FLAG # 0 O LINE 1164 "regression-compile-tmp/check.imp" @ PUSH FLAG N PUSHI #0x00000000 ? JUMPIF = L_0004 @ PUSH PRINTSTRING @ PUSH SSFMESSAGE E CALL p ASSPAR E CALL R RETURN : LOCATE L_0004 1165 %IF OUT # "" %START O LINE 1165 "regression-compile-tmp/check.imp" @ PUSH OUT ' PUSHS "" ? JUMPIF = L_0004 1166 DEFINE("ST19,".OUT) O LINE 1166 "regression-compile-tmp/check.imp" @ PUSH DEFINE ' PUSHS "ST19," @ PUSH OUT . CONCAT p ASSPAR E CALL 1167 SELECT OUTPUT(19) O LINE 1167 "regression-compile-tmp/check.imp" @ PUSH SELECTOUTPUT N PUSHI #0x00000013 p ASSPAR E CALL 1168 %FINISH O LINE 1168 "regression-compile-tmp/check.imp" : LOCATE L_0004 1169 I = 0 O LINE 1169 "regression-compile-tmp/check.imp" @ PUSH I N PUSHI #0x00000000 S ASSVAL 1170 %WHILE I < LENGTH(OPTIONS) %CYCLE O LINE 1170 "regression-compile-tmp/check.imp" : LOCATE L_0003 @ PUSH I @ PUSH LENGTH @ PUSH OPTIONS p ASSPAR E CALL ? JUMPIF >= L_0004 1171 I = I+1; J = CHARNO(OPTIONS,I) O LINE 1171 "regression-compile-tmp/check.imp" @ PUSH I @ PUSH I N PUSHI #0x00000001 + ADD S ASSVAL O LINE 1171 "regression-compile-tmp/check.imp" @ PUSH J @ PUSH CHARNO @ PUSH OPTIONS p ASSPAR @ PUSH I p ASSPAR E CALL S ASSVAL 1172 FLAG = FLAG!8 %IF J = 'D' O LINE 1172 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000044 ? JUMPIF # L_0007 @ PUSH FLAG @ PUSH FLAG N PUSHI #0x00000008 ! OR S ASSVAL : LOCATE L_0007 1173 FLAG = FLAG!4 %IF J = 'S' O LINE 1173 "regression-compile-tmp/check.imp" @ PUSH J N PUSHI #0x00000053 ? JUMPIF # L_0007 @ PUSH FLAG @ PUSH FLAG N PUSHI #0x00000004 ! OR S ASSVAL : LOCATE L_0007 1174 %REPEAT O LINE 1174 "regression-compile-tmp/check.imp" B REPEAT L_0003 : LOCATE L_0004 1175 CHECKINNER(R_CONAD+R_DATASTART,R_DATAEND-R_DATASTART,FLAG) O LINE 1175 "regression-compile-tmp/check.imp" @ PUSH CHECKINNER @ PUSH R n SELECT 1 @ PUSH R n SELECT 11 + ADD p ASSPAR @ PUSH R n SELECT 12 @ PUSH R n SELECT 11 - SUB p ASSPAR @ PUSH FLAG p ASSPAR E CALL 1176 PRINT STRING(" OK") %AND NEWLINE %IF FLAG >= 0 O LINE 1176 "regression-compile-tmp/check.imp" @ PUSH FLAG N PUSHI #0x00000000 ? JUMPIF < L_0004 @ PUSH PRINTSTRING ' PUSHS " OK" p ASSPAR E CALL @ PUSH NEWLINE E CALL : LOCATE L_0004 1177 %END; !CHECK 1178 O LINE 1177 "regression-compile-tmp/check.imp" ; END _CHECK {lev=1 --> 0} 1179 %begin O LINE 1179 "regression-compile-tmp/check.imp" H BEGIN _lev0id0 {lev=0 --> 1} 1180 %end 1181 O LINE 1180 "regression-compile-tmp/check.imp" ; END _lev0id0 {lev=1 --> 0} 1182 %ENDOFFILE O LINE 1182 "regression-compile-tmp/check.imp" ; END {lev=0 --> -1}