|
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_6148f2
└─⟦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 03c8 | | .CONST 0x03c8 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x1a2, index=0x0 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x1ad, index=0x0 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x1fa, index=0x0 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x201, index=0x0 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x354, index=0x0 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x35d, index=0x0 0008 ; -------------------------------------------------------------------------------------- 0008 00cf | | .CONST 0x00cf ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0030 | 0 | .CONST 0x0030 ; Number of locals 000b INIT_0008: 000b INIT_0008: 000b INIT_0008: 000b INIT_0008: 000b INIT_0008: 000b INIT_0008: 000b INIT_0008: 000b 0007 | | Action Break_Optional 000c 0007 | | Action Break_Optional 000d 0007 | | Action Break_Optional 000e 0007 | | Action Break_Optional 000f 0007 | | Action Break_Optional 0010 0007 | | Action Break_Optional 0011 0007 | | Action Break_Optional 0012 0007 | | Action Break_Optional 0013 0007 | | Action Break_Optional 0014 0007 | | Action Break_Optional 0015 0007 | | Action Break_Optional 0016 0007 | | Action Break_Optional 0017 0007 | | Action Break_Optional 0018 0007 | | Action Break_Optional 0019 0007 | | Action Break_Optional 001a 0007 | | Action Break_Optional 001b e003 | | Load 0x0,0x3 001c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 001d 02a0 | | Declare_Subprogram Null_Subprogram 001e 4818 |H | Short_Literal 0x18 001f 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0020 00d8 | | Load_Top At_Offset_0 0021 0221 | ! | Execute Access,Allow_Deallocate 0022 0007 | | Action Break_Optional 0023 0007 | | Action Break_Optional 0024 a004 | | Store_Unchecked 0x0,0x4 0025 00c6 | | Action Check_Subprogram_Elaborated 0026 e003 | | Load 0x0,0x3 0027 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0028 0129 | ) | Execute Any,Make_Visible 0029 00d9 | | Load_Top At_Offset_1 002a 0129 | ) | Execute Any,Make_Visible 002b e005 | | Load 0x0,0x5 002c 0129 | ) | Execute Any,Make_Visible 002d e006 | | Load 0x0,0x6 002e 0129 | ) | Execute Any,Make_Visible 002f 4800 |H | Short_Literal 0x0 0030 0129 | ) | Execute Any,Make_Visible 0031 0007 | | Action Break_Optional 0032 0007 | | Action Break_Optional 0033 0007 | | Action Break_Optional 0034 0007 | | Action Break_Optional 0035 0007 | | Action Break_Optional 0036 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0038 0007 | | Action Break_Optional 0039 0007 | | Action Break_Optional 003a 0007 | | Action Break_Optional 003b 4800 |H | Short_Literal 0x0 003c 0093 034b | K| push_full_address INIT_0348 003e 00f5 | | Load_Encached Unused21 003f 037b | { | Declare_Type Task,Defined,Visible,Not_Elaborated 0040 00d8 | | Load_Top At_Offset_0 0041 02a0 | | Declare_Subprogram Null_Subprogram 0042 4818 |H | Short_Literal 0x18 0043 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0044 0007 | | Action Break_Optional 0045 0007 | | Action Break_Optional 0046 4800 |H | Short_Literal 0x0 0047 4802 |H | Short_Literal 0x2 0048 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 004a 03fe | | Declare_Type Discrete,Defined,Visible 004b 0007 | | Action Break_Optional 004c 4818 |H | Short_Literal 0x18 004d 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected 004e 4800 |H | Short_Literal 0x0 004f 0093 01e3 | | push_full_address INIT_01e0 0051 00f5 | | Load_Encached Unused21 0052 037b | { | Declare_Type Task,Defined,Visible,Not_Elaborated 0053 e002 | | Load 0x0,0x2 0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0055 00db | | Load_Top At_Offset_3 0056 00da | | Load_Top At_Offset_2 0057 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call 0059 4803 |H | Short_Literal 0x3 005a 032e | . | Declare_Type Record,Defined,Visible 005b 00d8 | | Load_Top At_Offset_0 005c 02a0 | | Declare_Subprogram Null_Subprogram 005d e217 | | Load 0x1,0x17 005e 03c7 | | Complete_Type Access,By_Defining 005f 0007 | | Action Break_Optional 0060 0007 | | Action Break_Optional 0061 a004 | | Store_Unchecked 0x0,0x4 0062 00c6 | | Action Check_Subprogram_Elaborated 0063 00d8 | | Load_Top At_Offset_0 0064 0129 | ) | Execute Any,Make_Visible 0065 00db | | Load_Top At_Offset_3 0066 0129 | ) | Execute Any,Make_Visible 0067 e007 | | Load 0x0,0x7 0068 0129 | ) | Execute Any,Make_Visible 0069 e008 | | Load 0x0,0x8 006a 0129 | ) | Execute Any,Make_Visible 006b 4800 |H | Short_Literal 0x0 006c 0129 | ) | Execute Any,Make_Visible 006d 00e3 | | Load_Encached Natural_Cache 006e 00e3 | | Load_Encached Natural_Cache 006f 4801 |H | Short_Literal 0x1 0070 606f |`o | Indirect_Literal Discrete,0xe0,{0x00000000, 0x7fffffff} 0071 e003 | | Load 0x0,0x3 0072 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0073 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object 0074 029f 0153 | S| Declare_Subprogram INIT_0150,For_Call 0076 4800 |H | Short_Literal 0x0 0077 4801 |H | Short_Literal 0x1 0078 4801 |H | Short_Literal 0x1 0079 4800 |H | Short_Literal 0x0 007a 4801 |H | Short_Literal 0x1 007b 4801 |H | Short_Literal 0x1 007c 031e | | Declare_Type Variant_Record,Defined,Visible 007d 4800 |H | Short_Literal 0x0 007e 0093 019b | | push_full_address INIT_0198 0080 00f5 | | Load_Encached Unused21 0081 037b | { | Declare_Type Task,Defined,Visible,Not_Elaborated 0082 00d8 | | Load_Top At_Offset_0 0083 02a0 | | Declare_Subprogram Null_Subprogram 0084 4818 |H | Short_Literal 0x18 0085 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0086 0007 | | Action Break_Optional 0087 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated 0089 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 008b 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 008d e217 | | Load 0x1,0x17 008e 00e2 | | Load_Encached Integer_Cache 008f 029f 018b | | Declare_Subprogram INIT_0188,For_Call 0091 4802 |H | Short_Literal 0x2 0092 032e | . | Declare_Type Record,Defined,Visible 0093 e003 | | Load 0x0,0x3 0094 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0095 02a0 | | Declare_Subprogram Null_Subprogram 0096 4818 |H | Short_Literal 0x18 0097 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0098 00d8 | | Load_Top At_Offset_0 0099 0221 | ! | Execute Access,Allow_Deallocate 009a 0007 | | Action Break_Optional 009b a004 | | Store_Unchecked 0x0,0x4 009c 00c6 | | Action Check_Subprogram_Elaborated 009d e003 | | Load 0x0,0x3 009e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 009f 0129 | ) | Execute Any,Make_Visible 00a0 00d9 | | Load_Top At_Offset_1 00a1 0129 | ) | Execute Any,Make_Visible 00a2 e009 | | Load 0x0,0x9 00a3 0129 | ) | Execute Any,Make_Visible 00a4 e00a | | Load 0x0,0xa 00a5 0129 | ) | Execute Any,Make_Visible 00a6 4800 |H | Short_Literal 0x0 00a7 0129 | ) | Execute Any,Make_Visible 00a8 00bf | | Action Accept_Activation 00a9 a004 | | Store_Unchecked 0x0,0x4 00aa 00c6 | | Action Check_Subprogram_Elaborated 00ab e220 | | Load 0x1,0x20 00ac e221 | ! | Load 0x1,0x21 00ad e00b | | Load 0x0,0xb 00ae e00c | | Load 0x0,0xc 00af 4800 |H | Short_Literal 0x0 00b0 0007 | | Action Break_Optional 00b1 e214 | | Load 0x1,0x14 00b2 020d | | Execute Module,Elaborate 00b3 0007 | | Action Break_Optional 00b4 e217 | | Load 0x1,0x17 00b5 e215 | | Load 0x1,0x15 00b6 e003 | | Load 0x0,0x3 00b7 e00d | | Load 0x0,0xd 00b8 e002 | | Load 0x0,0x2 00b9 480e |H | Short_Literal 0xe 00ba 4806 |H | Short_Literal 0x6 00bb e218 | | Load 0x1,0x18 00bc 020e | | Execute Module,Augment_Imports 00bd e218 | | Load 0x1,0x18 00be 020d | | Execute Module,Elaborate 00bf 0007 | | Action Break_Optional 00c0 e00e | | Load 0x0,0xe 00c1 4801 |H | Short_Literal 0x1 00c2 e220 | | Load 0x1,0x20 00c3 020e | | Execute Module,Augment_Imports 00c4 e220 | | Load 0x1,0x20 00c5 020d | | Execute Module,Elaborate 00c6 0007 | | Action Break_Optional 00c7 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00c8 00c7 | | Action Elaborate_Subprogram 00c9 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00ca 00c7 | | Action Elaborate_Subprogram 00cb 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00cc 00c7 | | Action Elaborate_Subprogram 00cd 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00ce 00c7 | | Action Elaborate_Subprogram 00cf BODY_0008: 00cf BODY_0008: 00cf BODY_0008: 00cf BODY_0008: 00cf BODY_0008: 00cf BODY_0008: 00cf BODY_0008: 00cf 00bc | | Action Signal_Activated 00d0 00bb | | Action Signal_Completion 00d1 0000 0000 | | .BLANK 0000[0x7] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 00da | | Load_Top At_Offset_2 00dc e00d | | Load 0x0,0xd 00dd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00df 0000 | | .XXX[0x1] 00e0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 00e4 0000 0000 | | .BLANK 0000[0x4] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4607 |F | Jump_Case 0x8 00ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00ed 7807 |x | Jump 0xf5 ; case 0x1 00ee 780a |x | Jump 0xf9 ; case 0x2 00ef 780e |x | Jump 0xfe ; case 0x3 00f0 7811 |x | Jump 0x102 ; case 0x4 00f1 7812 |x | Jump 0x104 ; case 0x5 00f2 7813 |x | Jump 0x106 ; case 0x6 00f3 7816 |x | Jump 0x10a ; case 0x7 00f4 4302 |C | .XXX[0x1] 00f5 00da | | Load_Top At_Offset_2 00f6 0091 03a6 | | Action Push_String_Extended_Indexed,0x3a6 ; "PENDING_READ_NONE" 00f8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f9 00db | | Load_Top At_Offset_3 00fa 00db | | Load_Top At_Offset_3 00fb 00e0 | | Load_Encached Standard_Cache 00fc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fe 00da | | Load_Top At_Offset_2 00ff 00e0 | | Load_Encached Standard_Cache 0100 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0101 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0102 00db | | Load_Top At_Offset_3 0103 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0104 00db | | Load_Top At_Offset_3 0105 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0106 e216 | | Load 0x1,0x16 0107 00dc | | Load_Top At_Offset_4 0108 0267 | g | Execute Discrete,Predecessor 0109 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010a e216 | | Load 0x1,0x16 010b 00dc | | Load_Top At_Offset_4 010c 0268 | h | Execute Discrete,Successor 010d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010e 0000 0000 | | .XXX[0x2] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0113 | | .CONST 0x0113 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0001 | | .CONST 0x0001 ; Number of locals 0113 BODY_0110: 0113 INIT_0110: 0113 00da | | Load_Top At_Offset_2 0114 680a |h | Jump_Zero 0x11f 0115 4800 |H | Short_Literal 0x0 0116 00db | | Load_Top At_Offset_3 0117 0229 | ) | Execute Access,All_Read 0118 170f | | Execute Task,Entry_Call,Field_Number 0xf 0119 00da | | Load_Top At_Offset_2 011a e22c | , | Load 0x1,0x2c 011b e22d | - | Load 0x1,0x2d 011c 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 011d 8004 | | Call 0x0,0x4 011e 003b | ; | Store_Top Access,At_Offset_3 011f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 4800 |H | Short_Literal 0x0 0124 00db | | Load_Top At_Offset_3 0125 0229 | ) | Execute Access,All_Read 0126 170d | | Execute Task,Entry_Call,Field_Number 0xd 0127 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 4800 |H | Short_Literal 0x0 012c 00db | | Load_Top At_Offset_3 012d 0229 | ) | Execute Access,All_Read 012e 170e | | Execute Task,Entry_Call,Field_Number 0xe 012f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 4601 |F | Jump_Case 0x2 0134 7801 |x | Jump 0x136 ; case 0x0 0135 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0136 00da | | Load_Top At_Offset_2 0137 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0138 0125 | % | Execute Any,Set_Constraint 0139 e002 | | Load 0x0,0x2 013a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 013b 00db | | Load_Top At_Offset_3 013c 00d9 | | Load_Top At_Offset_1 013d 00d9 | | Load_Top At_Offset_1 013e 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 013f 0119 | | Execute Any,Check_In_Formal_Type 0140 00d1 | | Pop_Control Pop_Count_1 0141 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0142 4800 |H | Short_Literal 0x0 0143 00db | | Load_Top At_Offset_3 0144 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0145 00da | | Load_Top At_Offset_2 0146 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0147 036b | k | Declare_Variable Task,As_Component 0148 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0149 0000 0000 | | .BLANK 0000[0x7] 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 4609 |F | Jump_Case 0xa 0154 7809 |x | Jump 0x15e ; case 0x0 0155 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0156 780b |x | Jump 0x162 ; case 0x2 0157 780e |x | Jump 0x166 ; case 0x3 0158 7828 |x( | Jump 0x181 ; case 0x4 0159 7827 |x' | Jump 0x181 ; case 0x5 015a 7826 |x& | Jump 0x181 ; case 0x6 015b 7810 |x | Jump 0x16c ; case 0x7 015c 7819 |x | Jump 0x176 ; case 0x8 015d 7823 |x# | Jump 0x181 ; case 0x9 015e 4800 |H | Short_Literal 0x0 015f 00db | | Load_Top At_Offset_3 0160 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0161 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0162 4801 |H | Short_Literal 0x1 0163 4803 |H | Short_Literal 0x3 0164 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 0165 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0166 e5fd | | Load 0x2,-0x3 0167 00db | | Load_Top At_Offset_3 0168 1c07 | | Execute_Immediate Run_Utility,0x7 0169 e5fe | | Load 0x2,-0x2 016a 0306 | | Complete_Type Variant_Record,By_Renaming 016b 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 016c 00db | | Load_Top At_Offset_3 016d 4801 |H | Short_Literal 0x1 016e e5fe | | Load 0x2,-0x2 016f e003 | | Load 0x0,0x3 0170 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0171 035b | [ | Declare_Type Array,Constrained 0172 4801 |H | Short_Literal 0x1 0173 e5ff | | Load 0x2,-0x1 0174 031b | | Declare_Type Variant_Record,Constrained 0175 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0176 00db | | Load_Top At_Offset_3 0177 00db | | Load_Top At_Offset_3 0178 02fc | | Declare_Variable Variant_Record,With_Constraint 0179 4801 |H | Short_Literal 0x1 017a e5fe | | Load 0x2,-0x2 017b e003 | | Load 0x0,0x3 017c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 017d 0334 | 4 | Declare_Variable Array,With_Constraint 017e 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 017f 016a | j | QQ_execute Variant_Record,XXX 0180 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0181 0869 | i | Execute_Immediate Raise,0x69 0182 0000 0000 | | .BLANK 0000[0x6] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 4601 |F | Jump_Case 0x2 018c 7801 |x | Jump 0x18e ; case 0x0 018d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 018e 4800 |H | Short_Literal 0x0 018f 00db | | Load_Top At_Offset_3 0190 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0191 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0192 0000 0000 | | .BLANK 0000[0x6] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 01b5 | | .CONST 0x01b5 ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0011 | | .CONST 0x0011 ; Number of locals 019b INIT_0198: 019b 4800 |H | Short_Literal 0x0 019c 02cb | | Declare_Variable Entry 019d 4800 |H | Short_Literal 0x0 019e 02cb | | Declare_Variable Entry 019f 4800 |H | Short_Literal 0x0 01a0 02cb | | Declare_Variable Entry 01a1 00bf | | Action Accept_Activation 01a2 480f 4838 |H H8| Declare_Variable Select 0x000, 0x003, 01a4 480e 4839 |H H9| [0x000]: 0x001 = 0x0008, 01a6 480d 483a |H H:| [0x00d]: 0x03a = 0x01d0, 01a8 4800 4801 |H H | [0x00e]: 0x039 = 0x01c8, 01aa 4800 4803 |H H | [0x00f]: 0x038 = 0x01c0 01ac 02cf | | 01ad 480e 483b |H H;| Declare_Variable Select 0x000, 0x001, 01af 4800 4801 |H H | [0x000]: 0x001 = 0x0008, 01b1 4800 4801 |H H | [0x00e]: 0x03b = 0x01d8 01b3 02cf | | 01b4 00bc | | Action Signal_Activated 01b5 BODY_0198: 01b5 00cf | | Action Mark_Auxiliary 01b6 0007 | | Action Break_Optional 01b7 00da | | Load_Top At_Offset_2 01b8 013f | ? | Execute Select,Rendezvous 01b9 00d1 | | Pop_Control Pop_Count_1 01ba 00d9 | | Load_Top At_Offset_1 01bb 013f | ? | Execute Select,Rendezvous 01bc 00d1 | | Pop_Control Pop_Count_1 01bd 00c9 | | Action Pop_Auxiliary_Loop 01be 7ff8 | | Jump 0x1b7 01bf 0000 | | .XXX[0x1] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; See instruction 0x02cf at 0x1a2, index=0xf 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 4100 |A | End_Rendezvous 0x0 01c4 0000 0000 | | .BLANK 0000[0x4] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; See instruction 0x02cf at 0x1a2, index=0xe 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb e001 | | Load 0x0,0x1 01cc 0257 | W | Execute Discrete,Raise 01cd 0000 0000 | | .XXX[0x3] 01cf 0000 | | 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; See instruction 0x02cf at 0x1a2, index=0xd 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 0008 | | Action Idle 01d4 4100 |A | End_Rendezvous 0x0 01d5 0000 0000 | | .XXX[0x3] 01d7 0000 | | 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; See instruction 0x02cf at 0x1ad, index=0xe 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 0008 | | Action Idle 01dc 4100 |A | End_Rendezvous 0x0 01dd 0000 0000 | | .XXX[0x3] 01df 0000 | | 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 020d | | .CONST 0x020d ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0018 | | .CONST 0x0018 ; Number of locals 01e3 INIT_01e0: 01e3 4801 |H | Short_Literal 0x1 01e4 02cb | | Declare_Variable Entry 01e5 4803 |H | Short_Literal 0x3 01e6 02cb | | Declare_Variable Entry 01e7 4804 |H | Short_Literal 0x4 01e8 02cb | | Declare_Variable Entry 01e9 4803 |H | Short_Literal 0x3 01ea 02cb | | Declare_Variable Entry 01eb 00bf | | Action Accept_Activation 01ec e001 | | Load 0x0,0x1 01ed 0007 | | Action Break_Optional 01ee e002 | | Load 0x0,0x2 01ef 0007 | | Action Break_Optional 01f0 00e3 | | Load_Encached Natural_Cache 01f1 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 01f2 4801 |H | Short_Literal 0x1 01f3 4801 |H | Short_Literal 0x1 01f4 e003 | | Load 0x0,0x3 01f5 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01f6 035b | [ | Declare_Type Array,Constrained 01f7 0337 | 7 | Declare_Variable Array 01f8 00e3 | | Load_Encached Natural_Cache 01f9 00e2 | | Load_Encached Integer_Cache 01fa 480d 4848 |H HH| Declare_Variable Select 0x000, 0x001, 01fc 4800 4801 |H H | [0x000]: 0x001 = 0x0008, 01fe 4800 4801 |H H | [0x00d]: 0x048 = 0x0240 0200 02cf | | 0201 4810 484a |H HJ| Declare_Variable Select 0x000, 0x003, 0203 480f 484b |H HK| [0x000]: 0x001 = 0x0008, 0205 480e 4856 |H HV| [0x00e]: 0x056 = 0x02b0, 0207 4800 4801 |H H | [0x00f]: 0x04b = 0x0258, 0209 4800 4803 |H H | [0x010]: 0x04a = 0x0250 020b 02cf | | 020c 00bc | | Action Signal_Activated 020d BODY_01e0: 020d 00d9 | | Load_Top At_Offset_1 020e 013f | ? | Execute Select,Rendezvous 020f 00d1 | | Pop_Control Pop_Count_1 0210 00cf | | Action Mark_Auxiliary 0211 00cf | | Action Mark_Auxiliary 0212 7808 |x | Jump 0x21b 0213 00da | | Load_Top At_Offset_2 0214 013f | ? | Execute Select,Rendezvous 0215 4603 |F | Jump_Case 0x4 0216 7803 |x | Jump 0x21a ; case 0x0 0217 7802 |x | Jump 0x21a ; case 0x1 0218 7801 |x | Jump 0x21a ; case 0x2 0219 7800 |x | Jump 0x21a ; case 0x3 021a 00c9 | | Action Pop_Auxiliary_Loop 021b e212 | | Load 0x1,0x12 021c e002 | | Load 0x0,0x2 021d 022f | / | Execute Access,Equal 021e 77f4 |w | Jump_Nonzero 0x213 021f 00ce | | Action Pop_Auxiliary 0220 00e3 | | Load_Encached Natural_Cache 0221 e214 | | Load 0x1,0x14 0222 e004 | | Load 0x0,0x4 0223 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0224 6027 |`' | Indirect_Literal Discrete,0x24c,{0x00007fff, 0xffffffff} 0225 e211 | | Load 0x1,0x11 0226 0227 | ' | Execute Access,All_Reference 0227 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0228 e005 | | Load 0x0,0x5 0229 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 022a c216 | | Store 0x1,0x16 022b 00d1 | | Pop_Control Pop_Count_1 022c c213 | | Store 0x1,0x13 022d 4802 |H | Short_Literal 0x2 022e e211 | | Load 0x1,0x11 022f 0227 | ' | Execute Access,All_Reference 0230 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0231 4800 |H | Short_Literal 0x0 0232 e212 | | Load 0x1,0x12 0233 0229 | ) | Execute Access,All_Read 0234 e006 | | Load 0x0,0x6 0235 00ad | | QQ_Action Package,Field_Execute_Dynamic 0236 00db | | Load_Top At_Offset_3 0237 6802 |h | Jump_Zero 0x23a 0238 4800 |H | Short_Literal 0x0 0239 a213 | | Store_Unchecked 0x1,0x13 023a e002 | | Load 0x0,0x2 023b a212 | | Store_Unchecked 0x1,0x12 023c 00c9 | | Action Pop_Auxiliary_Loop 023d 7fd3 | | Jump 0x211 023e 0000 0000 | | .XXX[0x2] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; See instruction 0x02cf at 0x1fa, index=0xd 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 00db | | Load_Top At_Offset_3 0244 a211 | | Store_Unchecked 0x1,0x11 0245 4800 |H | Short_Literal 0x0 0246 e211 | | Load 0x1,0x11 0247 0227 | ' | Execute Access,All_Reference 0248 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0249 4100 |A | End_Rendezvous 0x0 024a 0000 0000 | | .XXX[0x2] 024c 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff} 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; See instruction 0x02cf at 0x201, index=0x10 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 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0255 8402 | | Call 0x2,0x2 0256 4103 |A | End_Rendezvous 0x3 0257 0000 | | .XXX[0x1] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; See instruction 0x02cf at 0x201, index=0xf 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 e213 | | Load 0x1,0x13 025c 0c01 | | Execute_Immediate Greater_Equal,0x1 025d 682a |h* | Jump_Zero 0x288 025e 4801 |H | Short_Literal 0x1 025f e214 | | Load 0x1,0x14 0260 01d7 | | Execute Vector,Field_Read 0261 e5fc | | Load 0x2,-0x4 0262 01dd | | Execute Vector,First 0263 e5fc | | Load 0x2,-0x4 0264 01d6 | | Execute Vector,Field_Write 0265 4800 |H | Short_Literal 0x0 0266 a213 | | Store_Unchecked 0x1,0x13 0267 e5fc | | Load 0x2,-0x4 0268 00d8 | | Load_Top At_Offset_0 0269 01dd | | Execute Vector,First 026a 0a01 | | Execute_Immediate Plus,0x1 026b 00d8 | | Load_Top At_Offset_0 026c 00e2 | | Load_Encached Integer_Cache 026d 0260 | ` | Execute Discrete,In_Type 026e 7001 |p | Jump_Nonzero 0x270 026f 0801 | | Execute_Immediate Raise,0x1 0270 e5fc | | Load 0x2,-0x4 0271 01dc | | Execute Vector,Last 0272 00da | | Load_Top At_Offset_2 0273 035b | [ | Declare_Type Array,Constrained 0274 00d0 | | Action Swap_Control 0275 01cd | | Execute Vector,Slice_Reference 0276 00e3 | | Load_Encached Natural_Cache 0277 00d9 | | Load_Top At_Offset_1 0278 e004 | | Load 0x0,0x4 0279 1b19 | | Execute Package,Field_Read,Field_Number 0x19 027a 4800 |H | Short_Literal 0x0 027b e211 | | Load 0x1,0x11 027c 0227 | ' | Execute Access,All_Reference 027d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 027e e005 | | Load 0x0,0x5 027f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0280 c5fd | | Store 0x2,-0x3 0281 00d1 | | Pop_Control Pop_Count_1 0282 c215 | | Store 0x1,0x15 0283 00d1 | | Pop_Control Pop_Count_1 0284 e215 | | Load 0x1,0x15 0285 0a01 | | Execute_Immediate Plus,0x1 0286 c5fb | | Store 0x2,-0x5 0287 4103 |A | End_Rendezvous 0x3 0288 00e3 | | Load_Encached Natural_Cache 0289 e5fc | | Load 0x2,-0x4 028a e004 | | Load 0x0,0x4 028b 1b19 | | Execute Package,Field_Read,Field_Number 0x19 028c 4800 |H | Short_Literal 0x0 028d e211 | | Load 0x1,0x11 028e 0227 | ' | Execute Access,All_Reference 028f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0290 e005 | | Load 0x0,0x5 0291 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0292 c216 | | Store 0x1,0x16 0293 00d1 | | Pop_Control Pop_Count_1 0294 c215 | | Store 0x1,0x15 0295 e216 | | Load 0x1,0x16 0296 a5fd | | Store_Unchecked 0x2,-0x3 0297 e215 | | Load 0x1,0x15 0298 a5fb | | Store_Unchecked 0x2,-0x5 0299 e215 | | Load 0x1,0x15 029a 0c01 | | Execute_Immediate Greater_Equal,0x1 029b 7005 |p | Jump_Nonzero 0x2a1 029c e216 | | Load 0x1,0x16 029d 6804 |h | Jump_Zero 0x2a2 029e e216 | | Load 0x1,0x16 029f 0f07 | | Execute_Immediate Equal,0x7 02a0 7001 |p | Jump_Nonzero 0x2a2 02a1 4103 |A | End_Rendezvous 0x3 02a2 00db | | Load_Top At_Offset_3 02a3 a212 | | Store_Unchecked 0x1,0x12 02a4 4801 |H | Short_Literal 0x1 02a5 e211 | | Load 0x1,0x11 02a6 0227 | ' | Execute Access,All_Reference 02a7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02a8 4103 |A | End_Rendezvous 0x3 02a9 0000 0000 | | .BLANK 0000[0x7] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; See instruction 0x02cf at 0x201, index=0xe 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 e213 | | Load 0x1,0x13 02b4 0c01 | | Execute_Immediate Greater_Equal,0x1 02b5 682a |h* | Jump_Zero 0x2e0 02b6 4801 |H | Short_Literal 0x1 02b7 e214 | | Load 0x1,0x14 02b8 01d7 | | Execute Vector,Field_Read 02b9 e5fd | | Load 0x2,-0x3 02ba 01dd | | Execute Vector,First 02bb e5fd | | Load 0x2,-0x3 02bc 01d6 | | Execute Vector,Field_Write 02bd 4800 |H | Short_Literal 0x0 02be a213 | | Store_Unchecked 0x1,0x13 02bf e5fd | | Load 0x2,-0x3 02c0 00d8 | | Load_Top At_Offset_0 02c1 01dd | | Execute Vector,First 02c2 0a01 | | Execute_Immediate Plus,0x1 02c3 00d8 | | Load_Top At_Offset_0 02c4 00e2 | | Load_Encached Integer_Cache 02c5 0260 | ` | Execute Discrete,In_Type 02c6 7001 |p | Jump_Nonzero 0x2c8 02c7 0801 | | Execute_Immediate Raise,0x1 02c8 e5fd | | Load 0x2,-0x3 02c9 01dc | | Execute Vector,Last 02ca 00da | | Load_Top At_Offset_2 02cb 035b | [ | Declare_Type Array,Constrained 02cc 00d0 | | Action Swap_Control 02cd 01cd | | Execute Vector,Slice_Reference 02ce 00e3 | | Load_Encached Natural_Cache 02cf 00d9 | | Load_Top At_Offset_1 02d0 e004 | | Load 0x0,0x4 02d1 1b19 | | Execute Package,Field_Read,Field_Number 0x19 02d2 4800 |H | Short_Literal 0x0 02d3 e211 | | Load 0x1,0x11 02d4 0227 | ' | Execute Access,All_Reference 02d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02d6 e005 | | Load 0x0,0x5 02d7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02d8 c5fe | | Store 0x2,-0x2 02d9 00d1 | | Pop_Control Pop_Count_1 02da c215 | | Store 0x1,0x15 02db 00d1 | | Pop_Control Pop_Count_1 02dc e215 | | Load 0x1,0x15 02dd 0a01 | | Execute_Immediate Plus,0x1 02de c5fc | | Store 0x2,-0x4 02df 4103 |A | End_Rendezvous 0x3 02e0 00e3 | | Load_Encached Natural_Cache 02e1 e5fd | | Load 0x2,-0x3 02e2 e004 | | Load 0x0,0x4 02e3 1b19 | | Execute Package,Field_Read,Field_Number 0x19 02e4 4800 |H | Short_Literal 0x0 02e5 e211 | | Load 0x1,0x11 02e6 0227 | ' | Execute Access,All_Reference 02e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02e8 e005 | | Load 0x0,0x5 02e9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02ea c5fe | | Store 0x2,-0x2 02eb 00d1 | | Pop_Control Pop_Count_1 02ec c5fc | | Store 0x2,-0x4 02ed 4103 |A | End_Rendezvous 0x3 02ee 0000 0000 | | .XXX[0x2] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f8 | | .CONST 0x02f8 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0003 | | .CONST 0x0003 ; Number of locals 02f3 INIT_02f0: 02f3 e5fd | | Load 0x2,-0x3 02f4 01db | | Execute Vector,Length 02f5 00e3 | | Load_Encached Natural_Cache 02f6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 02f7 00e3 | | Load_Encached Natural_Cache 02f8 BODY_02f0: 02f8 4800 |H | Short_Literal 0x0 02f9 a216 | | Store_Unchecked 0x1,0x16 02fa e213 | | Load 0x1,0x13 02fb 0c01 | | Execute_Immediate Greater_Equal,0x1 02fc 680c |h | Jump_Zero 0x309 02fd 4801 |H | Short_Literal 0x1 02fe e214 | | Load 0x1,0x14 02ff 01d7 | | Execute Vector,Field_Read 0300 e5fd | | Load 0x2,-0x3 0301 01dd | | Execute Vector,First 0302 e5fd | | Load 0x2,-0x3 0303 01d6 | | Execute Vector,Field_Write 0304 4800 |H | Short_Literal 0x0 0305 a213 | | Store_Unchecked 0x1,0x13 0306 4801 |H | Short_Literal 0x1 0307 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0308 7802 |x | Jump 0x30b 0309 4800 |H | Short_Literal 0x0 030a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 030b 00cf | | Action Mark_Auxiliary 030c 0007 | | Action Break_Optional 030d 00d9 | | Load_Top At_Offset_1 030e 00db | | Load_Top At_Offset_3 030f 027f | | Execute Discrete,Equal 0310 7002 |p | Jump_Nonzero 0x313 0311 e216 | | Load 0x1,0x16 0312 6806 |h | Jump_Zero 0x319 0313 e216 | | Load 0x1,0x16 0314 a5fe | | Store_Unchecked 0x2,-0x2 0315 00d9 | | Load_Top At_Offset_1 0316 a5fc | | Store_Unchecked 0x2,-0x4 0317 00cc | | Action Pop_Block 0318 4103 |A | End_Rendezvous 0x3 0319 e5fd | | Load 0x2,-0x3 031a 00d8 | | Load_Top At_Offset_0 031b 01dd | | Execute Vector,First 031c 00db | | Load_Top At_Offset_3 031d 0273 | s | Execute Discrete,Plus 031e 00d8 | | Load_Top At_Offset_0 031f 00e2 | | Load_Encached Integer_Cache 0320 0260 | ` | Execute Discrete,In_Type 0321 7001 |p | Jump_Nonzero 0x323 0322 0801 | | Execute_Immediate Raise,0x1 0323 e5fd | | Load 0x2,-0x3 0324 01dc | | Execute Vector,Last 0325 00da | | Load_Top At_Offset_2 0326 035b | [ | Declare_Type Array,Constrained 0327 00d0 | | Action Swap_Control 0328 01cd | | Execute Vector,Slice_Reference 0329 00e3 | | Load_Encached Natural_Cache 032a 00d9 | | Load_Top At_Offset_1 032b e004 | | Load 0x0,0x4 032c 1b19 | | Execute Package,Field_Read,Field_Number 0x19 032d 6012 |` | Indirect_Literal Discrete,0x340,{0x00007fff, 0xffffffff} 032e e211 | | Load 0x1,0x11 032f 0227 | ' | Execute Access,All_Reference 0330 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0331 e005 | | Load 0x0,0x5 0332 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0333 c216 | | Store 0x1,0x16 0334 00d1 | | Pop_Control Pop_Count_1 0335 c215 | | Store 0x1,0x15 0336 00d1 | | Pop_Control Pop_Count_1 0337 00d9 | | Load_Top At_Offset_1 0338 e215 | | Load 0x1,0x15 0339 0273 | s | Execute Discrete,Plus 033a 005a | Z | Store_Top Discrete,At_Offset_2 033b 00c9 | | Action Pop_Auxiliary_Loop 033c 7fd0 | | Jump 0x30d 033d 0000 0000 | | .XXX[0x3] 033f 0000 | | 0340 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff} 0344 0000 0000 | | .BLANK 0000[0x4] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 0369 | i | .CONST 0x0369 ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0012 | | .CONST 0x0012 ; Number of locals 034b INIT_0348: 034b 4800 |H | Short_Literal 0x0 034c 02cb | | Declare_Variable Entry 034d 4800 |H | Short_Literal 0x0 034e 02cb | | Declare_Variable Entry 034f 4800 |H | Short_Literal 0x0 0350 02cb | | Declare_Variable Entry 0351 00bf | | Action Accept_Activation 0352 00e1 | | Load_Encached Boolean_Cache 0353 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0354 480e 4870 |H Hp| Declare_Variable Select 0x000, 0x002, 0356 480d 4871 |H Hq| [0x000]: 0x001 = 0x0008, 0358 4800 4801 |H H | [0x00d]: 0x071 = 0x0388, 035a 4800 4802 |H H | [0x00e]: 0x070 = 0x0380 035c 02cf | | 035d 480f 4872 |H Hr| Declare_Variable Select 0x000, 0x003, 035f 480e 4873 |H Hs| [0x000]: 0x001 = 0x0008, 0361 480d 4874 |H Ht| [0x00d]: 0x074 = 0x03a0, 0363 4800 4801 |H H | [0x00e]: 0x073 = 0x0398, 0365 4800 4803 |H H | [0x00f]: 0x072 = 0x0390 0367 02cf | | 0368 00bc | | Action Signal_Activated 0369 BODY_0348: 0369 00cf | | Action Mark_Auxiliary 036a 0007 | | Action Break_Optional 036b 00da | | Load_Top At_Offset_2 036c 013f | ? | Execute Select,Rendezvous 036d 00d1 | | Pop_Control Pop_Count_1 036e 00cf | | Action Mark_Auxiliary 036f 7804 |x | Jump 0x374 0370 00da | | Load_Top At_Offset_2 0371 013f | ? | Execute Select,Rendezvous 0372 00d1 | | Pop_Control Pop_Count_1 0373 00c9 | | Action Pop_Auxiliary_Loop 0374 e210 | | Load 0x1,0x10 0375 77fa |w | Jump_Nonzero 0x370 0376 00ce | | Action Pop_Auxiliary 0377 00c9 | | Action Pop_Auxiliary_Loop 0378 7ff2 | | Jump 0x36b 0379 0000 0000 | | .BLANK 0000[0x7] 0380 ; -------------------------------------------------------------------------------------- 0380 ; SUBPROGRAM 0380 ; See instruction 0x02cf at 0x354, index=0xe 0380 ; -------------------------------------------------------------------------------------- 0380 0383 | | .CONST 0x0383 ; Address of begin 0381 0004 | | .CONST 0x0004 ; Address of exception handler 0382 0001 | | .CONST 0x0001 ; Number of locals 0383 BODY_0380: 0383 INIT_0380: 0383 4801 |H | Short_Literal 0x1 0384 a210 | | Store_Unchecked 0x1,0x10 0385 4100 |A | End_Rendezvous 0x0 0386 0000 0000 | | .XXX[0x2] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; See instruction 0x02cf at 0x354, index=0xd 0388 ; -------------------------------------------------------------------------------------- 0388 038b | | .CONST 0x038b ; Address of begin 0389 0004 | | .CONST 0x0004 ; Address of exception handler 038a 0001 | | .CONST 0x0001 ; Number of locals 038b BODY_0388: 038b INIT_0388: 038b 4800 |H | Short_Literal 0x0 038c a210 | | Store_Unchecked 0x1,0x10 038d 4100 |A | End_Rendezvous 0x0 038e 0000 0000 | | .XXX[0x2] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; See instruction 0x02cf at 0x35d, index=0xf 0390 ; -------------------------------------------------------------------------------------- 0390 0393 | | .CONST 0x0393 ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0001 | | .CONST 0x0001 ; Number of locals 0393 BODY_0390: 0393 INIT_0390: 0393 4800 |H | Short_Literal 0x0 0394 a210 | | Store_Unchecked 0x1,0x10 0395 4100 |A | End_Rendezvous 0x0 0396 0000 0000 | | .XXX[0x2] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; See instruction 0x02cf at 0x35d, index=0xe 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b 4801 |H | Short_Literal 0x1 039c a210 | | Store_Unchecked 0x1,0x10 039d 4100 |A | End_Rendezvous 0x0 039e 0000 0000 | | .XXX[0x2] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; See instruction 0x02cf at 0x35d, index=0xd 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a3 | | .CONST 0x03a3 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0001 | | .CONST 0x0001 ; Number of locals 03a3 BODY_03a0: 03a3 INIT_03a0: 03a3 4800 |H | Short_Literal 0x0 03a4 a210 | | Store_Unchecked 0x1,0x10 03a5 4100 |A | End_Rendezvous 0x0 03a6 ; -------------------------------------------------------------------------------------- 03a6 ; STRING TABLE 03a6 ; -------------------------------------------------------------------------------------- 03a6 0008 | | .STRTAB 0x0008->0x03aa ; "PENDING_READ_NONE" 03a7 0017 | | .STRTAB 0x0017->0x03b2 ; "PENDING_READ_WAIT" 03a8 0026 | & | .STRTAB 0x0026->0x03bb ; "PENDING_READ_DONE" 03a9 0035 | 5 | .STREND 0x0035->0x03c3 03aa 5045 4e44 |PEND| .STRTAB_STRINGS 03c4 0000 0000 | | .BLANK 0000[0x4] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; Debug Table 03c8 ; -------------------------------------------------------------------------------------- 03c8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68dc,0x0000,0x0001,0x001e 03ce 000b 0446 | F| .DBG4T 0x000b,0x0446,0x8000,0x0000 03d2 00a9 047d | }| .DBG4T 0x00a9,0x047d,0x8000,0x0000 03d6 00db 0487 | | .DBG4T 0x00db,0x0487,0x0002,0x0000 03da 00eb 0000 | | .DBG4T 0x00eb,0x0000,0x0005,0x0000 03de 0113 048a | | .DBG4T 0x0113,0x048a,0x0001,0x0000 03e2 0123 048f | # | .DBG4T 0x0123,0x048f,0x0001,0x0000 03e6 012b 0492 | + | .DBG4T 0x012b,0x0492,0x0001,0x0000 03ea 0133 0000 | 3 | .DBG4T 0x0133,0x0000,0x0005,0x0000 03ee 0153 0000 | S | .DBG4T 0x0153,0x0000,0x0005,0x0000 03f2 018b 0000 | | .DBG4T 0x018b,0x0000,0x0005,0x0000 03f6 019b 0495 | | .DBG4T 0x019b,0x0495,0x0000,0x0000 03fa 01a2 049a | | .DBG4T 0x01a2,0x049a,0x0000,0x4000 03fe 01c3 04a2 | | .DBG4T 0x01c3,0x04a2,0x0003,0x0000 0402 01cb 04a5 | | .DBG4T 0x01cb,0x04a5,0x0003,0x0000 0406 01d3 04a8 | | .DBG4T 0x01d3,0x04a8,0x0003,0x0000 040a 01db 04ab | | .DBG4T 0x01db,0x04ab,0x0003,0x0000 040e 01e3 04ae | | .DBG4T 0x01e3,0x04ae,0x0000,0x0000 0412 01ec 04b4 | | .DBG4T 0x01ec,0x04b4,0x0000,0x4000 0416 0243 04d0 | C | .DBG4T 0x0243,0x04d0,0x0003,0x0000 041a 0253 04d4 | S | .DBG4T 0x0253,0x04d4,0x0003,0x0000 041e 025b 04d7 | [ | .DBG4T 0x025b,0x04d7,0x0003,0x0000 0422 02b3 04e6 | | .DBG4T 0x02b3,0x04e6,0x0003,0x0000 0426 02f3 04f0 | | .DBG4T 0x02f3,0x04f0,0x0004,0x0000 042a 034b 0501 | K | .DBG4T 0x034b,0x0501,0x0000,0x0000 042e 0352 0506 | R | .DBG4T 0x0352,0x0506,0x0000,0x4000 0432 0383 0511 | | .DBG4T 0x0383,0x0511,0x0003,0x0000 0436 038b 0514 | | .DBG4T 0x038b,0x0514,0x0003,0x0000 043a 0393 0517 | | .DBG4T 0x0393,0x0517,0x0003,0x0000 043e 039b 051a | | .DBG4T 0x039b,0x051a,0x0003,0x0000 0442 03a3 051d | | .DBG4T 0x03a3,0x051d,0x0003,0x0000 0446 ; -------------------------------------------------------------------------------------- 0446 ; Debug chain 0446 ; -------------------------------------------------------------------------------------- 0446 0035 0000 | 5 | .DBGLEN 0x0035,0x0000 0448 000b 000c | | .DBGLNO 0x000b,0x000c,0x000d,0x000e,0x000f,0x0010,0x0011,0x0012,0x0013,0x0014,0x0015,0x0016,0x0017,0x0018,0x0019,0x001a,0x001b,0x0022,0x0023,0x0024,0x0031,0x0032,0x0033,0x0034,0x0035,0x0036,0x0038,0x0039,0x003a,0x003b,0x0040,0x0044,0x0045,0x0046,0x004b,0x004c,0x004e,0x0053,0x005f,0x0060,0x0061,0x006d,0x007d,0x0082,0x0086,0x0087,0x0089,0x008b,0x008d,0x0093,0x009a,0x009b,0x00a8 047d ; -------------------------------------------------------------------------------------- 047d ; Debug chain 047d ; -------------------------------------------------------------------------------------- 047d 0008 0000 | | .DBGLEN 0x0008,0x0000 047f 00a9 00b1 | | .DBGLNO 0x00a9,0x00b1,0x00b4,0x00c0,0x00c7,0x00c9,0x00cb,0x00cd 0487 ; -------------------------------------------------------------------------------------- 0487 ; Debug chain 0487 ; -------------------------------------------------------------------------------------- 0487 0000 0001 | | .DBGLEN 0x0000,0x0001 0489 00db | | .DBGLNO 0x00db 048a ; -------------------------------------------------------------------------------------- 048a ; Debug chain 048a ; -------------------------------------------------------------------------------------- 048a 0000 0003 | | .DBGLEN 0x0000,0x0003 048c 0113 0115 | | .DBGLNO 0x0113,0x0115,0x0119 048f ; -------------------------------------------------------------------------------------- 048f ; Debug chain 048f ; -------------------------------------------------------------------------------------- 048f 0000 0001 | | .DBGLEN 0x0000,0x0001 0491 0123 | # | .DBGLNO 0x0123 0492 ; -------------------------------------------------------------------------------------- 0492 ; Debug chain 0492 ; -------------------------------------------------------------------------------------- 0492 0000 0001 | | .DBGLEN 0x0000,0x0001 0494 012b | + | .DBGLNO 0x012b 0495 ; -------------------------------------------------------------------------------------- 0495 ; Debug chain 0495 ; -------------------------------------------------------------------------------------- 0495 0003 0000 | | .DBGLEN 0x0003,0x0000 0497 019b 019d | | .DBGLNO 0x019b,0x019d,0x019f 049a ; -------------------------------------------------------------------------------------- 049a ; Debug chain 049a ; -------------------------------------------------------------------------------------- 049a 0000 0003 | | .DBGLEN 0x0000,0x0003 049c 01b6 01b7 | | .DBGLNO 0x01b6,0x01b7,0x01ba 049f 0001 0002 | | .XXX[0x3] 04a1 0006 | | 04a2 ; -------------------------------------------------------------------------------------- 04a2 ; Debug chain 04a2 ; -------------------------------------------------------------------------------------- 04a2 0000 0001 | | .DBGLEN 0x0000,0x0001 04a4 01c3 | | .DBGLNO 0x01c3 04a5 ; -------------------------------------------------------------------------------------- 04a5 ; Debug chain 04a5 ; -------------------------------------------------------------------------------------- 04a5 0000 0001 | | .DBGLEN 0x0000,0x0001 04a7 01cb | | .DBGLNO 0x01cb 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; Debug chain 04a8 ; -------------------------------------------------------------------------------------- 04a8 0000 0001 | | .DBGLEN 0x0000,0x0001 04aa 01d3 | | .DBGLNO 0x01d3 04ab ; -------------------------------------------------------------------------------------- 04ab ; Debug chain 04ab ; -------------------------------------------------------------------------------------- 04ab 0000 0001 | | .DBGLEN 0x0000,0x0001 04ad 01db | | .DBGLNO 0x01db 04ae ; -------------------------------------------------------------------------------------- 04ae ; Debug chain 04ae ; -------------------------------------------------------------------------------------- 04ae 0004 0000 | | .DBGLEN 0x0004,0x0000 04b0 01e3 01e5 | | .DBGLNO 0x01e3,0x01e5,0x01e7,0x01e9 04b4 ; -------------------------------------------------------------------------------------- 04b4 ; Debug chain 04b4 ; -------------------------------------------------------------------------------------- 04b4 0006 000a | | .DBGLEN 0x0006,0x000a 04b6 01ec 01ee | | .DBGLNO 0x01ec,0x01ee,0x01f0,0x01f2,0x01f8,0x01f9,0x020d,0x0211,0x0213,0x021b,0x0220,0x022d,0x0231,0x0236,0x0238,0x023a 04c6 0001 0003 | | .XXX[0xa] 04c8 0005 0004 | | 04ca 0009 000a | | 04cc 000b 000c | | 04ce 000d 000e | | 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; Debug chain 04d0 ; -------------------------------------------------------------------------------------- 04d0 0000 0002 | | .DBGLEN 0x0000,0x0002 04d2 0243 0245 | C E| .DBGLNO 0x0243,0x0245 04d4 ; -------------------------------------------------------------------------------------- 04d4 ; Debug chain 04d4 ; -------------------------------------------------------------------------------------- 04d4 0000 0001 | | .DBGLEN 0x0000,0x0001 04d6 0255 | U | .DBGLNO 0x0255 04d7 ; -------------------------------------------------------------------------------------- 04d7 ; Debug chain 04d7 ; -------------------------------------------------------------------------------------- 04d7 0000 000d | | .DBGLEN 0x0000,0x000d 04d9 025b 025e | [ ^| .DBGLNO 0x025b,0x025e,0x0265,0x0267,0x0284,0x0287,0x0288,0x0295,0x0297,0x0299,0x02a1,0x02a2,0x02a4 04e6 ; -------------------------------------------------------------------------------------- 04e6 ; Debug chain 04e6 ; -------------------------------------------------------------------------------------- 04e6 0000 0008 | | .DBGLEN 0x0000,0x0008 04e8 02b3 02b6 | | .DBGLNO 0x02b3,0x02b6,0x02bd,0x02bf,0x02dc,0x02df,0x02e0,0x02ed 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; Debug chain 04f0 ; -------------------------------------------------------------------------------------- 04f0 0002 000d | | .DBGLEN 0x0002,0x000d 04f2 02f3 02f7 | | .DBGLNO 0x02f3,0x02f7,0x02f8,0x02fa,0x02fd,0x0304,0x0306,0x0309,0x030c,0x030d,0x0313,0x0315,0x0317,0x0319,0x0337 0501 ; -------------------------------------------------------------------------------------- 0501 ; Debug chain 0501 ; -------------------------------------------------------------------------------------- 0501 0003 0000 | | .DBGLEN 0x0003,0x0000 0503 034b 034d | K M| .DBGLNO 0x034b,0x034d,0x034f 0506 ; -------------------------------------------------------------------------------------- 0506 ; Debug chain 0506 ; -------------------------------------------------------------------------------------- 0506 0001 0004 | | .DBGLEN 0x0001,0x0004 0508 0352 036a | R j| .DBGLNO 0x0352,0x036a,0x036b,0x0370,0x0374 050d 0001 0002 | | .XXX[0x4] 050f 0006 0005 | | 0511 ; -------------------------------------------------------------------------------------- 0511 ; Debug chain 0511 ; -------------------------------------------------------------------------------------- 0511 0000 0001 | | .DBGLEN 0x0000,0x0001 0513 0383 | | .DBGLNO 0x0383 0514 ; -------------------------------------------------------------------------------------- 0514 ; Debug chain 0514 ; -------------------------------------------------------------------------------------- 0514 0000 0001 | | .DBGLEN 0x0000,0x0001 0516 038b | | .DBGLNO 0x038b 0517 ; -------------------------------------------------------------------------------------- 0517 ; Debug chain 0517 ; -------------------------------------------------------------------------------------- 0517 0000 0001 | | .DBGLEN 0x0000,0x0001 0519 0393 | | .DBGLNO 0x0393 051a ; -------------------------------------------------------------------------------------- 051a ; Debug chain 051a ; -------------------------------------------------------------------------------------- 051a 0000 0001 | | .DBGLEN 0x0000,0x0001 051c 039b | | .DBGLNO 0x039b 051d ; -------------------------------------------------------------------------------------- 051d ; Debug chain 051d ; -------------------------------------------------------------------------------------- 051d 0000 0001 | | .DBGLEN 0x0000,0x0001 051f 03a3 | | .DBGLNO 0x03a3 0520 0000 0000 | | .BLANK 0000[0xe0]