|
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_6a18da
└─⟦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 0550 | P | .CONST 0x0550 ; 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 014a | J | .CONST 0x014a ; 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 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 003c 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 003e 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0040 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 0042 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 0044 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 0046 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 0048 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 004a 029a 02f3 | | Declare_Subprogram INIT_02f0,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 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated 005a c235 | 5 | Store 0x1,0x35 005b 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated 005d c22a | * | Store 0x1,0x2a 005e 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 0060 c22b | + | Store 0x1,0x2b 0061 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated 0063 c22c | , | Store 0x1,0x2c 0064 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated 0066 c22d | - | Store 0x1,0x2d 0067 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated 0069 c22e | . | Store 0x1,0x2e 006a 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated 006c c22f | / | Store 0x1,0x2f 006d 029a 041b | | Declare_Subprogram INIT_0418,For_Outer_Call,Visible,Unelaborated 006f c230 | 0 | Store 0x1,0x30 0070 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 0072 c231 | 1 | Store 0x1,0x31 0073 029a 043b | ;| Declare_Subprogram INIT_0438,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 044b | K| Declare_Subprogram INIT_0448,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 0334 | 4 | Declare_Variable Array,With_Constraint 00aa 029d 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call 00ac 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00ad 00c7 | | Action Elaborate_Subprogram 00ae 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00af 00c7 | | Action Elaborate_Subprogram 00b0 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00b1 00c7 | | Action Elaborate_Subprogram 00b2 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00b3 00c7 | | Action Elaborate_Subprogram 00b4 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00b5 00c7 | | Action Elaborate_Subprogram 00b6 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00b7 00c7 | | Action Elaborate_Subprogram 00b8 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00bb 00c7 | | Action Elaborate_Subprogram 00bc 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00bd 00c7 | | Action Elaborate_Subprogram 00be 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00bf 00c7 | | Action Elaborate_Subprogram 00c0 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00c1 00c7 | | Action Elaborate_Subprogram 00c2 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00c3 00c7 | | Action Elaborate_Subprogram 00c4 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00c5 00c7 | | Action Elaborate_Subprogram 00c6 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00c7 00c7 | | Action Elaborate_Subprogram 00c8 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00c9 00c7 | | Action Elaborate_Subprogram 00ca 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00cb 00c7 | | Action Elaborate_Subprogram 00cc e006 | | Load 0x0,0x6 00cd e007 | | Load 0x0,0x7 00ce e233 | 3 | Load 0x1,0x33 00cf e20d | | Load 0x1,0xd 00d0 e008 | | Load 0x0,0x8 00d1 1b18 | | Execute Package,Field_Read,Field_Number 0x18 00d2 0387 | | Declare_Variable Package 00d3 00d8 | | Load_Top At_Offset_0 00d4 020f | | Execute Module,Activate 00d5 e008 | | Load 0x0,0x8 00d6 1919 | | Execute Package,Field_Reference,Field_Number 0x19 00d7 00c6 | | Action Check_Subprogram_Elaborated 00d8 e233 | 3 | Load 0x1,0x33 00d9 e20d | | Load 0x1,0xd 00da e009 | | Load 0x0,0x9 00db e00a | | Load 0x0,0xa 00dc 4800 |H | Short_Literal 0x0 00dd 0007 | | Action Break_Optional 00de e004 | | Load 0x0,0x4 00df 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 00e0 00c6 | | Action Check_Subprogram_Elaborated 00e1 e20d | | Load 0x1,0xd 00e2 4814 |H | Short_Literal 0x14 00e3 e23a | : | Load 0x1,0x3a 00e4 1911 | | Execute Package,Field_Reference,Field_Number 0x11 00e5 e23a | : | Load 0x1,0x3a 00e6 1912 | | Execute Package,Field_Reference,Field_Number 0x12 00e7 e00b | | Load 0x0,0xb 00e8 e00c | | Load 0x0,0xc 00e9 4800 |H | Short_Literal 0x0 00ea 0007 | | Action Break_Optional 00eb 029d 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call 00ed e004 | | Load 0x0,0x4 00ee 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 00ef 00c6 | | Action Check_Subprogram_Elaborated 00f0 e20d | | Load 0x1,0xd 00f1 4814 |H | Short_Literal 0x14 00f2 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 00f3 e20d | | Load 0x1,0xd 00f4 e00d | | Load 0x0,0xd 00f5 e00e | | Load 0x0,0xe 00f6 4800 |H | Short_Literal 0x0 00f7 0007 | | Action Break_Optional 00f8 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00f9 00c7 | | Action Elaborate_Subprogram 00fa 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00fb 00c7 | | Action Elaborate_Subprogram 00fc 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00fd 00c7 | | Action Elaborate_Subprogram 00fe 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00ff 00c7 | | Action Elaborate_Subprogram 0100 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0101 00c7 | | Action Elaborate_Subprogram 0102 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0103 00c7 | | Action Elaborate_Subprogram 0104 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0105 00c7 | | Action Elaborate_Subprogram 0106 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0107 00c7 | | Action Elaborate_Subprogram 0108 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0109 00c7 | | Action Elaborate_Subprogram 010a 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 010b 00c7 | | Action Elaborate_Subprogram 010c 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 010d 00c7 | | Action Elaborate_Subprogram 010e 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 010f 00c7 | | Action Elaborate_Subprogram 0110 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0111 00c7 | | Action Elaborate_Subprogram 0112 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0113 00c7 | | Action Elaborate_Subprogram 0114 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0115 00c7 | | Action Elaborate_Subprogram 0116 e00f | | Load 0x0,0xf 0117 e010 | | Load 0x0,0x10 0118 e234 | 4 | Load 0x1,0x34 0119 e20e | | Load 0x1,0xe 011a e008 | | Load 0x0,0x8 011b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 011c 0387 | | Declare_Variable Package 011d 00d8 | | Load_Top At_Offset_0 011e 020f | | Execute Module,Activate 011f e008 | | Load 0x0,0x8 0120 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0121 00c6 | | Action Check_Subprogram_Elaborated 0122 e234 | 4 | Load 0x1,0x34 0123 e20e | | Load 0x1,0xe 0124 e011 | | Load 0x0,0x11 0125 e012 | | Load 0x0,0x12 0126 4800 |H | Short_Literal 0x0 0127 0007 | | Action Break_Optional 0128 e004 | | Load 0x0,0x4 0129 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 012a 00c6 | | Action Check_Subprogram_Elaborated 012b e20e | | Load 0x1,0xe 012c 4815 |H | Short_Literal 0x15 012d e24f | O | Load 0x1,0x4f 012e 1911 | | Execute Package,Field_Reference,Field_Number 0x11 012f e24f | O | Load 0x1,0x4f 0130 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0131 e013 | | Load 0x0,0x13 0132 e014 | | Load 0x0,0x14 0133 4800 |H | Short_Literal 0x0 0134 0007 | | Action Break_Optional 0135 029d 048b | | Declare_Subprogram INIT_0488,For_Outer_Call 0137 e004 | | Load 0x0,0x4 0138 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 0139 00c6 | | Action Check_Subprogram_Elaborated 013a e20e | | Load 0x1,0xe 013b 4815 |H | Short_Literal 0x15 013c 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c 013d e20e | | Load 0x1,0xe 013e e015 | | Load 0x0,0x15 013f e016 | | Load 0x0,0x16 0140 4800 |H | Short_Literal 0x0 0141 0007 | | Action Break_Optional 0142 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 0143 00c7 | | Action Elaborate_Subprogram 0144 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 0145 00c7 | | Action Elaborate_Subprogram 0146 029d 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call 0148 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 0149 00c7 | | Action Elaborate_Subprogram 014a BODY_0008: 014a 00bc | | Action Signal_Activated 014b 00bb | | Action Signal_Completion 014c 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 0254 0217 | | Execute Heap_Access,All_Reference 0255 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0256 0f00 | | Execute_Immediate Equal,0x0 0257 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 00da | | Load_Top At_Offset_2 025c 0217 | | Execute Heap_Access,All_Reference 025d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 025e e002 | | Load 0x0,0x2 025f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0260 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0261 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 026c e240 | @ | Load 0x1,0x40 026d e241 | A | Load 0x1,0x41 026e 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 026f 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 0270 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 0271 e004 | | Load 0x0,0x4 0272 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 0273 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0274 0000 0000 | | .BLANK 0000[0x4] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b 00da | | Load_Top At_Offset_2 027c e248 | H | Load 0x1,0x48 027d e249 | I | Load 0x1,0x49 027e 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 027f e24b | K | Load 0x1,0x4b 0280 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 0281 e004 | | Load 0x0,0x4 0282 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0283 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0284 0000 0000 | | .BLANK 0000[0x4] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b 00da | | Load_Top At_Offset_2 028c 0217 | | Execute Heap_Access,All_Reference 028d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 028e e001 | | Load 0x0,0x1 028f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0290 011c | | Execute Any,Convert_Unchecked 0291 1c01 | | Execute_Immediate Run_Utility,0x1 0292 6009 |` | Indirect_Literal Discrete,0x29c,{0x00000000, 0x7fffffff} 0293 0092 04e2 | | Action Push_String_Extended,0x4e2 ; ", " 0295 e5ff | | Load 0x2,-0x1 0296 0217 | | Execute Heap_Access,All_Reference 0297 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0298 e004 | | Load 0x0,0x4 0299 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 029a 01cc | | Execute Vector,Catenate 029b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 029c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02a3 | | .CONST 0x02a3 ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0001 | | .CONST 0x0001 ; Number of locals 02a3 BODY_02a0: 02a3 INIT_02a0: 02a3 e234 | 4 | Load 0x1,0x34 02a4 0322 | " | Declare_Variable Record 02a5 e002 | | Load 0x0,0x2 02a6 180e | | Execute Package,Field_Execute,Field_Number 0xe 02a7 00d9 | | Load_Top At_Offset_1 02a8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02a9 e237 | 7 | Load 0x1,0x37 02aa 00d9 | | Load_Top At_Offset_1 02ab 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02ac e237 | 7 | Load 0x1,0x37 02ad 00d9 | | Load_Top At_Offset_1 02ae 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02af 4800 |H | Short_Literal 0x0 02b0 00d9 | | Load_Top At_Offset_1 02b1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02b2 e20e | | Load 0x1,0xe 02b3 e017 | | Load 0x0,0x17 02b4 180d | | Execute Package,Field_Execute,Field_Number 0xd 02b5 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 02b6 00ca | | Action Exit_Nullary_Function 02b7 0000 | | .XXX[0x1] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bb | | .CONST 0x02bb ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0001 | | .CONST 0x0001 ; Number of locals 02bb BODY_02b8: 02bb INIT_02b8: 02bb 00da | | Load_Top At_Offset_2 02bc 6805 |h | Jump_Zero 0x2c2 02bd 00da | | Load_Top At_Offset_2 02be 0217 | | Execute Heap_Access,All_Reference 02bf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02c0 0f00 | | Execute_Immediate Equal,0x0 02c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c2 4801 |H | Short_Literal 0x1 02c3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c4 0000 0000 | | .BLANK 0000[0x4] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 00da | | Load_Top At_Offset_2 02cc 680a |h | Jump_Zero 0x2d7 02cd e002 | | Load 0x0,0x2 02ce 180e | | Execute Package,Field_Execute,Field_Number 0xe 02cf 00db | | Load_Top At_Offset_3 02d0 0217 | | Execute Heap_Access,All_Reference 02d1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02d2 4800 |H | Short_Literal 0x0 02d3 00db | | Load_Top At_Offset_3 02d4 0217 | | Execute Heap_Access,All_Reference 02d5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02d6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02d7 0092 04e3 | | Action Push_String_Extended,0x4e3 ; "Warning: Cannot make a null Script empty." 02d9 8239 | 9 | Call 0x1,0x39 02da 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02db 0000 0000 | | .BLANK 0000[0x5] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 0217 | | Execute Heap_Access,All_Reference 02e5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02e6 00d8 | | Load_Top At_Offset_0 02e7 00e3 | | Load_Encached Natural_Cache 02e8 0260 | ` | Execute Discrete,In_Type 02e9 7001 |p | Jump_Nonzero 0x2eb 02ea 0801 | | Execute_Immediate Raise,0x1 02eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ec 0000 0000 | | .BLANK 0000[0x4] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f5 | | .CONST 0x02f5 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0002 | | .CONST 0x0002 ; Number of locals 02f3 INIT_02f0: 02f3 e237 | 7 | Load 0x1,0x37 02f4 0007 | | Action Break_Optional 02f5 BODY_02f0: 02f5 e5fe | | Load 0x2,-0x2 02f6 6833 |h3 | Jump_Zero 0x32a 02f7 e002 | | Load 0x0,0x2 02f8 180e | | Execute Package,Field_Execute,Field_Number 0xe 02f9 e5fe | | Load 0x2,-0x2 02fa 0217 | | Execute Heap_Access,All_Reference 02fb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02fc e236 | 6 | Load 0x1,0x36 02fd 0322 | " | Declare_Variable Record 02fe e5fe | | Load 0x2,-0x2 02ff 0217 | | Execute Heap_Access,All_Reference 0300 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0301 00d9 | | Load_Top At_Offset_1 0302 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0303 e237 | 7 | Load 0x1,0x37 0304 00d9 | | Load_Top At_Offset_1 0305 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0306 e5ff | | Load 0x2,-0x1 0307 00d9 | | Load_Top At_Offset_1 0308 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0309 e237 | 7 | Load 0x1,0x37 030a 03b6 | | Declare_Variable Access,By_Allocation,With_Value 030b 0039 | 9 | Store_Top Access,At_Offset_1 030c 00d8 | | Load_Top At_Offset_0 030d 0227 | ' | Execute Access,All_Reference 030e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 030f 6806 |h | Jump_Zero 0x316 0310 00d8 | | Load_Top At_Offset_0 0311 00d9 | | Load_Top At_Offset_1 0312 0227 | ' | Execute Access,All_Reference 0313 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0314 0227 | ' | Execute Access,All_Reference 0315 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0316 00d8 | | Load_Top At_Offset_0 0317 e5fe | | Load 0x2,-0x2 0318 0217 | | Execute Heap_Access,All_Reference 0319 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 031a e5fe | | Load 0x2,-0x2 031b 0217 | | Execute Heap_Access,All_Reference 031c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 031d 7004 |p | Jump_Nonzero 0x322 031e 00d8 | | Load_Top At_Offset_0 031f e5fe | | Load 0x2,-0x2 0320 0217 | | Execute Heap_Access,All_Reference 0321 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0322 e5fe | | Load 0x2,-0x2 0323 0217 | | Execute Heap_Access,All_Reference 0324 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0325 0a01 | | Execute_Immediate Plus,0x1 0326 e5fe | | Load 0x2,-0x2 0327 0217 | | Execute Heap_Access,All_Reference 0328 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0329 4503 |E | Exit_Suprogram New_Top_Offset 0x3 032a 0092 04e4 | | Action Push_String_Extended,0x4e4 ; "Warning: Step cannot be added to a null Script." 032c 8239 | 9 | Call 0x1,0x39 032d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 032e 0000 0000 | | .XXX[0x2] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0335 | 5 | .CONST 0x0335 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0002 | | .CONST 0x0002 ; Number of locals 0333 INIT_0330: 0333 e20d | | Load 0x1,0xd 0334 0007 | | Action Break_Optional 0335 BODY_0330: 0335 e20d | | Load 0x1,0xd 0336 e5fb | | Load 0x2,-0x5 0337 e5fc | | Load 0x2,-0x4 0338 e5fd | | Load 0x2,-0x3 0339 e5fe | | Load 0x2,-0x2 033a 8213 | | Call 0x1,0x13 033b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 033c 00db | | Load_Top At_Offset_3 033d 00d9 | | Load_Top At_Offset_1 033e 8229 | ) | Call 0x1,0x29 033f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0345 | E | .CONST 0x0345 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0002 | | .CONST 0x0002 ; Number of locals 0343 INIT_0340: 0343 e237 | 7 | Load 0x1,0x37 0344 0007 | | Action Break_Optional 0345 BODY_0340: 0345 e5fe | | Load 0x2,-0x2 0346 686c |hl | Jump_Zero 0x3b3 0347 e002 | | Load 0x0,0x2 0348 180e | | Execute Package,Field_Execute,Field_Number 0xe 0349 e5fe | | Load 0x2,-0x2 034a 0217 | | Execute Heap_Access,All_Reference 034b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 034c e5fe | | Load 0x2,-0x2 034d 0217 | | Execute Heap_Access,All_Reference 034e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 034f 0039 | 9 | Store_Top Access,At_Offset_1 0350 00cf | | Action Mark_Auxiliary 0351 7843 |xC | Jump 0x395 0352 00d9 | | Load_Top At_Offset_1 0353 0227 | ' | Execute Access,All_Reference 0354 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0355 e5ff | | Load 0x2,-0x1 0356 021f | | Execute Heap_Access,Equal 0357 6838 |h8 | Jump_Zero 0x390 0358 00d9 | | Load_Top At_Offset_1 0359 0227 | ' | Execute Access,All_Reference 035a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 035b 6808 |h | Jump_Zero 0x364 035c 00d9 | | Load_Top At_Offset_1 035d 0227 | ' | Execute Access,All_Reference 035e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 035f 00da | | Load_Top At_Offset_2 0360 0227 | ' | Execute Access,All_Reference 0361 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0362 0227 | ' | Execute Access,All_Reference 0363 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0364 00d9 | | Load_Top At_Offset_1 0365 0227 | ' | Execute Access,All_Reference 0366 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0367 6808 |h | Jump_Zero 0x370 0368 00d9 | | Load_Top At_Offset_1 0369 0227 | ' | Execute Access,All_Reference 036a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 036b 00da | | Load_Top At_Offset_2 036c 0227 | ' | Execute Access,All_Reference 036d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 036e 0227 | ' | Execute Access,All_Reference 036f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0370 00d9 | | Load_Top At_Offset_1 0371 e5fe | | Load 0x2,-0x2 0372 0217 | | Execute Heap_Access,All_Reference 0373 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0374 022f | / | Execute Access,Equal 0375 6806 |h | Jump_Zero 0x37c 0376 00d9 | | Load_Top At_Offset_1 0377 0227 | ' | Execute Access,All_Reference 0378 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0379 e5fe | | Load 0x2,-0x2 037a 0217 | | Execute Heap_Access,All_Reference 037b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 037c 00d9 | | Load_Top At_Offset_1 037d e5fe | | Load 0x2,-0x2 037e 0217 | | Execute Heap_Access,All_Reference 037f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0380 022f | / | Execute Access,Equal 0381 6806 |h | Jump_Zero 0x388 0382 00d9 | | Load_Top At_Offset_1 0383 0227 | ' | Execute Access,All_Reference 0384 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0385 e5fe | | Load 0x2,-0x2 0386 0217 | | Execute Heap_Access,All_Reference 0387 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0388 e5fe | | Load 0x2,-0x2 0389 0217 | | Execute Heap_Access,All_Reference 038a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 038b 0aff | | Execute_Immediate Plus,-0x1 038c e5fe | | Load 0x2,-0x2 038d 0217 | | Execute Heap_Access,All_Reference 038e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 038f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0390 00d9 | | Load_Top At_Offset_1 0391 0227 | ' | Execute Access,All_Reference 0392 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0393 003a | : | Store_Top Access,At_Offset_2 0394 00c9 | | Action Pop_Auxiliary_Loop 0395 00d9 | | Load_Top At_Offset_1 0396 77bb |w | Jump_Nonzero 0x352 0397 00ce | | Action Pop_Auxiliary 0398 4801 |H | Short_Literal 0x1 0399 4802 |H | Short_Literal 0x2 039a e004 | | Load 0x0,0x4 039b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 039c 0334 | 4 | Declare_Variable Array,With_Constraint 039d e5fe | | Load 0x2,-0x2 039e 8230 | 0 | Call 0x1,0x30 039f 4801 |H | Short_Literal 0x1 03a0 00da | | Load_Top At_Offset_2 03a1 01d6 | | Execute Vector,Field_Write 03a2 e5ff | | Load 0x2,-0x1 03a3 8222 | " | Call 0x1,0x22 03a4 4802 |H | Short_Literal 0x2 03a5 00da | | Load_Top At_Offset_2 03a6 01d6 | | Execute Vector,Field_Write 03a7 6010 |` | Indirect_Literal Discrete,0x3b8,{0x00000000, 0x00001003} 03a8 e002 | | Load 0x0,0x2 03a9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03aa e5fe | | Load 0x2,-0x2 03ab 0217 | | Execute Heap_Access,All_Reference 03ac 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03ad e5fe | | Load 0x2,-0x2 03ae 0217 | | Execute Heap_Access,All_Reference 03af 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03b0 e002 | | Load 0x0,0x2 03b1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03b2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03b3 0092 04e5 | | Action Push_String_Extended,0x4e5 ; "Warning: Cannot remove a step from a null Script." 03b5 8239 | 9 | Call 0x1,0x39 03b6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03b7 0000 | | .XXX[0x1] 03b8 0000 0000 | | .LITERAL {0x00000000, 0x00001003} 03bc 0000 0000 | | .BLANK 0000[0x4] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c5 | | .CONST 0x03c5 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0002 | | .CONST 0x0002 ; Number of locals 03c3 INIT_03c0: 03c3 029f 04bb | | Declare_Subprogram INIT_04b8,For_Call 03c5 BODY_03c0: 03c5 00db | | Load_Top At_Offset_3 03c6 8226 | & | Call 0x1,0x26 03c7 6802 |h | Jump_Zero 0x3ca 03c8 e238 | 8 | Load 0x1,0x38 03c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ca 8402 | | Call 0x2,0x2 03cb e238 | 8 | Load 0x1,0x38 03cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03cd 0000 0000 | | .XXX[0x3] 03cf 0000 | | 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03d3 | | .CONST 0x03d3 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0001 | | .CONST 0x0001 ; Number of locals 03d3 BODY_03d0: 03d3 INIT_03d0: 03d3 00da | | Load_Top At_Offset_2 03d4 7006 |p | Jump_Nonzero 0x3db 03d5 e004 | | Load 0x0,0x4 03d6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03d7 6008 |` | Indirect_Literal Discrete,0x3e0,{0x00000000, 0x00001001} 03d8 e002 | | Load 0x0,0x2 03d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03db 00da | | Load_Top At_Offset_2 03dc 0217 | | Execute Heap_Access,All_Reference 03dd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03df 0000 | | .XXX[0x1] 03e0 0000 0000 | | .LITERAL {0x00000000, 0x00001001} 03e4 0000 0000 | | .BLANK 0000[0x4] 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03eb | | .CONST 0x03eb ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0001 | | .CONST 0x0001 ; Number of locals 03eb BODY_03e8: 03eb INIT_03e8: 03eb 00da | | Load_Top At_Offset_2 03ec 6805 |h | Jump_Zero 0x3f2 03ed 00db | | Load_Top At_Offset_3 03ee 00db | | Load_Top At_Offset_3 03ef 0217 | | Execute Heap_Access,All_Reference 03f0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03f2 0092 04e6 | | Action Push_String_Extended,0x4e6 ; "Warning: Cannot set a Condition for a null Script." 03f4 8239 | 9 | Call 0x1,0x39 03f5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03f6 0000 0000 | | .XXX[0x2] 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 03fb | | .CONST 0x03fb ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0001 | | .CONST 0x0001 ; Number of locals 03fb BODY_03f8: 03fb INIT_03f8: 03fb 00da | | Load_Top At_Offset_2 03fc 6805 |h | Jump_Zero 0x402 03fd 00da | | Load_Top At_Offset_2 03fe 0217 | | Execute Heap_Access,All_Reference 03ff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0400 0f00 | | Execute_Immediate Equal,0x0 0401 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0402 4800 |H | Short_Literal 0x0 0403 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0404 0000 0000 | | .BLANK 0000[0x4] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 040b | | .CONST 0x040b ; Address of begin 0409 0004 | | .CONST 0x0004 ; Address of exception handler 040a 0001 | | .CONST 0x0001 ; Number of locals 040b BODY_0408: 040b INIT_0408: 040b 00da | | Load_Top At_Offset_2 040c 0217 | | Execute Heap_Access,All_Reference 040d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 040e e002 | | Load 0x0,0x2 040f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0410 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0411 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 041c e255 | U | Load 0x1,0x55 041d e256 | V | Load 0x1,0x56 041e 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 041f 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 0420 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 0421 e004 | | Load 0x0,0x4 0422 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 0423 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0424 0000 0000 | | .BLANK 0000[0x4] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b 00da | | Load_Top At_Offset_2 042c e25d | ] | Load 0x1,0x5d 042d e25e | ^ | Load 0x1,0x5e 042e 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 042f e260 | ` | Load 0x1,0x60 0430 1d61 | a | Execute_Immediate Reference_Lex_1,0x61 0431 e004 | | Load 0x0,0x4 0432 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0433 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0434 0000 0000 | | .BLANK 0000[0x4] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0001 | | .CONST 0x0001 ; Number of locals 043b BODY_0438: 043b INIT_0438: 043b 00da | | Load_Top At_Offset_2 043c 7003 |p | Jump_Nonzero 0x440 043d 0092 04e7 | | Action Push_String_Extended,0x4e7 ; "<>" 043f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0440 00da | | Load_Top At_Offset_2 0441 0217 | | Execute Heap_Access,All_Reference 0442 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0443 8264 | d | Call 0x1,0x64 0444 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0445 0000 0000 | | .XXX[0x3] 0447 0000 | | 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b 4608 |F | Jump_Case 0x9 044c 7808 |x | Jump 0x455 ; case 0x0 044d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 044e 780d |x | Jump 0x45c ; case 0x2 044f 780c |x | Jump 0x45c ; case 0x3 0450 780b |x | Jump 0x45c ; case 0x4 0451 780a |x | Jump 0x45c ; case 0x5 0452 7809 |x | Jump 0x45c ; case 0x6 0453 7808 |x | Jump 0x45c ; case 0x7 0454 7807 |x | Jump 0x45c ; case 0x8 0455 00da | | Load_Top At_Offset_2 0456 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0457 0125 | % | Execute Any,Set_Constraint 0458 00da | | Load_Top At_Offset_2 0459 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 045a 1c00 | | Execute_Immediate Run_Utility,0x0 045b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 045c 0869 | i | Execute_Immediate Raise,0x69 045d 0000 0000 | | .XXX[0x3] 045f 0000 | | 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0463 | c | .CONST 0x0463 ; Address of begin 0461 0004 | | .CONST 0x0004 ; Address of exception handler 0462 0001 | | .CONST 0x0001 ; Number of locals 0463 BODY_0460: 0463 INIT_0460: 0463 e018 | | Load 0x0,0x18 0464 180e | | Execute Package,Field_Execute,Field_Number 0xe 0465 00db | | Load_Top At_Offset_3 0466 4801 |H | Short_Literal 0x1 0467 6004 |` | Indirect_Literal Discrete,0x46c,{0x00000000, 0x00005802} 0468 e002 | | Load 0x0,0x2 0469 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 046a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 046b 0000 | | .XXX[0x1] 046c 0000 0000 | | .LITERAL {0x00000000, 0x00005802} 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 00db | | Load_Top At_Offset_3 0474 e019 | | Load 0x0,0x19 0475 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0476 00d9 | | Load_Top At_Offset_1 0477 00d0 | | Action Swap_Control 0478 0260 | ` | Execute Discrete,In_Type 0479 7001 |p | Jump_Nonzero 0x47b 047a 0801 | | Execute_Immediate Raise,0x1 047b 00db | | Load_Top At_Offset_3 047c e23b | ; | Load 0x1,0x3b 047d e23c | < | Load 0x1,0x3c 047e 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 047f e008 | | Load 0x0,0x8 0480 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0481 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0482 0000 0000 | | .BLANK 0000[0x6] 0488 ; -------------------------------------------------------------------------------------- 0488 ; SUBPROGRAM 0488 ; -------------------------------------------------------------------------------------- 0488 048b | | .CONST 0x048b ; Address of begin 0489 0004 | | .CONST 0x0004 ; Address of exception handler 048a 0001 | | .CONST 0x0001 ; Number of locals 048b BODY_0488: 048b INIT_0488: 048b 00db | | Load_Top At_Offset_3 048c e019 | | Load 0x0,0x19 048d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 048e 00d9 | | Load_Top At_Offset_1 048f 00d0 | | Action Swap_Control 0490 0260 | ` | Execute Discrete,In_Type 0491 7001 |p | Jump_Nonzero 0x493 0492 0801 | | Execute_Immediate Raise,0x1 0493 00db | | Load_Top At_Offset_3 0494 e250 | P | Load 0x1,0x50 0495 e251 | Q | Load 0x1,0x51 0496 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 0497 e008 | | Load 0x0,0x8 0498 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0499 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 049a 0000 0000 | | .BLANK 0000[0x6] 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 00da | | Load_Top At_Offset_2 04a4 7002 |p | Jump_Nonzero 0x4a7 04a5 00ea | | Load_Encached Null_String_Cache 04a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a7 480a |H | Short_Literal 0xa 04a8 00db | | Load_Top At_Offset_3 04a9 0227 | ' | Execute Access,All_Reference 04aa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04ab 8224 | $ | Call 0x1,0x24 04ac 01cb | | Execute Vector,Append 04ad 00db | | Load_Top At_Offset_3 04ae 0227 | ' | Execute Access,All_Reference 04af 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b0 8264 | d | Call 0x1,0x64 04b1 01cc | | Execute Vector,Catenate 04b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b3 0000 0000 | | .BLANK 0000[0x5] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04c6 | | .CONST 0x04c6 ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0003 | | .CONST 0x0003 ; Number of locals 04bb INIT_04b8: 04bb 4801 |H | Short_Literal 0x1 04bc e5ff | | Load 0x2,-0x1 04bd 0217 | | Execute Heap_Access,All_Reference 04be 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 04bf e20f | | Load 0x1,0xf 04c0 035b | [ | Declare_Type Array,Constrained 04c1 0337 | 7 | Declare_Variable Array 04c2 e5ff | | Load 0x2,-0x1 04c3 0217 | | Execute Heap_Access,All_Reference 04c4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04c5 0007 | | Action Break_Optional 04c6 BODY_04b8: 04c6 e002 | | Load 0x0,0x2 04c7 180e | | Execute Package,Field_Execute,Field_Number 0xe 04c8 e5ff | | Load 0x2,-0x1 04c9 0217 | | Execute Heap_Access,All_Reference 04ca 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04cb 00cf | | Action Mark_Auxiliary 04cc 00da | | Load_Top At_Offset_2 04cd 01d9 | | Execute Vector,Reverse_Bounds 04ce 0263 | c | Execute Discrete,Above_Bound 04cf 700c |p | Jump_Nonzero 0x4dc 04d0 00db | | Load_Top At_Offset_3 04d1 0227 | ' | Execute Access,All_Reference 04d2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04d3 00d9 | | Load_Top At_Offset_1 04d4 e602 | | Load 0x3,0x2 04d5 01d6 | | Execute Vector,Field_Write 04d6 00db | | Load_Top At_Offset_3 04d7 0227 | ' | Execute Access,All_Reference 04d8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04d9 a603 | | Store_Unchecked 0x3,0x3 04da 00c8 | | Action Pop_Auxiliary_Range 04db 3ff4 |? | Loop_Increasing 0x4d0 04dc 00ce | | Action Pop_Auxiliary 04dd 00d9 | | Load_Top At_Offset_1 04de e20f | | Load 0x1,0xf 04df 01c6 | | Execute Vector,Convert_To_Formal 04e0 00cb | | Action Pop_Block_With_Result 04e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04e2 ; -------------------------------------------------------------------------------------- 04e2 ; STRING TABLE 04e2 ; -------------------------------------------------------------------------------------- 04e2 000e | | .STRTAB 0x000e->0x04e9 ; ", " 04e3 000e | | .STRTAB 0x000e->0x04ea ; "Warning: Cannot make a null Script empty." 04e4 0035 | 5 | .STRTAB 0x0035->0x04fe ; "Warning: Step cannot be added to a null Script." 04e5 0062 | b | .STRTAB 0x0062->0x0516 ; "Warning: Cannot remove a step from a null Script." 04e6 0091 | | .STRTAB 0x0091->0x052e ; "Warning: Cannot set a Condition for a null Script." 04e7 00c1 | | .STRTAB 0x00c1->0x0547 ; "<>" 04e8 00c1 | | .STREND 0x00c1->0x0548 04e9 2c20 5761 |, Wa| .STRTAB_STRINGS 0549 0000 0000 | | .BLANK 0000[0x7] 0550 ; -------------------------------------------------------------------------------------- 0550 ; Debug Table 0550 ; -------------------------------------------------------------------------------------- 0550 0004 0009 | | .DEBUG4 0x0004,0x0009,0xeaf4,0x0000,0x0001,0x0000 0556 0000 0000 | | .BLANK 0000[0xaa]