|
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 - download
Length: 4096 (0x1000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe, seg_03c0fe
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0678 | x | .CONST 0x0678 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00ee | | .CONST 0x00ee ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0037 | 7 | .CONST 0x0037 ; Number of locals 000b INIT_0008: 000b 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 000d 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 000f 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 0011 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 0013 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated 0015 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 0017 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0019 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 001b 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 001d 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 001f 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated 0021 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 0023 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0025 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 0027 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0029 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated 002b 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 002d 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 002f 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated 0031 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0033 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0035 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 0037 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 0039 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 003b 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 003d 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated 003f 029a 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call,Visible,Unelaborated 0041 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 0043 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 0045 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 0047 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0049 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 004b 029a 041b | | Declare_Subprogram INIT_0418,For_Outer_Call,Visible,Unelaborated 004d 4800 |H | Short_Literal 0x0 004e 4802 |H | Short_Literal 0x2 004f e001 | | Load 0x0,0x1 0050 01d7 | | Execute Vector,Field_Read 0051 02a0 | | Declare_Subprogram Null_Subprogram 0052 038f | | Declare_Type Package,Defined,Visible 0053 e001 | | Load 0x0,0x1 0054 4801 |H | Short_Literal 0x1 0055 e001 | | Load 0x0,0x1 0056 01d7 | | Execute Vector,Field_Read 0057 4802 |H | Short_Literal 0x2 0058 00db | | Load_Top At_Offset_3 0059 020e | | Execute Module,Augment_Imports 005a 0386 | | Declare_Variable Package,Visible 005b 0093 0000 | | push_full_address 0x0 005d 60a2 |` | Indirect_Literal Discrete,0x100,{0x80000000, 0x00010000} 005e 0273 | s | Execute Discrete,Plus 005f 0129 | ) | Execute Any,Make_Visible 0060 e002 | | Load 0x0,0x2 0061 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0062 00e1 | | Load_Encached Boolean_Cache 0063 00e1 | | Load_Encached Boolean_Cache 0064 00ec | | Load_Encached Diana_Tree_Cache 0065 00ec | | Load_Encached Diana_Tree_Cache 0066 e003 | | Load 0x0,0x3 0067 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0068 e004 | | Load 0x0,0x4 0069 e005 | | Load 0x0,0x5 006a e006 | | Load 0x0,0x6 006b 00d8 | | Load_Top At_Offset_0 006c 00e1 | | Load_Encached Boolean_Cache 006d e007 | | Load 0x0,0x7 006e 00e1 | | Load_Encached Boolean_Cache 006f e008 | | Load 0x0,0x8 0070 029f 0613 | | Declare_Subprogram INIT_0610,For_Call 0072 480e |H | Short_Literal 0xe 0073 032e | . | Declare_Type Record,Defined,Visible 0074 00bf | | Action Accept_Activation 0075 00d8 | | Load_Top At_Offset_0 0076 0322 | " | Declare_Variable Record 0077 00d8 | | Load_Top At_Offset_0 0078 1c00 | | Execute_Immediate Run_Utility,0x0 0079 1d0f | | Execute_Immediate Reference_Lex_1,0xf 007a 00c7 | | Action Elaborate_Subprogram 007b 1d0e | | Execute_Immediate Reference_Lex_1,0xe 007c 00c7 | | Action Elaborate_Subprogram 007d 1d0d | | Execute_Immediate Reference_Lex_1,0xd 007e 00c7 | | Action Elaborate_Subprogram 007f 029d 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call 0081 029d 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call 0083 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0084 00c7 | | Action Elaborate_Subprogram 0085 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0086 00c7 | | Action Elaborate_Subprogram 0087 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0088 00c7 | | Action Elaborate_Subprogram 0089 1d16 | | Execute_Immediate Reference_Lex_1,0x16 008a 00c7 | | Action Elaborate_Subprogram 008b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 008c 00c7 | | Action Elaborate_Subprogram 008d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 008e 00c7 | | Action Elaborate_Subprogram 008f 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0090 00c7 | | Action Elaborate_Subprogram 0091 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0092 00c7 | | Action Elaborate_Subprogram 0093 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0094 00c7 | | Action Elaborate_Subprogram 0095 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0096 00c7 | | Action Elaborate_Subprogram 0097 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0098 00c7 | | Action Elaborate_Subprogram 0099 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 009a 00c7 | | Action Elaborate_Subprogram 009b 1d12 | | Execute_Immediate Reference_Lex_1,0x12 009c 00c7 | | Action Elaborate_Subprogram 009d 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call 009f 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00a0 00c7 | | Action Elaborate_Subprogram 00a1 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00a2 00c7 | | Action Elaborate_Subprogram 00a3 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00a4 00c7 | | Action Elaborate_Subprogram 00a5 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00a6 00c7 | | Action Elaborate_Subprogram 00a7 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00a8 00c7 | | Action Elaborate_Subprogram 00a9 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call 00ab 029d 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call 00ad 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 00ae 00c7 | | Action Elaborate_Subprogram 00af 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00b0 00c7 | | Action Elaborate_Subprogram 00b1 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00b2 00c7 | | Action Elaborate_Subprogram 00b3 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00b4 00c7 | | Action Elaborate_Subprogram 00b5 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00b6 00c7 | | Action Elaborate_Subprogram 00b7 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00b8 00c7 | | Action Elaborate_Subprogram 00b9 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 00ba 00c7 | | Action Elaborate_Subprogram 00bb 029d 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call 00bd 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 00be 00c7 | | Action Elaborate_Subprogram 00bf 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 00c0 00c7 | | Action Elaborate_Subprogram 00c1 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 00c2 00c7 | | Action Elaborate_Subprogram 00c3 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00c4 00c7 | | Action Elaborate_Subprogram 00c5 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 00c6 00c7 | | Action Elaborate_Subprogram 00c7 e009 | | Load 0x0,0x9 00c8 a00a | | Store_Unchecked 0x0,0xa 00c9 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00ca a00b | | Store_Unchecked 0x0,0xb 00cb a00c | | Store_Unchecked 0x0,0xc 00cc 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 00cd e002 | | Load 0x0,0x2 00ce a00d | | Store_Unchecked 0x0,0xd 00cf a00e | | Store_Unchecked 0x0,0xe 00d0 a00f | | Store_Unchecked 0x0,0xf 00d1 a010 | | Store_Unchecked 0x0,0x10 00d2 a011 | | Store_Unchecked 0x0,0x11 00d3 a012 | | Store_Unchecked 0x0,0x12 00d4 a013 | | Store_Unchecked 0x0,0x13 00d5 a014 | | Store_Unchecked 0x0,0x14 00d6 a015 | | Store_Unchecked 0x0,0x15 00d7 a016 | | Store_Unchecked 0x0,0x16 00d8 a017 | | Store_Unchecked 0x0,0x17 00d9 a018 | | Store_Unchecked 0x0,0x18 00da 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00db a019 | | Store_Unchecked 0x0,0x19 00dc a01a | | Store_Unchecked 0x0,0x1a 00dd 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00de a01b | | Store_Unchecked 0x0,0x1b 00df a01c | | Store_Unchecked 0x0,0x1c 00e0 a01d | | Store_Unchecked 0x0,0x1d 00e1 a01e | | Store_Unchecked 0x0,0x1e 00e2 a01f | | Store_Unchecked 0x0,0x1f 00e3 a020 | | Store_Unchecked 0x0,0x20 00e4 a021 | ! | Store_Unchecked 0x0,0x21 00e5 a022 | " | Store_Unchecked 0x0,0x22 00e6 a023 | # | Store_Unchecked 0x0,0x23 00e7 a024 | $ | Store_Unchecked 0x0,0x24 00e8 a025 | % | Store_Unchecked 0x0,0x25 00e9 4822 |H" | Short_Literal 0x22 00ea e22e | . | Load 0x1,0x2e 00eb 020e | | Execute Module,Augment_Imports 00ec e22e | . | Load 0x1,0x2e 00ed 020f | | Execute Module,Activate 00ee BODY_0008: 00ee 480d |H | Short_Literal 0xd 00ef e231 | 1 | Load 0x1,0x31 00f0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00f1 00bc | | Action Signal_Activated 00f2 00bb | | Action Signal_Completion 00f3 0000 0000 | | .BLANK 0000[0x5] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb e231 | 1 | Load 0x1,0x31 00fc 0320 | | Declare_Variable Record,Duplicate 00fd 00cd | | Action Spare6_Action 00fe 00ca | | Action Exit_Nullary_Function 00ff 0000 | | .XXX[0x1] 0100 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0104 0000 0000 | | .BLANK 0000[0x4] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 010f | | .CONST 0x010f ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 00da | | Load_Top At_Offset_2 010c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 010d 0f0d | | Execute_Immediate Equal,0xd 010e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 010f TRAP_0108: 010f 0007 | | Action Break_Optional 0110 4801 |H | Short_Literal 0x1 0111 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0112 0000 0000 | | .BLANK 0000[0x6] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 480d |H | Short_Literal 0xd 011c 00db | | Load_Top At_Offset_3 011d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 011e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 011f 0000 | | .XXX[0x1] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00da | | Load_Top At_Offset_2 0124 820e | | Call 0x1,0xe 0125 6804 |h | Jump_Zero 0x12a 0126 820d | | Call 0x1,0xd 0127 e5fe | | Load 0x2,-0x2 0128 017d | } | Execute Record,Structure_Write 0129 4502 |E | Exit_Suprogram New_Top_Offset 0x2 012a 00da | | Load_Top At_Offset_2 012b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 012c e5fe | | Load 0x2,-0x2 012d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 012e 00da | | Load_Top At_Offset_2 012f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0130 e5fe | | Load 0x2,-0x2 0131 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0132 00da | | Load_Top At_Offset_2 0133 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0134 e5fe | | Load 0x2,-0x2 0135 380c |8 | Execute Record,Field_Write,Field_Number 0xc 0136 00da | | Load_Top At_Offset_2 0137 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0138 e5fe | | Load 0x2,-0x2 0139 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 013a 00da | | Load_Top At_Offset_2 013b 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 013c e5fe | | Load 0x2,-0x2 013d 380a |8 | Execute Record,Field_Write,Field_Number 0xa 013e 00da | | Load_Top At_Offset_2 013f 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0140 e5fe | | Load 0x2,-0x2 0141 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0142 00da | | Load_Top At_Offset_2 0143 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0144 e5fe | | Load 0x2,-0x2 0145 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0146 00da | | Load_Top At_Offset_2 0147 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0148 e5fe | | Load 0x2,-0x2 0149 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 014a 00da | | Load_Top At_Offset_2 014b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 014c e5fe | | Load 0x2,-0x2 014d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 014e 00da | | Load_Top At_Offset_2 014f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0150 8026 | & | Call 0x0,0x26 0151 e5fe | | Load 0x2,-0x2 0152 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0153 00da | | Load_Top At_Offset_2 0154 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0155 8026 | & | Call 0x0,0x26 0156 e5fe | | Load 0x2,-0x2 0157 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0158 00da | | Load_Top At_Offset_2 0159 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 015a e5fe | | Load 0x2,-0x2 015b 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 015c 00da | | Load_Top At_Offset_2 015d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 015e e5fe | | Load 0x2,-0x2 015f 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0160 00db | | Load_Top At_Offset_3 0161 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0162 00db | | Load_Top At_Offset_3 0163 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0164 8027 | ' | Call 0x0,0x27 0165 e5fe | | Load 0x2,-0x2 0166 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0167 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b INIT_0168: 016b 00da | | Load_Top At_Offset_2 016c 820d | | Call 0x1,0xd 016d 017f | | Execute Record,Equal 016e 6802 |h | Jump_Zero 0x171 016f 480d |H | Short_Literal 0xd 0170 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0171 00da | | Load_Top At_Offset_2 0172 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0173 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 00da | | Load_Top At_Offset_2 017c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 017d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017e 0000 0000 | | .XXX[0x2] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 00da | | Load_Top At_Offset_2 0184 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0185 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0186 0000 0000 | | .XXX[0x2] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00da | | Load_Top At_Offset_2 018c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 018d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018e 0000 0000 | | .XXX[0x2] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 00da | | Load_Top At_Offset_2 0194 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0195 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0196 0000 0000 | | .XXX[0x2] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 019c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 019d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019e 0000 0000 | | .XXX[0x2] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a3 | | .CONST 0x01a3 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0001 | | .CONST 0x0001 ; Number of locals 01a3 BODY_01a0: 01a3 INIT_01a0: 01a3 00da | | Load_Top At_Offset_2 01a4 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 01a5 00d8 | | Load_Top At_Offset_0 01a6 0120 | | Execute Any,Is_Value 01a7 7002 |p | Jump_Nonzero 0x1aa 01a8 00d8 | | Load_Top At_Offset_0 01a9 011e | | Execute Any,Convert 01aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ab 0000 0000 | | .BLANK 0000[0x5] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 00da | | Load_Top At_Offset_2 01b4 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 01b5 00d8 | | Load_Top At_Offset_0 01b6 0120 | | Execute Any,Is_Value 01b7 7002 |p | Jump_Nonzero 0x1ba 01b8 00d8 | | Load_Top At_Offset_0 01b9 011e | | Execute Any,Convert 01ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bb 0000 0000 | | .BLANK 0000[0x5] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00da | | Load_Top At_Offset_2 01c4 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 01c5 00d8 | | Load_Top At_Offset_0 01c6 0120 | | Execute Any,Is_Value 01c7 7002 |p | Jump_Nonzero 0x1ca 01c8 00d8 | | Load_Top At_Offset_0 01c9 011e | | Execute Any,Convert 01ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cb 0000 0000 | | .BLANK 0000[0x5] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00da | | Load_Top At_Offset_2 01d4 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 01d5 00d8 | | Load_Top At_Offset_0 01d6 0120 | | Execute Any,Is_Value 01d7 7002 |p | Jump_Nonzero 0x1da 01d8 00d8 | | Load_Top At_Offset_0 01d9 011e | | Execute Any,Convert 01da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01db 0000 0000 | | .BLANK 0000[0x5] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 00da | | Load_Top At_Offset_2 01e4 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 01e5 00d8 | | Load_Top At_Offset_0 01e6 0120 | | Execute Any,Is_Value 01e7 7002 |p | Jump_Nonzero 0x1ea 01e8 00d8 | | Load_Top At_Offset_0 01e9 011e | | Execute Any,Convert 01ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01eb 0000 0000 | | .BLANK 0000[0x5] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 00da | | Load_Top At_Offset_2 01f4 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 01f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f6 0000 0000 | | .XXX[0x2] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb e5fd | | Load 0x2,-0x3 01fc 0120 | | Execute Any,Is_Value 01fd 6802 |h | Jump_Zero 0x200 01fe e028 | ( | Load 0x0,0x28 01ff 7801 |x | Jump 0x201 0200 e5fd | | Load 0x2,-0x3 0201 00e1 | | Load_Encached Boolean_Cache 0202 e5ff | | Load 0x2,-0x1 0203 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0204 8029 | ) | Call 0x0,0x29 0205 c5fe | | Store 0x2,-0x2 0206 c5fd | | Store 0x2,-0x3 0207 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 00da | | Load_Top At_Offset_2 020c 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 020d 802a | * | Call 0x0,0x2a 020e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 020f 0000 | | .XXX[0x1] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 e5fb | | Load 0x2,-0x5 0214 e5f8 | | Load 0x2,-0x8 0215 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0216 00da | | Load_Top At_Offset_2 0217 8233 | 3 | Call 0x1,0x33 0218 e5f8 | | Load 0x2,-0x8 0219 380c |8 | Execute Record,Field_Write,Field_Number 0xc 021a e5fa | | Load 0x2,-0x6 021b e5f8 | | Load 0x2,-0x8 021c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 021d e5fc | | Load 0x2,-0x4 021e 802b | + | Call 0x0,0x2b 021f 0f00 | | Execute_Immediate Equal,0x0 0220 e5f8 | | Load 0x2,-0x8 0221 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0222 e5fc | | Load 0x2,-0x4 0223 e5f8 | | Load 0x2,-0x8 0224 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0225 00da | | Load_Top At_Offset_2 0226 e5f8 | | Load 0x2,-0x8 0227 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0228 e5f9 | | Load 0x2,-0x7 0229 0f02 | | Execute_Immediate Equal,0x2 022a 6808 |h | Jump_Zero 0x233 022b 00eb | | Load_Encached Diana_Cache 022c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 022d e5f8 | | Load 0x2,-0x8 022e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 022f 4805 |H | Short_Literal 0x5 0230 e5f8 | | Load 0x2,-0x8 0231 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0232 780d |x | Jump 0x240 0233 00db | | Load_Top At_Offset_3 0234 00db | | Load_Top At_Offset_3 0235 e02c | , | Load 0x0,0x2c 0236 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0237 e5f8 | | Load 0x2,-0x8 0238 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0239 00eb | | Load_Encached Diana_Cache 023a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 023b e5fe | | Load 0x2,-0x2 023c e5ff | | Load 0x2,-0x1 023d 8232 | 2 | Call 0x1,0x32 023e e5f8 | | Load 0x2,-0x8 023f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0240 e5f9 | | Load 0x2,-0x7 0241 8234 | 4 | Call 0x1,0x34 0242 e5f8 | | Load 0x2,-0x8 0243 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0244 00db | | Load_Top At_Offset_3 0245 e5f8 | | Load 0x2,-0x8 0246 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0247 00db | | Load_Top At_Offset_3 0248 e5f8 | | Load 0x2,-0x8 0249 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 024a 00da | | Load_Top At_Offset_2 024b 802d | - | Call 0x0,0x2d 024c e5f8 | | Load 0x2,-0x8 024d 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 024e e5fd | | Load 0x2,-0x3 024f e5f8 | | Load 0x2,-0x8 0250 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0251 e5f9 | | Load 0x2,-0x7 0252 0f04 | | Execute_Immediate Equal,0x4 0253 680a |h | Jump_Zero 0x25e 0254 e5f8 | | Load 0x2,-0x8 0255 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0256 4805 |H | Short_Literal 0x5 0257 4806 |H | Short_Literal 0x6 0258 0262 | b | Execute Discrete,In_Range 0259 7001 |p | Jump_Nonzero 0x25b 025a 7803 |x | Jump 0x25e 025b 4800 |H | Short_Literal 0x0 025c e5f8 | | Load 0x2,-0x8 025d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 025e e5f8 | | Load 0x2,-0x8 025f 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0260 802e | . | Call 0x0,0x2e 0261 e5f8 | | Load 0x2,-0x8 0262 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0263 e5f7 | | Load 0x2,-0x9 0264 e009 | | Load 0x0,0x9 0265 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0266 c5f7 | | Store 0x2,-0x9 0267 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 00db | | Load_Top At_Offset_3 026c e5fd | | Load 0x2,-0x3 026d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 026e 4800 |H | Short_Literal 0x0 026f e5fd | | Load 0x2,-0x3 0270 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0271 00da | | Load_Top At_Offset_2 0272 802b | + | Call 0x0,0x2b 0273 0f00 | | Execute_Immediate Equal,0x0 0274 e5fd | | Load 0x2,-0x3 0275 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0276 00da | | Load_Top At_Offset_2 0277 e5fd | | Load 0x2,-0x3 0278 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0279 00eb | | Load_Encached Diana_Cache 027a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 027b e5fd | | Load 0x2,-0x3 027c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 027d 00eb | | Load_Encached Diana_Cache 027e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 027f e5fd | | Load 0x2,-0x3 0280 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0281 4803 |H | Short_Literal 0x3 0282 e5fd | | Load 0x2,-0x3 0283 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0284 e02f | / | Load 0x0,0x2f 0285 e5fd | | Load 0x2,-0x3 0286 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0287 e02f | / | Load 0x0,0x2f 0288 e5fd | | Load 0x2,-0x3 0289 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 028a e030 | 0 | Load 0x0,0x30 028b e5fd | | Load 0x2,-0x3 028c 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 028d e031 | 1 | Load 0x0,0x31 028e e5fd | | Load 0x2,-0x3 028f 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0290 4806 |H | Short_Literal 0x6 0291 e5fd | | Load 0x2,-0x3 0292 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0293 e5fc | | Load 0x2,-0x4 0294 e009 | | Load 0x0,0x9 0295 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0296 c5fc | | Store 0x2,-0x4 0297 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029b | | .CONST 0x029b ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0001 | | .CONST 0x0001 ; Number of locals 029b BODY_0298: 029b INIT_0298: 029b 00da | | Load_Top At_Offset_2 029c e5fe | | Load 0x2,-0x2 029d 380b |8 | Execute Record,Field_Write,Field_Number 0xb 029e 00da | | Load_Top At_Offset_2 029f 802b | + | Call 0x0,0x2b 02a0 0f00 | | Execute_Immediate Equal,0x0 02a1 e5fe | | Load 0x2,-0x2 02a2 380a |8 | Execute Record,Field_Write,Field_Number 0xa 02a3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02a4 0000 0000 | | .BLANK 0000[0x4] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 00da | | Load_Top At_Offset_2 02ac 802d | - | Call 0x0,0x2d 02ad e5fc | | Load 0x2,-0x4 02ae 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 02af e5fc | | Load 0x2,-0x4 02b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02b1 0f07 | | Execute_Immediate Equal,0x7 02b2 7007 |p | Jump_Nonzero 0x2ba 02b3 00db | | Load_Top At_Offset_3 02b4 e5fc | | Load 0x2,-0x4 02b5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 02b6 e5ff | | Load 0x2,-0x1 02b7 8232 | 2 | Call 0x1,0x32 02b8 e5fc | | Load 0x2,-0x4 02b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02ba e5fc | | Load 0x2,-0x4 02bb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02bc 0f06 | | Execute_Immediate Equal,0x6 02bd 6803 |h | Jump_Zero 0x2c1 02be 8032 | 2 | Call 0x0,0x32 02bf e5fc | | Load 0x2,-0x4 02c0 380b |8 | Execute Record,Field_Write,Field_Number 0xb 02c1 00da | | Load_Top At_Offset_2 02c2 e5fc | | Load 0x2,-0x4 02c3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02c4 e5fc | | Load 0x2,-0x4 02c5 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 02c6 7004 |p | Jump_Nonzero 0x2cb 02c7 00da | | Load_Top At_Offset_2 02c8 8233 | 3 | Call 0x1,0x33 02c9 e5fc | | Load 0x2,-0x4 02ca 380c |8 | Execute Record,Field_Write,Field_Number 0xc 02cb e5fd | | Load 0x2,-0x3 02cc e5fc | | Load 0x2,-0x4 02cd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02ce 00db | | Load_Top At_Offset_3 02cf e5fc | | Load 0x2,-0x4 02d0 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 02d1 e5fb | | Load 0x2,-0x5 02d2 e009 | | Load 0x0,0x9 02d3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02d4 c5fb | | Store 0x2,-0x5 02d5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02d6 0000 0000 | | .XXX[0x2] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 00da | | Load_Top At_Offset_2 02dc e5fd | | Load 0x2,-0x3 02dd 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 02de 00db | | Load_Top At_Offset_3 02df 6803 |h | Jump_Zero 0x2e3 02e0 4807 |H | Short_Literal 0x7 02e1 e5fd | | Load 0x2,-0x3 02e2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02e3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02e4 0000 0000 | | .BLANK 0000[0x4] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02eb | | .CONST 0x02eb ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0001 | | .CONST 0x0001 ; Number of locals 02eb BODY_02e8: 02eb INIT_02e8: 02eb 4801 |H | Short_Literal 0x1 02ec 00db | | Load_Top At_Offset_3 02ed 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02ee 00da | | Load_Top At_Offset_2 02ef 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 02f0 802e | . | Call 0x0,0x2e 02f1 00db | | Load_Top At_Offset_3 02f2 380d |8 | Execute Record,Field_Write,Field_Number 0xd 02f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02f4 0000 0000 | | .BLANK 0000[0x4] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fb | | .CONST 0x02fb ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0001 | | .CONST 0x0001 ; Number of locals 02fb BODY_02f8: 02fb INIT_02f8: 02fb 00da | | Load_Top At_Offset_2 02fc e5fe | | Load 0x2,-0x2 02fd 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 02fe 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02ff 0000 | | .XXX[0x1] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 00db | | Load_Top At_Offset_3 0304 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0305 00db | | Load_Top At_Offset_3 0306 8033 | 3 | Call 0x0,0x33 0307 e5fe | | Load 0x2,-0x2 0308 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0309 00db | | Load_Top At_Offset_3 030a 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 030b 00db | | Load_Top At_Offset_3 030c 8033 | 3 | Call 0x0,0x33 030d e5fe | | Load 0x2,-0x2 030e 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 030f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0314 | | .CONST 0x0314 ; Address of begin 0311 0004 | | .CONST 0x0004 ; Address of exception handler 0312 0002 | | .CONST 0x0002 ; Number of locals 0313 INIT_0310: 0313 00ec | | Load_Encached Diana_Tree_Cache 0314 BODY_0310: 0314 00cf | | Action Mark_Auxiliary 0315 e5ff | | Load 0x2,-0x1 0316 8034 | 4 | Call 0x0,0x34 0317 4801 |H | Short_Literal 0x1 0318 0263 | c | Execute Discrete,Above_Bound 0319 700c |p | Jump_Nonzero 0x326 031a 00d8 | | Load_Top At_Offset_0 031b e5ff | | Load 0x2,-0x1 031c 8035 | 5 | Call 0x0,0x35 031d a402 | | Store_Unchecked 0x2,0x2 031e e5fe | | Load 0x2,-0x2 031f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0320 e402 | | Load 0x2,0x2 0321 8236 | 6 | Call 0x1,0x36 0322 e5fe | | Load 0x2,-0x2 0323 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0324 00c8 | | Action Pop_Auxiliary_Range 0325 3ff4 |? | Loop_Increasing 0x31a 0326 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0327 0000 | | .XXX[0x1] 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032b | + | .CONST 0x032b ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0001 | | .CONST 0x0001 ; Number of locals 032b BODY_0328: 032b INIT_0328: 032b 00db | | Load_Top At_Offset_3 032c 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 032d 00db | | Load_Top At_Offset_3 032e 8036 | 6 | Call 0x0,0x36 032f e5fe | | Load 0x2,-0x2 0330 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0331 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0332 0000 0000 | | .BLANK 0000[0x6] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 0344 | D | .CONST 0x0344 ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0004 | | .CONST 0x0004 ; Number of locals 033b INIT_0338: 033b e028 | ( | Load 0x0,0x28 033c 02c7 | | Declare_Variable Any 033d 00d8 | | Load_Top At_Offset_0 033e 1c00 | | Execute_Immediate Run_Utility,0x0 033f e008 | | Load 0x0,0x8 0340 02c7 | | Declare_Variable Any 0341 00d8 | | Load_Top At_Offset_0 0342 1c00 | | Execute_Immediate Run_Utility,0x0 0343 00ec | | Load_Encached Diana_Tree_Cache 0344 BODY_0338: 0344 e5fd | | Load 0x2,-0x3 0345 e009 | | Load 0x0,0x9 0346 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0347 c5fd | | Store 0x2,-0x3 0348 8032 | 2 | Call 0x0,0x32 0349 c5fe | | Store 0x2,-0x2 034a 00d9 | | Load_Top At_Offset_1 034b e5ff | | Load 0x2,-0x1 034c 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 034d 8027 | ' | Call 0x0,0x27 034e c403 | | Store 0x2,0x3 034f 00d9 | | Load_Top At_Offset_1 0350 8024 | $ | Call 0x0,0x24 0351 c403 | | Store 0x2,0x3 0352 e5ff | | Load 0x2,-0x1 0353 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0354 460d |F | Jump_Case 0xe 0355 780d |x | Jump 0x363 ; case 0x0 0356 780c |x | Jump 0x363 ; case 0x1 0357 780b |x | Jump 0x363 ; case 0x2 0358 780a |x | Jump 0x363 ; case 0x3 0359 7809 |x | Jump 0x363 ; case 0x4 035a 7808 |x | Jump 0x363 ; case 0x5 035b 783e |x> | Jump 0x39a ; case 0x6 035c 7806 |x | Jump 0x363 ; case 0x7 035d 7805 |x | Jump 0x363 ; case 0x8 035e 780b |x | Jump 0x36a ; case 0x9 035f 7803 |x | Jump 0x363 ; case 0xa 0360 7802 |x | Jump 0x363 ; case 0xb 0361 7801 |x | Jump 0x363 ; case 0xc 0362 7800 |x | Jump 0x363 ; case 0xd 0363 e5fd | | Load 0x2,-0x3 0364 0092 063b | ;| Action Push_String_Extended,0x63b ; "Not a valid task name" 0366 e009 | | Load 0x0,0x9 0367 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0368 c5fd | | Store 0x2,-0x3 0369 4502 |E | Exit_Suprogram New_Top_Offset 0x2 036a 4800 |H | Short_Literal 0x0 036b e5ff | | Load 0x2,-0x1 036c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 036d e5ff | | Load 0x2,-0x1 036e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 036f e02c | , | Load 0x0,0x2c 0370 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0371 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0372 00d8 | | Load_Top At_Offset_0 0373 00eb | | Load_Encached Diana_Cache 0374 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0375 0f73 | s | Execute_Immediate Equal,0x73 0376 7007 |p | Jump_Nonzero 0x37e 0377 e5fd | | Load 0x2,-0x3 0378 0092 063b | ;| Action Push_String_Extended,0x63b ; "Not a valid task name" 037a e009 | | Load 0x0,0x9 037b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 037c c5fd | | Store 0x2,-0x3 037d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 037e e5fd | | Load 0x2,-0x3 037f 00da | | Load_Top At_Offset_2 0380 4800 |H | Short_Literal 0x0 0381 4800 |H | Short_Literal 0x0 0382 4800 |H | Short_Literal 0x0 0383 e404 | | Load 0x2,0x4 0384 e5ff | | Load 0x2,-0x1 0385 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0386 800b | | Call 0x0,0xb 0387 c403 | | Store 0x2,0x3 0388 c5fd | | Store 0x2,-0x3 0389 4802 |H | Short_Literal 0x2 038a e5fd | | Load 0x2,-0x3 038b e009 | | Load 0x0,0x9 038c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 038d 6807 |h | Jump_Zero 0x395 038e e5fd | | Load 0x2,-0x3 038f 0092 063b | ;| Action Push_String_Extended,0x63b ; "Not a valid task name" 0391 e009 | | Load 0x0,0x9 0392 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0393 c5fd | | Store 0x2,-0x3 0394 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0395 e5fd | | Load 0x2,-0x3 0396 00da | | Load_Top At_Offset_2 0397 8018 | | Call 0x0,0x18 0398 c403 | | Store 0x2,0x3 0399 c5fd | | Store 0x2,-0x3 039a e5fd | | Load 0x2,-0x3 039b 00da | | Load_Top At_Offset_2 039c 4801 |H | Short_Literal 0x1 039d 4800 |H | Short_Literal 0x0 039e 4805 |H | Short_Literal 0x5 039f 801e | | Call 0x0,0x1e 03a0 c403 | | Store 0x2,0x3 03a1 c5fd | | Store 0x2,-0x3 03a2 e5fd | | Load 0x2,-0x3 03a3 00da | | Load_Top At_Offset_2 03a4 8037 | 7 | Call 0x0,0x37 03a5 c403 | | Store 0x2,0x3 03a6 c5fd | | Store 0x2,-0x3 03a7 4802 |H | Short_Literal 0x2 03a8 e5fd | | Load 0x2,-0x3 03a9 e009 | | Load 0x0,0x9 03aa 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ab 7013 |p | Jump_Nonzero 0x3bf 03ac e5fd | | Load 0x2,-0x3 03ad 00db | | Load_Top At_Offset_3 03ae 0120 | | Execute Any,Is_Value 03af 6802 |h | Jump_Zero 0x3b2 03b0 e028 | ( | Load 0x0,0x28 03b1 7801 |x | Jump 0x3b3 03b2 00db | | Load_Top At_Offset_3 03b3 00db | | Load_Top At_Offset_3 03b4 8038 | 8 | Call 0x0,0x38 03b5 c402 | | Store 0x2,0x2 03b6 c5fd | | Store 0x2,-0x3 03b7 4802 |H | Short_Literal 0x2 03b8 e5fd | | Load 0x2,-0x3 03b9 e009 | | Load 0x0,0x9 03ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03bb 7003 |p | Jump_Nonzero 0x3bf 03bc 00da | | Load_Top At_Offset_2 03bd 8039 | 9 | Call 0x0,0x39 03be c5fe | | Store 0x2,-0x2 03bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 e5fd | | Load 0x2,-0x3 03c4 e009 | | Load 0x0,0x9 03c5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03c6 c5fd | | Store 0x2,-0x3 03c7 e5fd | | Load 0x2,-0x3 03c8 00db | | Load_Top At_Offset_3 03c9 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 03ca 8037 | 7 | Call 0x0,0x37 03cb e5ff | | Load 0x2,-0x1 03cc 380d |8 | Execute Record,Field_Write,Field_Number 0xd 03cd c5fd | | Store 0x2,-0x3 03ce e5fd | | Load 0x2,-0x3 03cf e5fe | | Load 0x2,-0x2 03d0 e5ff | | Load 0x2,-0x1 03d1 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 03d2 803a | : | Call 0x0,0x3a 03d3 00d1 | | Pop_Control Pop_Count_1 03d4 c5fd | | Store 0x2,-0x3 03d5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03d6 0000 0000 | | .XXX[0x2] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03db | | .CONST 0x03db ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0001 | | .CONST 0x0001 ; Number of locals 03db BODY_03d8: 03db INIT_03d8: 03db e5fd | | Load 0x2,-0x3 03dc e009 | | Load 0x0,0x9 03dd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03de c5fd | | Store 0x2,-0x3 03df 00db | | Load_Top At_Offset_3 03e0 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 03e1 8024 | $ | Call 0x0,0x24 03e2 e5fe | | Load 0x2,-0x2 03e3 380d |8 | Execute Record,Field_Write,Field_Number 0xd 03e4 e5fd | | Load 0x2,-0x3 03e5 e5fe | | Load 0x2,-0x2 03e6 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 03e7 e5ff | | Load 0x2,-0x1 03e8 803b | ; | Call 0x0,0x3b 03e9 e5fe | | Load 0x2,-0x2 03ea 380d |8 | Execute Record,Field_Write,Field_Number 0xd 03eb c5fd | | Store 0x2,-0x3 03ec e5fd | | Load 0x2,-0x3 03ed e5fe | | Load 0x2,-0x2 03ee 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 03ef 8037 | 7 | Call 0x0,0x37 03f0 e5fe | | Load 0x2,-0x2 03f1 380d |8 | Execute Record,Field_Write,Field_Number 0xd 03f2 c5fd | | Store 0x2,-0x3 03f3 e5fd | | Load 0x2,-0x3 03f4 e5fe | | Load 0x2,-0x2 03f5 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 03f6 803c | < | Call 0x0,0x3c 03f7 c5fd | | Store 0x2,-0x3 03f8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03f9 0000 0000 | | .BLANK 0000[0x7] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 e5fd | | Load 0x2,-0x3 0404 e009 | | Load 0x0,0x9 0405 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0406 c5fd | | Store 0x2,-0x3 0407 e5fd | | Load 0x2,-0x3 0408 e5fe | | Load 0x2,-0x2 0409 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 040a e5ff | | Load 0x2,-0x1 040b 803d | = | Call 0x0,0x3d 040c e5fe | | Load 0x2,-0x2 040d 380d |8 | Execute Record,Field_Write,Field_Number 0xd 040e c5fd | | Store 0x2,-0x3 040f e5fd | | Load 0x2,-0x3 0410 e5fe | | Load 0x2,-0x2 0411 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0412 803c | < | Call 0x0,0x3c 0413 c5fd | | Store 0x2,-0x3 0414 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0415 0000 0000 | | .XXX[0x3] 0417 0000 | | 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 041b | | .CONST 0x041b ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0001 | | .CONST 0x0001 ; Number of locals 041b BODY_0418: 041b INIT_0418: 041b e5fb | | Load 0x2,-0x5 041c e009 | | Load 0x0,0x9 041d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 041e c5fb | | Store 0x2,-0x5 041f 00da | | Load_Top At_Offset_2 0420 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0421 8024 | $ | Call 0x0,0x24 0422 00db | | Load_Top At_Offset_3 0423 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0424 e5fb | | Load 0x2,-0x5 0425 00db | | Load_Top At_Offset_3 0426 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0427 8037 | 7 | Call 0x0,0x37 0428 e5ff | | Load 0x2,-0x1 0429 380d |8 | Execute Record,Field_Write,Field_Number 0xd 042a c5fb | | Store 0x2,-0x5 042b e5fb | | Load 0x2,-0x5 042c e5fc | | Load 0x2,-0x4 042d 0120 | | Execute Any,Is_Value 042e 6802 |h | Jump_Zero 0x431 042f e03e | > | Load 0x0,0x3e 0430 7801 |x | Jump 0x432 0431 e5fc | | Load 0x2,-0x4 0432 e5fd | | Load 0x2,-0x3 0433 0120 | | Execute Any,Is_Value 0434 6802 |h | Jump_Zero 0x437 0435 e03f | ? | Load 0x0,0x3f 0436 7801 |x | Jump 0x438 0437 e5fd | | Load 0x2,-0x3 0438 00e1 | | Load_Encached Boolean_Cache 0439 e5ff | | Load 0x2,-0x1 043a 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 043b 8040 | @ | Call 0x0,0x40 043c e5ff | | Load 0x2,-0x1 043d 380d |8 | Execute Record,Field_Write,Field_Number 0xd 043e c5fe | | Store 0x2,-0x2 043f c5fd | | Store 0x2,-0x3 0440 c5fc | | Store 0x2,-0x4 0441 c5fb | | Store 0x2,-0x5 0442 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0443 0000 0000 | | .BLANK 0000[0x5] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044c | L | .CONST 0x044c ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0002 | | .CONST 0x0002 ; Number of locals 044b INIT_0448: 044b 00ec | | Load_Encached Diana_Tree_Cache 044c BODY_0448: 044c 00db | | Load_Top At_Offset_3 044d 00eb | | Load_Encached Diana_Cache 044e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 044f 46ad |F | Jump_Case 0xae 0450 78b6 |x | Jump 0x507 ; case 0x0 0451 78ac |x | Jump 0x4fe ; case 0x1 0452 78ab |x | Jump 0x4fe ; case 0x2 0453 78aa |x | Jump 0x4fe ; case 0x3 0454 78a9 |x | Jump 0x4fe ; case 0x4 0455 78a8 |x | Jump 0x4fe ; case 0x5 0456 78a7 |x | Jump 0x4fe ; case 0x6 0457 78a6 |x | Jump 0x4fe ; case 0x7 0458 78a5 |x | Jump 0x4fe ; case 0x8 0459 78a4 |x | Jump 0x4fe ; case 0x9 045a 78a3 |x | Jump 0x4fe ; case 0xa 045b 78a2 |x | Jump 0x4fe ; case 0xb 045c 78a1 |x | Jump 0x4fe ; case 0xc 045d 78a0 |x | Jump 0x4fe ; case 0xd 045e 789f |x | Jump 0x4fe ; case 0xe 045f 789e |x | Jump 0x4fe ; case 0xf 0460 789d |x | Jump 0x4fe ; case 0x10 0461 789c |x | Jump 0x4fe ; case 0x11 0462 789b |x | Jump 0x4fe ; case 0x12 0463 789a |x | Jump 0x4fe ; case 0x13 0464 7899 |x | Jump 0x4fe ; case 0x14 0465 7898 |x | Jump 0x4fe ; case 0x15 0466 7897 |x | Jump 0x4fe ; case 0x16 0467 7896 |x | Jump 0x4fe ; case 0x17 0468 7895 |x | Jump 0x4fe ; case 0x18 0469 7894 |x | Jump 0x4fe ; case 0x19 046a 7893 |x | Jump 0x4fe ; case 0x1a 046b 7892 |x | Jump 0x4fe ; case 0x1b 046c 78a8 |x | Jump 0x515 ; case 0x1c 046d 78a7 |x | Jump 0x515 ; case 0x1d 046e 78a6 |x | Jump 0x515 ; case 0x1e 046f 78d0 |x | Jump 0x540 ; case 0x1f 0470 78a2 |x | Jump 0x513 ; case 0x20 0471 789b |x | Jump 0x50d ; case 0x21 0472 78d7 |x | Jump 0x54a ; case 0x22 0473 78a1 |x | Jump 0x515 ; case 0x23 0474 78a0 |x | Jump 0x515 ; case 0x24 0475 789f |x | Jump 0x515 ; case 0x25 0476 789e |x | Jump 0x515 ; case 0x26 0477 7886 |x | Jump 0x4fe ; case 0x27 0478 789c |x | Jump 0x515 ; case 0x28 0479 788f |x | Jump 0x509 ; case 0x29 047a 789a |x | Jump 0x515 ; case 0x2a 047b 7899 |x | Jump 0x515 ; case 0x2b 047c 788e |x | Jump 0x50b ; case 0x2c 047d 7897 |x | Jump 0x515 ; case 0x2d 047e 7892 |x | Jump 0x511 ; case 0x2e 047f 7895 |x | Jump 0x515 ; case 0x2f 0480 7894 |x | Jump 0x515 ; case 0x30 0481 7893 |x | Jump 0x515 ; case 0x31 0482 7892 |x | Jump 0x515 ; case 0x32 0483 788b |x | Jump 0x50f ; case 0x33 0484 7879 |xy | Jump 0x4fe ; case 0x34 0485 7878 |xx | Jump 0x4fe ; case 0x35 0486 7877 |xw | Jump 0x4fe ; case 0x36 0487 7876 |xv | Jump 0x4fe ; case 0x37 0488 7875 |xu | Jump 0x4fe ; case 0x38 0489 7874 |xt | Jump 0x4fe ; case 0x39 048a 7873 |xs | Jump 0x4fe ; case 0x3a 048b 7872 |xr | Jump 0x4fe ; case 0x3b 048c 7871 |xq | Jump 0x4fe ; case 0x3c 048d 7870 |xp | Jump 0x4fe ; case 0x3d 048e 786f |xo | Jump 0x4fe ; case 0x3e 048f 786e |xn | Jump 0x4fe ; case 0x3f 0490 786d |xm | Jump 0x4fe ; case 0x40 0491 786c |xl | Jump 0x4fe ; case 0x41 0492 786b |xk | Jump 0x4fe ; case 0x42 0493 786a |xj | Jump 0x4fe ; case 0x43 0494 7869 |xi | Jump 0x4fe ; case 0x44 0495 7868 |xh | Jump 0x4fe ; case 0x45 0496 7867 |xg | Jump 0x4fe ; case 0x46 0497 7866 |xf | Jump 0x4fe ; case 0x47 0498 7865 |xe | Jump 0x4fe ; case 0x48 0499 7864 |xd | Jump 0x4fe ; case 0x49 049a 7863 |xc | Jump 0x4fe ; case 0x4a 049b 7862 |xb | Jump 0x4fe ; case 0x4b 049c 78a1 |x | Jump 0x53e ; case 0x4c 049d 7860 |x` | Jump 0x4fe ; case 0x4d 049e 789d |x | Jump 0x53c ; case 0x4e 049f 785e |x^ | Jump 0x4fe ; case 0x4f 04a0 785d |x] | Jump 0x4fe ; case 0x50 04a1 785c |x\ | Jump 0x4fe ; case 0x51 04a2 785b |x[ | Jump 0x4fe ; case 0x52 04a3 785a |xZ | Jump 0x4fe ; case 0x53 04a4 7859 |xY | Jump 0x4fe ; case 0x54 04a5 7858 |xX | Jump 0x4fe ; case 0x55 04a6 7857 |xW | Jump 0x4fe ; case 0x56 04a7 7856 |xV | Jump 0x4fe ; case 0x57 04a8 7855 |xU | Jump 0x4fe ; case 0x58 04a9 7854 |xT | Jump 0x4fe ; case 0x59 04aa 7853 |xS | Jump 0x4fe ; case 0x5a 04ab 7852 |xR | Jump 0x4fe ; case 0x5b 04ac 7851 |xQ | Jump 0x4fe ; case 0x5c 04ad 7850 |xP | Jump 0x4fe ; case 0x5d 04ae 784f |xO | Jump 0x4fe ; case 0x5e 04af 784e |xN | Jump 0x4fe ; case 0x5f 04b0 784d |xM | Jump 0x4fe ; case 0x60 04b1 784c |xL | Jump 0x4fe ; case 0x61 04b2 784b |xK | Jump 0x4fe ; case 0x62 04b3 784a |xJ | Jump 0x4fe ; case 0x63 04b4 788d |x | Jump 0x542 ; case 0x64 04b5 788c |x | Jump 0x542 ; case 0x65 04b6 7847 |xG | Jump 0x4fe ; case 0x66 04b7 7846 |xF | Jump 0x4fe ; case 0x67 04b8 7845 |xE | Jump 0x4fe ; case 0x68 04b9 7844 |xD | Jump 0x4fe ; case 0x69 04ba 7843 |xC | Jump 0x4fe ; case 0x6a 04bb 788c |x | Jump 0x548 ; case 0x6b 04bc 7887 |x | Jump 0x544 ; case 0x6c 04bd 7840 |x@ | Jump 0x4fe ; case 0x6d 04be 7883 |x | Jump 0x542 ; case 0x6e 04bf 7882 |x | Jump 0x542 ; case 0x6f 04c0 78a5 |x | Jump 0x566 ; case 0x70 04c1 78a4 |x | Jump 0x566 ; case 0x71 04c2 7883 |x | Jump 0x546 ; case 0x72 04c3 784d |xM | Jump 0x511 ; case 0x73 04c4 787d |x} | Jump 0x542 ; case 0x74 04c5 787c |x| | Jump 0x542 ; case 0x75 04c6 787b |x{ | Jump 0x542 ; case 0x76 04c7 7836 |x6 | Jump 0x4fe ; case 0x77 04c8 7835 |x5 | Jump 0x4fe ; case 0x78 04c9 7834 |x4 | Jump 0x4fe ; case 0x79 04ca 7833 |x3 | Jump 0x4fe ; case 0x7a 04cb 7832 |x2 | Jump 0x4fe ; case 0x7b 04cc 7831 |x1 | Jump 0x4fe ; case 0x7c 04cd 7830 |x0 | Jump 0x4fe ; case 0x7d 04ce 782f |x/ | Jump 0x4fe ; case 0x7e 04cf 782e |x. | Jump 0x4fe ; case 0x7f 04d0 782d |x- | Jump 0x4fe ; case 0x80 04d1 782c |x, | Jump 0x4fe ; case 0x81 04d2 782b |x+ | Jump 0x4fe ; case 0x82 04d3 782a |x* | Jump 0x4fe ; case 0x83 04d4 7829 |x) | Jump 0x4fe ; case 0x84 04d5 7828 |x( | Jump 0x4fe ; case 0x85 04d6 7827 |x' | Jump 0x4fe ; case 0x86 04d7 7826 |x& | Jump 0x4fe ; case 0x87 04d8 7825 |x% | Jump 0x4fe ; case 0x88 04d9 7824 |x$ | Jump 0x4fe ; case 0x89 04da 7823 |x# | Jump 0x4fe ; case 0x8a 04db 7822 |x" | Jump 0x4fe ; case 0x8b 04dc 7821 |x! | Jump 0x4fe ; case 0x8c 04dd 7820 |x | Jump 0x4fe ; case 0x8d 04de 781f |x | Jump 0x4fe ; case 0x8e 04df 781e |x | Jump 0x4fe ; case 0x8f 04e0 781d |x | Jump 0x4fe ; case 0x90 04e1 781c |x | Jump 0x4fe ; case 0x91 04e2 781b |x | Jump 0x4fe ; case 0x92 04e3 781a |x | Jump 0x4fe ; case 0x93 04e4 7819 |x | Jump 0x4fe ; case 0x94 04e5 7818 |x | Jump 0x4fe ; case 0x95 04e6 7817 |x | Jump 0x4fe ; case 0x96 04e7 7816 |x | Jump 0x4fe ; case 0x97 04e8 7815 |x | Jump 0x4fe ; case 0x98 04e9 7814 |x | Jump 0x4fe ; case 0x99 04ea 7813 |x | Jump 0x4fe ; case 0x9a 04eb 7812 |x | Jump 0x4fe ; case 0x9b 04ec 7811 |x | Jump 0x4fe ; case 0x9c 04ed 7810 |x | Jump 0x4fe ; case 0x9d 04ee 780f |x | Jump 0x4fe ; case 0x9e 04ef 780e |x | Jump 0x4fe ; case 0x9f 04f0 780d |x | Jump 0x4fe ; case 0xa0 04f1 780c |x | Jump 0x4fe ; case 0xa1 04f2 7853 |xS | Jump 0x546 ; case 0xa2 04f3 780a |x | Jump 0x4fe ; case 0xa3 04f4 7809 |x | Jump 0x4fe ; case 0xa4 04f5 7808 |x | Jump 0x4fe ; case 0xa5 04f6 7807 |x | Jump 0x4fe ; case 0xa6 04f7 7806 |x | Jump 0x4fe ; case 0xa7 04f8 7805 |x | Jump 0x4fe ; case 0xa8 04f9 7804 |x | Jump 0x4fe ; case 0xa9 04fa 7803 |x | Jump 0x4fe ; case 0xaa 04fb 7802 |x | Jump 0x4fe ; case 0xab 04fc 7801 |x | Jump 0x4fe ; case 0xac 04fd 7800 |x | Jump 0x4fe ; case 0xad 04fe 0092 063c | <| Action Push_String_Extended,0x63c ; "Runtime.Class: unknown node: " 0500 e5ff | | Load 0x2,-0x1 0501 e041 | A | Load 0x0,0x41 0502 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0503 01cc | | Execute Vector,Catenate 0504 e042 | B | Load 0x0,0x42 0505 180f | | Execute Package,Field_Execute,Field_Number 0xf 0506 7861 |xa | Jump 0x568 0507 480d |H | Short_Literal 0xd 0508 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0509 4805 |H | Short_Literal 0x5 050a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 050b 4800 |H | Short_Literal 0x0 050c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 050d 4801 |H | Short_Literal 0x1 050e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 050f 4801 |H | Short_Literal 0x1 0510 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0511 4806 |H | Short_Literal 0x6 0512 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0513 480c |H | Short_Literal 0xc 0514 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0515 e5fd | | Load 0x2,-0x3 0516 00eb | | Load_Encached Diana_Cache 0517 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0518 6811 |h | Jump_Zero 0x52a 0519 00db | | Load_Top At_Offset_3 051a 00eb | | Load_Encached Diana_Cache 051b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 051c 0f30 | 0 | Execute_Immediate Equal,0x30 051d 6806 |h | Jump_Zero 0x524 051e 00db | | Load_Top At_Offset_3 051f e003 | | Load 0x0,0x3 0520 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0521 7002 |p | Jump_Nonzero 0x524 0522 4805 |H | Short_Literal 0x5 0523 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0524 e5fe | | Load 0x2,-0x2 0525 e5ff | | Load 0x2,-0x1 0526 e02c | , | Load 0x0,0x2c 0527 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0528 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0529 7802 |x | Jump 0x52c 052a e5fd | | Load 0x2,-0x3 052b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 052c 00d8 | | Load_Top At_Offset_0 052d 00eb | | Load_Encached Diana_Cache 052e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 052f e5ff | | Load 0x2,-0x1 0530 00eb | | Load_Encached Diana_Cache 0531 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0532 027f | | Execute Discrete,Equal 0533 6802 |h | Jump_Zero 0x536 0534 4808 |H | Short_Literal 0x8 0535 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0536 00eb | | Load_Encached Diana_Cache 0537 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0538 e5fe | | Load 0x2,-0x2 0539 00da | | Load_Top At_Offset_2 053a 8232 | 2 | Call 0x1,0x32 053b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 053c 4802 |H | Short_Literal 0x2 053d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 053e 4803 |H | Short_Literal 0x3 053f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0540 4804 |H | Short_Literal 0x4 0541 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0542 4808 |H | Short_Literal 0x8 0543 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0544 480b |H | Short_Literal 0xb 0545 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0546 480a |H | Short_Literal 0xa 0547 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0548 4809 |H | Short_Literal 0x9 0549 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 054a 00db | | Load_Top At_Offset_3 054b e041 | A | Load 0x0,0x41 054c 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 054d 00eb | | Load_Encached Diana_Cache 054e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 054f 0b7b | { | Execute_Immediate Case_Compare,0x7b 0550 700d |p | Jump_Nonzero 0x55e 0551 0b7a | z | Execute_Immediate Case_Compare,0x7a 0552 700e |p | Jump_Nonzero 0x561 0553 0f7c | | | Execute_Immediate Equal,0x7c 0554 700f |p | Jump_Nonzero 0x564 0555 0092 063d | =| Action Push_String_Extended,0x63d ; "Runtime.Class: unknown generic: " 0557 e5ff | | Load 0x2,-0x1 0558 e041 | A | Load 0x0,0x41 0559 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 055a 01cc | | Execute Vector,Catenate 055b e042 | B | Load 0x0,0x42 055c 180f | | Execute Package,Field_Execute,Field_Number 0xf 055d 780a |x | Jump 0x568 055e 00d1 | | Pop_Control Pop_Count_1 055f 4800 |H | Short_Literal 0x0 0560 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0561 00d1 | | Pop_Control Pop_Count_1 0562 4801 |H | Short_Literal 0x1 0563 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0564 4805 |H | Short_Literal 0x5 0565 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0566 4808 |H | Short_Literal 0x8 0567 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0568 0831 | 1 | Execute_Immediate Raise,0x31 0569 0000 0000 | | .BLANK 0000[0x7] 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 0573 | s | .CONST 0x0573 ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0001 | | .CONST 0x0001 ; Number of locals 0573 BODY_0570: 0573 INIT_0570: 0573 00da | | Load_Top At_Offset_2 0574 00eb | | Load_Encached Diana_Cache 0575 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0576 00d8 | | Load_Top At_Offset_0 0577 481d |H | Short_Literal 0x1d 0578 4831 |H1 | Short_Literal 0x31 0579 0262 | b | Execute Discrete,In_Range 057a 680c |h | Jump_Zero 0x587 057b 00d8 | | Load_Top At_Offset_0 057c 481e |H | Short_Literal 0x1e 057d 4827 |H' | Short_Literal 0x27 057e 0262 | b | Execute Discrete,In_Range 057f 7007 |p | Jump_Nonzero 0x587 0580 4829 |H) | Short_Literal 0x29 0581 4830 |H0 | Short_Literal 0x30 0582 0262 | b | Execute Discrete,In_Range 0583 7004 |p | Jump_Nonzero 0x588 0584 7800 |x | Jump 0x585 0585 4801 |H | Short_Literal 0x1 0586 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0587 00d1 | | Pop_Control Pop_Count_1 0588 4800 |H | Short_Literal 0x0 0589 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 058a 0000 0000 | | .BLANK 0000[0x6] 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 00da | | Load_Top At_Offset_2 0594 4606 |F | Jump_Case 0x7 0595 7808 |x | Jump 0x59e ; case 0x0 0596 7807 |x | Jump 0x59e ; case 0x1 0597 7808 |x | Jump 0x5a0 ; case 0x2 0598 780d |x | Jump 0x5a6 ; case 0x3 0599 7808 |x | Jump 0x5a2 ; case 0x4 059a 7809 |x | Jump 0x5a4 ; case 0x5 059b 7800 |x | Jump 0x59c ; case 0x6 059c 4804 |H | Short_Literal 0x4 059d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 059e 4800 |H | Short_Literal 0x0 059f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a0 4802 |H | Short_Literal 0x2 05a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a2 4801 |H | Short_Literal 0x1 05a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a4 4803 |H | Short_Literal 0x3 05a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a6 4804 |H | Short_Literal 0x4 05a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab 00cf | | Action Mark_Auxiliary 05ac 4801 |H | Short_Literal 0x1 05ad e5fe | | Load 0x2,-0x2 05ae 8034 | 4 | Call 0x0,0x34 05af 0264 | d | Execute Discrete,Below_Bound 05b0 700a |p | Jump_Nonzero 0x5bb 05b1 00d8 | | Load_Top At_Offset_0 05b2 e5fe | | Load 0x2,-0x2 05b3 8043 | C | Call 0x0,0x43 05b4 e5ff | | Load 0x2,-0x1 05b5 021f | | Execute Heap_Access,Equal 05b6 6802 |h | Jump_Zero 0x5b9 05b7 4801 |H | Short_Literal 0x1 05b8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05b9 00c8 | | Action Pop_Auxiliary_Range 05ba 37f6 |7 | Loop_Decreasing 0x5b1 05bb 00ce | | Action Pop_Auxiliary 05bc 4800 |H | Short_Literal 0x0 05bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05be 0000 0000 | | .XXX[0x2] 05c0 ; -------------------------------------------------------------------------------------- 05c0 ; SUBPROGRAM 05c0 ; -------------------------------------------------------------------------------------- 05c0 05c3 | | .CONST 0x05c3 ; Address of begin 05c1 0004 | | .CONST 0x0004 ; Address of exception handler 05c2 0001 | | .CONST 0x0001 ; Number of locals 05c3 BODY_05c0: 05c3 INIT_05c0: 05c3 00db | | Load_Top At_Offset_3 05c4 00db | | Load_Top At_Offset_3 05c5 8235 | 5 | Call 0x1,0x35 05c6 7004 |p | Jump_Nonzero 0x5cb 05c7 00db | | Load_Top At_Offset_3 05c8 00db | | Load_Top At_Offset_3 05c9 8033 | 3 | Call 0x0,0x33 05ca c5fe | | Store 0x2,-0x2 05cb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05cc 0000 0000 | | .BLANK 0000[0x4] 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d9 | | .CONST 0x05d9 ; Address of begin 05d1 0606 | | .CONST 0x0606 ; Address of exception handler 05d2 0002 | | .CONST 0x0002 ; Number of locals 05d3 INIT_05d0: 05d3 49f4 |I | Short_Literal 0x1f4 05d4 e044 | D | Load 0x0,0x44 05d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05d6 1c08 | | Execute_Immediate Run_Utility,0x8 05d7 00d8 | | Load_Top At_Offset_0 05d8 1c00 | | Execute_Immediate Run_Utility,0x0 05d9 BODY_05d0: 05d9 00d8 | | Load_Top At_Offset_0 05da 0092 063e | >| Action Push_String_Extended,0x63e ; "{Task:" 05dc e044 | D | Load 0x0,0x44 05dd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05de 00d1 | | Pop_Control Pop_Count_1 05df 00d8 | | Load_Top At_Offset_0 05e0 e5ff | | Load 0x2,-0x1 05e1 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 05e2 8045 | E | Call 0x0,0x45 05e3 e044 | D | Load 0x0,0x44 05e4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05e5 00d1 | | Pop_Control Pop_Count_1 05e6 00d8 | | Load_Top At_Offset_0 05e7 0092 063f | ?| Action Push_String_Extended,0x63f ; " Stmt:" 05e9 e044 | D | Load 0x0,0x44 05ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05eb 00d1 | | Pop_Control Pop_Count_1 05ec 00d8 | | Load_Top At_Offset_0 05ed e5ff | | Load 0x2,-0x1 05ee 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 05ef 8046 | F | Call 0x0,0x46 05f0 e044 | D | Load 0x0,0x44 05f1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05f2 00d1 | | Pop_Control Pop_Count_1 05f3 00db | | Load_Top At_Offset_3 05f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05f5 6806 |h | Jump_Zero 0x5fc 05f6 00d8 | | Load_Top At_Offset_0 05f7 0092 0640 | @| Action Push_String_Extended,0x640 ; " Src" 05f9 e044 | D | Load 0x0,0x44 05fa 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05fb 00d1 | | Pop_Control Pop_Count_1 05fc 00d8 | | Load_Top At_Offset_0 05fd 0092 0641 | A| Action Push_String_Extended,0x641 ; "}" 05ff e044 | D | Load 0x0,0x44 0600 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0601 00d1 | | Pop_Control Pop_Count_1 0602 00d8 | | Load_Top At_Offset_0 0603 e044 | D | Load 0x0,0x44 0604 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0605 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0606 TRAP_05d0: 0606 0007 | | Action Break_Optional 0607 00d9 | | Load_Top At_Offset_1 0608 e044 | D | Load 0x0,0x44 0609 1813 | | Execute Package,Field_Execute,Field_Number 0x13 060a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 060b 0000 0000 | | .BLANK 0000[0x5] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0613 | | .CONST 0x0613 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0001 | | .CONST 0x0001 ; Number of locals 0613 BODY_0610: 0613 INIT_0610: 0613 4601 |F | Jump_Case 0x2 0614 7801 |x | Jump 0x616 ; case 0x0 0615 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0616 00da | | Load_Top At_Offset_2 0617 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0618 0125 | % | Execute Any,Set_Constraint 0619 00da | | Load_Top At_Offset_2 061a 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 061b 1c00 | | Execute_Immediate Run_Utility,0x0 061c 00da | | Load_Top At_Offset_2 061d 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 061e 0125 | % | Execute Any,Set_Constraint 061f 00da | | Load_Top At_Offset_2 0620 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0621 1c00 | | Execute_Immediate Run_Utility,0x0 0622 00da | | Load_Top At_Offset_2 0623 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 0624 0125 | % | Execute Any,Set_Constraint 0625 00da | | Load_Top At_Offset_2 0626 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 0627 1c00 | | Execute_Immediate Run_Utility,0x0 0628 00da | | Load_Top At_Offset_2 0629 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 062a 0125 | % | Execute Any,Set_Constraint 062b 00da | | Load_Top At_Offset_2 062c 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 062d 1c00 | | Execute_Immediate Run_Utility,0x0 062e 00da | | Load_Top At_Offset_2 062f 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 0630 0125 | % | Execute Any,Set_Constraint 0631 00da | | Load_Top At_Offset_2 0632 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 0633 1c00 | | Execute_Immediate Run_Utility,0x0 0634 00da | | Load_Top At_Offset_2 0635 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 0636 0125 | % | Execute Any,Set_Constraint 0637 00da | | Load_Top At_Offset_2 0638 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 0639 1c00 | | Execute_Immediate Run_Utility,0x0 063a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 063b ; -------------------------------------------------------------------------------------- 063b ; STRING TABLE 063b ; -------------------------------------------------------------------------------------- 063b 0010 | | .STRTAB 0x0010->0x0643 ; "Not a valid task name" 063c 0023 | # | .STRTAB 0x0023->0x064d ; "Runtime.Class: unknown node: " 063d 003e | > | .STRTAB 0x003e->0x065c ; "Runtime.Class: unknown generic: " 063e 005c | \ | .STRTAB 0x005c->0x066c ; "{Task:" 063f 0060 | ` | .STRTAB 0x0060->0x066f ; " Stmt:" 0640 0064 | d | .STRTAB 0x0064->0x0672 ; " Src" 0641 0066 | f | .STRTAB 0x0066->0x0674 ; "}" 0642 0065 | e | .STREND 0x0065->0x0674 0643 4e6f 7420 |Not | .STRTAB_STRINGS 0675 0000 0000 | | .XXX[0x3] 0677 0000 | | 0678 ; -------------------------------------------------------------------------------------- 0678 ; Debug Table 0678 ; -------------------------------------------------------------------------------------- 0678 0004 000c | | .DEBUG4 0x0004,0x000c,0xc10d,0x0000,0x0001,0x0000 067e 0000 0000 | | .BLANK 0000[0x182]