|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06d8c3
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0490 | | .CONST 0x0490 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00dd | | .CONST 0x00dd ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002d | - | .CONST 0x002d ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional
000c 4800 |H | Short_Literal 0x0
000d 4804 |H | Short_Literal 0x4
000e 029f 00eb | | Declare_Subprogram For_Call,INIT_00e8
0010 03fe | | Declare_Type Discrete,Defined,Visible
0011 4800 |H | Short_Literal 0x0
0012 4803 |H | Short_Literal 0x3
0013 029f 0113 | | Declare_Subprogram For_Call,INIT_0110
0015 03fe | | Declare_Type Discrete,Defined,Visible
0016 0007 | | Action Break_Optional
0017 0007 | | Action Break_Optional
0018 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138
001a 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178
001c 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188
001e 029a 01ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01a8
0020 029a 01db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d8
0022 029a 01f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f0
0024 029a 025b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0258
0026 029a 0273 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0270
0028 00e2 | | Load_Encached Integer_Cache
0029 00e2 | | Load_Encached Integer_Cache
002a 02a0 | | Declare_Subprogram Null_Subprogram
002b 4802 |H | Short_Literal 0x2
002c 032e | . | Declare_Type Record,Defined,Visible
002d 4fff |O | Short_Literal 0x7ff
002e 00e2 | | Load_Encached Integer_Cache
002f 03f0 | | Declare_Variable Discrete,Visible,With_Value
0030 00d9 | | Load_Top At_Offset_1
0031 029f 0433 | 3| Declare_Subprogram For_Call,INIT_0430
0033 4801 |H | Short_Literal 0x1
0034 032e | . | Declare_Type Record,Defined,Visible
0035 00bf | | Action Accept_Activation
0036 00e2 | | Load_Encached Integer_Cache
0037 060c | | Execute_Immediate Set_Value_Unchecked,0xc
0038 00e2 | | Load_Encached Integer_Cache
0039 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
003a 00e2 | | Load_Encached Integer_Cache
003b 0606 | | Execute_Immediate Set_Value_Unchecked,0x6
003c 00e2 | | Load_Encached Integer_Cache
003d 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
003e e219 | | Load 0x1,0x19
003f 0322 | " | Declare_Variable Record
0040 00d8 | | Load_Top At_Offset_0
0041 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0042 e21b | | Load 0x1,0x1b
0043 00d9 | | Load_Top At_Offset_1
0044 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0045 00da | | Load_Top At_Offset_2
0046 00d0 | | Action Swap_Control
0047 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0048 e219 | | Load 0x1,0x19
0049 0322 | " | Declare_Variable Record
004a 00d8 | | Load_Top At_Offset_0
004b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
004c e21b | | Load 0x1,0x1b
004d 00d9 | | Load_Top At_Offset_1
004e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
004f 00db | | Load_Top At_Offset_3
0050 00d0 | | Action Swap_Control
0051 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0052 e219 | | Load 0x1,0x19
0053 0322 | " | Declare_Variable Record
0054 00d8 | | Load_Top At_Offset_0
0055 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0056 e21b | | Load 0x1,0x1b
0057 00d9 | | Load_Top At_Offset_1
0058 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0059 e21d | | Load 0x1,0x1d
005a 00d0 | | Action Swap_Control
005b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
005c e219 | | Load 0x1,0x19
005d 0322 | " | Declare_Variable Record
005e 00d8 | | Load_Top At_Offset_0
005f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0060 e21b | | Load 0x1,0x1b
0061 00d9 | | Load_Top At_Offset_1
0062 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0063 e21d | | Load 0x1,0x1d
0064 00d0 | | Action Swap_Control
0065 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0066 e219 | | Load 0x1,0x19
0067 0322 | " | Declare_Variable Record
0068 00d8 | | Load_Top At_Offset_0
0069 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
006a e21b | | Load 0x1,0x1b
006b 00d9 | | Load_Top At_Offset_1
006c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
006d e21d | | Load 0x1,0x1d
006e 00d0 | | Action Swap_Control
006f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0070 e20d | | Load 0x1,0xd
0071 0266 | f | Execute Discrete,Bounds
0072 e219 | | Load 0x1,0x19
0073 029f 028b | | Declare_Subprogram For_Call,INIT_0288
0075 4801 |H | Short_Literal 0x1
0076 035d | ] | Declare_Type Array,Defined
0077 00d8 | | Load_Top At_Offset_0
0078 0337 | 7 | Declare_Variable Array
0079 00d8 | | Load_Top At_Offset_0
007a 0335 | 5 | Declare_Variable Array,Duplicate
007b 00cd | | Action Spare6_Action
007c e21e | | Load 0x1,0x1e
007d 4800 |H | Short_Literal 0x0
007e 00da | | Load_Top At_Offset_2
007f 01d6 | | Execute Vector,Field_Write
0080 e21f | | Load 0x1,0x1f
0081 4801 |H | Short_Literal 0x1
0082 00da | | Load_Top At_Offset_2
0083 01d6 | | Execute Vector,Field_Write
0084 e220 | | Load 0x1,0x20
0085 4802 |H | Short_Literal 0x2
0086 00da | | Load_Top At_Offset_2
0087 01d6 | | Execute Vector,Field_Write
0088 e221 | ! | Load 0x1,0x21
0089 4803 |H | Short_Literal 0x3
008a 00da | | Load_Top At_Offset_2
008b 01d6 | | Execute Vector,Field_Write
008c 00db | | Load_Top At_Offset_3
008d 4804 |H | Short_Literal 0x4
008e 00da | | Load_Top At_Offset_2
008f 01d6 | | Execute Vector,Field_Write
0090 00d9 | | Load_Top At_Offset_1
0091 01d4 | | Execute Vector,Structure_Write
0092 4800 |H | Short_Literal 0x0
0093 4801 |H | Short_Literal 0x1
0094 029f 02a3 | | Declare_Subprogram For_Call,INIT_02a0
0096 03fd | | Declare_Type Discrete,Defined
0097 e21b | | Load 0x1,0x1b
0098 e21a | | Load 0x1,0x1a
0099 e21d | | Load 0x1,0x1d
009a e21c | | Load 0x1,0x1c
009b 00e8 | | Load_Encached Character_Cache
009c 02a0 | | Declare_Subprogram Null_Subprogram
009d 4802 |H | Short_Literal 0x2
009e 035d | ] | Declare_Type Array,Defined
009f e21b | | Load 0x1,0x1b
00a0 e21a | | Load 0x1,0x1a
00a1 e21d | | Load 0x1,0x1d
00a2 e21c | | Load 0x1,0x1c
00a3 e225 | % | Load 0x1,0x25
00a4 02a0 | | Declare_Subprogram Null_Subprogram
00a5 4802 |H | Short_Literal 0x2
00a6 035d | ] | Declare_Type Array,Defined
00a7 00d9 | | Load_Top At_Offset_1
00a8 00d9 | | Load_Top At_Offset_1
00a9 02a0 | | Declare_Subprogram Null_Subprogram
00aa 4802 |H | Short_Literal 0x2
00ab 032d | - | Declare_Type Record,Defined
00ac 00d8 | | Load_Top At_Offset_0
00ad 0322 | " | Declare_Variable Record
00ae 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00af 00c7 | | Action Elaborate_Subprogram
00b0 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00b1 00c7 | | Action Elaborate_Subprogram
00b2 029d 02cb | | Declare_Subprogram For_Outer_Call,INIT_02c8
00b4 4800 |H | Short_Literal 0x0
00b5 4802 |H | Short_Literal 0x2
00b6 e001 | | Load 0x0,0x1
00b7 01d7 | | Execute Vector,Field_Read
00b8 02a0 | | Declare_Subprogram Null_Subprogram
00b9 038e | | Declare_Type Package,Defined
00ba e001 | | Load 0x0,0x1
00bb 4801 |H | Short_Literal 0x1
00bc e001 | | Load 0x0,0x1
00bd 01d7 | | Execute Vector,Field_Read
00be 4802 |H | Short_Literal 0x2
00bf 00db | | Load_Top At_Offset_3
00c0 020e | | Execute Module,Augment_Imports
00c1 0387 | | Declare_Variable Package
00c2 e002 | | Load 0x0,0x2
00c3 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00c4 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00c5 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00c6 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00c7 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00c8 4806 |H | Short_Literal 0x6
00c9 e22b | + | Load 0x1,0x2b
00ca 020e | | Execute Module,Augment_Imports
00cb 00d8 | | Load_Top At_Offset_0
00cc 020f | | Execute Module,Activate
00cd 029d 02db | | Declare_Subprogram For_Outer_Call,INIT_02d8
00cf 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00d0 00c7 | | Action Elaborate_Subprogram
00d1 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00d2 00c7 | | Action Elaborate_Subprogram
00d3 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00d4 00c7 | | Action Elaborate_Subprogram
00d5 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00d6 00c7 | | Action Elaborate_Subprogram
00d7 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00d8 00c7 | | Action Elaborate_Subprogram
00d9 1d0f | | Execute_Immediate Reference_Lex_1,0xf
00da 00c7 | | Action Elaborate_Subprogram
00db 029d 02eb | | Declare_Subprogram For_Outer_Call,INIT_02e8
00dd BODY_0008:
00dd 00da | | Load_Top At_Offset_2
00de 180d | | Execute Package,Field_Execute,Field_Number 0xd
00df 822d | - | Call 0x1,0x2d
00e0 00da | | Load_Top At_Offset_2
00e1 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e2 00bc | | Action Signal_Activated
00e3 00bb | | Action Signal_Completion
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 0x7
00ec 4302 |C | Exit_Subprogram From_Utility,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 0441 | A| Action Push_String_Extended_Indexed,0x441 ; "MODEL_MARKER_ID"
00f8 4201 |B | Exit_Subprogram From_Utility,With_Result,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,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,0x1
0102 00db | | Load_Top At_Offset_3
0103 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0104 00db | | Load_Top At_Offset_3
0105 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0106 e20d | | Load 0x1,0xd
0107 00dc | | Load_Top At_Offset_4
0108 0267 | g | Execute Discrete,Predecessor
0109 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
010a e20d | | Load 0x1,0xd
010b 00dc | | Load_Top At_Offset_4
010c 0268 | h | Execute Discrete,Successor
010d 4202 |B | Exit_Subprogram From_Utility,With_Result,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 4607 |F | Jump_Case 0x7
0114 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0115 7807 |x | Jump 0x11d ; case 0x1
0116 780a |x | Jump 0x121 ; case 0x2
0117 780e |x | Jump 0x126 ; case 0x3
0118 7811 |x | Jump 0x12a ; case 0x4
0119 7812 |x | Jump 0x12c ; case 0x5
011a 7813 |x | Jump 0x12e ; case 0x6
011b 7816 |x | Jump 0x132 ; case 0x7
011c 4302 |C | .XXX[0x1]
011d 00da | | Load_Top At_Offset_2
011e 0091 0446 | F| Action Push_String_Extended_Indexed,0x446 ; "RIGHT"
0120 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0121 00db | | Load_Top At_Offset_3
0122 00db | | Load_Top At_Offset_3
0123 00e0 | | Load_Encached Standard_Cache
0124 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0125 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0126 00da | | Load_Top At_Offset_2
0127 00e0 | | Load_Encached Standard_Cache
0128 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0129 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
012a 00db | | Load_Top At_Offset_3
012b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
012c 00db | | Load_Top At_Offset_3
012d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
012e e20e | | Load 0x1,0xe
012f 00dc | | Load_Top At_Offset_4
0130 0267 | g | Execute Discrete,Predecessor
0131 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0132 e20e | | Load 0x1,0xe
0133 00dc | | Load_Top At_Offset_4
0134 0268 | h | Execute Discrete,Successor
0135 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0136 0000 0000 | | .XXX[0x2]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013c | < | .CONST 0x013c ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b 00e8 | | Load_Encached Character_Cache
013c BODY_0138:
013c 00db | | Load_Top At_Offset_3
013d e224 | $ | Load 0x1,0x24
013e 01d5 | | Execute Vector,Field_Reference
013f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0140 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0141 e5ff | | Load 0x2,-0x1
0142 e224 | $ | Load 0x1,0x24
0143 01d5 | | Execute Vector,Field_Reference
0144 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0145 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0146 822a | * | Call 0x1,0x2a
0147 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0148 00db | | Load_Top At_Offset_3
0149 e224 | $ | Load 0x1,0x24
014a 01d5 | | Execute Vector,Field_Reference
014b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
014c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014d e5ff | | Load 0x2,-0x1
014e e224 | $ | Load 0x1,0x24
014f 01d5 | | Execute Vector,Field_Reference
0150 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0151 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0152 4820 |H | Short_Literal 0x20
0153 822c | , | Call 0x1,0x2c
0154 e5fe | | Load 0x2,-0x2
0155 e224 | $ | Load 0x1,0x24
0156 01d5 | | Execute Vector,Field_Reference
0157 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0158 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0159 e5fe | | Load 0x2,-0x2
015a e224 | $ | Load 0x1,0x24
015b 01d5 | | Execute Vector,Field_Reference
015c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
015d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
015e 00da | | Load_Top At_Offset_2
015f 822c | , | Call 0x1,0x2c
0160 e5fe | | Load 0x2,-0x2
0161 e224 | $ | Load 0x1,0x24
0162 01d5 | | Execute Vector,Field_Reference
0163 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0164 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0165 e5ff | | Load 0x2,-0x1
0166 e224 | $ | Load 0x1,0x24
0167 01d5 | | Execute Vector,Field_Reference
0168 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0169 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
016a e5fe | | Load 0x2,-0x2
016b e224 | $ | Load 0x1,0x24
016c 01d5 | | Execute Vector,Field_Reference
016d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
016e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
016f e5ff | | Load 0x2,-0x1
0170 e224 | $ | Load 0x1,0x24
0171 01d5 | | Execute Vector,Field_Reference
0172 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0173 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0174 4503 |E | Exit_Subprogram 0x3
0175 0000 0000 | | .XXX[0x3]
0177 0000 | |
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b 00da | | Load_Top At_Offset_2
017c e224 | $ | Load 0x1,0x24
017d 01d5 | | Execute Vector,Field_Reference
017e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
017f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0180 00db | | Load_Top At_Offset_3
0181 e224 | $ | Load 0x1,0x24
0182 01d5 | | Execute Vector,Field_Reference
0183 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0184 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0185 822a | * | Call 0x1,0x2a
0186 4401 |D | Exit_Subprogram With_Result,0x1
0187 0000 | | .XXX[0x1]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 00da | | Load_Top At_Offset_2
018c e224 | $ | Load 0x1,0x24
018d 01d5 | | Execute Vector,Field_Reference
018e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
018f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0190 e5fe | | Load 0x2,-0x2
0191 e224 | $ | Load 0x1,0x24
0192 01d5 | | Execute Vector,Field_Reference
0193 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0194 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0195 027f | | Execute Discrete,Equal
0196 00db | | Load_Top At_Offset_3
0197 e224 | $ | Load 0x1,0x24
0198 01d5 | | Execute Vector,Field_Reference
0199 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
019a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
019b e5fe | | Load 0x2,-0x2
019c e224 | $ | Load 0x1,0x24
019d 01d5 | | Execute Vector,Field_Reference
019e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
019f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01a0 027f | | Execute Discrete,Equal
01a1 0279 | y | Execute Discrete,And
01a2 4402 |D | Exit_Subprogram With_Result,0x2
01a3 0000 0000 | | .BLANK 0000[0x5]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 00cf | | Action Mark_Auxiliary
01ac e21a | | Load 0x1,0x1a
01ad e21b | | Load 0x1,0x1b
01ae 0263 | c | Execute Discrete,Above_Bound
01af 7024 |p$ | Jump_Nonzero 0x1d4
01b0 00cf | | Action Mark_Auxiliary
01b1 e21c | | Load 0x1,0x1c
01b2 e21d | | Load 0x1,0x1d
01b3 0263 | c | Execute Discrete,Above_Bound
01b4 701c |p | Jump_Nonzero 0x1d1
01b5 00d8 | | Load_Top At_Offset_0
01b6 e404 | | Load 0x2,0x4
01b7 e229 | ) | Load 0x1,0x29
01b8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01b9 01a7 | | Execute Matrix,Field_Read
01ba 6814 |h | Jump_Zero 0x1cf
01bb 00d8 | | Load_Top At_Offset_0
01bc e404 | | Load 0x2,0x4
01bd 822a | * | Call 0x1,0x2a
01be e5ff | | Load 0x2,-0x1
01bf 027f | | Execute Discrete,Equal
01c0 680e |h | Jump_Zero 0x1cf
01c1 00db | | Load_Top At_Offset_3
01c2 e5fe | | Load 0x2,-0x2
01c3 e224 | $ | Load 0x1,0x24
01c4 01d5 | | Execute Vector,Field_Reference
01c5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01c6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01c7 00d8 | | Load_Top At_Offset_0
01c8 e5fe | | Load 0x2,-0x2
01c9 e224 | $ | Load 0x1,0x24
01ca 01d5 | | Execute Vector,Field_Reference
01cb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01cc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01cd 4801 |H | Short_Literal 0x1
01ce 4402 |D | Exit_Subprogram With_Result,0x2
01cf 00c8 | | Action Pop_Auxiliary_Range
01d0 3fe4 |? | Loop_Increasing 0x1b5
01d1 00ce | | Action Pop_Auxiliary
01d2 00c8 | | Action Pop_Auxiliary_Range
01d3 3fdc |? | Loop_Increasing 0x1b0
01d4 00ce | | Action Pop_Auxiliary
01d5 4800 |H | Short_Literal 0x0
01d6 4402 |D | Exit_Subprogram With_Result,0x2
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 e224 | $ | Load 0x1,0x24
01dd 01d5 | | Execute Vector,Field_Reference
01de 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01e0 00db | | Load_Top At_Offset_3
01e1 e224 | $ | Load 0x1,0x24
01e2 01d5 | | Execute Vector,Field_Reference
01e3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01e4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01e5 00db | | Load_Top At_Offset_3
01e6 e224 | $ | Load 0x1,0x24
01e7 01d5 | | Execute Vector,Field_Reference
01e8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01e9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01ea 00db | | Load_Top At_Offset_3
01eb e224 | $ | Load 0x1,0x24
01ec 01d5 | | Execute Vector,Field_Reference
01ed 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01ee 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01ef 4503 |E | Exit_Subprogram 0x3
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3 | | .CONST 0x01f3 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0001 | | .CONST 0x0001 ; Number of locals
01f3 BODY_01f0:
01f3 INIT_01f0:
01f3 00db | | Load_Top At_Offset_3
01f4 4603 |F | Jump_Case 0x3
01f5 7819 |x | Jump 0x20f ; case 0x0
01f6 782e |x. | Jump 0x225 ; case 0x1
01f7 7843 |xC | Jump 0x23b ; case 0x2
01f8 7800 |x | Jump 0x1f9 ; case 0x3
01f9 00da | | Load_Top At_Offset_2
01fa e224 | $ | Load 0x1,0x24
01fb 01d5 | | Execute Vector,Field_Reference
01fc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01fd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01fe e21d | | Load 0x1,0x1d
01ff 027f | | Execute Discrete,Equal
0200 6802 |h | Jump_Zero 0x203
0201 4800 |H | Short_Literal 0x0
0202 4402 |D | Exit_Subprogram With_Result,0x2
0203 00da | | Load_Top At_Offset_2
0204 e224 | $ | Load 0x1,0x24
0205 01d5 | | Execute Vector,Field_Reference
0206 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0207 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0208 0aff | | Execute_Immediate Plus,-0x1
0209 00db | | Load_Top At_Offset_3
020a e224 | $ | Load 0x1,0x24
020b 01d5 | | Execute Vector,Field_Reference
020c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
020d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
020e 7841 |xA | Jump 0x250
020f 00da | | Load_Top At_Offset_2
0210 e224 | $ | Load 0x1,0x24
0211 01d5 | | Execute Vector,Field_Reference
0212 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0213 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0214 e21a | | Load 0x1,0x1a
0215 027f | | Execute Discrete,Equal
0216 6802 |h | Jump_Zero 0x219
0217 4800 |H | Short_Literal 0x0
0218 4402 |D | Exit_Subprogram With_Result,0x2
0219 00da | | Load_Top At_Offset_2
021a e224 | $ | Load 0x1,0x24
021b 01d5 | | Execute Vector,Field_Reference
021c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
021d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021e 0a01 | | Execute_Immediate Plus,0x1
021f 00db | | Load_Top At_Offset_3
0220 e224 | $ | Load 0x1,0x24
0221 01d5 | | Execute Vector,Field_Reference
0222 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0223 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0224 782b |x+ | Jump 0x250
0225 00da | | Load_Top At_Offset_2
0226 e224 | $ | Load 0x1,0x24
0227 01d5 | | Execute Vector,Field_Reference
0228 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0229 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
022a e21b | | Load 0x1,0x1b
022b 027f | | Execute Discrete,Equal
022c 6802 |h | Jump_Zero 0x22f
022d 4800 |H | Short_Literal 0x0
022e 4402 |D | Exit_Subprogram With_Result,0x2
022f 00da | | Load_Top At_Offset_2
0230 e224 | $ | Load 0x1,0x24
0231 01d5 | | Execute Vector,Field_Reference
0232 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0233 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0234 0aff | | Execute_Immediate Plus,-0x1
0235 00db | | Load_Top At_Offset_3
0236 e224 | $ | Load 0x1,0x24
0237 01d5 | | Execute Vector,Field_Reference
0238 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0239 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
023a 7815 |x | Jump 0x250
023b 00da | | Load_Top At_Offset_2
023c e224 | $ | Load 0x1,0x24
023d 01d5 | | Execute Vector,Field_Reference
023e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
023f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0240 e21c | | Load 0x1,0x1c
0241 027f | | Execute Discrete,Equal
0242 6802 |h | Jump_Zero 0x245
0243 4800 |H | Short_Literal 0x0
0244 4402 |D | Exit_Subprogram With_Result,0x2
0245 00da | | Load_Top At_Offset_2
0246 e224 | $ | Load 0x1,0x24
0247 01d5 | | Execute Vector,Field_Reference
0248 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0249 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
024a 0a01 | | Execute_Immediate Plus,0x1
024b 00db | | Load_Top At_Offset_3
024c e224 | $ | Load 0x1,0x24
024d 01d5 | | Execute Vector,Field_Reference
024e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
024f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0250 4801 |H | Short_Literal 0x1
0251 4402 |D | Exit_Subprogram With_Result,0x2
0252 0000 0000 | | .BLANK 0000[0x6]
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 00cf | | Action Mark_Auxiliary
025c e21c | | Load 0x1,0x1c
025d e21d | | Load 0x1,0x1d
025e 0263 | c | Execute Discrete,Above_Bound
025f 700c |p | Jump_Nonzero 0x26c
0260 4800 |H | Short_Literal 0x0
0261 00d9 | | Load_Top At_Offset_1
0262 e5ff | | Load 0x2,-0x1
0263 e224 | $ | Load 0x1,0x24
0264 01d5 | | Execute Vector,Field_Reference
0265 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0266 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0267 e229 | ) | Load 0x1,0x29
0268 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0269 01a6 | | Execute Matrix,Field_Write
026a 00c8 | | Action Pop_Auxiliary_Range
026b 3ff4 |? | Loop_Increasing 0x260
026c 4502 |E | Exit_Subprogram 0x2
026d 0000 0000 | | .XXX[0x3]
026f 0000 | |
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 00cf | | Action Mark_Auxiliary
0274 e21c | | Load 0x1,0x1c
0275 e21d | | Load 0x1,0x1d
0276 0263 | c | Execute Discrete,Above_Bound
0277 700c |p | Jump_Nonzero 0x284
0278 4801 |H | Short_Literal 0x1
0279 00d9 | | Load_Top At_Offset_1
027a e5ff | | Load 0x2,-0x1
027b e224 | $ | Load 0x1,0x24
027c 01d5 | | Execute Vector,Field_Reference
027d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
027e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
027f e229 | ) | Load 0x1,0x29
0280 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0281 01a6 | | Execute Matrix,Field_Write
0282 00c8 | | Action Pop_Auxiliary_Range
0283 3ff4 |? | Loop_Increasing 0x278
0284 4502 |E | Exit_Subprogram 0x2
0285 0000 0000 | | .XXX[0x3]
0287 0000 | |
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 00d1 | | Pop_Control Pop_Count_1
028c 00da | | Load_Top At_Offset_2
028d 01dc | | Execute Vector,Last
028e 00db | | Load_Top At_Offset_3
028f 01dd | | Execute Vector,First
0290 0263 | c | Execute Discrete,Above_Bound
0291 7006 |p | Jump_Nonzero 0x298
0292 00d8 | | Load_Top At_Offset_0
0293 e5ff | | Load 0x2,-0x1
0294 01d5 | | Execute Vector,Field_Reference
0295 1c00 | | Execute_Immediate Run_Utility,0x0
0296 0a01 | | Execute_Immediate Plus,0x1
0297 7ff8 | | Jump 0x290
0298 4302 |C | Exit_Subprogram From_Utility,0x2
0299 0000 0000 | | .BLANK 0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 4607 |F | Jump_Case 0x7
02a4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
02a5 7807 |x | Jump 0x2ad ; case 0x1
02a6 780a |x | Jump 0x2b1 ; case 0x2
02a7 780e |x | Jump 0x2b6 ; case 0x3
02a8 7811 |x | Jump 0x2ba ; case 0x4
02a9 7812 |x | Jump 0x2bc ; case 0x5
02aa 7813 |x | Jump 0x2be ; case 0x6
02ab 7816 |x | Jump 0x2c2 ; case 0x7
02ac 4302 |C | .XXX[0x1]
02ad 00da | | Load_Top At_Offset_2
02ae 0091 044a | J| Action Push_String_Extended_Indexed,0x44a ; "PROTECTED"
02b0 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
02b1 00db | | Load_Top At_Offset_3
02b2 00db | | Load_Top At_Offset_3
02b3 00e0 | | Load_Encached Standard_Cache
02b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02b5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02b6 00da | | Load_Top At_Offset_2
02b7 00e0 | | Load_Encached Standard_Cache
02b8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02b9 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
02ba 00db | | Load_Top At_Offset_3
02bb 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02bc 00db | | Load_Top At_Offset_3
02bd 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02be e225 | % | Load 0x1,0x25
02bf 00dc | | Load_Top At_Offset_4
02c0 0267 | g | Execute Discrete,Predecessor
02c1 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02c2 e225 | % | Load 0x1,0x25
02c3 00dc | | Load_Top At_Offset_4
02c4 0268 | h | Execute Discrete,Successor
02c5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02c6 0000 0000 | | .XXX[0x2]
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 00db | | Load_Top At_Offset_3
02cc 00db | | Load_Top At_Offset_3
02cd e229 | ) | Load 0x1,0x29
02ce 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02cf 01a7 | | Execute Matrix,Field_Read
02d0 4402 |D | Exit_Subprogram With_Result,0x2
02d1 0000 0000 | | .BLANK 0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db 00da | | Load_Top At_Offset_2
02dc e5fd | | Load 0x2,-0x3
02dd e5fe | | Load 0x2,-0x2
02de e229 | ) | Load 0x1,0x29
02df 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02e0 01a6 | | Execute Matrix,Field_Write
02e1 00da | | Load_Top At_Offset_2
02e2 e5fd | | Load 0x2,-0x3
02e3 e5fe | | Load 0x2,-0x2
02e4 e22b | + | Load 0x1,0x2b
02e5 180f | | Execute Package,Field_Execute,Field_Number 0xf
02e6 4504 |E | Exit_Subprogram 0x4
02e7 0000 | | .XXX[0x1]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 00cf | | Action Mark_Auxiliary
02ec e21a | | Load 0x1,0x1a
02ed e21b | | Load 0x1,0x1b
02ee 0263 | c | Execute Discrete,Above_Bound
02ef 7016 |p | Jump_Nonzero 0x306
02f0 00cf | | Action Mark_Auxiliary
02f1 e21c | | Load 0x1,0x1c
02f2 e21d | | Load 0x1,0x1d
02f3 0263 | c | Execute Discrete,Above_Bound
02f4 700e |p | Jump_Nonzero 0x303
02f5 4820 |H | Short_Literal 0x20
02f6 00d9 | | Load_Top At_Offset_1
02f7 e404 | | Load 0x2,0x4
02f8 e229 | ) | Load 0x1,0x29
02f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02fa 01a6 | | Execute Matrix,Field_Write
02fb 4801 |H | Short_Literal 0x1
02fc 00d9 | | Load_Top At_Offset_1
02fd e404 | | Load 0x2,0x4
02fe e229 | ) | Load 0x1,0x29
02ff 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0300 01a6 | | Execute Matrix,Field_Write
0301 00c8 | | Action Pop_Auxiliary_Range
0302 3ff2 |? | Loop_Increasing 0x2f5
0303 00ce | | Action Pop_Auxiliary
0304 00c8 | | Action Pop_Auxiliary_Range
0305 3fea |? | Loop_Increasing 0x2f0
0306 00ce | | Action Pop_Auxiliary
0307 4855 |HU | Short_Literal 0x55
0308 e21d | | Load 0x1,0x1d
0309 e21a | | Load 0x1,0x1a
030a e229 | ) | Load 0x1,0x29
030b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
030c 01a6 | | Execute Matrix,Field_Write
030d 484f |HO | Short_Literal 0x4f
030e e21d | | Load 0x1,0x1d
030f 0a01 | | Execute_Immediate Plus,0x1
0310 e21a | | Load 0x1,0x1a
0311 e229 | ) | Load 0x1,0x29
0312 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0313 01a6 | | Execute Matrix,Field_Write
0314 4843 |HC | Short_Literal 0x43
0315 e21d | | Load 0x1,0x1d
0316 0a02 | | Execute_Immediate Plus,0x2
0317 e21a | | Load 0x1,0x1a
0318 e229 | ) | Load 0x1,0x29
0319 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
031a 01a6 | | Execute Matrix,Field_Write
031b 4855 |HU | Short_Literal 0x55
031c e21d | | Load 0x1,0x1d
031d 0a03 | | Execute_Immediate Plus,0x3
031e e21a | | Load 0x1,0x1a
031f e229 | ) | Load 0x1,0x29
0320 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0321 01a6 | | Execute Matrix,Field_Write
0322 484f |HO | Short_Literal 0x4f
0323 e21d | | Load 0x1,0x1d
0324 0a04 | | Execute_Immediate Plus,0x4
0325 e21a | | Load 0x1,0x1a
0326 e229 | ) | Load 0x1,0x29
0327 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0328 01a6 | | Execute Matrix,Field_Write
0329 4843 |HC | Short_Literal 0x43
032a e21d | | Load 0x1,0x1d
032b 0a05 | | Execute_Immediate Plus,0x5
032c e21a | | Load 0x1,0x1a
032d e229 | ) | Load 0x1,0x29
032e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
032f 01a6 | | Execute Matrix,Field_Write
0330 485a |HZ | Short_Literal 0x5a
0331 e21d | | Load 0x1,0x1d
0332 e21b | | Load 0x1,0x1b
0333 e229 | ) | Load 0x1,0x29
0334 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0335 01a6 | | Execute Matrix,Field_Write
0336 4850 |HP | Short_Literal 0x50
0337 e21d | | Load 0x1,0x1d
0338 0a01 | | Execute_Immediate Plus,0x1
0339 e21b | | Load 0x1,0x1b
033a e229 | ) | Load 0x1,0x29
033b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
033c 01a6 | | Execute Matrix,Field_Write
033d 484f |HO | Short_Literal 0x4f
033e e21d | | Load 0x1,0x1d
033f 0a02 | | Execute_Immediate Plus,0x2
0340 e21b | | Load 0x1,0x1b
0341 e229 | ) | Load 0x1,0x29
0342 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0343 01a6 | | Execute Matrix,Field_Write
0344 4854 |HT | Short_Literal 0x54
0345 e21d | | Load 0x1,0x1d
0346 e21b | | Load 0x1,0x1b
0347 0a01 | | Execute_Immediate Plus,0x1
0348 e229 | ) | Load 0x1,0x29
0349 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
034a 01a6 | | Execute Matrix,Field_Write
034b 4841 |HA | Short_Literal 0x41
034c e21d | | Load 0x1,0x1d
034d 0a01 | | Execute_Immediate Plus,0x1
034e e21b | | Load 0x1,0x1b
034f 0a01 | | Execute_Immediate Plus,0x1
0350 e229 | ) | Load 0x1,0x29
0351 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0352 01a6 | | Execute Matrix,Field_Write
0353 484c |HL | Short_Literal 0x4c
0354 e21d | | Load 0x1,0x1d
0355 0a02 | | Execute_Immediate Plus,0x2
0356 e21b | | Load 0x1,0x1b
0357 0a01 | | Execute_Immediate Plus,0x1
0358 e229 | ) | Load 0x1,0x29
0359 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
035a 01a6 | | Execute Matrix,Field_Write
035b 484f |HO | Short_Literal 0x4f
035c e21d | | Load 0x1,0x1d
035d e21b | | Load 0x1,0x1b
035e 0a02 | | Execute_Immediate Plus,0x2
035f e229 | ) | Load 0x1,0x29
0360 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0361 01a6 | | Execute Matrix,Field_Write
0362 4850 |HP | Short_Literal 0x50
0363 e21d | | Load 0x1,0x1d
0364 0a01 | | Execute_Immediate Plus,0x1
0365 e21b | | Load 0x1,0x1b
0366 0a02 | | Execute_Immediate Plus,0x2
0367 e229 | ) | Load 0x1,0x29
0368 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0369 01a6 | | Execute Matrix,Field_Write
036a 4841 |HA | Short_Literal 0x41
036b e21d | | Load 0x1,0x1d
036c 0a02 | | Execute_Immediate Plus,0x2
036d e21b | | Load 0x1,0x1b
036e 0a02 | | Execute_Immediate Plus,0x2
036f e229 | ) | Load 0x1,0x29
0370 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0371 01a6 | | Execute Matrix,Field_Write
0372 4852 |HR | Short_Literal 0x52
0373 e21d | | Load 0x1,0x1d
0374 0a03 | | Execute_Immediate Plus,0x3
0375 e21b | | Load 0x1,0x1b
0376 0a02 | | Execute_Immediate Plus,0x2
0377 e229 | ) | Load 0x1,0x29
0378 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0379 01a6 | | Execute Matrix,Field_Write
037a 4845 |HE | Short_Literal 0x45
037b e21d | | Load 0x1,0x1d
037c 0a04 | | Execute_Immediate Plus,0x4
037d e21b | | Load 0x1,0x1b
037e 0a02 | | Execute_Immediate Plus,0x2
037f e229 | ) | Load 0x1,0x29
0380 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0381 01a6 | | Execute Matrix,Field_Write
0382 4854 |HT | Short_Literal 0x54
0383 e21d | | Load 0x1,0x1d
0384 e21b | | Load 0x1,0x1b
0385 0a03 | | Execute_Immediate Plus,0x3
0386 e229 | ) | Load 0x1,0x29
0387 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0388 01a6 | | Execute Matrix,Field_Write
0389 4842 |HB | Short_Literal 0x42
038a e21d | | Load 0x1,0x1d
038b 0a01 | | Execute_Immediate Plus,0x1
038c e21b | | Load 0x1,0x1b
038d 0a03 | | Execute_Immediate Plus,0x3
038e e229 | ) | Load 0x1,0x29
038f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0390 01a6 | | Execute Matrix,Field_Write
0391 4843 |HC | Short_Literal 0x43
0392 e21d | | Load 0x1,0x1d
0393 0a02 | | Execute_Immediate Plus,0x2
0394 e21b | | Load 0x1,0x1b
0395 0a03 | | Execute_Immediate Plus,0x3
0396 e229 | ) | Load 0x1,0x29
0397 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0398 01a6 | | Execute Matrix,Field_Write
0399 484f |HO | Short_Literal 0x4f
039a e21d | | Load 0x1,0x1d
039b 0a03 | | Execute_Immediate Plus,0x3
039c e21b | | Load 0x1,0x1b
039d 0a03 | | Execute_Immediate Plus,0x3
039e e229 | ) | Load 0x1,0x29
039f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03a0 01a6 | | Execute Matrix,Field_Write
03a1 4845 |HE | Short_Literal 0x45
03a2 e21d | | Load 0x1,0x1d
03a3 e21b | | Load 0x1,0x1b
03a4 0a04 | | Execute_Immediate Plus,0x4
03a5 e229 | ) | Load 0x1,0x29
03a6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03a7 01a6 | | Execute Matrix,Field_Write
03a8 4855 |HU | Short_Literal 0x55
03a9 e21d | | Load 0x1,0x1d
03aa 0a01 | | Execute_Immediate Plus,0x1
03ab e21b | | Load 0x1,0x1b
03ac 0a04 | | Execute_Immediate Plus,0x4
03ad e229 | ) | Load 0x1,0x29
03ae 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03af 01a6 | | Execute Matrix,Field_Write
03b0 4847 |HG | Short_Literal 0x47
03b1 e21d | | Load 0x1,0x1d
03b2 0a02 | | Execute_Immediate Plus,0x2
03b3 e21b | | Load 0x1,0x1b
03b4 0a04 | | Execute_Immediate Plus,0x4
03b5 e229 | ) | Load 0x1,0x29
03b6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03b7 01a6 | | Execute Matrix,Field_Write
03b8 4843 |HC | Short_Literal 0x43
03b9 e21d | | Load 0x1,0x1d
03ba 0a03 | | Execute_Immediate Plus,0x3
03bb e21b | | Load 0x1,0x1b
03bc 0a04 | | Execute_Immediate Plus,0x4
03bd e229 | ) | Load 0x1,0x29
03be 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03bf 01a6 | | Execute Matrix,Field_Write
03c0 484e |HN | Short_Literal 0x4e
03c1 e21d | | Load 0x1,0x1d
03c2 0a04 | | Execute_Immediate Plus,0x4
03c3 e21b | | Load 0x1,0x1b
03c4 0a04 | | Execute_Immediate Plus,0x4
03c5 e229 | ) | Load 0x1,0x29
03c6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03c7 01a6 | | Execute Matrix,Field_Write
03c8 484d |HM | Short_Literal 0x4d
03c9 e21d | | Load 0x1,0x1d
03ca 0a05 | | Execute_Immediate Plus,0x5
03cb e21b | | Load 0x1,0x1b
03cc 0a04 | | Execute_Immediate Plus,0x4
03cd e229 | ) | Load 0x1,0x29
03ce 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03cf 01a6 | | Execute Matrix,Field_Write
03d0 4843 |HC | Short_Literal 0x43
03d1 e21d | | Load 0x1,0x1d
03d2 e21b | | Load 0x1,0x1b
03d3 0a05 | | Execute_Immediate Plus,0x5
03d4 e229 | ) | Load 0x1,0x29
03d5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03d6 01a6 | | Execute Matrix,Field_Write
03d7 4847 |HG | Short_Literal 0x47
03d8 e21d | | Load 0x1,0x1d
03d9 0a01 | | Execute_Immediate Plus,0x1
03da e21b | | Load 0x1,0x1b
03db 0a05 | | Execute_Immediate Plus,0x5
03dc e229 | ) | Load 0x1,0x29
03dd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03de 01a6 | | Execute Matrix,Field_Write
03df 4854 |HT | Short_Literal 0x54
03e0 e21d | | Load 0x1,0x1d
03e1 e21b | | Load 0x1,0x1b
03e2 0a06 | | Execute_Immediate Plus,0x6
03e3 e229 | ) | Load 0x1,0x29
03e4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03e5 01a6 | | Execute Matrix,Field_Write
03e6 484e |HN | Short_Literal 0x4e
03e7 e21d | | Load 0x1,0x1d
03e8 0a01 | | Execute_Immediate Plus,0x1
03e9 e21b | | Load 0x1,0x1b
03ea 0a06 | | Execute_Immediate Plus,0x6
03eb e229 | ) | Load 0x1,0x29
03ec 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03ed 01a6 | | Execute Matrix,Field_Write
03ee 4856 |HV | Short_Literal 0x56
03ef e21d | | Load 0x1,0x1d
03f0 e21b | | Load 0x1,0x1b
03f1 0a07 | | Execute_Immediate Plus,0x7
03f2 e229 | ) | Load 0x1,0x29
03f3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03f4 01a6 | | Execute Matrix,Field_Write
03f5 4843 |HC | Short_Literal 0x43
03f6 e21d | | Load 0x1,0x1d
03f7 0a01 | | Execute_Immediate Plus,0x1
03f8 e21b | | Load 0x1,0x1b
03f9 0a07 | | Execute_Immediate Plus,0x7
03fa e229 | ) | Load 0x1,0x29
03fb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03fc 01a6 | | Execute Matrix,Field_Write
03fd 4849 |HI | Short_Literal 0x49
03fe e21d | | Load 0x1,0x1d
03ff 0a02 | | Execute_Immediate Plus,0x2
0400 e21b | | Load 0x1,0x1b
0401 0a07 | | Execute_Immediate Plus,0x7
0402 e229 | ) | Load 0x1,0x29
0403 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0404 01a6 | | Execute Matrix,Field_Write
0405 4853 |HS | Short_Literal 0x53
0406 e21d | | Load 0x1,0x1d
0407 e21b | | Load 0x1,0x1b
0408 0a08 | | Execute_Immediate Plus,0x8
0409 e229 | ) | Load 0x1,0x29
040a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
040b 01a6 | | Execute Matrix,Field_Write
040c 4852 |HR | Short_Literal 0x52
040d e21d | | Load 0x1,0x1d
040e e21b | | Load 0x1,0x1b
040f 0a09 | | Execute_Immediate Plus,0x9
0410 e229 | ) | Load 0x1,0x29
0411 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0412 01a6 | | Execute Matrix,Field_Write
0413 4848 |HH | Short_Literal 0x48
0414 e21d | | Load 0x1,0x1d
0415 0a01 | | Execute_Immediate Plus,0x1
0416 e21b | | Load 0x1,0x1b
0417 0a09 | | Execute_Immediate Plus,0x9
0418 e229 | ) | Load 0x1,0x29
0419 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
041a 01a6 | | Execute Matrix,Field_Write
041b 4857 |HW | Short_Literal 0x57
041c e21d | | Load 0x1,0x1d
041d 0a01 | | Execute_Immediate Plus,0x1
041e e21b | | Load 0x1,0x1b
041f 0a0a | | Execute_Immediate Plus,0xa
0420 e229 | ) | Load 0x1,0x29
0421 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0422 01a6 | | Execute Matrix,Field_Write
0423 4855 |HU | Short_Literal 0x55
0424 e21d | | Load 0x1,0x1d
0425 e21b | | Load 0x1,0x1b
0426 0a0a | | Execute_Immediate Plus,0xa
0427 e229 | ) | Load 0x1,0x29
0428 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0429 01a6 | | Execute Matrix,Field_Write
042a 4501 |E | Exit_Subprogram 0x1
042b 0000 0000 | | .BLANK 0000[0x5]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433 | 3 | .CONST 0x0433 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0001 | | .CONST 0x0001 ; Number of locals
0433 BODY_0430:
0433 INIT_0430:
0433 4601 |F | Jump_Case 0x1
0434 7801 |x | Jump 0x436 ; case 0x0
0435 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0436 e217 | | Load 0x1,0x17
0437 0322 | " | Declare_Variable Record
0438 e218 | | Load 0x1,0x18
0439 00d9 | | Load_Top At_Offset_1
043a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
043b e218 | | Load 0x1,0x18
043c 00d9 | | Load_Top At_Offset_1
043d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
043e 00db | | Load_Top At_Offset_3
043f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0440 4302 |C | Exit_Subprogram From_Utility,0x2
0441 ; --------------------------------------------------------------------------------------
0441 ; STRING TABLE
0441 ; --------------------------------------------------------------------------------------
0441 0018 | | .STRTAB 0x0018->0x044d ; "MODEL_MARKER_ID"
0442 0025 | % | .STRTAB 0x0025->0x0454 ; "SELECTED_BLOCK_MARKER_ID"
0443 003b | ; | .STRTAB 0x003b->0x0460 ; "TOP_BLOCK_MARKER_ID"
0444 004c | L | .STRTAB 0x004c->0x046a ; "TOP_COPIED_MODEL_MARKER_ID"
0445 0064 | d | .STRTAB 0x0064->0x0477 ; "ON_TABLE_MARKER_ID"
0446 0074 | t | .STRTAB 0x0074->0x0480 ; "RIGHT"
0447 0077 | w | .STRTAB 0x0077->0x0482 ; "LEFT"
0448 0079 | y | .STRTAB 0x0079->0x0484 ; "UP"
0449 0079 | y | .STRTAB 0x0079->0x0485 ; "DOWN"
044a 007b | { | .STRTAB 0x007b->0x0487 ; "PROTECTED"
044b 0082 | | .STRTAB 0x0082->0x048c ; "FREE"
044c 0084 | | .STREND 0x0084->0x048e
044d 4d4f 4445 |MODE| .STRTAB_STRINGS
048e 0000 0000 | | .XXX[0x2]
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug Table
0490 ; --------------------------------------------------------------------------------------
0490 0004 0009 | | .DEBUG4 0x0004,0x0009,0x24ba,0x0000,0x0001,0x0012
0496 000b 04de | | .DBG4T 0x000b,0x04de,0x8000,0x0000
049a 0036 04f0 | 6 | .DBG4T 0x0036,0x04f0,0x8000,0x0000
049e 00eb 0000 | | .DBG4T 0x00eb,0x0000,0x0005,0x0000
04a2 0113 0000 | | .DBG4T 0x0113,0x0000,0x0005,0x0000
04a6 013b 050d | ; | .DBG4T 0x013b,0x050d,0x0001,0x0000
04aa 017b 0515 | { | .DBG4T 0x017b,0x0515,0x0002,0x0000
04ae 018b 0518 | | .DBG4T 0x018b,0x0518,0x0002,0x0000
04b2 01ab 051b | | .DBG4T 0x01ab,0x051b,0x0002,0x0000
04b6 01db 0525 | %| .DBG4T 0x01db,0x0525,0x0001,0x0000
04ba 01f3 0529 | )| .DBG4T 0x01f3,0x0529,0x0002,0x4000
04be 025b 0547 | [ G| .DBG4T 0x025b,0x0547,0x0001,0x0000
04c2 0273 054b | s K| .DBG4T 0x0273,0x054b,0x0001,0x0000
04c6 028b 0000 | | .DBG4T 0x028b,0x0000,0x0005,0x0000
04ca 02a3 0000 | | .DBG4T 0x02a3,0x0000,0x0005,0x0000
04ce 02cb 054f | O| .DBG4T 0x02cb,0x054f,0x0002,0x0000
04d2 02db 0552 | R| .DBG4T 0x02db,0x0552,0x0001,0x0000
04d6 02eb 0556 | V| .DBG4T 0x02eb,0x0556,0x0001,0x0000
04da 0433 0000 | 3 | .DBG4T 0x0433,0x0000,0x0005,0x0000
04de ; --------------------------------------------------------------------------------------
04de ; Debug chain
04de ; --------------------------------------------------------------------------------------
04de 0010 0000 | | .DBGLEN 0x0010,0x0000
04e0 000b 000c | | .DBGLNO 0x000b,0x000c,0x0011,0x0016,0x0017,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002d,0x0030
04f0 ; --------------------------------------------------------------------------------------
04f0 ; Debug chain
04f0 ; --------------------------------------------------------------------------------------
04f0 0018 0003 | | .DBGLEN 0x0018,0x0003
04f2 0036 0038 | 6 8| .DBGLNO 0x0036,0x0038,0x003a,0x003c,0x003e,0x0070,0x0092,0x0097,0x009f,0x00a7,0x00ac,0x00ae,0x00b0,0x00b2,0x00b4,0x00c2,0x00cd,0x00cf,0x00d1,0x00d3,0x00d5,0x00d7,0x00d9,0x00db,0x00dd,0x00df,0x00e0
050d ; --------------------------------------------------------------------------------------
050d ; Debug chain
050d ; --------------------------------------------------------------------------------------
050d 0001 0005 | | .DBGLEN 0x0001,0x0005
050f 013b 013c | ; <| .DBGLNO 0x013b,0x013c,0x0148,0x0154,0x0160,0x016a
0515 ; --------------------------------------------------------------------------------------
0515 ; Debug chain
0515 ; --------------------------------------------------------------------------------------
0515 0000 0001 | | .DBGLEN 0x0000,0x0001
0517 017b | { | .DBGLNO 0x017b
0518 ; --------------------------------------------------------------------------------------
0518 ; Debug chain
0518 ; --------------------------------------------------------------------------------------
0518 0000 0001 | | .DBGLEN 0x0000,0x0001
051a 018b | | .DBGLNO 0x018b
051b ; --------------------------------------------------------------------------------------
051b ; Debug chain
051b ; --------------------------------------------------------------------------------------
051b 0000 0008 | | .DBGLEN 0x0000,0x0008
051d 01ac 01b1 | | .DBGLNO 0x01ac,0x01b1,0x01b5,0x01bb,0x01c1,0x01c7,0x01cd,0x01d5
0525 ; --------------------------------------------------------------------------------------
0525 ; Debug chain
0525 ; --------------------------------------------------------------------------------------
0525 0000 0002 | | .DBGLEN 0x0000,0x0002
0527 01db 01e5 | | .DBGLNO 0x01db,0x01e5
0529 ; --------------------------------------------------------------------------------------
0529 ; Debug chain
0529 ; --------------------------------------------------------------------------------------
0529 0000 000e | | .DBGLEN 0x0000,0x000e
052b 01f3 01f9 | | .DBGLNO 0x01f3,0x01f9,0x0201,0x0203,0x020f,0x0217,0x0219,0x0225,0x022d,0x022f,0x023b,0x0243,0x0245,0x0250
0539 0001 000b | | .XXX[0xe]
053b 000c 000d | |
053d 0002 0003 | |
053f 0004 0005 | |
0541 0006 0007 | |
0543 0008 0009 | |
0545 000a 000e | |
0547 ; --------------------------------------------------------------------------------------
0547 ; Debug chain
0547 ; --------------------------------------------------------------------------------------
0547 0000 0002 | | .DBGLEN 0x0000,0x0002
0549 025c 0260 | \ `| .DBGLNO 0x025c,0x0260
054b ; --------------------------------------------------------------------------------------
054b ; Debug chain
054b ; --------------------------------------------------------------------------------------
054b 0000 0002 | | .DBGLEN 0x0000,0x0002
054d 0274 0278 | t x| .DBGLNO 0x0274,0x0278
054f ; --------------------------------------------------------------------------------------
054f ; Debug chain
054f ; --------------------------------------------------------------------------------------
054f 0000 0001 | | .DBGLEN 0x0000,0x0001
0551 02cb | | .DBGLNO 0x02cb
0552 ; --------------------------------------------------------------------------------------
0552 ; Debug chain
0552 ; --------------------------------------------------------------------------------------
0552 0000 0002 | | .DBGLEN 0x0000,0x0002
0554 02db 02e1 | | .DBGLNO 0x02db,0x02e1
0556 ; --------------------------------------------------------------------------------------
0556 ; Debug chain
0556 ; --------------------------------------------------------------------------------------
0556 0000 002b | +| .DBGLEN 0x0000,0x002b
0558 02ec 02f1 | | .DBGLNO 0x02ec,0x02f1,0x02f5,0x02fb,0x0307,0x030d,0x0314,0x031b,0x0322,0x0329,0x0330,0x0336,0x033d,0x0344,0x034b,0x0353,0x035b,0x0362,0x036a,0x0372,0x037a,0x0382,0x0389,0x0391,0x0399,0x03a1,0x03a8,0x03b0,0x03b8,0x03c0,0x03c8,0x03d0,0x03d7,0x03df,0x03e6,0x03ee,0x03f5,0x03fd,0x0405,0x040c,0x0413,0x041b,0x0423
0583 0000 0000 | | .BLANK 0000[0x7d]