|
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: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02d8 | | .CONST 0x02d8 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0065 | e | .CONST 0x0065 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 0129 | ) | Execute Any,Make_Visible
000e 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068
0010 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078
0012 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
0014 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090
0016 e002 | | Load 0x0,0x2
0017 0129 | ) | Execute Any,Make_Visible
0018 029a 009b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0098
001a 029a 00bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b8
001c 029a 00db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d8
001e 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100
0020 029a 012b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0128
0022 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
0024 00e3 | | Load_Encached Natural_Cache
0025 0266 | f | Execute Discrete,Bounds
0026 e003 | | Load 0x0,0x3
0027 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0028 029f 016b | k| Declare_Subprogram For_Call,INIT_0168
002a 4801 |H | Short_Literal 0x1
002b 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
002c 00e3 | | Load_Encached Natural_Cache
002d e004 | | Load 0x0,0x4
002e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002f 4801 |H | Short_Literal 0x1
0030 6043 |`C | Indirect_Literal Discrete,0x74,{0x00000000, 0x7fffffff}
0031 e219 | | Load 0x1,0x19
0032 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
0033 029f 029b | | Declare_Subprogram For_Call,INIT_0298
0035 4800 |H | Short_Literal 0x0
0036 4801 |H | Short_Literal 0x1
0037 4801 |H | Short_Literal 0x1
0038 4800 |H | Short_Literal 0x0
0039 4801 |H | Short_Literal 0x1
003a 4801 |H | Short_Literal 0x1
003b 031e | | Declare_Type Variant_Record,Defined,Visible
003c 029a 0183 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0180
003e 00bf | | Action Accept_Activation
003f e005 | | Load 0x0,0x5
0040 e006 | | Load 0x0,0x6
0041 e003 | | Load 0x0,0x3
0042 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0043 e007 | | Load 0x0,0x7
0044 0387 | | Declare_Variable Package
0045 00d8 | | Load_Top At_Offset_0
0046 020f | | Execute Module,Activate
0047 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0048 00c7 | | Action Elaborate_Subprogram
0049 1d0f | | Execute_Immediate Reference_Lex_1,0xf
004a 00c7 | | Action Elaborate_Subprogram
004b 1d10 | | Execute_Immediate Reference_Lex_1,0x10
004c 00c7 | | Action Elaborate_Subprogram
004d 1d11 | | Execute_Immediate Reference_Lex_1,0x11
004e 00c7 | | Action Elaborate_Subprogram
004f 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0050 00c7 | | Action Elaborate_Subprogram
0051 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0052 00c7 | | Action Elaborate_Subprogram
0053 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0054 00c7 | | Action Elaborate_Subprogram
0055 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0056 00c7 | | Action Elaborate_Subprogram
0057 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0058 00c7 | | Action Elaborate_Subprogram
0059 1d18 | | Execute_Immediate Reference_Lex_1,0x18
005a 00c7 | | Action Elaborate_Subprogram
005b 029d 01a3 | | Declare_Subprogram For_Outer_Call,INIT_01a0
005d 029d 01c3 | | Declare_Subprogram For_Outer_Call,INIT_01c0
005f 029d 0203 | | Declare_Subprogram For_Outer_Call,INIT_0200
0061 029d 0233 | 3| Declare_Subprogram For_Outer_Call,INIT_0230
0063 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0064 00c7 | | Action Elaborate_Subprogram
0065 BODY_0008:
0065 00bc | | Action Signal_Activated
0066 00bb | | Action Signal_Completion
0067 0000 | | .XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 00da | | Load_Top At_Offset_2
006c e001 | | Load 0x0,0x1
006d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006e 011e | | Execute Any,Convert
006f e001 | | Load 0x0,0x1
0070 180e | | Execute Package,Field_Execute,Field_Number 0xe
0071 c5ff | | Store 0x2,-0x1
0072 4501 |E | Exit_Subprogram 0x1
0073 0000 | | .XXX[0x1]
0074 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00da | | Load_Top At_Offset_2
007c e001 | | Load 0x0,0x1
007d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007e 011e | | Execute Any,Convert
007f e001 | | Load 0x0,0x1
0080 180f | | Execute Package,Field_Execute,Field_Number 0xf
0081 c5ff | | Store 0x2,-0x1
0082 4501 |E | Exit_Subprogram 0x1
0083 0000 0000 | | .BLANK 0000[0x5]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 00da | | Load_Top At_Offset_2
008c e001 | | Load 0x0,0x1
008d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
008e 4401 |D | Exit_Subprogram With_Result,0x1
008f 0000 | | .XXX[0x1]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00da | | Load_Top At_Offset_2
0094 e001 | | Load 0x0,0x1
0095 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0096 4401 |D | Exit_Subprogram With_Result,0x1
0097 0000 | | .XXX[0x1]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a1 | | .CONST 0x00a1 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0003 | | .CONST 0x0003 ; Number of locals
009b INIT_0098:
009b 00db | | Load_Top At_Offset_3
009c e008 | | Load 0x0,0x8
009d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009e 180e | | Execute Package,Field_Execute,Field_Number 0xe
009f e009 | | Load 0x0,0x9
00a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a1 BODY_0098:
00a1 e009 | | Load 0x0,0x9
00a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a3 e5fd | | Load 0x2,-0x3
00a4 00db | | Load_Top At_Offset_3
00a5 e5fe | | Load 0x2,-0x2
00a6 e5fd | | Load 0x2,-0x3
00a7 4800 |H | Short_Literal 0x0
00a8 e5ff | | Load 0x2,-0x1
00a9 e00a | | Load 0x0,0xa
00aa 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00ab e001 | | Load 0x0,0x1
00ac 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00ad 0059 | Y | Store_Top Discrete,At_Offset_1
00ae e5fc | | Load 0x2,-0x4
00af 00d9 | | Load_Top At_Offset_1
00b0 e00b | | Load 0x0,0xb
00b1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00b2 c5fc | | Store 0x2,-0x4
00b3 4504 |E | Exit_Subprogram 0x4
00b4 0000 0000 | | .BLANK 0000[0x4]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c1 | | .CONST 0x00c1 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0003 | | .CONST 0x0003 ; Number of locals
00bb INIT_00b8:
00bb 00db | | Load_Top At_Offset_3
00bc e008 | | Load 0x0,0x8
00bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00be 180e | | Execute Package,Field_Execute,Field_Number 0xe
00bf e009 | | Load 0x0,0x9
00c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c1 BODY_00b8:
00c1 e009 | | Load 0x0,0x9
00c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c3 e5fd | | Load 0x2,-0x3
00c4 00db | | Load_Top At_Offset_3
00c5 e5fe | | Load 0x2,-0x2
00c6 e5fd | | Load 0x2,-0x3
00c7 4800 |H | Short_Literal 0x0
00c8 e5ff | | Load 0x2,-0x1
00c9 e00a | | Load 0x0,0xa
00ca 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00cb e001 | | Load 0x0,0x1
00cc 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00cd 0059 | Y | Store_Top Discrete,At_Offset_1
00ce e5fc | | Load 0x2,-0x4
00cf 00d9 | | Load_Top At_Offset_1
00d0 e00b | | Load 0x0,0xb
00d1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00d2 c5fc | | Store 0x2,-0x4
00d3 4504 |E | Exit_Subprogram 0x4
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e1 | | .CONST 0x00e1 ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0003 | | .CONST 0x0003 ; Number of locals
00db INIT_00d8:
00db 00da | | Load_Top At_Offset_2
00dc e008 | | Load 0x0,0x8
00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00de 180d | | Execute Package,Field_Execute,Field_Number 0xd
00df e009 | | Load 0x0,0x9
00e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e1 BODY_00d8:
00e1 e009 | | Load 0x0,0x9
00e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e3 e5fc | | Load 0x2,-0x4
00e4 0120 | | Execute Any,Is_Value
00e5 6804 |h | Jump_Zero 0xea
00e6 e003 | | Load 0x0,0x3
00e7 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
00e8 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00e9 7801 |x | Jump 0xeb
00ea e5fc | | Load 0x2,-0x4
00eb e5fd | | Load 0x2,-0x3
00ec e402 | | Load 0x2,0x2
00ed e5fe | | Load 0x2,-0x2
00ee e5fd | | Load 0x2,-0x3
00ef 4800 |H | Short_Literal 0x0
00f0 e5ff | | Load 0x2,-0x1
00f1 e00a | | Load 0x0,0xa
00f2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00f3 e001 | | Load 0x0,0x1
00f4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00f5 c5fc | | Store 0x2,-0x4
00f6 0059 | Y | Store_Top Discrete,At_Offset_1
00f7 e5fb | | Load 0x2,-0x5
00f8 00d9 | | Load_Top At_Offset_1
00f9 e00b | | Load 0x0,0xb
00fa 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00fb c5fb | | Store 0x2,-0x5
00fc 4504 |E | Exit_Subprogram 0x4
00fd 0000 0000 | | .XXX[0x3]
00ff 0000 | |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0109 | | .CONST 0x0109 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0003 | | .CONST 0x0003 ; Number of locals
0103 INIT_0100:
0103 00da | | Load_Top At_Offset_2
0104 e008 | | Load 0x0,0x8
0105 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0106 180d | | Execute Package,Field_Execute,Field_Number 0xd
0107 e009 | | Load 0x0,0x9
0108 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0109 BODY_0100:
0109 e009 | | Load 0x0,0x9
010a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010b e5fc | | Load 0x2,-0x4
010c e001 | | Load 0x0,0x1
010d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010e 011e | | Execute Any,Convert
010f e5fd | | Load 0x2,-0x3
0110 e402 | | Load 0x2,0x2
0111 e5fe | | Load 0x2,-0x2
0112 e5fd | | Load 0x2,-0x3
0113 4800 |H | Short_Literal 0x0
0114 e5ff | | Load 0x2,-0x1
0115 e00a | | Load 0x0,0xa
0116 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0117 e001 | | Load 0x0,0x1
0118 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0119 c5fc | | Store 0x2,-0x4
011a 0059 | Y | Store_Top Discrete,At_Offset_1
011b e5fb | | Load 0x2,-0x5
011c 00d9 | | Load_Top At_Offset_1
011d e00b | | Load 0x0,0xb
011e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
011f c5fb | | Store 0x2,-0x5
0120 4504 |E | Exit_Subprogram 0x4
0121 0000 0000 | | .BLANK 0000[0x7]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0131 | 1 | .CONST 0x0131 ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0003 | | .CONST 0x0003 ; Number of locals
012b INIT_0128:
012b 00da | | Load_Top At_Offset_2
012c e008 | | Load 0x0,0x8
012d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012e 180d | | Execute Package,Field_Execute,Field_Number 0xd
012f e009 | | Load 0x0,0x9
0130 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0131 BODY_0128:
0131 e009 | | Load 0x0,0x9
0132 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0133 00e1 | | Load_Encached Boolean_Cache
0134 e5fe | | Load 0x2,-0x2
0135 e402 | | Load 0x2,0x2
0136 e5fe | | Load 0x2,-0x2
0137 4800 |H | Short_Literal 0x0
0138 e5ff | | Load 0x2,-0x1
0139 e00a | | Load 0x0,0xa
013a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
013b e001 | | Load 0x0,0x1
013c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
013d c5fd | | Store 0x2,-0x3
013e 0059 | Y | Store_Top Discrete,At_Offset_1
013f e5fc | | Load 0x2,-0x4
0140 00d9 | | Load_Top At_Offset_1
0141 e00b | | Load 0x0,0xb
0142 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0143 c5fc | | Store 0x2,-0x4
0144 4503 |E | Exit_Subprogram 0x3
0145 0000 0000 | | .XXX[0x3]
0147 0000 | |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0151 | Q | .CONST 0x0151 ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0003 | | .CONST 0x0003 ; Number of locals
014b INIT_0148:
014b 00da | | Load_Top At_Offset_2
014c e008 | | Load 0x0,0x8
014d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014e 180e | | Execute Package,Field_Execute,Field_Number 0xe
014f e009 | | Load 0x0,0x9
0150 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0151 BODY_0148:
0151 e009 | | Load 0x0,0x9
0152 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0153 00e1 | | Load_Encached Boolean_Cache
0154 e5fe | | Load 0x2,-0x2
0155 e402 | | Load 0x2,0x2
0156 e5ff | | Load 0x2,-0x1
0157 e001 | | Load 0x0,0x1
0158 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0159 c5fd | | Store 0x2,-0x3
015a 0059 | Y | Store_Top Discrete,At_Offset_1
015b e5fc | | Load 0x2,-0x4
015c 00d9 | | Load_Top At_Offset_1
015d e00b | | Load 0x0,0xb
015e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
015f c5fc | | Store 0x2,-0x4
0160 4503 |E | Exit_Subprogram 0x3
0161 0000 0000 | | .BLANK 0000[0x7]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00d1 | | Pop_Control Pop_Count_1
016c 00da | | Load_Top At_Offset_2
016d 01dc | | Execute Vector,Last
016e 00db | | Load_Top At_Offset_3
016f 01dd | | Execute Vector,First
0170 0263 | c | Execute Discrete,Above_Bound
0171 700a |p | Jump_Nonzero 0x17c
0172 00d8 | | Load_Top At_Offset_0
0173 e5ff | | Load 0x2,-0x1
0174 01d5 | | Execute Vector,Field_Reference
0175 0125 | % | Execute Any,Set_Constraint
0176 00d8 | | Load_Top At_Offset_0
0177 e5ff | | Load 0x2,-0x1
0178 01d5 | | Execute Vector,Field_Reference
0179 1c00 | | Execute_Immediate Run_Utility,0x0
017a 0a01 | | Execute_Immediate Plus,0x1
017b 7ff4 | | Jump 0x170
017c 4302 |C | Exit_Subprogram From_Utility,0x2
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0191 | | .CONST 0x0191 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0004 | | .CONST 0x0004 ; Number of locals
0183 INIT_0180:
0183 e21c | | Load 0x1,0x1c
0184 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0185 e003 | | Load 0x0,0x3
0186 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0187 02c7 | | Declare_Variable Any
0188 e00c | | Load 0x0,0xc
0189 180e | | Execute Package,Field_Execute,Field_Number 0xe
018a e5ff | | Load 0x2,-0x1
018b e008 | | Load 0x0,0x8
018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
018e a403 | | Store_Unchecked 0x2,0x3
018f 029f 0243 | C| Declare_Subprogram For_Call,INIT_0240
0191 BODY_0180:
0191 e21c | | Load 0x1,0x1c
0192 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0193 e21c | | Load 0x1,0x1c
0194 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0195 003b | ; | Store_Top Access,At_Offset_3
0196 e5ff | | Load 0x2,-0x1
0197 8404 | | Call 0x2,0x4
0198 00da | | Load_Top At_Offset_2
0199 821d | | Call 0x1,0x1d
019a 00db | | Load_Top At_Offset_3
019b 821e | | Call 0x1,0x1e
019c 4402 |D | Exit_Subprogram With_Result,0x2
019d 0000 0000 | | .XXX[0x3]
019f 0000 | |
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a7 | | .CONST 0x01a7 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0003 | | .CONST 0x0003 ; Number of locals
01a3 INIT_01a0:
01a3 e21c | | Load 0x1,0x1c
01a4 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01a5 00e2 | | Load_Encached Integer_Cache
01a6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01a7 BODY_01a0:
01a7 e21c | | Load 0x1,0x1c
01a8 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01a9 e5ff | | Load 0x2,-0x1
01aa e21c | | Load 0x1,0x1c
01ab 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01ac 003a | : | Store_Top Access,At_Offset_2
01ad 00cf | | Action Mark_Auxiliary
01ae 7808 |x | Jump 0x1b7
01af 00d9 | | Load_Top At_Offset_1
01b0 0a01 | | Execute_Immediate Plus,0x1
01b1 005a | Z | Store_Top Discrete,At_Offset_2
01b2 00da | | Load_Top At_Offset_2
01b3 e21c | | Load 0x1,0x1c
01b4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01b5 003b | ; | Store_Top Access,At_Offset_3
01b6 00c9 | | Action Pop_Auxiliary_Loop
01b7 00da | | Load_Top At_Offset_2
01b8 e21c | | Load 0x1,0x1c
01b9 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01ba 6ff4 |o | Jump_Zero 0x1af
01bb 00ce | | Action Pop_Auxiliary
01bc 00d8 | | Load_Top At_Offset_0
01bd 4401 |D | Exit_Subprogram With_Result,0x1
01be 0000 0000 | | .XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01cc | | .CONST 0x01cc ; Address of begin
01c1 01f3 | | .CONST 0x01f3 ; Address of exception handler
01c2 0004 | | .CONST 0x0004 ; Number of locals
01c3 INIT_01c0:
01c3 00db | | Load_Top At_Offset_3
01c4 e21a | | Load 0x1,0x1a
01c5 1c08 | | Execute_Immediate Run_Utility,0x8
01c6 00d8 | | Load_Top At_Offset_0
01c7 1c00 | | Execute_Immediate Run_Utility,0x0
01c8 e21c | | Load 0x1,0x1c
01c9 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01ca 00e2 | | Load_Encached Integer_Cache
01cb 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
01cc BODY_01c0:
01cc e21c | | Load 0x1,0x1c
01cd 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01ce e5ff | | Load 0x2,-0x1
01cf e21c | | Load 0x1,0x1c
01d0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01d1 003a | : | Store_Top Access,At_Offset_2
01d2 00cf | | Action Mark_Auxiliary
01d3 780f |x | Jump 0x1e3
01d4 00da | | Load_Top At_Offset_2
01d5 e21c | | Load 0x1,0x1c
01d6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01d7 00da | | Load_Top At_Offset_2
01d8 e402 | | Load 0x2,0x2
01d9 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01da 01d6 | | Execute Vector,Field_Write
01db 00d9 | | Load_Top At_Offset_1
01dc 0a01 | | Execute_Immediate Plus,0x1
01dd 005a | Z | Store_Top Discrete,At_Offset_2
01de 00da | | Load_Top At_Offset_2
01df e21c | | Load 0x1,0x1c
01e0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01e1 003b | ; | Store_Top Access,At_Offset_3
01e2 00c9 | | Action Pop_Auxiliary_Loop
01e3 00da | | Load_Top At_Offset_2
01e4 e21c | | Load 0x1,0x1c
01e5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01e6 6fed |o | Jump_Zero 0x1d4
01e7 00ce | | Action Pop_Auxiliary
01e8 00da | | Load_Top At_Offset_2
01e9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01ea 4800 |H | Short_Literal 0x0
01eb 00ea | | Load_Encached Null_String_Cache
01ec 00ea | | Load_Encached Null_String_Cache
01ed e004 | | Load 0x0,0x4
01ee 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01ef 00db | | Load_Top At_Offset_3
01f0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01f1 00da | | Load_Top At_Offset_2
01f2 4402 |D | Exit_Subprogram With_Result,0x2
01f3 TRAP_01c0:
01f3 0007 | | Action Break_Optional
01f4 00db | | Load_Top At_Offset_3
01f5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01f6 4802 |H | Short_Literal 0x2
01f7 00ea | | Load_Encached Null_String_Cache
01f8 00ea | | Load_Encached Null_String_Cache
01f9 e004 | | Load 0x0,0x4
01fa 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01fb e402 | | Load 0x2,0x2
01fc 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01fd 00db | | Load_Top At_Offset_3
01fe 4402 |D | Exit_Subprogram With_Result,0x2
01ff 0000 | | .XXX[0x1]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0208 | | .CONST 0x0208 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0002 | | .CONST 0x0002 ; Number of locals
0203 INIT_0200:
0203 e003 | | Load 0x0,0x3
0204 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0205 02c7 | | Declare_Variable Any
0206 00d8 | | Load_Top At_Offset_0
0207 1c00 | | Execute_Immediate Run_Utility,0x0
0208 BODY_0200:
0208 e00c | | Load 0x0,0xc
0209 180e | | Execute Package,Field_Execute,Field_Number 0xe
020a e00c | | Load 0x0,0xc
020b 180e | | Execute Package,Field_Execute,Field_Number 0xe
020c e5ff | | Load 0x2,-0x1
020d e008 | | Load 0x0,0x8
020e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020f 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0210 e003 | | Load 0x0,0x3
0211 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0212 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0213 0092 02c2 | | Action Push_String_Extended,0x2c2 ; ".state."
0215 01cc | | Execute Vector,Catenate
0216 e5fe | | Load 0x2,-0x2
0217 01cc | | Execute Vector,Catenate
0218 e008 | | Load 0x0,0x8
0219 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021a 181e | | Execute Package,Field_Execute,Field_Number 0x1e
021b c402 | | Store 0x2,0x2
021c e003 | | Load 0x0,0x3
021d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021e e5fd | | Load 0x2,-0x3
021f 0120 | | Execute Any,Is_Value
0220 6803 |h | Jump_Zero 0x224
0221 e00d | | Load 0x0,0xd
0222 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0223 7801 |x | Jump 0x225
0224 e5fd | | Load 0x2,-0x3
0225 4800 |H | Short_Literal 0x0
0226 4800 |H | Short_Literal 0x0
0227 e00e | | Load 0x0,0xe
0228 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0229 e402 | | Load 0x2,0x2
022a e00d | | Load 0x0,0xd
022b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022c c5fd | | Store 0x2,-0x3
022d c5fc | | Store 0x2,-0x4
022e 4503 |E | Exit_Subprogram 0x3
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0235 | 5 | .CONST 0x0235 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 e003 | | Load 0x0,0x3
0234 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0235 BODY_0230:
0235 e003 | | Load 0x0,0x3
0236 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0237 e5ff | | Load 0x2,-0x1
0238 e00d | | Load 0x0,0xd
0239 1811 | | Execute Package,Field_Execute,Field_Number 0x11
023a 0059 | Y | Store_Top Discrete,At_Offset_1
023b 4502 |E | Exit_Subprogram 0x2
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0254 | T | .CONST 0x0254 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0005 | | .CONST 0x0005 ; Number of locals
0243 INIT_0240:
0243 e003 | | Load 0x0,0x3
0244 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0245 02c7 | | Declare_Variable Any
0246 00d8 | | Load_Top At_Offset_0
0247 1c00 | | Execute_Immediate Run_Utility,0x0
0248 e00d | | Load 0x0,0xd
0249 1b17 | | Execute Package,Field_Read,Field_Number 0x17
024a 02c7 | | Declare_Variable Any
024b 00d8 | | Load_Top At_Offset_0
024c 1c00 | | Execute_Immediate Run_Utility,0x0
024d e00d | | Load 0x0,0xd
024e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024f 02c7 | | Declare_Variable Any
0250 00d8 | | Load_Top At_Offset_0
0251 1c00 | | Execute_Immediate Run_Utility,0x0
0252 e003 | | Load 0x0,0x3
0253 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0254 BODY_0240:
0254 00be | | Action Activate_Tasks
0255 e003 | | Load 0x0,0x3
0256 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0257 00da | | Load_Top At_Offset_2
0258 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "referencers"
025a e7ff | | Load 0x3,-0x1
025b 821f | | Call 0x1,0x1f
025c c604 | | Store 0x3,0x4
025d 0059 | Y | Store_Top Discrete,At_Offset_1
025e 00d8 | | Load_Top At_Offset_0
025f 6801 |h | Jump_Zero 0x261
0260 4502 |E | Exit_Subprogram 0x2
0261 00da | | Load_Top At_Offset_2
0262 0120 | | Execute Any,Is_Value
0263 6803 |h | Jump_Zero 0x267
0264 e00d | | Load 0x0,0xd
0265 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0266 7801 |x | Jump 0x268
0267 00da | | Load_Top At_Offset_2
0268 00da | | Load_Top At_Offset_2
0269 e00d | | Load 0x0,0xd
026a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
026b c603 | | Store 0x3,0x3
026c 00cf | | Action Mark_Auxiliary
026d 7821 |x! | Jump 0x28f
026e 00db | | Load_Top At_Offset_3
026f e00d | | Load 0x0,0xd
0270 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0271 c602 | | Store 0x3,0x2
0272 4801 |H | Short_Literal 0x1
0273 0092 02c4 | | Action Push_String_Extended,0x2c4 ; "[VERSION_ERROR]"
0275 e602 | | Load 0x3,0x2
0276 e003 | | Load 0x0,0x3
0277 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0278 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0279 e00f | | Load 0x0,0xf
027a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
027b 700e |p | Jump_Nonzero 0x28a
027c e602 | | Load 0x3,0x2
027d e402 | | Load 0x2,0x2
027e e21c | | Load 0x1,0x1c
027f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0280 7009 |p | Jump_Nonzero 0x28a
0281 e402 | | Load 0x2,0x2
0282 e602 | | Load 0x3,0x2
0283 e21c | | Load 0x1,0x1c
0284 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0285 c402 | | Store 0x2,0x2
0286 e5fe | | Load 0x2,-0x2
0287 6802 |h | Jump_Zero 0x28a
0288 e602 | | Load 0x3,0x2
0289 8404 | | Call 0x2,0x4
028a 00db | | Load_Top At_Offset_3
028b e00d | | Load 0x0,0xd
028c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
028d c603 | | Store 0x3,0x3
028e 00c9 | | Action Pop_Auxiliary_Loop
028f 00db | | Load_Top At_Offset_3
0290 e00d | | Load 0x0,0xd
0291 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0292 6fdb |o | Jump_Zero 0x26e
0293 00ce | | Action Pop_Auxiliary
0294 00d9 | | Load_Top At_Offset_1
0295 8220 | | Call 0x1,0x20
0296 4502 |E | Exit_Subprogram 0x2
0297 0000 | | .XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b 4608 |F | Jump_Case 0x8
029c 7808 |x | Jump 0x2a5 ; case 0x0
029d 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
029e 7822 |x" | Jump 0x2c1 ; case 0x2
029f 7821 |x! | Jump 0x2c1 ; case 0x3
02a0 7820 |x | Jump 0x2c1 ; case 0x4
02a1 781f |x | Jump 0x2c1 ; case 0x5
02a2 781e |x | Jump 0x2c1 ; case 0x6
02a3 780a |x | Jump 0x2ae ; case 0x7
02a4 7812 |x | Jump 0x2b7 ; case 0x8
02a5 00da | | Load_Top At_Offset_2
02a6 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
02a7 00da | | Load_Top At_Offset_2
02a8 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
02a9 1c00 | | Execute_Immediate Run_Utility,0x0
02aa 00da | | Load_Top At_Offset_2
02ab 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02ac 1c00 | | Execute_Immediate Run_Utility,0x0
02ad 4302 |C | Exit_Subprogram From_Utility,0x2
02ae 00db | | Load_Top At_Offset_3
02af 4801 |H | Short_Literal 0x1
02b0 e5fe | | Load 0x2,-0x2
02b1 e219 | | Load 0x1,0x19
02b2 035b | [ | Declare_Type Array,Constrained
02b3 4801 |H | Short_Literal 0x1
02b4 e5ff | | Load 0x2,-0x1
02b5 031b | | Declare_Type Variant_Record,Constrained
02b6 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02b7 00db | | Load_Top At_Offset_3
02b8 00db | | Load_Top At_Offset_3
02b9 02fc | | Declare_Variable Variant_Record,With_Constraint
02ba 4801 |H | Short_Literal 0x1
02bb e5fe | | Load 0x2,-0x2
02bc e219 | | Load 0x1,0x19
02bd 0334 | 4 | Declare_Variable Array,With_Constraint
02be 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
02bf 016a | j | Execute Variant_Record,Indirects_Appended
02c0 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02c1 0869 | i | Execute_Immediate Raise,0x69
02c2 ; --------------------------------------------------------------------------------------
02c2 ; STRING TABLE
02c2 ; --------------------------------------------------------------------------------------
02c2 0008 | | .STRTAB 0x0008->0x02c6 ; ".state."
02c3 000d | | .STRTAB 0x000d->0x02c9 ; "referencers"
02c4 0016 | | .STRTAB 0x0016->0x02cf ; "[VERSION_ERROR]"
02c5 0023 | # | .STREND 0x0023->0x02d6
02c6 2e73 7461 |.sta| .STRTAB_STRINGS
02d7 0000 | | .XXX[0x1]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; Debug Table
02d8 ; --------------------------------------------------------------------------------------
02d8 0004 000d | | .DEBUG4 0x0004,0x000d,0x5169,0x0000,0x0001,0x0000
02de 00d9 00eb | | .XXX[0x1b]
02e0 18ec 77f7 | w |
02e2 00ce 00d8 | |
02e4 e001 180d | |
02e6 6810 00d8 |h |
02e8 e001 180e | |
02ea c602 00d8 | |
02ec 0145 0f29 | E )|
02ee 6808 00d8 |h |
02f0 00eb 18f8 | |
02f2 0145 0f36 | E 6|
02f4 6802 4801 |h H |
02f6 4401 4800 |D H |
02f8 4401 |D |
02f9 0000 0000 | | .BLANK 0000[0x7]
0300 010b 0004 | | .XXX[0xab]
0302 0003 00ee | |
0304 02c7 00d8 | |
0306 1c00 00ec | |
0308 02c7 00d8 | |
030a 1c00 e7ff | |
030c 0145 008e | E |
030e 4604 4502 |F E |
0310 7830 7834 |x0x4|
0312 787a 7800 |xzx |
0314 e7ff 0145 | E|
0316 0f85 6817 | h |
0318 4802 e5fb |H |
031a 01d7 6812 | h |
031c e7ff 00eb | |
031e 1888 c602 | |
0320 00cf 7809 | x |
0322 4802 00db |H |
0324 008b 8404 | |
0326 00da 0217 | |
0328 3c01 c602 |< |
032a 00c9 00da | |
032c 77f5 00ce |w |
032e 4502 e7ff |E |
0330 00eb 1888 | |
0332 c602 00cf | |
0334 7808 00da |x |
0336 008b 8406 | |
0338 00da 0217 | |
033a 3c01 c602 |< |
033c 00c9 00da | |
033e 77f6 00ce |w |
0340 4502 e7ff |E |
0342 00eb 1885 | |
0344 8406 4502 | E |
0346 e7ff 0145 | E|
0348 00d8 0d36 | 6|
034a 7024 00d8 |p$ |
034c 0c37 701e | 7p |
034e 00d1 4803 | H |
0350 e5fb 01d7 | |
0352 680b e7ff |h |
0354 00eb 18d4 | |
0356 8402 8405 | |
0358 7005 4803 |p H |
035a e7ff 00eb | |
035c 18d4 8404 | |
035e e7ff 00eb | |
0360 18d4 8406 | |
0362 e7ff 00eb | |
0364 18cb 8406 | |
0366 e7ff 490a | I |
0368 00eb 0096 | |
036a 8406 4502 | E |
036c 0f5b 7004 | [p |
036e 7815 0f10 |x |
0370 7001 7812 |p x |
0372 4804 e5fb |H |
0374 01d7 6805 | h |
0376 4804 e7ff |H |
0378 00eb 18d4 | |
037a 8404 e7ff | |
037c 00eb 18d4 | |
037e 8406 e7ff | |
0380 00eb 18d9 | |
0382 8406 4502 | E |
0384 e7ff 00eb | |
0386 1885 8406 | |
0388 e7ff 00eb | |
038a 1886 8406 | |
038c 4502 e7ff |E |
038e 00eb 1885 | |
0390 8406 e7ff | |
0392 0145 0ea8 | E |
0394 7008 4803 |p H |
0396 e5fb 01d7 | |
0398 7004 4804 |p H |
039a e5fb 01d7 | |
039c 6808 e7ff |h |
039e 00eb 1886 | |
03a0 8406 e7ff | |
03a2 00eb 1887 | |
03a4 8406 4502 | E |
03a6 0004 0008 | |
03a8 494e 4c49 |INLI|
03aa 4e45 |NE |
03ab 0000 0000 | | .BLANK 0000[0x5]
03b0 0004 0009 | | .XXX[0x50]
03b2 eb3c 0000 | < |
03b4 0001 0000 | |
03b6 0000 3117 | 1 |
03b8 000e 5004 | P |
03ba 0800 0280 | |
03bc 0000 0000 | |
03be 0000 0001 | |
03c0 000e 5004 | P |
03c2 0000 0100 | |
03c4 0000 0000 | |
03c6 0008 afa8 | |
03c8 0001 0404 | |
03ca 0000 0f00 | |
03cc 0000 0000 | |
03ce 0002 8000 | |
03d0 000f d004 | |
03d2 0800 01cc | |
03d4 0d38 c804 | 8 |
03d6 0000 1ace | |
03d8 0d11 2c04 | , |
03da 0000 007f | |
03dc 00cf 5c0a | \ |
03de 0000 16e2 | |
03e0 0d11 2c04 | , |
03e2 0000 003f | ?|
03e4 0013 0073 | s|
03e6 0000 4981 | I |
03e8 0001 0404 | |
03ea 0800 0100 | |
03ec 0000 0000 | |
03ee 0000 0001 | |
03f0 000f d004 | |
03f2 0800 01cc | |
03f4 0d38 c804 | 8 |
03f6 0000 4981 | I |
03f8 0d11 2804 | ( |
03fa 0000 07c4 | |
03fc 0d38 c804 | 8 |
03fe 0000 49e0 | I |