|
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: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧ └─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0558 | X | .CONST 0x0558 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 014b | K | .CONST 0x014b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0064 | d | .CONST 0x0064 ; Number of locals 000b INIT_0008: 000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 000c 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 000d 00e3 | | Load_Encached Natural_Cache 000e 0266 | f | Execute Discrete,Bounds 000f 00db | | Load_Top At_Offset_3 0010 02a0 | | Declare_Subprogram Null_Subprogram 0011 4801 |H | Short_Literal 0x1 0012 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0013 e001 | | Load 0x0,0x1 0014 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0015 0129 | ) | Execute Any,Make_Visible 0016 00e4 | | Load_Encached Positive_Cache 0017 0266 | f | Execute Discrete,Bounds 0018 00da | | Load_Top At_Offset_2 0019 02a0 | | Declare_Subprogram Null_Subprogram 001a 4801 |H | Short_Literal 0x1 001b 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 001c 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated 001e 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0020 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 0022 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0024 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 0026 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0028 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 002a 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 002c 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 002e 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0030 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 0032 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 0034 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated 0036 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 0038 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 003a 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 003c 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 003e 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0040 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated 0042 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 0044 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0046 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated 0048 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 004a 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 004c 00c4 | | Action Make_Default 004d 00c4 | | Action Make_Default 004e 00c4 | | Action Make_Default 004f 00c4 | | Action Make_Default 0050 00c4 | | Action Make_Default 0051 00c4 | | Action Make_Default 0052 00c4 | | Action Make_Default 0053 00c4 | | Action Make_Default 0054 00c4 | | Action Make_Default 0055 00c4 | | Action Make_Default 0056 00c4 | | Action Make_Default 0057 00c4 | | Action Make_Default 0058 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 005a c235 | 5 | Store 0x1,0x35 005b 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated 005d c22a | * | Store 0x1,0x2a 005e 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated 0060 c22b | + | Store 0x1,0x2b 0061 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0063 c22c | , | Store 0x1,0x2c 0064 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0066 c22d | - | Store 0x1,0x2d 0067 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 0069 c22e | . | Store 0x1,0x2e 006a 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 006c c22f | / | Store 0x1,0x2f 006d 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated 006f c230 | 0 | Store 0x1,0x30 0070 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated 0072 c231 | 1 | Store 0x1,0x31 0073 029a 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call,Visible,Unelaborated 0075 c232 | 2 | Store 0x1,0x32 0076 4805 |H | Short_Literal 0x5 0077 032a | * | Declare_Type Record,Incomplete 0078 c233 | 3 | Store 0x1,0x33 0079 00da | | Load_Top At_Offset_2 007a 02a0 | | Declare_Subprogram Null_Subprogram 007b e20d | | Load 0x1,0xd 007c 03a3 | | Complete_Type Heap_Access,By_Defining 007d 4804 |H | Short_Literal 0x4 007e 032a | * | Declare_Type Record,Incomplete 007f c234 | 4 | Store 0x1,0x34 0080 00d9 | | Load_Top At_Offset_1 0081 02a0 | | Declare_Subprogram Null_Subprogram 0082 e20e | | Load 0x1,0xe 0083 03a3 | | Complete_Type Heap_Access,By_Defining 0084 00bf | | Action Accept_Activation 0085 4803 |H | Short_Literal 0x3 0086 032a | * | Declare_Type Record,Incomplete 0087 00d8 | | Load_Top At_Offset_0 0088 02a0 | | Declare_Subprogram Null_Subprogram 0089 4818 |H | Short_Literal 0x18 008a 03d3 | | Declare_Type Access,Defined,Accesses_Protected 008b 00d8 | | Load_Top At_Offset_0 008c 00d9 | | Load_Top At_Offset_1 008d e20d | | Load 0x1,0xd 008e 02a0 | | Declare_Subprogram Null_Subprogram 008f e236 | 6 | Load 0x1,0x36 0090 0326 | & | Complete_Type Record,By_Defining 0091 e002 | | Load 0x0,0x2 0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0093 e210 | | Load 0x1,0x10 0094 e003 | | Load 0x0,0x3 0095 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0096 e004 | | Load 0x0,0x4 0097 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0098 e005 | | Load 0x0,0x5 0099 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009a 029f 0453 | S| Declare_Subprogram INIT_0450,For_Call 009c e233 | 3 | Load 0x1,0x33 009d 0326 | & | Complete_Type Record,By_Defining 009e e002 | | Load 0x0,0x2 009f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a0 00d9 | | Load_Top At_Offset_1 00a1 00da | | Load_Top At_Offset_2 00a2 00e2 | | Load_Encached Integer_Cache 00a3 02a0 | | Declare_Subprogram Null_Subprogram 00a4 e234 | 4 | Load 0x1,0x34 00a5 0326 | & | Complete_Type Record,By_Defining 00a6 4801 |H | Short_Literal 0x1 00a7 4800 |H | Short_Literal 0x0 00a8 e20f | | Load 0x1,0xf 00a9 035b | [ | Declare_Type Array,Constrained 00aa 0337 | 7 | Declare_Variable Array 00ab 029d 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call 00ad 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00ae 00c7 | | Action Elaborate_Subprogram 00af 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00b0 00c7 | | Action Elaborate_Subprogram 00b1 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00b2 00c7 | | Action Elaborate_Subprogram 00b3 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00b4 00c7 | | Action Elaborate_Subprogram 00b5 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00b6 00c7 | | Action Elaborate_Subprogram 00b7 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00b8 00c7 | | Action Elaborate_Subprogram 00b9 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00ba 00c7 | | Action Elaborate_Subprogram 00bb 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00bc 00c7 | | Action Elaborate_Subprogram 00bd 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00be 00c7 | | Action Elaborate_Subprogram 00bf 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00c0 00c7 | | Action Elaborate_Subprogram 00c1 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00c2 00c7 | | Action Elaborate_Subprogram 00c3 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00c4 00c7 | | Action Elaborate_Subprogram 00c5 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00c6 00c7 | | Action Elaborate_Subprogram 00c7 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00c8 00c7 | | Action Elaborate_Subprogram 00c9 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00ca 00c7 | | Action Elaborate_Subprogram 00cb 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00cc 00c7 | | Action Elaborate_Subprogram 00cd e006 | | Load 0x0,0x6 00ce e007 | | Load 0x0,0x7 00cf e233 | 3 | Load 0x1,0x33 00d0 e20d | | Load 0x1,0xd 00d1 e008 | | Load 0x0,0x8 00d2 1b18 | | Execute Package,Field_Read,Field_Number 0x18 00d3 0387 | | Declare_Variable Package 00d4 00d8 | | Load_Top At_Offset_0 00d5 020f | | Execute Module,Activate 00d6 e008 | | Load 0x0,0x8 00d7 1919 | | Execute Package,Field_Reference,Field_Number 0x19 00d8 00c6 | | Action Check_Subprogram_Elaborated 00d9 e233 | 3 | Load 0x1,0x33 00da e20d | | Load 0x1,0xd 00db e009 | | Load 0x0,0x9 00dc e00a | | Load 0x0,0xa 00dd 4800 |H | Short_Literal 0x0 00de 0007 | | Action Break_Optional 00df e004 | | Load 0x0,0x4 00e0 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 00e1 00c6 | | Action Check_Subprogram_Elaborated 00e2 e20d | | Load 0x1,0xd 00e3 4814 |H | Short_Literal 0x14 00e4 e23a | : | Load 0x1,0x3a 00e5 1911 | | Execute Package,Field_Reference,Field_Number 0x11 00e6 e23a | : | Load 0x1,0x3a 00e7 1912 | | Execute Package,Field_Reference,Field_Number 0x12 00e8 e00b | | Load 0x0,0xb 00e9 e00c | | Load 0x0,0xc 00ea 4800 |H | Short_Literal 0x0 00eb 0007 | | Action Break_Optional 00ec 029d 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call 00ee e004 | | Load 0x0,0x4 00ef 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 00f0 00c6 | | Action Check_Subprogram_Elaborated 00f1 e20d | | Load 0x1,0xd 00f2 4814 |H | Short_Literal 0x14 00f3 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 00f4 e20d | | Load 0x1,0xd 00f5 e00d | | Load 0x0,0xd 00f6 e00e | | Load 0x0,0xe 00f7 4800 |H | Short_Literal 0x0 00f8 0007 | | Action Break_Optional 00f9 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00fa 00c7 | | Action Elaborate_Subprogram 00fb 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00fc 00c7 | | Action Elaborate_Subprogram 00fd 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00fe 00c7 | | Action Elaborate_Subprogram 00ff 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0100 00c7 | | Action Elaborate_Subprogram 0101 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0102 00c7 | | Action Elaborate_Subprogram 0103 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0104 00c7 | | Action Elaborate_Subprogram 0105 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0106 00c7 | | Action Elaborate_Subprogram 0107 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0108 00c7 | | Action Elaborate_Subprogram 0109 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 010a 00c7 | | Action Elaborate_Subprogram 010b 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 010c 00c7 | | Action Elaborate_Subprogram 010d 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 010e 00c7 | | Action Elaborate_Subprogram 010f 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 0110 00c7 | | Action Elaborate_Subprogram 0111 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0112 00c7 | | Action Elaborate_Subprogram 0113 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0114 00c7 | | Action Elaborate_Subprogram 0115 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0116 00c7 | | Action Elaborate_Subprogram 0117 e00f | | Load 0x0,0xf 0118 e010 | | Load 0x0,0x10 0119 e234 | 4 | Load 0x1,0x34 011a e20e | | Load 0x1,0xe 011b e008 | | Load 0x0,0x8 011c 1b18 | | Execute Package,Field_Read,Field_Number 0x18 011d 0387 | | Declare_Variable Package 011e 00d8 | | Load_Top At_Offset_0 011f 020f | | Execute Module,Activate 0120 e008 | | Load 0x0,0x8 0121 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0122 00c6 | | Action Check_Subprogram_Elaborated 0123 e234 | 4 | Load 0x1,0x34 0124 e20e | | Load 0x1,0xe 0125 e011 | | Load 0x0,0x11 0126 e012 | | Load 0x0,0x12 0127 4800 |H | Short_Literal 0x0 0128 0007 | | Action Break_Optional 0129 e004 | | Load 0x0,0x4 012a 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 012b 00c6 | | Action Check_Subprogram_Elaborated 012c e20e | | Load 0x1,0xe 012d 4815 |H | Short_Literal 0x15 012e e24f | O | Load 0x1,0x4f 012f 1911 | | Execute Package,Field_Reference,Field_Number 0x11 0130 e24f | O | Load 0x1,0x4f 0131 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0132 e013 | | Load 0x0,0x13 0133 e014 | | Load 0x0,0x14 0134 4800 |H | Short_Literal 0x0 0135 0007 | | Action Break_Optional 0136 029d 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call 0138 e004 | | Load 0x0,0x4 0139 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 013a 00c6 | | Action Check_Subprogram_Elaborated 013b e20e | | Load 0x1,0xe 013c 4815 |H | Short_Literal 0x15 013d 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c 013e e20e | | Load 0x1,0xe 013f e015 | | Load 0x0,0x15 0140 e016 | | Load 0x0,0x16 0141 4800 |H | Short_Literal 0x0 0142 0007 | | Action Break_Optional 0143 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 0144 00c7 | | Action Elaborate_Subprogram 0145 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 0146 00c7 | | Action Elaborate_Subprogram 0147 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call 0149 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 014a 00c7 | | Action Elaborate_Subprogram 014b BODY_0008: 014b 00bc | | Action Signal_Activated 014c 00bb | | Action Signal_Completion 014d 0000 0000 | | .XXX[0x3] 014f 0000 | | 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 00db | | Load_Top At_Offset_3 0154 e004 | | Load 0x0,0x4 0155 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0156 021f | | Execute Heap_Access,Equal 0157 681c |h | Jump_Zero 0x174 0158 e233 | 3 | Load 0x1,0x33 0159 0322 | " | Declare_Variable Record 015a e002 | | Load 0x0,0x2 015b 180e | | Execute Package,Field_Execute,Field_Number 0xe 015c 00d9 | | Load_Top At_Offset_1 015d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 015e 00db | | Load_Top At_Offset_3 015f 00d9 | | Load_Top At_Offset_1 0160 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0161 e5fc | | Load 0x2,-0x4 0162 00d9 | | Load_Top At_Offset_1 0163 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0164 e004 | | Load 0x0,0x4 0165 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0166 00d9 | | Load_Top At_Offset_1 0167 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0168 e5fd | | Load 0x2,-0x3 0169 e233 | 3 | Load 0x1,0x33 016a 3004 |0 | Execute Record,Field_Type,Field_Number 0x4 016b 0119 | | Execute Any,Check_In_Formal_Type 016c 00d9 | | Load_Top At_Offset_1 016d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 016e e20d | | Load 0x1,0xd 016f e017 | | Load 0x0,0x17 0170 180d | | Execute Package,Field_Execute,Field_Number 0xd 0171 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0172 a5fb | | Store_Unchecked 0x2,-0x5 0173 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0174 e233 | 3 | Load 0x1,0x33 0175 0322 | " | Declare_Variable Record 0176 e002 | | Load 0x0,0x2 0177 180e | | Execute Package,Field_Execute,Field_Number 0xe 0178 00d9 | | Load_Top At_Offset_1 0179 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 017a 00db | | Load_Top At_Offset_3 017b 00d9 | | Load_Top At_Offset_1 017c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 017d e5fc | | Load 0x2,-0x4 017e 00d9 | | Load_Top At_Offset_1 017f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0180 e5fe | | Load 0x2,-0x2 0181 e004 | | Load 0x0,0x4 0182 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0183 00d9 | | Load_Top At_Offset_1 0184 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0185 e5fd | | Load 0x2,-0x3 0186 e233 | 3 | Load 0x1,0x33 0187 3004 |0 | Execute Record,Field_Type,Field_Number 0x4 0188 0119 | | Execute Any,Check_In_Formal_Type 0189 00d9 | | Load_Top At_Offset_1 018a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 018b e20d | | Load 0x1,0xd 018c e017 | | Load 0x0,0x17 018d 180d | | Execute Package,Field_Execute,Field_Number 0xd 018e 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 018f a5fb | | Store_Unchecked 0x2,-0x5 0190 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0191 0000 0000 | | .BLANK 0000[0x7] 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 e233 | 3 | Load 0x1,0x33 019c 0322 | " | Declare_Variable Record 019d e002 | | Load 0x0,0x2 019e 180e | | Execute Package,Field_Execute,Field_Number 0xe 019f 00d9 | | Load_Top At_Offset_1 01a0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01a1 00db | | Load_Top At_Offset_3 01a2 00d9 | | Load_Top At_Offset_1 01a3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01a4 e5fc | | Load 0x2,-0x4 01a5 00d9 | | Load_Top At_Offset_1 01a6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01a7 e5fe | | Load 0x2,-0x2 01a8 e004 | | Load 0x0,0x4 01a9 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 01aa 00d9 | | Load_Top At_Offset_1 01ab 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01ac e5fd | | Load 0x2,-0x3 01ad e233 | 3 | Load 0x1,0x33 01ae 3004 |0 | Execute Record,Field_Type,Field_Number 0x4 01af 0119 | | Execute Any,Check_In_Formal_Type 01b0 00d9 | | Load_Top At_Offset_1 01b1 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 01b2 e20d | | Load 0x1,0xd 01b3 e017 | | Load 0x0,0x17 01b4 180d | | Execute Package,Field_Execute,Field_Number 0xd 01b5 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 01b6 a5fb | | Store_Unchecked 0x2,-0x5 01b7 4505 |E | Exit_Suprogram New_Top_Offset 0x5 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 00db | | Load_Top At_Offset_3 01bc 00db | | Load_Top At_Offset_3 01bd 0217 | | Execute Heap_Access,All_Reference 01be 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01bf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 00db | | Load_Top At_Offset_3 01c4 e004 | | Load 0x0,0x4 01c5 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 01c6 00db | | Load_Top At_Offset_3 01c7 0217 | | Execute Heap_Access,All_Reference 01c8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01c9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01ca 0000 0000 | | .BLANK 0000[0x6] 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 0217 | | Execute Heap_Access,All_Reference 01d5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d7 0000 | | .XXX[0x1] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00db | | Load_Top At_Offset_3 01dc 00d8 | | Load_Top At_Offset_0 01dd 00e4 | | Load_Encached Positive_Cache 01de 0260 | ` | Execute Discrete,In_Type 01df 7001 |p | Jump_Nonzero 0x1e1 01e0 0801 | | Execute_Immediate Raise,0x1 01e1 00db | | Load_Top At_Offset_3 01e2 0217 | | Execute Heap_Access,All_Reference 01e3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 01e4 e004 | | Load 0x0,0x4 01e5 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 01e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01e7 0000 | | .XXX[0x1] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 00db | | Load_Top At_Offset_3 01ec 00d8 | | Load_Top At_Offset_0 01ed 00e4 | | Load_Encached Positive_Cache 01ee 0260 | ` | Execute Discrete,In_Type 01ef 7001 |p | Jump_Nonzero 0x1f1 01f0 0801 | | Execute_Immediate Raise,0x1 01f1 00db | | Load_Top At_Offset_3 01f2 0217 | | Execute Heap_Access,All_Reference 01f3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 01f4 e004 | | Load 0x0,0x4 01f5 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 01f6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01f7 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 01fc 0217 | | Execute Heap_Access,All_Reference 01fd 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 01fe e004 | | Load 0x0,0x4 01ff 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0200 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0201 0000 0000 | | .BLANK 0000[0x7] 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 0217 | | Execute Heap_Access,All_Reference 020d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 020e 00d8 | | Load_Top At_Offset_0 020f 0120 | | Execute Any,Is_Value 0210 7002 |p | Jump_Nonzero 0x213 0211 00d8 | | Load_Top At_Offset_0 0212 011e | | Execute Any,Convert 0213 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0214 0000 0000 | | .BLANK 0000[0x4] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b 00db | | Load_Top At_Offset_3 021c 00db | | Load_Top At_Offset_3 021d 0217 | | Execute Heap_Access,All_Reference 021e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 021f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 00da | | Load_Top At_Offset_2 0224 0217 | | Execute Heap_Access,All_Reference 0225 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0226 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0227 0000 | | .XXX[0x1] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b 00db | | Load_Top At_Offset_3 022c 00db | | Load_Top At_Offset_3 022d 0217 | | Execute Heap_Access,All_Reference 022e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 022f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 00da | | Load_Top At_Offset_2 0234 7006 |p | Jump_Nonzero 0x23b 0235 e004 | | Load 0x0,0x4 0236 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0237 6008 |` | Indirect_Literal Discrete,0x240,{0x00000000, 0x00001002} 0238 e002 | | Load 0x0,0x2 0239 1813 | | Execute Package,Field_Execute,Field_Number 0x13 023a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 023b 00da | | Load_Top At_Offset_2 023c 0217 | | Execute Heap_Access,All_Reference 023d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 023e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 023f 0000 | | .XXX[0x1] 0240 0000 0000 | | .LITERAL {0x00000000, 0x00001002} 0244 0000 0000 | | .BLANK 0000[0x4] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 00db | | Load_Top At_Offset_3 024c 00db | | Load_Top At_Offset_3 024d 0217 | | Execute Heap_Access,All_Reference 024e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 024f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 4800 |H | Short_Literal 0x0 0254 00db | | Load_Top At_Offset_3 0255 0217 | | Execute Heap_Access,All_Reference 0256 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0257 e002 | | Load 0x0,0x2 0258 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0259 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 025a 0000 0000 | | .BLANK 0000[0x6] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 00da | | Load_Top At_Offset_2 0264 0217 | | Execute Heap_Access,All_Reference 0265 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0266 e002 | | Load 0x0,0x2 0267 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0268 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0269 0000 0000 | | .BLANK 0000[0x7] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 00da | | Load_Top At_Offset_2 0274 e240 | @ | Load 0x1,0x40 0275 e241 | A | Load 0x1,0x41 0276 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 0277 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 0278 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 0279 e004 | | Load 0x0,0x4 027a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 027b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 027c 0000 0000 | | .BLANK 0000[0x4] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 00da | | Load_Top At_Offset_2 0284 e248 | H | Load 0x1,0x48 0285 e249 | I | Load 0x1,0x49 0286 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 0287 e24b | K | Load 0x1,0x4b 0288 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 0289 e004 | | Load 0x0,0x4 028a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 028b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 028c 0000 0000 | | .BLANK 0000[0x4] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 00da | | Load_Top At_Offset_2 0294 0217 | | Execute Heap_Access,All_Reference 0295 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0296 e001 | | Load 0x0,0x1 0297 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0298 011c | | Execute Any,Convert_Unchecked 0299 1c01 | | Execute_Immediate Run_Utility,0x1 029a 6009 |` | Indirect_Literal Discrete,0x2a4,{0x00000000, 0x7fffffff} 029b 0092 04ea | | Action Push_String_Extended,0x4ea ; ", " 029d e5ff | | Load 0x2,-0x1 029e 0217 | | Execute Heap_Access,All_Reference 029f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 02a0 e004 | | Load 0x0,0x4 02a1 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 02a2 01cc | | Execute Vector,Catenate 02a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 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 e234 | 4 | Load 0x1,0x34 02ac 0322 | " | Declare_Variable Record 02ad e002 | | Load 0x0,0x2 02ae 180e | | Execute Package,Field_Execute,Field_Number 0xe 02af 00d9 | | Load_Top At_Offset_1 02b0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02b1 e237 | 7 | Load 0x1,0x37 02b2 00d9 | | Load_Top At_Offset_1 02b3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02b4 e237 | 7 | Load 0x1,0x37 02b5 00d9 | | Load_Top At_Offset_1 02b6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02b7 4800 |H | Short_Literal 0x0 02b8 00d9 | | Load_Top At_Offset_1 02b9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02ba e20e | | Load 0x1,0xe 02bb e017 | | Load 0x0,0x17 02bc 180d | | Execute Package,Field_Execute,Field_Number 0xd 02bd 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 02be 00ca | | Action Exit_Nullary_Function 02bf 0000 | | .XXX[0x1] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 00da | | Load_Top At_Offset_2 02c4 6805 |h | Jump_Zero 0x2ca 02c5 00da | | Load_Top At_Offset_2 02c6 0217 | | Execute Heap_Access,All_Reference 02c7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02c8 0f00 | | Execute_Immediate Equal,0x0 02c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ca 4801 |H | Short_Literal 0x1 02cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02cc 0000 0000 | | .BLANK 0000[0x4] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 00da | | Load_Top At_Offset_2 02d4 680a |h | Jump_Zero 0x2df 02d5 e002 | | Load 0x0,0x2 02d6 180e | | Execute Package,Field_Execute,Field_Number 0xe 02d7 00db | | Load_Top At_Offset_3 02d8 0217 | | Execute Heap_Access,All_Reference 02d9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02da 4800 |H | Short_Literal 0x0 02db 00db | | Load_Top At_Offset_3 02dc 0217 | | Execute Heap_Access,All_Reference 02dd 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02de 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02df 0092 04eb | | Action Push_String_Extended,0x4eb ; "Warning: Cannot make a null Script empty." 02e1 8239 | 9 | Call 0x1,0x39 02e2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02e3 0000 0000 | | .BLANK 0000[0x5] 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 00da | | Load_Top At_Offset_2 02ec 0217 | | Execute Heap_Access,All_Reference 02ed 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02ee 00d8 | | Load_Top At_Offset_0 02ef 00e3 | | Load_Encached Natural_Cache 02f0 0260 | ` | Execute Discrete,In_Type 02f1 7001 |p | Jump_Nonzero 0x2f3 02f2 0801 | | Execute_Immediate Raise,0x1 02f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f4 0000 0000 | | .BLANK 0000[0x4] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fd | | .CONST 0x02fd ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0002 | | .CONST 0x0002 ; Number of locals 02fb INIT_02f8: 02fb e237 | 7 | Load 0x1,0x37 02fc 0007 | | Action Break_Optional 02fd BODY_02f8: 02fd e5fe | | Load 0x2,-0x2 02fe 6833 |h3 | Jump_Zero 0x332 02ff e002 | | Load 0x0,0x2 0300 180e | | Execute Package,Field_Execute,Field_Number 0xe 0301 e5fe | | Load 0x2,-0x2 0302 0217 | | Execute Heap_Access,All_Reference 0303 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0304 e236 | 6 | Load 0x1,0x36 0305 0322 | " | Declare_Variable Record 0306 e5fe | | Load 0x2,-0x2 0307 0217 | | Execute Heap_Access,All_Reference 0308 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0309 00d9 | | Load_Top At_Offset_1 030a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 030b e237 | 7 | Load 0x1,0x37 030c 00d9 | | Load_Top At_Offset_1 030d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 030e e5ff | | Load 0x2,-0x1 030f 00d9 | | Load_Top At_Offset_1 0310 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0311 e237 | 7 | Load 0x1,0x37 0312 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0313 0039 | 9 | Store_Top Access,At_Offset_1 0314 00d8 | | Load_Top At_Offset_0 0315 0227 | ' | Execute Access,All_Reference 0316 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0317 6806 |h | Jump_Zero 0x31e 0318 00d8 | | Load_Top At_Offset_0 0319 00d9 | | Load_Top At_Offset_1 031a 0227 | ' | Execute Access,All_Reference 031b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 031c 0227 | ' | Execute Access,All_Reference 031d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 031e 00d8 | | Load_Top At_Offset_0 031f e5fe | | Load 0x2,-0x2 0320 0217 | | Execute Heap_Access,All_Reference 0321 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0322 e5fe | | Load 0x2,-0x2 0323 0217 | | Execute Heap_Access,All_Reference 0324 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0325 7004 |p | Jump_Nonzero 0x32a 0326 00d8 | | Load_Top At_Offset_0 0327 e5fe | | Load 0x2,-0x2 0328 0217 | | Execute Heap_Access,All_Reference 0329 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 032a e5fe | | Load 0x2,-0x2 032b 0217 | | Execute Heap_Access,All_Reference 032c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 032d 0a01 | | Execute_Immediate Plus,0x1 032e e5fe | | Load 0x2,-0x2 032f 0217 | | Execute Heap_Access,All_Reference 0330 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0331 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0332 0092 04ec | | Action Push_String_Extended,0x4ec ; "Warning: Step cannot be added to a null Script." 0334 8239 | 9 | Call 0x1,0x39 0335 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0336 0000 0000 | | .XXX[0x2] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033d | = | .CONST 0x033d ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0002 | | .CONST 0x0002 ; Number of locals 033b INIT_0338: 033b e20d | | Load 0x1,0xd 033c 0007 | | Action Break_Optional 033d BODY_0338: 033d e20d | | Load 0x1,0xd 033e e5fb | | Load 0x2,-0x5 033f e5fc | | Load 0x2,-0x4 0340 e5fd | | Load 0x2,-0x3 0341 e5fe | | Load 0x2,-0x2 0342 8213 | | Call 0x1,0x13 0343 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0344 00db | | Load_Top At_Offset_3 0345 00d9 | | Load_Top At_Offset_1 0346 8229 | ) | Call 0x1,0x29 0347 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 034d | M | .CONST 0x034d ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0002 | | .CONST 0x0002 ; Number of locals 034b INIT_0348: 034b e237 | 7 | Load 0x1,0x37 034c 0007 | | Action Break_Optional 034d BODY_0348: 034d e5fe | | Load 0x2,-0x2 034e 686d |hm | Jump_Zero 0x3bc 034f e002 | | Load 0x0,0x2 0350 180e | | Execute Package,Field_Execute,Field_Number 0xe 0351 e5fe | | Load 0x2,-0x2 0352 0217 | | Execute Heap_Access,All_Reference 0353 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0354 e5fe | | Load 0x2,-0x2 0355 0217 | | Execute Heap_Access,All_Reference 0356 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0357 0039 | 9 | Store_Top Access,At_Offset_1 0358 00cf | | Action Mark_Auxiliary 0359 7843 |xC | Jump 0x39d 035a 00d9 | | Load_Top At_Offset_1 035b 0227 | ' | Execute Access,All_Reference 035c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 035d e5ff | | Load 0x2,-0x1 035e 021f | | Execute Heap_Access,Equal 035f 6838 |h8 | Jump_Zero 0x398 0360 00d9 | | Load_Top At_Offset_1 0361 0227 | ' | Execute Access,All_Reference 0362 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0363 6808 |h | Jump_Zero 0x36c 0364 00d9 | | Load_Top At_Offset_1 0365 0227 | ' | Execute Access,All_Reference 0366 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0367 00da | | Load_Top At_Offset_2 0368 0227 | ' | Execute Access,All_Reference 0369 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 036a 0227 | ' | Execute Access,All_Reference 036b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 036c 00d9 | | Load_Top At_Offset_1 036d 0227 | ' | Execute Access,All_Reference 036e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 036f 6808 |h | Jump_Zero 0x378 0370 00d9 | | Load_Top At_Offset_1 0371 0227 | ' | Execute Access,All_Reference 0372 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0373 00da | | Load_Top At_Offset_2 0374 0227 | ' | Execute Access,All_Reference 0375 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0376 0227 | ' | Execute Access,All_Reference 0377 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0378 00d9 | | Load_Top At_Offset_1 0379 e5fe | | Load 0x2,-0x2 037a 0217 | | Execute Heap_Access,All_Reference 037b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 037c 022f | / | Execute Access,Equal 037d 6806 |h | Jump_Zero 0x384 037e 00d9 | | Load_Top At_Offset_1 037f 0227 | ' | Execute Access,All_Reference 0380 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0381 e5fe | | Load 0x2,-0x2 0382 0217 | | Execute Heap_Access,All_Reference 0383 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0384 00d9 | | Load_Top At_Offset_1 0385 e5fe | | Load 0x2,-0x2 0386 0217 | | Execute Heap_Access,All_Reference 0387 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0388 022f | / | Execute Access,Equal 0389 6806 |h | Jump_Zero 0x390 038a 00d9 | | Load_Top At_Offset_1 038b 0227 | ' | Execute Access,All_Reference 038c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 038d e5fe | | Load 0x2,-0x2 038e 0217 | | Execute Heap_Access,All_Reference 038f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0390 e5fe | | Load 0x2,-0x2 0391 0217 | | Execute Heap_Access,All_Reference 0392 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0393 0aff | | Execute_Immediate Plus,-0x1 0394 e5fe | | Load 0x2,-0x2 0395 0217 | | Execute Heap_Access,All_Reference 0396 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0397 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0398 00d9 | | Load_Top At_Offset_1 0399 0227 | ' | Execute Access,All_Reference 039a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 039b 003a | : | Store_Top Access,At_Offset_2 039c 00c9 | | Action Pop_Auxiliary_Loop 039d 00d9 | | Load_Top At_Offset_1 039e 77bb |w | Jump_Nonzero 0x35a 039f 00ce | | Action Pop_Auxiliary 03a0 4801 |H | Short_Literal 0x1 03a1 4802 |H | Short_Literal 0x2 03a2 e004 | | Load 0x0,0x4 03a3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03a4 035b | [ | Declare_Type Array,Constrained 03a5 0337 | 7 | Declare_Variable Array 03a6 e5fe | | Load 0x2,-0x2 03a7 8230 | 0 | Call 0x1,0x30 03a8 4801 |H | Short_Literal 0x1 03a9 00da | | Load_Top At_Offset_2 03aa 01d6 | | Execute Vector,Field_Write 03ab e5ff | | Load 0x2,-0x1 03ac 8222 | " | Call 0x1,0x22 03ad 4802 |H | Short_Literal 0x2 03ae 00da | | Load_Top At_Offset_2 03af 01d6 | | Execute Vector,Field_Write 03b0 600f |` | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00001003} 03b1 e002 | | Load 0x0,0x2 03b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03b3 e5fe | | Load 0x2,-0x2 03b4 0217 | | Execute Heap_Access,All_Reference 03b5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03b6 e5fe | | Load 0x2,-0x2 03b7 0217 | | Execute Heap_Access,All_Reference 03b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03b9 e002 | | Load 0x0,0x2 03ba 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03bc 0092 04ed | | Action Push_String_Extended,0x4ed ; "Warning: Cannot remove a step from a null Script." 03be 8239 | 9 | Call 0x1,0x39 03bf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03c0 0000 0000 | | .LITERAL {0x00000000, 0x00001003} 03c4 0000 0000 | | .BLANK 0000[0x4] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cd | | .CONST 0x03cd ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0002 | | .CONST 0x0002 ; Number of locals 03cb INIT_03c8: 03cb 029f 04c3 | | Declare_Subprogram INIT_04c0,For_Call 03cd BODY_03c8: 03cd 00db | | Load_Top At_Offset_3 03ce 8226 | & | Call 0x1,0x26 03cf 6802 |h | Jump_Zero 0x3d2 03d0 e238 | 8 | Load 0x1,0x38 03d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03d2 8402 | | Call 0x2,0x2 03d3 e238 | 8 | Load 0x1,0x38 03d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03d5 0000 0000 | | .XXX[0x3] 03d7 0000 | | 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 00da | | Load_Top At_Offset_2 03dc 7006 |p | Jump_Nonzero 0x3e3 03dd e004 | | Load 0x0,0x4 03de 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03df 6008 |` | Indirect_Literal Discrete,0x3e8,{0x00000000, 0x00001001} 03e0 e002 | | Load 0x0,0x2 03e1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03e3 00da | | Load_Top At_Offset_2 03e4 0217 | | Execute Heap_Access,All_Reference 03e5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03e7 0000 | | .XXX[0x1] 03e8 0000 0000 | | .LITERAL {0x00000000, 0x00001001} 03ec 0000 0000 | | .BLANK 0000[0x4] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 6805 |h | Jump_Zero 0x3fa 03f5 00db | | Load_Top At_Offset_3 03f6 00db | | Load_Top At_Offset_3 03f7 0217 | | Execute Heap_Access,All_Reference 03f8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03f9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03fa 0092 04ee | | Action Push_String_Extended,0x4ee ; "Warning: Cannot set a Condition for a null Script." 03fc 8239 | 9 | Call 0x1,0x39 03fd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03fe 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 0404 6807 |h | Jump_Zero 0x40c 0405 4800 |H | Short_Literal 0x0 0406 00db | | Load_Top At_Offset_3 0407 0217 | | Execute Heap_Access,All_Reference 0408 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0409 e002 | | Load 0x0,0x2 040a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 040b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 040c 4800 |H | Short_Literal 0x0 040d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 040e 0000 0000 | | .XXX[0x2] 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0413 | | .CONST 0x0413 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0001 | | .CONST 0x0001 ; Number of locals 0413 BODY_0410: 0413 INIT_0410: 0413 00da | | Load_Top At_Offset_2 0414 0217 | | Execute Heap_Access,All_Reference 0415 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0416 e002 | | Load 0x0,0x2 0417 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0418 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0419 0000 0000 | | .BLANK 0000[0x7] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0423 | # | .CONST 0x0423 ; Address of begin 0421 0004 | | .CONST 0x0004 ; Address of exception handler 0422 0001 | | .CONST 0x0001 ; Number of locals 0423 BODY_0420: 0423 INIT_0420: 0423 00da | | Load_Top At_Offset_2 0424 e255 | U | Load 0x1,0x55 0425 e256 | V | Load 0x1,0x56 0426 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 0427 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 0428 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 0429 e004 | | Load 0x0,0x4 042a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 042b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 042c 0000 0000 | | .BLANK 0000[0x4] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0433 | 3 | .CONST 0x0433 ; Address of begin 0431 0004 | | .CONST 0x0004 ; Address of exception handler 0432 0001 | | .CONST 0x0001 ; Number of locals 0433 BODY_0430: 0433 INIT_0430: 0433 00da | | Load_Top At_Offset_2 0434 e25d | ] | Load 0x1,0x5d 0435 e25e | ^ | Load 0x1,0x5e 0436 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 0437 e260 | ` | Load 0x1,0x60 0438 1d61 | a | Execute_Immediate Reference_Lex_1,0x61 0439 e004 | | Load 0x0,0x4 043a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 043b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 043c 0000 0000 | | .BLANK 0000[0x4] 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0443 | C | .CONST 0x0443 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0001 | | .CONST 0x0001 ; Number of locals 0443 BODY_0440: 0443 INIT_0440: 0443 00da | | Load_Top At_Offset_2 0444 7003 |p | Jump_Nonzero 0x448 0445 0092 04ef | | Action Push_String_Extended,0x4ef ; "<>" 0447 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0448 00da | | Load_Top At_Offset_2 0449 0217 | | Execute Heap_Access,All_Reference 044a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 044b 8264 | d | Call 0x1,0x64 044c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 044d 0000 0000 | | .XXX[0x3] 044f 0000 | | 0450 ; -------------------------------------------------------------------------------------- 0450 ; SUBPROGRAM 0450 ; -------------------------------------------------------------------------------------- 0450 0453 | S | .CONST 0x0453 ; Address of begin 0451 0004 | | .CONST 0x0004 ; Address of exception handler 0452 0001 | | .CONST 0x0001 ; Number of locals 0453 BODY_0450: 0453 INIT_0450: 0453 4608 |F | Jump_Case 0x9 0454 7808 |x | Jump 0x45d ; case 0x0 0455 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0456 780d |x | Jump 0x464 ; case 0x2 0457 780c |x | Jump 0x464 ; case 0x3 0458 780b |x | Jump 0x464 ; case 0x4 0459 780a |x | Jump 0x464 ; case 0x5 045a 7809 |x | Jump 0x464 ; case 0x6 045b 7808 |x | Jump 0x464 ; case 0x7 045c 7807 |x | Jump 0x464 ; case 0x8 045d 00da | | Load_Top At_Offset_2 045e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 045f 0125 | % | Execute Any,Set_Constraint 0460 00da | | Load_Top At_Offset_2 0461 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0462 1c00 | | Execute_Immediate Run_Utility,0x0 0463 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0464 0869 | i | Execute_Immediate Raise,0x69 0465 0000 0000 | | .XXX[0x3] 0467 0000 | | 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 046b | k | .CONST 0x046b ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0001 | | .CONST 0x0001 ; Number of locals 046b BODY_0468: 046b INIT_0468: 046b e018 | | Load 0x0,0x18 046c 180e | | Execute Package,Field_Execute,Field_Number 0xe 046d 00db | | Load_Top At_Offset_3 046e 4801 |H | Short_Literal 0x1 046f 6004 |` | Indirect_Literal Discrete,0x474,{0x00000000, 0x00005802} 0470 e002 | | Load 0x0,0x2 0471 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 0472 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0473 0000 | | .XXX[0x1] 0474 0000 0000 | | .LITERAL {0x00000000, 0x00005802} 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 0004 | | .CONST 0x0004 ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b 00db | | Load_Top At_Offset_3 047c e019 | | Load 0x0,0x19 047d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 047e 00d9 | | Load_Top At_Offset_1 047f 00d0 | | Action Swap_Control 0480 0260 | ` | Execute Discrete,In_Type 0481 7001 |p | Jump_Nonzero 0x483 0482 0801 | | Execute_Immediate Raise,0x1 0483 00db | | Load_Top At_Offset_3 0484 e23b | ; | Load 0x1,0x3b 0485 e23c | < | Load 0x1,0x3c 0486 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 0487 e008 | | Load 0x0,0x8 0488 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0489 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 048a 0000 0000 | | .BLANK 0000[0x6] 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 0493 | | .CONST 0x0493 ; Address of begin 0491 0004 | | .CONST 0x0004 ; Address of exception handler 0492 0001 | | .CONST 0x0001 ; Number of locals 0493 BODY_0490: 0493 INIT_0490: 0493 00db | | Load_Top At_Offset_3 0494 e019 | | Load 0x0,0x19 0495 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0496 00d9 | | Load_Top At_Offset_1 0497 00d0 | | Action Swap_Control 0498 0260 | ` | Execute Discrete,In_Type 0499 7001 |p | Jump_Nonzero 0x49b 049a 0801 | | Execute_Immediate Raise,0x1 049b 00db | | Load_Top At_Offset_3 049c e250 | P | Load 0x1,0x50 049d e251 | Q | Load 0x1,0x51 049e 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 049f e008 | | Load 0x0,0x8 04a0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04a1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04a2 0000 0000 | | .BLANK 0000[0x6] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab 00da | | Load_Top At_Offset_2 04ac 7002 |p | Jump_Nonzero 0x4af 04ad 00ea | | Load_Encached Null_String_Cache 04ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04af 480a |H | Short_Literal 0xa 04b0 00db | | Load_Top At_Offset_3 04b1 0227 | ' | Execute Access,All_Reference 04b2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04b3 8224 | $ | Call 0x1,0x24 04b4 01cb | | Execute Vector,Append 04b5 00db | | Load_Top At_Offset_3 04b6 0227 | ' | Execute Access,All_Reference 04b7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b8 8264 | d | Call 0x1,0x64 04b9 01cc | | Execute Vector,Catenate 04ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04bb 0000 0000 | | .BLANK 0000[0x5] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04ce | | .CONST 0x04ce ; Address of begin 04c1 0004 | | .CONST 0x0004 ; Address of exception handler 04c2 0003 | | .CONST 0x0003 ; Number of locals 04c3 INIT_04c0: 04c3 4801 |H | Short_Literal 0x1 04c4 e5ff | | Load 0x2,-0x1 04c5 0217 | | Execute Heap_Access,All_Reference 04c6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 04c7 e20f | | Load 0x1,0xf 04c8 035b | [ | Declare_Type Array,Constrained 04c9 0337 | 7 | Declare_Variable Array 04ca e5ff | | Load 0x2,-0x1 04cb 0217 | | Execute Heap_Access,All_Reference 04cc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04cd 0007 | | Action Break_Optional 04ce BODY_04c0: 04ce e002 | | Load 0x0,0x2 04cf 180e | | Execute Package,Field_Execute,Field_Number 0xe 04d0 e5ff | | Load 0x2,-0x1 04d1 0217 | | Execute Heap_Access,All_Reference 04d2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04d3 00cf | | Action Mark_Auxiliary 04d4 00da | | Load_Top At_Offset_2 04d5 01d9 | | Execute Vector,Reverse_Bounds 04d6 0263 | c | Execute Discrete,Above_Bound 04d7 700c |p | Jump_Nonzero 0x4e4 04d8 00db | | Load_Top At_Offset_3 04d9 0227 | ' | Execute Access,All_Reference 04da 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04db 00d9 | | Load_Top At_Offset_1 04dc e602 | | Load 0x3,0x2 04dd 01d6 | | Execute Vector,Field_Write 04de 00db | | Load_Top At_Offset_3 04df 0227 | ' | Execute Access,All_Reference 04e0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04e1 a603 | | Store_Unchecked 0x3,0x3 04e2 00c8 | | Action Pop_Auxiliary_Range 04e3 3ff4 |? | Loop_Increasing 0x4d8 04e4 00ce | | Action Pop_Auxiliary 04e5 00d9 | | Load_Top At_Offset_1 04e6 e20f | | Load 0x1,0xf 04e7 01c6 | | Execute Vector,Convert_To_Formal 04e8 00cb | | Action Pop_Block_With_Result 04e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04ea ; -------------------------------------------------------------------------------------- 04ea ; STRING TABLE 04ea ; -------------------------------------------------------------------------------------- 04ea 000e | | .STRTAB 0x000e->0x04f1 ; ", " 04eb 000e | | .STRTAB 0x000e->0x04f2 ; "Warning: Cannot make a null Script empty." 04ec 0035 | 5 | .STRTAB 0x0035->0x0506 ; "Warning: Step cannot be added to a null Script." 04ed 0062 | b | .STRTAB 0x0062->0x051e ; "Warning: Cannot remove a step from a null Script." 04ee 0091 | | .STRTAB 0x0091->0x0536 ; "Warning: Cannot set a Condition for a null Script." 04ef 00c1 | | .STRTAB 0x00c1->0x054f ; "<>" 04f0 00c1 | | .STREND 0x00c1->0x0550 04f1 2c20 5761 |, Wa| .STRTAB_STRINGS 0551 0000 0000 | | .BLANK 0000[0x7] 0558 ; -------------------------------------------------------------------------------------- 0558 ; Debug Table 0558 ; -------------------------------------------------------------------------------------- 0558 0004 000d | | .DEBUG4 0x0004,0x000d,0xd8fa,0x0000,0x0001,0x0000 055e 0000 0000 | | .BLANK 0000[0xa2]