|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0340e4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0418 | | .CONST 0x0418 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006a | j | .CONST 0x006a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0024 | $ | .CONST 0x0024 ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 4800 |H | Short_Literal 0x0
0021 480e |H | Short_Literal 0xe
0022 029f 0073 | s| Declare_Subprogram For_Call,INIT_0070
0024 03fe | | Declare_Type Discrete,Defined,Visible
0025 c21b | | Store 0x1,0x1b
0026 4800 |H | Short_Literal 0x0
0027 4802 |H | Short_Literal 0x2
0028 e21b | | Load 0x1,0x1b
0029 03f9 | | Declare_Type Discrete,Constrained,Visible
002a c21c | | Store 0x1,0x1c
002b 4806 |H | Short_Literal 0x6
002c 480b |H | Short_Literal 0xb
002d e21b | | Load 0x1,0x1b
002e 03f9 | | Declare_Type Discrete,Constrained,Visible
002f c20f | | Store 0x1,0xf
0030 480c |H | Short_Literal 0xc
0031 480d |H | Short_Literal 0xd
0032 e21b | | Load 0x1,0x1b
0033 03f9 | | Declare_Type Discrete,Constrained,Visible
0034 c21d | | Store 0x1,0x1d
0035 4803 |H | Short_Literal 0x3
0036 4804 |H | Short_Literal 0x4
0037 e21b | | Load 0x1,0x1b
0038 03f9 | | Declare_Type Discrete,Constrained,Visible
0039 c21e | | Store 0x1,0x1e
003a 4805 |H | Short_Literal 0x5
003b 4805 |H | Short_Literal 0x5
003c e21b | | Load 0x1,0x1b
003d 03f9 | | Declare_Type Discrete,Constrained,Visible
003e c21f | | Store 0x1,0x1f
003f 029a 009b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0098
0041 c220 | | Store 0x1,0x20
0042 4800 |H | Short_Literal 0x0
0043 4809 |H | Short_Literal 0x9
0044 029f 00e3 | | Declare_Subprogram For_Call,INIT_00e0
0046 03fe | | Declare_Type Discrete,Defined,Visible
0047 c221 | ! | Store 0x1,0x21
0048 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108
004a c215 | | Store 0x1,0x15
004b 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178
004d c216 | | Store 0x1,0x16
004e 029a 01db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d8
0050 c217 | | Store 0x1,0x17
0051 029a 0223 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0220
0053 c218 | | Store 0x1,0x18
0054 029a 026b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0268
0056 c219 | | Store 0x1,0x19
0057 00bf | | Action Accept_Activation
0058 029d 02a3 | | Declare_Subprogram For_Outer_Call,INIT_02a0
005a 029d 02c3 | | Declare_Subprogram For_Outer_Call,INIT_02c0
005c 1d15 | | Execute_Immediate Reference_Lex_1,0x15
005d 00c7 | | Action Elaborate_Subprogram
005e 1d16 | | Execute_Immediate Reference_Lex_1,0x16
005f 00c7 | | Action Elaborate_Subprogram
0060 029d 02db | | Declare_Subprogram For_Outer_Call,INIT_02d8
0062 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0063 00c7 | | Action Elaborate_Subprogram
0064 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0065 00c7 | | Action Elaborate_Subprogram
0066 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0067 00c7 | | Action Elaborate_Subprogram
0068 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0069 00c7 | | Action Elaborate_Subprogram
006a BODY_0008:
006a 00bc | | Action Signal_Activated
006b 00bb | | Action Signal_Completion
006c 0000 0000 | | .BLANK 0000[0x4]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 4607 |F | Jump_Case 0x7
0074 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0075 7806 |x | Jump 0x7c ; case 0x1
0076 7809 |x | Jump 0x80 ; case 0x2
0077 780d |x | Jump 0x85 ; case 0x3
0078 7810 |x | Jump 0x89 ; case 0x4
0079 7811 |x | Jump 0x8b ; case 0x5
007a 7812 |x | Jump 0x8d ; case 0x6
007b 7815 |x | Jump 0x91 ; case 0x7
007c 00da | | Load_Top At_Offset_2
007d 0091 0352 | R| Action Push_String_Extended_Indexed,0x352 ; "AND_OP"
007f 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0080 00db | | Load_Top At_Offset_3
0081 00db | | Load_Top At_Offset_3
0082 00e0 | | Load_Encached Standard_Cache
0083 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0084 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0085 00da | | Load_Top At_Offset_2
0086 00e0 | | Load_Encached Standard_Cache
0087 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0088 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0089 00db | | Load_Top At_Offset_3
008a 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
008b 00db | | Load_Top At_Offset_3
008c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
008d e21b | | Load 0x1,0x1b
008e 00dc | | Load_Top At_Offset_4
008f 0267 | g | Execute Discrete,Predecessor
0090 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0091 e21b | | Load 0x1,0x1b
0092 00dc | | Load_Top At_Offset_4
0093 0268 | h | Execute Discrete,Successor
0094 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0095 0000 0000 | | .XXX[0x3]
0097 0000 | |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 460e |F | Jump_Case 0xe
009d 7811 |x | Jump 0xaf ; case 0x0
009e 7813 |x | Jump 0xb2 ; case 0x1
009f 7815 |x | Jump 0xb5 ; case 0x2
00a0 7817 |x | Jump 0xb8 ; case 0x3
00a1 7819 |x | Jump 0xbb ; case 0x4
00a2 781b |x | Jump 0xbe ; case 0x5
00a3 781d |x | Jump 0xc1 ; case 0x6
00a4 781f |x | Jump 0xc4 ; case 0x7
00a5 7821 |x! | Jump 0xc7 ; case 0x8
00a6 7826 |x& | Jump 0xcd ; case 0x9
00a7 7822 |x" | Jump 0xca ; case 0xa
00a8 7827 |x' | Jump 0xd0 ; case 0xb
00a9 7829 |x) | Jump 0xd3 ; case 0xc
00aa 782b |x+ | Jump 0xd6 ; case 0xd
00ab 7800 |x | Jump 0xac ; case 0xe
00ac 0092 036b | k| Action Push_String_Extended,0x36b ; "<UNKNOWN>"
00ae 4401 |D | Exit_Subprogram With_Result,0x1
00af 0092 036c | l| Action Push_String_Extended,0x36c ; "and"
00b1 4401 |D | Exit_Subprogram With_Result,0x1
00b2 0092 036d | m| Action Push_String_Extended,0x36d ; "or"
00b4 4401 |D | Exit_Subprogram With_Result,0x1
00b5 0092 036e | n| Action Push_String_Extended,0x36e ; "xor"
00b7 4401 |D | Exit_Subprogram With_Result,0x1
00b8 0092 036f | o| Action Push_String_Extended,0x36f ; "and then"
00ba 4401 |D | Exit_Subprogram With_Result,0x1
00bb 0092 0370 | p| Action Push_String_Extended,0x370 ; "or else"
00bd 4401 |D | Exit_Subprogram With_Result,0x1
00be 0092 0371 | q| Action Push_String_Extended,0x371 ; "not"
00c0 4401 |D | Exit_Subprogram With_Result,0x1
00c1 0092 0372 | r| Action Push_String_Extended,0x372 ; "="
00c3 4401 |D | Exit_Subprogram With_Result,0x1
00c4 0092 0373 | s| Action Push_String_Extended,0x373 ; "/="
00c6 4401 |D | Exit_Subprogram With_Result,0x1
00c7 0092 0374 | t| Action Push_String_Extended,0x374 ; "<"
00c9 4401 |D | Exit_Subprogram With_Result,0x1
00ca 0092 0375 | u| Action Push_String_Extended,0x375 ; ">"
00cc 4401 |D | Exit_Subprogram With_Result,0x1
00cd 0092 0376 | v| Action Push_String_Extended,0x376 ; "<="
00cf 4401 |D | Exit_Subprogram With_Result,0x1
00d0 0092 0377 | w| Action Push_String_Extended,0x377 ; ">="
00d2 4401 |D | Exit_Subprogram With_Result,0x1
00d3 0092 0378 | x| Action Push_String_Extended,0x378 ; "in"
00d5 4401 |D | Exit_Subprogram With_Result,0x1
00d6 0092 0379 | y| Action Push_String_Extended,0x379 ; "not in"
00d8 4401 |D | Exit_Subprogram With_Result,0x1
00d9 0000 0000 | | .BLANK 0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 4607 |F | Jump_Case 0x7
00e4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
00e5 7806 |x | Jump 0xec ; case 0x1
00e6 7809 |x | Jump 0xf0 ; case 0x2
00e7 780d |x | Jump 0xf5 ; case 0x3
00e8 7810 |x | Jump 0xf9 ; case 0x4
00e9 7811 |x | Jump 0xfb ; case 0x5
00ea 7812 |x | Jump 0xfd ; case 0x6
00eb 7815 |x | Jump 0x101 ; case 0x7
00ec 00da | | Load_Top At_Offset_2
00ed 0091 0361 | a| Action Push_String_Extended_Indexed,0x361 ; "EXPRESSION"
00ef 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
00f0 00db | | Load_Top At_Offset_3
00f1 00db | | Load_Top At_Offset_3
00f2 00e0 | | Load_Encached Standard_Cache
00f3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00f4 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00f5 00da | | Load_Top At_Offset_2
00f6 00e0 | | Load_Encached Standard_Cache
00f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00f8 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
00f9 00db | | Load_Top At_Offset_3
00fa 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00fb 00db | | Load_Top At_Offset_3
00fc 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00fd e221 | ! | Load 0x1,0x21
00fe 00dc | | Load_Top At_Offset_4
00ff 0267 | g | Execute Discrete,Predecessor
0100 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0101 e221 | ! | Load 0x1,0x21
0102 00dc | | Load_Top At_Offset_4
0103 0268 | h | Execute Discrete,Successor
0104 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0105 0000 0000 | | .XXX[0x3]
0107 0000 | |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0112 | | .CONST 0x0112 ; Address of begin
0109 016c | l | .CONST 0x016c ; Address of exception handler
010a 0002 | | .CONST 0x0002 ; Number of locals
010b INIT_0108:
010b 00ec | | Load_Encached Diana_Tree_Cache
010c 02c7 | | Declare_Variable Any
010d 00db | | Load_Top At_Offset_3
010e e001 | | Load 0x0,0x1
010f 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0110 180f | | Execute Package,Field_Execute,Field_Number 0xf
0111 a402 | | Store_Unchecked 0x2,0x2
0112 BODY_0108:
0112 00cf | | Action Mark_Auxiliary
0113 00d9 | | Load_Top At_Offset_1
0114 00eb | | Load_Encached Diana_Cache
0115 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0116 00d8 | | Load_Top At_Offset_0
0117 0d04 | | Execute_Immediate Less,0x4
0118 7028 |p( | Jump_Nonzero 0x141
0119 00d8 | | Load_Top At_Offset_0
011a 0c17 | | Execute_Immediate Greater_Equal,0x17
011b 7020 |p | Jump_Nonzero 0x13c
011c 0afc | | Execute_Immediate Plus,-0x4
011d 4612 |F | Jump_Case 0x12
011e 783b |x; | Jump 0x15a ; case 0x0
011f 7822 |x" | Jump 0x142 ; case 0x1
0120 7842 |xB | Jump 0x163 ; case 0x2
0121 7820 |x | Jump 0x142 ; case 0x3
0122 783e |x> | Jump 0x161 ; case 0x4
0123 7825 |x% | Jump 0x149 ; case 0x5
0124 781d |x | Jump 0x142 ; case 0x6
0125 781c |x | Jump 0x142 ; case 0x7
0126 781b |x | Jump 0x142 ; case 0x8
0127 781a |x | Jump 0x142 ; case 0x9
0128 783c |x< | Jump 0x165 ; case 0xa
0129 7818 |x | Jump 0x142 ; case 0xb
012a 7828 |x( | Jump 0x153 ; case 0xc
012b 7816 |x | Jump 0x142 ; case 0xd
012c 7821 |x! | Jump 0x14e ; case 0xe
012d 7814 |x | Jump 0x142 ; case 0xf
012e 7813 |x | Jump 0x142 ; case 0x10
012f 7812 |x | Jump 0x142 ; case 0x11
0130 7800 |x | Jump 0x131 ; case 0x12
0131 00d9 | | Load_Top At_Offset_1
0132 00eb | | Load_Encached Diana_Cache
0133 18fc | | Execute Package,Field_Execute,Field_Number 0xfc
0134 00eb | | Load_Encached Diana_Cache
0135 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0136 0f6e | n | Execute_Immediate Equal,0x6e
0137 7002 |p | Jump_Nonzero 0x13a
0138 4804 |H | Short_Literal 0x4
0139 4401 |D | Exit_Subprogram With_Result,0x1
013a 4805 |H | Short_Literal 0x5
013b 4401 |D | Exit_Subprogram With_Result,0x1
013c 0b61 | a | Execute_Immediate Case_Compare,0x61
013d 7029 |p) | Jump_Nonzero 0x167
013e 0fa1 | | Execute_Immediate Equal,0xa1
013f 7004 |p | Jump_Nonzero 0x144
0140 7801 |x | Jump 0x142
0141 00d1 | | Pop_Control Pop_Count_1
0142 4809 |H | Short_Literal 0x9
0143 4401 |D | Exit_Subprogram With_Result,0x1
0144 00d9 | | Load_Top At_Offset_1
0145 00eb | | Load_Encached Diana_Cache
0146 18ca | | Execute Package,Field_Execute,Field_Number 0xca
0147 c402 | | Store 0x2,0x2
0148 7821 |x! | Jump 0x16a
0149 00d9 | | Load_Top At_Offset_1
014a 00eb | | Load_Encached Diana_Cache
014b 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5
014c c402 | | Store 0x2,0x2
014d 781c |x | Jump 0x16a
014e 00d9 | | Load_Top At_Offset_1
014f 00eb | | Load_Encached Diana_Cache
0150 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
0151 c402 | | Store 0x2,0x2
0152 7817 |x | Jump 0x16a
0153 00d9 | | Load_Top At_Offset_1
0154 e001 | | Load 0x0,0x1
0155 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0156 180e | | Execute Package,Field_Execute,Field_Number 0xe
0157 8216 | | Call 0x1,0x16
0158 8222 | " | Call 0x1,0x22
0159 4401 |D | Exit_Subprogram With_Result,0x1
015a 00d9 | | Load_Top At_Offset_1
015b e001 | | Load 0x0,0x1
015c 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
015d 180e | | Execute Package,Field_Execute,Field_Number 0xe
015e 8216 | | Call 0x1,0x16
015f 8222 | " | Call 0x1,0x22
0160 4401 |D | Exit_Subprogram With_Result,0x1
0161 4805 |H | Short_Literal 0x5
0162 4401 |D | Exit_Subprogram With_Result,0x1
0163 4802 |H | Short_Literal 0x2
0164 4401 |D | Exit_Subprogram With_Result,0x1
0165 4807 |H | Short_Literal 0x7
0166 4401 |D | Exit_Subprogram With_Result,0x1
0167 00d1 | | Pop_Control Pop_Count_1
0168 4808 |H | Short_Literal 0x8
0169 4401 |D | Exit_Subprogram With_Result,0x1
016a 00c9 | | Action Pop_Auxiliary_Loop
016b 7fa7 | | Jump 0x113
016c TRAP_0108:
016c e002 | | Load 0x0,0x2
016d 010f | | Execute Exception,Equal
016e 6802 |h | Jump_Zero 0x171
016f 4806 |H | Short_Literal 0x6
0170 4401 |D | Exit_Subprogram With_Result,0x1
0171 010c | | Execute Exception,Is_Program_Error
0172 6802 |h | Jump_Zero 0x175
0173 4809 |H | Short_Literal 0x9
0174 4401 |D | Exit_Subprogram With_Result,0x1
0175 4809 |H | Short_Literal 0x9
0176 4401 |D | Exit_Subprogram With_Result,0x1
0177 0000 | | .XXX[0x1]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0182 | | .CONST 0x0182 ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b 00ec | | Load_Encached Diana_Tree_Cache
017c 02c7 | | Declare_Variable Any
017d 00db | | Load_Top At_Offset_3
017e e001 | | Load 0x0,0x1
017f 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0180 180f | | Execute Package,Field_Execute,Field_Number 0xf
0181 a402 | | Store_Unchecked 0x2,0x2
0182 BODY_0178:
0182 00cf | | Action Mark_Auxiliary
0183 00d9 | | Load_Top At_Offset_1
0184 00eb | | Load_Encached Diana_Cache
0185 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0186 00d8 | | Load_Top At_Offset_0
0187 0d04 | | Execute_Immediate Less,0x4
0188 701d |p | Jump_Nonzero 0x1a6
0189 00d8 | | Load_Top At_Offset_0
018a 0c16 | | Execute_Immediate Greater_Equal,0x16
018b 7017 |p | Jump_Nonzero 0x1a3
018c 0afc | | Execute_Immediate Plus,-0x4
018d 4611 |F | Jump_Case 0x11
018e 7831 |x1 | Jump 0x1c0 ; case 0x0
018f 7817 |x | Jump 0x1a7 ; case 0x1
0190 7827 |x' | Jump 0x1b8 ; case 0x2
0191 7815 |x | Jump 0x1a7 ; case 0x3
0192 7814 |x | Jump 0x1a7 ; case 0x4
0193 781a |x | Jump 0x1ae ; case 0x5
0194 7812 |x | Jump 0x1a7 ; case 0x6
0195 7811 |x | Jump 0x1a7 ; case 0x7
0196 7810 |x | Jump 0x1a7 ; case 0x8
0197 780f |x | Jump 0x1a7 ; case 0x9
0198 780e |x | Jump 0x1a7 ; case 0xa
0199 780d |x | Jump 0x1a7 ; case 0xb
019a 7818 |x | Jump 0x1b3 ; case 0xc
019b 780b |x | Jump 0x1a7 ; case 0xd
019c 7832 |x2 | Jump 0x1cf ; case 0xe
019d 7809 |x | Jump 0x1a7 ; case 0xf
019e 781e |x | Jump 0x1bd ; case 0x10
019f 7800 |x | Jump 0x1a0 ; case 0x11
01a0 00d9 | | Load_Top At_Offset_1
01a1 8223 | # | Call 0x1,0x23
01a2 4401 |D | Exit_Subprogram With_Result,0x1
01a3 0fa1 | | Execute_Immediate Equal,0xa1
01a4 7004 |p | Jump_Nonzero 0x1a9
01a5 7801 |x | Jump 0x1a7
01a6 00d1 | | Pop_Control Pop_Count_1
01a7 e002 | | Load 0x0,0x2
01a8 0257 | W | Execute Discrete,Raise
01a9 00d9 | | Load_Top At_Offset_1
01aa 00eb | | Load_Encached Diana_Cache
01ab 18ca | | Execute Package,Field_Execute,Field_Number 0xca
01ac c402 | | Store 0x2,0x2
01ad 7825 |x% | Jump 0x1d3
01ae 00d9 | | Load_Top At_Offset_1
01af 00eb | | Load_Encached Diana_Cache
01b0 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5
01b1 c402 | | Store 0x2,0x2
01b2 7820 |x | Jump 0x1d3
01b3 00d9 | | Load_Top At_Offset_1
01b4 00eb | | Load_Encached Diana_Cache
01b5 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
01b6 c402 | | Store 0x2,0x2
01b7 781b |x | Jump 0x1d3
01b8 00d9 | | Load_Top At_Offset_1
01b9 00eb | | Load_Encached Diana_Cache
01ba 18d3 | | Execute Package,Field_Execute,Field_Number 0xd3
01bb 8223 | # | Call 0x1,0x23
01bc 4401 |D | Exit_Subprogram With_Result,0x1
01bd 00d9 | | Load_Top At_Offset_1
01be 8223 | # | Call 0x1,0x23
01bf 4401 |D | Exit_Subprogram With_Result,0x1
01c0 00d9 | | Load_Top At_Offset_1
01c1 00eb | | Load_Encached Diana_Cache
01c2 18b5 | | Execute Package,Field_Execute,Field_Number 0xb5
01c3 00eb | | Load_Encached Diana_Cache
01c4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01c5 0b9d | | Execute_Immediate Case_Compare,0x9d
01c6 7003 |p | Jump_Nonzero 0x1ca
01c7 0f9c | | Execute_Immediate Equal,0x9c
01c8 7004 |p | Jump_Nonzero 0x1cd
01c9 08e2 | | Execute_Immediate Raise,0xe2
01ca 00d1 | | Pop_Control Pop_Count_1
01cb 4804 |H | Short_Literal 0x4
01cc 4401 |D | Exit_Subprogram With_Result,0x1
01cd 4803 |H | Short_Literal 0x3
01ce 4401 |D | Exit_Subprogram With_Result,0x1
01cf 00d9 | | Load_Top At_Offset_1
01d0 00eb | | Load_Encached Diana_Cache
01d1 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
01d2 c402 | | Store 0x2,0x2
01d3 00c9 | | Action Pop_Auxiliary_Loop
01d4 7fae | | Jump 0x183
01d5 0000 0000 | | .XXX[0x3]
01d7 0000 | |
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e2 | | .CONST 0x01e2 ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0002 | | .CONST 0x0002 ; Number of locals
01db INIT_01d8:
01db 00ec | | Load_Encached Diana_Tree_Cache
01dc 02c7 | | Declare_Variable Any
01dd 00db | | Load_Top At_Offset_3
01de e001 | | Load 0x0,0x1
01df 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
01e0 180f | | Execute Package,Field_Execute,Field_Number 0xf
01e1 a402 | | Store_Unchecked 0x2,0x2
01e2 BODY_01d8:
01e2 00cf | | Action Mark_Auxiliary
01e3 00d9 | | Load_Top At_Offset_1
01e4 00eb | | Load_Encached Diana_Cache
01e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01e6 00d8 | | Load_Top At_Offset_0
01e7 0d04 | | Execute_Immediate Less,0x4
01e8 701a |p | Jump_Nonzero 0x203
01e9 00d8 | | Load_Top At_Offset_0
01ea 0c11 | | Execute_Immediate Greater_Equal,0x11
01eb 7014 |p | Jump_Nonzero 0x200
01ec 0afc | | Execute_Immediate Plus,-0x4
01ed 460c |F | Jump_Case 0xc
01ee 7821 |x! | Jump 0x210 ; case 0x0
01ef 7814 |x | Jump 0x204 ; case 0x1
01f0 7826 |x& | Jump 0x217 ; case 0x2
01f1 7812 |x | Jump 0x204 ; case 0x3
01f2 7811 |x | Jump 0x204 ; case 0x4
01f3 7811 |x | Jump 0x205 ; case 0x5
01f4 780f |x | Jump 0x204 ; case 0x6
01f5 780e |x | Jump 0x204 ; case 0x7
01f6 780d |x | Jump 0x204 ; case 0x8
01f7 780c |x | Jump 0x204 ; case 0x9
01f8 780b |x | Jump 0x204 ; case 0xa
01f9 780a |x | Jump 0x204 ; case 0xb
01fa 7800 |x | Jump 0x1fb ; case 0xc
01fb 00d9 | | Load_Top At_Offset_1
01fc 00eb | | Load_Encached Diana_Cache
01fd 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
01fe c402 | | Store 0x2,0x2
01ff 781e |x | Jump 0x21e
0200 0f93 | | Execute_Immediate Equal,0x93
0201 7008 |p | Jump_Nonzero 0x20a
0202 7801 |x | Jump 0x204
0203 00d1 | | Pop_Control Pop_Count_1
0204 08e2 | | Execute_Immediate Raise,0xe2
0205 00d9 | | Load_Top At_Offset_1
0206 00eb | | Load_Encached Diana_Cache
0207 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5
0208 c402 | | Store 0x2,0x2
0209 7814 |x | Jump 0x21e
020a 4801 |H | Short_Literal 0x1
020b 00da | | Load_Top At_Offset_2
020c 00eb | | Load_Encached Diana_Cache
020d 1889 | | Execute Package,Field_Execute,Field_Number 0x89
020e 8224 | $ | Call 0x1,0x24
020f 4401 |D | Exit_Subprogram With_Result,0x1
0210 00d9 | | Load_Top At_Offset_1
0211 00eb | | Load_Encached Diana_Cache
0212 18c6 | | Execute Package,Field_Execute,Field_Number 0xc6
0213 e001 | | Load 0x0,0x1
0214 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0215 180e | | Execute Package,Field_Execute,Field_Number 0xe
0216 4401 |D | Exit_Subprogram With_Result,0x1
0217 00d9 | | Load_Top At_Offset_1
0218 00eb | | Load_Encached Diana_Cache
0219 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5
021a e001 | | Load 0x0,0x1
021b 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
021c 180e | | Execute Package,Field_Execute,Field_Number 0xe
021d 4401 |D | Exit_Subprogram With_Result,0x1
021e 00c9 | | Action Pop_Auxiliary_Loop
021f 7fc3 | | Jump 0x1e3
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022a | * | .CONST 0x022a ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0002 | | .CONST 0x0002 ; Number of locals
0223 INIT_0220:
0223 00ec | | Load_Encached Diana_Tree_Cache
0224 02c7 | | Declare_Variable Any
0225 00db | | Load_Top At_Offset_3
0226 e001 | | Load 0x0,0x1
0227 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0228 180f | | Execute Package,Field_Execute,Field_Number 0xf
0229 a402 | | Store_Unchecked 0x2,0x2
022a BODY_0220:
022a 00cf | | Action Mark_Auxiliary
022b 00d9 | | Load_Top At_Offset_1
022c 00eb | | Load_Encached Diana_Cache
022d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
022e 00d8 | | Load_Top At_Offset_0
022f 0d04 | | Execute_Immediate Less,0x4
0230 701a |p | Jump_Nonzero 0x24b
0231 00d8 | | Load_Top At_Offset_0
0232 0c11 | | Execute_Immediate Greater_Equal,0x11
0233 7014 |p | Jump_Nonzero 0x248
0234 0afc | | Execute_Immediate Plus,-0x4
0235 460c |F | Jump_Case 0xc
0236 7821 |x! | Jump 0x258 ; case 0x0
0237 7814 |x | Jump 0x24c ; case 0x1
0238 7826 |x& | Jump 0x25f ; case 0x2
0239 7812 |x | Jump 0x24c ; case 0x3
023a 7811 |x | Jump 0x24c ; case 0x4
023b 7811 |x | Jump 0x24d ; case 0x5
023c 780f |x | Jump 0x24c ; case 0x6
023d 780e |x | Jump 0x24c ; case 0x7
023e 780d |x | Jump 0x24c ; case 0x8
023f 780c |x | Jump 0x24c ; case 0x9
0240 780b |x | Jump 0x24c ; case 0xa
0241 780a |x | Jump 0x24c ; case 0xb
0242 7800 |x | Jump 0x243 ; case 0xc
0243 00d9 | | Load_Top At_Offset_1
0244 00eb | | Load_Encached Diana_Cache
0245 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
0246 c402 | | Store 0x2,0x2
0247 781e |x | Jump 0x266
0248 0f93 | | Execute_Immediate Equal,0x93
0249 7008 |p | Jump_Nonzero 0x252
024a 7801 |x | Jump 0x24c
024b 00d1 | | Pop_Control Pop_Count_1
024c 08e2 | | Execute_Immediate Raise,0xe2
024d 00d9 | | Load_Top At_Offset_1
024e 00eb | | Load_Encached Diana_Cache
024f 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5
0250 c402 | | Store 0x2,0x2
0251 7814 |x | Jump 0x266
0252 4802 |H | Short_Literal 0x2
0253 00da | | Load_Top At_Offset_2
0254 00eb | | Load_Encached Diana_Cache
0255 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0256 8224 | $ | Call 0x1,0x24
0257 4401 |D | Exit_Subprogram With_Result,0x1
0258 00d9 | | Load_Top At_Offset_1
0259 00eb | | Load_Encached Diana_Cache
025a 18c7 | | Execute Package,Field_Execute,Field_Number 0xc7
025b e001 | | Load 0x0,0x1
025c 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
025d 180e | | Execute Package,Field_Execute,Field_Number 0xe
025e 4401 |D | Exit_Subprogram With_Result,0x1
025f 00d9 | | Load_Top At_Offset_1
0260 00eb | | Load_Encached Diana_Cache
0261 18e7 | | Execute Package,Field_Execute,Field_Number 0xe7
0262 e001 | | Load 0x0,0x1
0263 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0264 180e | | Execute Package,Field_Execute,Field_Number 0xe
0265 4401 |D | Exit_Subprogram With_Result,0x1
0266 00c9 | | Action Pop_Auxiliary_Loop
0267 7fc3 | | Jump 0x22b
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0272 | r | .CONST 0x0272 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0002 | | .CONST 0x0002 ; Number of locals
026b INIT_0268:
026b 00ec | | Load_Encached Diana_Tree_Cache
026c 02c7 | | Declare_Variable Any
026d 00db | | Load_Top At_Offset_3
026e e001 | | Load 0x0,0x1
026f 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0270 180f | | Execute Package,Field_Execute,Field_Number 0xf
0271 a402 | | Store_Unchecked 0x2,0x2
0272 BODY_0268:
0272 00cf | | Action Mark_Auxiliary
0273 00d9 | | Load_Top At_Offset_1
0274 00eb | | Load_Encached Diana_Cache
0275 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0276 00d8 | | Load_Top At_Offset_0
0277 0d09 | | Execute_Immediate Less,0x9
0278 700b |p | Jump_Nonzero 0x284
0279 00d8 | | Load_Top At_Offset_0
027a 0c11 | | Execute_Immediate Greater_Equal,0x11
027b 7005 |p | Jump_Nonzero 0x281
027c 0b09 | | Execute_Immediate Case_Compare,0x9
027d 7008 |p | Jump_Nonzero 0x286
027e 0f10 | | Execute_Immediate Equal,0x10
027f 700c |p | Jump_Nonzero 0x28c
0280 7804 |x | Jump 0x285
0281 0f93 | | Execute_Immediate Equal,0x93
0282 700e |p | Jump_Nonzero 0x291
0283 7801 |x | Jump 0x285
0284 00d1 | | Pop_Control Pop_Count_1
0285 08e2 | | Execute_Immediate Raise,0xe2
0286 00d1 | | Pop_Control Pop_Count_1
0287 00d9 | | Load_Top At_Offset_1
0288 00eb | | Load_Encached Diana_Cache
0289 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5
028a c402 | | Store 0x2,0x2
028b 780b |x | Jump 0x297
028c 00d9 | | Load_Top At_Offset_1
028d 00eb | | Load_Encached Diana_Cache
028e 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
028f c402 | | Store 0x2,0x2
0290 7806 |x | Jump 0x297
0291 4801 |H | Short_Literal 0x1
0292 00da | | Load_Top At_Offset_2
0293 00eb | | Load_Encached Diana_Cache
0294 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0295 8224 | $ | Call 0x1,0x24
0296 4401 |D | Exit_Subprogram With_Result,0x1
0297 00c9 | | Action Pop_Auxiliary_Loop
0298 7fda | | Jump 0x273
0299 0000 0000 | | .BLANK 0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 00da | | Load_Top At_Offset_2
02a4 460e |F | Jump_Case 0xe
02a5 7812 |x | Jump 0x2b8 ; case 0x0
02a6 7811 |x | Jump 0x2b8 ; case 0x1
02a7 7810 |x | Jump 0x2b8 ; case 0x2
02a8 7815 |x | Jump 0x2be ; case 0x3
02a9 7814 |x | Jump 0x2be ; case 0x4
02aa 780b |x | Jump 0x2b6 ; case 0x5
02ab 780e |x | Jump 0x2ba ; case 0x6
02ac 780d |x | Jump 0x2ba ; case 0x7
02ad 780c |x | Jump 0x2ba ; case 0x8
02ae 780b |x | Jump 0x2ba ; case 0x9
02af 780a |x | Jump 0x2ba ; case 0xa
02b0 7809 |x | Jump 0x2ba ; case 0xb
02b1 780a |x | Jump 0x2bc ; case 0xc
02b2 7809 |x | Jump 0x2bc ; case 0xd
02b3 7800 |x | Jump 0x2b4 ; case 0xe
02b4 4809 |H | Short_Literal 0x9
02b5 4401 |D | Exit_Subprogram With_Result,0x1
02b6 4803 |H | Short_Literal 0x3
02b7 4401 |D | Exit_Subprogram With_Result,0x1
02b8 4800 |H | Short_Literal 0x0
02b9 4401 |D | Exit_Subprogram With_Result,0x1
02ba 4801 |H | Short_Literal 0x1
02bb 4401 |D | Exit_Subprogram With_Result,0x1
02bc 4802 |H | Short_Literal 0x2
02bd 4401 |D | Exit_Subprogram With_Result,0x1
02be 4800 |H | Short_Literal 0x0
02bf 4401 |D | Exit_Subprogram With_Result,0x1
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c5 | | .CONST 0x02c5 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0002 | | .CONST 0x0002 ; Number of locals
02c3 INIT_02c0:
02c3 029f 02fb | | Declare_Subprogram For_Call,INIT_02f8
02c5 BODY_02c0:
02c5 00db | | Load_Top At_Offset_3
02c6 00eb | | Load_Encached Diana_Cache
02c7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02c8 0b86 | | Execute_Immediate Case_Compare,0x86
02c9 7004 |p | Jump_Nonzero 0x2ce
02ca 0f87 | | Execute_Immediate Equal,0x87
02cb 7005 |p | Jump_Nonzero 0x2d1
02cc 8402 | | Call 0x2,0x2
02cd 7805 |x | Jump 0x2d3
02ce 00d1 | | Pop_Control Pop_Count_1
02cf 480c |H | Short_Literal 0xc
02d0 4401 |D | Exit_Subprogram With_Result,0x1
02d1 480d |H | Short_Literal 0xd
02d2 4401 |D | Exit_Subprogram With_Result,0x1
02d3 0831 | 1 | Execute_Immediate Raise,0x31
02d4 0000 0000 | | .BLANK 0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02df | | .CONST 0x02df ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0002 | | .CONST 0x0002 ; Number of locals
02db INIT_02d8:
02db 00ee | | Load_Encached Diana_Seq_Type_Cache
02dc 02c7 | | Declare_Variable Any
02dd 00db | | Load_Top At_Offset_3
02de a402 | | Store_Unchecked 0x2,0x2
02df BODY_02d8:
02df 00cf | | Action Mark_Auxiliary
02e0 e5fe | | Load 0x2,-0x2
02e1 0aff | | Execute_Immediate Plus,-0x1
02e2 4801 |H | Short_Literal 0x1
02e3 0263 | c | Execute Discrete,Above_Bound
02e4 7006 |p | Jump_Nonzero 0x2eb
02e5 00db | | Load_Top At_Offset_3
02e6 00eb | | Load_Encached Diana_Cache
02e7 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
02e8 c402 | | Store 0x2,0x2
02e9 00c8 | | Action Pop_Auxiliary_Range
02ea 3ffa |? | Loop_Increasing 0x2e5
02eb 00ce | | Action Pop_Auxiliary
02ec 00d8 | | Load_Top At_Offset_0
02ed 00eb | | Load_Encached Diana_Cache
02ee 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
02ef e001 | | Load 0x0,0x1
02f0 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
02f1 180e | | Execute Package,Field_Execute,Field_Number 0xe
02f2 4402 |D | Exit_Subprogram With_Result,0x2
02f3 0000 0000 | | .BLANK 0000[0x5]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 0300 | | .CONST 0x0300 ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0002 | | .CONST 0x0002 ; Number of locals
02fb INIT_02f8:
02fb e5ff | | Load 0x2,-0x1
02fc 00eb | | Load_Encached Diana_Cache
02fd 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02fe 00eb | | Load_Encached Diana_Cache
02ff 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0300 BODY_02f8:
0300 00d8 | | Load_Top At_Offset_0
0301 0092 036c | l| Action Push_String_Extended,0x36c ; "and"
0303 01df | | Execute Vector,Equal
0304 6803 |h | Jump_Zero 0x308
0305 4800 |H | Short_Literal 0x0
0306 00cb | | Action Pop_Block_With_Result
0307 4401 |D | Exit_Subprogram With_Result,0x1
0308 00d8 | | Load_Top At_Offset_0
0309 0092 036d | m| Action Push_String_Extended,0x36d ; "or"
030b 01df | | Execute Vector,Equal
030c 6803 |h | Jump_Zero 0x310
030d 4801 |H | Short_Literal 0x1
030e 00cb | | Action Pop_Block_With_Result
030f 4401 |D | Exit_Subprogram With_Result,0x1
0310 00d8 | | Load_Top At_Offset_0
0311 0092 036e | n| Action Push_String_Extended,0x36e ; "xor"
0313 01df | | Execute Vector,Equal
0314 6803 |h | Jump_Zero 0x318
0315 4802 |H | Short_Literal 0x2
0316 00cb | | Action Pop_Block_With_Result
0317 4401 |D | Exit_Subprogram With_Result,0x1
0318 00d8 | | Load_Top At_Offset_0
0319 0092 0371 | q| Action Push_String_Extended,0x371 ; "not"
031b 01df | | Execute Vector,Equal
031c 6803 |h | Jump_Zero 0x320
031d 4805 |H | Short_Literal 0x5
031e 00cb | | Action Pop_Block_With_Result
031f 4401 |D | Exit_Subprogram With_Result,0x1
0320 00d8 | | Load_Top At_Offset_0
0321 0092 0372 | r| Action Push_String_Extended,0x372 ; "="
0323 01df | | Execute Vector,Equal
0324 6803 |h | Jump_Zero 0x328
0325 4806 |H | Short_Literal 0x6
0326 00cb | | Action Pop_Block_With_Result
0327 4401 |D | Exit_Subprogram With_Result,0x1
0328 00d8 | | Load_Top At_Offset_0
0329 0092 0373 | s| Action Push_String_Extended,0x373 ; "/="
032b 01df | | Execute Vector,Equal
032c 6803 |h | Jump_Zero 0x330
032d 4807 |H | Short_Literal 0x7
032e 00cb | | Action Pop_Block_With_Result
032f 4401 |D | Exit_Subprogram With_Result,0x1
0330 00d8 | | Load_Top At_Offset_0
0331 0092 0374 | t| Action Push_String_Extended,0x374 ; "<"
0333 01df | | Execute Vector,Equal
0334 6803 |h | Jump_Zero 0x338
0335 4808 |H | Short_Literal 0x8
0336 00cb | | Action Pop_Block_With_Result
0337 4401 |D | Exit_Subprogram With_Result,0x1
0338 00d8 | | Load_Top At_Offset_0
0339 0092 0376 | v| Action Push_String_Extended,0x376 ; "<="
033b 01df | | Execute Vector,Equal
033c 6803 |h | Jump_Zero 0x340
033d 4809 |H | Short_Literal 0x9
033e 00cb | | Action Pop_Block_With_Result
033f 4401 |D | Exit_Subprogram With_Result,0x1
0340 00d8 | | Load_Top At_Offset_0
0341 0092 0375 | u| Action Push_String_Extended,0x375 ; ">"
0343 01df | | Execute Vector,Equal
0344 6803 |h | Jump_Zero 0x348
0345 480a |H | Short_Literal 0xa
0346 00cb | | Action Pop_Block_With_Result
0347 4401 |D | Exit_Subprogram With_Result,0x1
0348 00d8 | | Load_Top At_Offset_0
0349 0092 0377 | w| Action Push_String_Extended,0x377 ; ">="
034b 01df | | Execute Vector,Equal
034c 6803 |h | Jump_Zero 0x350
034d 480b |H | Short_Literal 0xb
034e 00cb | | Action Pop_Block_With_Result
034f 4401 |D | Exit_Subprogram With_Result,0x1
0350 e002 | | Load 0x0,0x2
0351 0257 | W | Execute Discrete,Raise
0352 ; --------------------------------------------------------------------------------------
0352 ; STRING TABLE
0352 ; --------------------------------------------------------------------------------------
0352 0052 | R | .STRTAB 0x0052->0x037b ; "AND_OP"
0353 0056 | V | .STRTAB 0x0056->0x037e ; "OR_OP"
0354 0059 | Y | .STRTAB 0x0059->0x0380 ; "XOR_OP"
0355 005d | ] | .STRTAB 0x005d->0x0383 ; "AND_THEN_OP"
0356 0066 | f | .STRTAB 0x0066->0x0389 ; "OR_ELSE_OP"
0357 006e | n | .STRTAB 0x006e->0x038e ; "NOT_OP"
0358 0072 | r | .STRTAB 0x0072->0x0391 ; "EQUAL"
0359 0075 | u | .STRTAB 0x0075->0x0393 ; "NOT_EQUAL"
035a 007c | | | .STRTAB 0x007c->0x0398 ; "LESS_THAN"
035b 0083 | | .STRTAB 0x0083->0x039c ; "LESS_THAN_OR_EQUAL"
035c 0093 | | .STRTAB 0x0093->0x03a5 ; "GREATER_THAN"
035d 009d | | .STRTAB 0x009d->0x03ab ; "GREATER_THAN_OR_EQUAL"
035e 00b0 | | .STRTAB 0x00b0->0x03b6 ; "IN_OP"
035f 00b3 | | .STRTAB 0x00b3->0x03b8 ; "NOT_IN_OP"
0360 00ba | | .STRTAB 0x00ba->0x03bd ; "NOT_AN_OPERATOR"
0361 00c7 | | .STRTAB 0x00c7->0x03c4 ; "EXPRESSION"
0362 00cf | | .STRTAB 0x00cf->0x03c9 ; "RELATION"
0363 00d5 | | .STRTAB 0x00d5->0x03cd ; "MEMBERSHIP"
0364 00dd | | .STRTAB 0x00dd->0x03d2 ; "NOT_EXPRESSION"
0365 00e9 | | .STRTAB 0x00e9->0x03d9 ; "IDENTIFIER"
0366 00f1 | | .STRTAB 0x00f1->0x03de ; "LITERAL"
0367 00f6 | | .STRTAB 0x00f6->0x03e2 ; "FUNCTION_CALL"
0368 0101 | | .STRTAB 0x0101->0x03e8 ; "ATTRIBUTE"
0369 0108 | | .STRTAB 0x0108->0x03ed ; "MEMBERSHIP_RANGE"
036a 0116 | | .STRTAB 0x0116->0x03f5 ; "NOT_AN_EXPRESSION"
036b 0125 | % | .STRTAB 0x0125->0x03fd ; "<UNKNOWN>"
036c 012c | , | .STRTAB 0x012c->0x0402 ; "and"
; "and"
036d 012d | - | .STRTAB 0x012d->0x0403 ; "or"
; "or"
036e 012d | - | .STRTAB 0x012d->0x0404 ; "xor"
; "xor"
036f 012e | . | .STRTAB 0x012e->0x0406 ; "and then"
0370 0134 | 4 | .STRTAB 0x0134->0x040a ; "or else"
0371 0139 | 9 | .STRTAB 0x0139->0x040d ; "not"
; "not"
0372 013a | : | .STRTAB 0x013a->0x040f ; "="
; "="
0373 0139 | 9 | .STRTAB 0x0139->0x040f ; "/="
; "/="
0374 0139 | 9 | .STRTAB 0x0139->0x0410 ; "<"
; "<"
0375 0138 | 8 | .STRTAB 0x0138->0x0411 ; ">"
; ">"
0376 0137 | 7 | .STRTAB 0x0137->0x0411 ; "<="
; "<="
0377 0137 | 7 | .STRTAB 0x0137->0x0412 ; ">="
; ">="
0378 0137 | 7 | .STRTAB 0x0137->0x0413 ; "in"
0379 0137 | 7 | .STRTAB 0x0137->0x0414 ; "not in"
037a 013b | ; | .STREND 0x013b->0x0417
037b 414e 445f |AND_| .STRTAB_STRINGS
0418 ; --------------------------------------------------------------------------------------
0418 ; Debug Table
0418 ; --------------------------------------------------------------------------------------
0418 0004 0004 | | .DEBUG4 0x0004,0x0004,0x2fa9,0x0000,0x0001,0x000e
041e 000b 0456 | V| .DBG4T 0x000b,0x0456,0x8000,0x0000
0422 0058 0465 | X e| .DBG4T 0x0058,0x0465,0x8000,0x8000
0426 0073 0000 | s | .DBG4T 0x0073,0x0000,0x0005,0x0000
042a 009b 0479 | y| .DBG4T 0x009b,0x0479,0x0002,0x4000
042e 00e3 0000 | | .DBG4T 0x00e3,0x0000,0x0005,0x0000
0432 010b 049b | | .DBG4T 0x010b,0x049b,0x0002,0x4000
0436 017b 04c0 | { | .DBG4T 0x017b,0x04c0,0x0002,0x4000
043a 01db 04dd | | .DBG4T 0x01db,0x04dd,0x0002,0x4000
043e 0223 04ee | # | .DBG4T 0x0223,0x04ee,0x0002,0x4000
0442 026b 04ff | k | .DBG4T 0x026b,0x04ff,0x0002,0x4000
0446 02a3 050c | | .DBG4T 0x02a3,0x050c,0x0002,0x4000
044a 02c3 051c | | .DBG4T 0x02c3,0x051c,0x0002,0x4000
044e 02db 0526 | &| .DBG4T 0x02db,0x0526,0x0002,0x0000
0452 02fb 052c | ,| .DBG4T 0x02fb,0x052c,0x0004,0x0000
0456 ; --------------------------------------------------------------------------------------
0456 ; Debug chain
0456 ; --------------------------------------------------------------------------------------
0456 000d 0000 | | .DBGLEN 0x000d,0x0000
0458 0020 0026 | &| .DBGLNO 0x0020,0x0026,0x002b,0x0030,0x0035,0x003a,0x003f,0x0042,0x0048,0x004b,0x004e,0x0051,0x0054
0465 ; --------------------------------------------------------------------------------------
0465 ; Debug chain
0465 ; --------------------------------------------------------------------------------------
0465 0009 0000 | | .DBGLEN 0x0009,0x0000
0467 0058 005a | X Z| .DBGLNO 0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068
0470 0003 0004 | | .XXX[0x9]
0472 0005 0006 | |
0474 0007 0008 | |
0476 0009 000a | |
0478 000b | |
0479 ; --------------------------------------------------------------------------------------
0479 ; Debug chain
0479 ; --------------------------------------------------------------------------------------
0479 0000 0010 | | .DBGLEN 0x0000,0x0010
047b 009b 00ac | | .DBGLNO 0x009b,0x00ac,0x00af,0x00b2,0x00b5,0x00b8,0x00bb,0x00be,0x00c1,0x00c4,0x00c7,0x00ca,0x00cd,0x00d0,0x00d3,0x00d6
048b 0001 0010 | | .XXX[0x10]
048d 0002 0003 | |
048f 0004 0005 | |
0491 0006 0007 | |
0493 0008 0009 | |
0495 000a 000b | |
0497 000c 000d | |
0499 000e 000f | |
049b ; --------------------------------------------------------------------------------------
049b ; Debug chain
049b ; --------------------------------------------------------------------------------------
049b 0001 0011 | | .DBGLEN 0x0001,0x0011
049d 010b 0113 | | .DBGLNO 0x010b,0x0113,0x0131,0x0138,0x013a,0x0142,0x0144,0x0149,0x014e,0x0153,0x015a,0x0161,0x0163,0x0165,0x0168,0x016f,0x0173,0x0175
04af 0002 000b | | .XXX[0x11]
04b1 000d 000c | |
04b3 000f 0003 | |
04b5 0004 0005 | |
04b7 0006 0007 | |
04b9 0008 0009 | |
04bb 000a 000e | |
04bd 0010 0011 | |
04bf 0012 | |
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug chain
04c0 ; --------------------------------------------------------------------------------------
04c0 0001 000d | | .DBGLEN 0x0001,0x000d
04c2 017b 0183 | { | .DBGLNO 0x017b,0x0183,0x01a0,0x01a7,0x01a9,0x01ae,0x01b3,0x01b8,0x01bd,0x01c0,0x01c9,0x01cb,0x01cd,0x01cf
04d0 0002 0008 | | .XXX[0xd]
04d2 000e 0003 | |
04d4 0004 0005 | |
04d6 0006 0007 | |
04d8 0009 000c | |
04da 000a 000b | |
04dc 000d | |
04dd ; --------------------------------------------------------------------------------------
04dd ; Debug chain
04dd ; --------------------------------------------------------------------------------------
04dd 0001 0007 | | .DBGLEN 0x0001,0x0007
04df 01db 01e3 | | .DBGLNO 0x01db,0x01e3,0x01fb,0x0204,0x0205,0x020a,0x0210,0x0217
04e7 0002 0004 | | .XXX[0x7]
04e9 0008 0003 | |
04eb 0005 0006 | |
04ed 0007 | |
04ee ; --------------------------------------------------------------------------------------
04ee ; Debug chain
04ee ; --------------------------------------------------------------------------------------
04ee 0001 0007 | | .DBGLEN 0x0001,0x0007
04f0 0223 022b | # +| .DBGLNO 0x0223,0x022b,0x0243,0x024c,0x024d,0x0252,0x0258,0x025f
04f8 0002 0004 | | .XXX[0x7]
04fa 0008 0003 | |
04fc 0005 0006 | |
04fe 0007 | |
04ff ; --------------------------------------------------------------------------------------
04ff ; Debug chain
04ff ; --------------------------------------------------------------------------------------
04ff 0001 0005 | | .DBGLEN 0x0001,0x0005
0501 026b 0273 | k s| .DBGLNO 0x026b,0x0273,0x0285,0x0287,0x028c,0x0291
0507 0002 0006 | | .XXX[0x5]
0509 0003 0004 | |
050b 0005 | |
050c ; --------------------------------------------------------------------------------------
050c ; Debug chain
050c ; --------------------------------------------------------------------------------------
050c 0000 0007 | | .DBGLEN 0x0000,0x0007
050e 02a3 02b4 | | .DBGLNO 0x02a3,0x02b4,0x02b6,0x02b8,0x02ba,0x02bc,0x02be
0515 0001 0007 | | .XXX[0x7]
0517 0002 0003 | |
0519 0004 0005 | |
051b 0006 | |
051c ; --------------------------------------------------------------------------------------
051c ; Debug chain
051c ; --------------------------------------------------------------------------------------
051c 0000 0004 | | .DBGLEN 0x0000,0x0004
051e 02c5 02cc | | .DBGLNO 0x02c5,0x02cc,0x02cf,0x02d1
0522 0001 0004 | | .XXX[0x4]
0524 0002 0003 | |
0526 ; --------------------------------------------------------------------------------------
0526 ; Debug chain
0526 ; --------------------------------------------------------------------------------------
0526 0001 0003 | | .DBGLEN 0x0001,0x0003
0528 02db 02e0 | | .DBGLNO 0x02db,0x02e0,0x02e5,0x02ec
052c ; --------------------------------------------------------------------------------------
052c ; Debug chain
052c ; --------------------------------------------------------------------------------------
052c 0001 0015 | | .DBGLEN 0x0001,0x0015
052e 02fb 0300 | | .DBGLNO 0x02fb,0x0300,0x0305,0x0308,0x030d,0x0310,0x0315,0x0318,0x031d,0x0320,0x0325,0x0328,0x032d,0x0330,0x0335,0x0338,0x033d,0x0340,0x0345,0x0348,0x034d,0x0350
0544 0000 0000 | | .BLANK 0000[0xbc]