|
|
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 02d0 | | .CONST 0x02d0 ; 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 0064 | d | .CONST 0x0064 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 4803 |H | Short_Literal 0x3
000c 032b | + | Declare_Type Record,Incomplete,Visible
000d 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068
000f 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078
0011 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080
0013 029a 009b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0098
0015 e001 | | Load 0x0,0x1
0016 0129 | ) | Execute Any,Make_Visible
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8
0028 c21b | | Store 0x1,0x1b
0029 029a 00cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c8
002b c21c | | Store 0x1,0x1c
002c 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8
002e c21d | | Store 0x1,0x1d
002f 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130
0031 c21e | | Store 0x1,0x1e
0032 029a 01ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01a8
0034 c21f | | Store 0x1,0x1f
0035 029a 01cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c8
0037 c220 | | Store 0x1,0x20
0038 4900 |I | Short_Literal 0x100
0039 e002 | | Load 0x0,0x2
003a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003b 1c07 | | Execute_Immediate Run_Utility,0x7
003c c219 | | Store 0x1,0x19
003d 00e3 | | Load_Encached Natural_Cache
003e 0266 | f | Execute Discrete,Bounds
003f e219 | | Load 0x1,0x19
0040 029f 01eb | | Declare_Subprogram For_Call,INIT_01e8
0042 4801 |H | Short_Literal 0x1
0043 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
0044 c21a | | Store 0x1,0x1a
0045 4801 |H | Short_Literal 0x1
0046 4880 |H | Short_Literal 0x80
0047 e21a | | Load 0x1,0x1a
0048 035b | [ | Declare_Type Array,Constrained
0049 00e3 | | Load_Encached Natural_Cache
004a 00e3 | | Load_Encached Natural_Cache
004b 029f 025b | [| Declare_Subprogram For_Call,INIT_0258
004d e20d | | Load 0x1,0xd
004e 0326 | & | Complete_Type Record,By_Defining
004f 00bf | | Action Accept_Activation
0050 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0051 00c7 | | Action Elaborate_Subprogram
0052 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0053 00c7 | | Action Elaborate_Subprogram
0054 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0055 00c7 | | Action Elaborate_Subprogram
0056 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0057 00c7 | | Action Elaborate_Subprogram
0058 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0059 00c7 | | Action Elaborate_Subprogram
005a 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
005b 00c7 | | Action Elaborate_Subprogram
005c 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
005d 00c7 | | Action Elaborate_Subprogram
005e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
005f 00c7 | | Action Elaborate_Subprogram
0060 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0061 00c7 | | Action Elaborate_Subprogram
0062 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0063 00c7 | | Action Elaborate_Subprogram
0064 BODY_0008:
0064 00bc | | Action Signal_Activated
0065 00bb | | Action Signal_Completion
0066 0000 0000 | | .XXX[0x2]
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 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
006d 0a01 | | Execute_Immediate Plus,0x1
006e 00db | | Load_Top At_Offset_3
006f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0070 4501 |E | Exit_Subprogram 0x1
0071 0000 0000 | | .BLANK 0000[0x7]
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 4801 |H | Short_Literal 0x1
007c 00db | | Load_Top At_Offset_3
007d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
007e 4501 |E | Exit_Subprogram 0x1
007f 0000 | | .XXX[0x1]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 00da | | Load_Top At_Offset_2
0084 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0085 00db | | Load_Top At_Offset_3
0086 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0087 027d | } | Execute Discrete,Greater
0088 6802 |h | Jump_Zero 0x8b
0089 e212 | | Load 0x1,0x12
008a 0257 | W | Execute Discrete,Raise
008b 00da | | Load_Top At_Offset_2
008c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
008d 00db | | Load_Top At_Offset_3
008e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
008f 01d5 | | Execute Vector,Field_Reference
0090 e002 | | Load 0x0,0x2
0091 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0092 4401 |D | Exit_Subprogram With_Result,0x1
0093 0000 0000 | | .BLANK 0000[0x5]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
009d 00db | | Load_Top At_Offset_3
009e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
009f 027d | } | Execute Discrete,Greater
00a0 4401 |D | Exit_Subprogram With_Result,0x1
00a1 0000 0000 | | .BLANK 0000[0x7]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b8 | | .CONST 0x00b8 ; Address of begin
00a9 00c0 | | .CONST 0x00c0 ; Address of exception handler
00aa 0004 | | .CONST 0x0004 ; Number of locals
00ab INIT_00a8:
00ab e003 | | Load 0x0,0x3
00ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ad e004 | | Load 0x0,0x4
00ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00af 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00b0 e005 | | Load 0x0,0x5
00b1 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
00b2 0322 | " | Declare_Variable Record
00b3 e5fd | | Load 0x2,-0x3
00b4 e005 | | Load 0x0,0x5
00b5 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
00b6 00d9 | | Load_Top At_Offset_1
00b7 017d | } | Execute Record,Structure_Write
00b8 BODY_00a8:
00b8 e5fc | | Load 0x2,-0x4
00b9 0092 0274 | t| Action Push_String_Extended,0x274 ; "Rcf_Imports.Add_Import"
00bb e006 | | Load 0x0,0x6
00bc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00bd 4800 |H | Short_Literal 0x0
00be a5fb | | Store_Unchecked 0x2,-0x5
00bf 4505 |E | Exit_Subprogram 0x5
00c0 TRAP_00a8:
00c0 0007 | | Action Break_Optional
00c1 4505 |E | Exit_Subprogram 0x5
00c2 0000 0000 | | .BLANK 0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00d8 | | .CONST 0x00d8 ; Address of begin
00c9 00e0 | | .CONST 0x00e0 ; Address of exception handler
00ca 0004 | | .CONST 0x0004 ; Number of locals
00cb INIT_00c8:
00cb e003 | | Load 0x0,0x3
00cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00cd e004 | | Load 0x0,0x4
00ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00cf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00d0 e005 | | Load 0x0,0x5
00d1 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
00d2 0322 | " | Declare_Variable Record
00d3 e5fd | | Load 0x2,-0x3
00d4 e005 | | Load 0x0,0x5
00d5 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
00d6 00d9 | | Load_Top At_Offset_1
00d7 017d | } | Execute Record,Structure_Write
00d8 BODY_00c8:
00d8 e5fc | | Load 0x2,-0x4
00d9 0092 0275 | u| Action Push_String_Extended,0x275 ; "Rcf_Imports.Remove_Import"
00db e006 | | Load 0x0,0x6
00dc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00dd 4800 |H | Short_Literal 0x0
00de a5fb | | Store_Unchecked 0x2,-0x5
00df 4505 |E | Exit_Subprogram 0x5
00e0 TRAP_00c8:
00e0 e004 | | Load 0x0,0x4
00e1 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00e2 010f | | Execute Exception,Equal
00e3 6810 |h | Jump_Zero 0xf4
00e4 e004 | | Load 0x0,0x4
00e5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00e6 a5fb | | Store_Unchecked 0x2,-0x5
00e7 00db | | Load_Top At_Offset_3
00e8 e003 | | Load 0x0,0x3
00e9 180f | | Execute Package,Field_Execute,Field_Number 0xf
00ea 7008 |p | Jump_Nonzero 0xf3
00eb e004 | | Load 0x0,0x4
00ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ed e402 | | Load 0x2,0x2
00ee e5fc | | Load 0x2,-0x4
00ef e003 | | Load 0x0,0x3
00f0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00f1 c402 | | Store 0x2,0x2
00f2 005b | [ | Store_Top Discrete,At_Offset_3
00f3 4505 |E | Exit_Subprogram 0x5
00f4 4505 |E | Exit_Subprogram 0x5
00f5 0000 0000 | | .XXX[0x3]
00f7 0000 | |
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0107 | | .CONST 0x0107 ; Address of begin
00f9 011f | | .CONST 0x011f ; Address of exception handler
00fa 0004 | | .CONST 0x0004 ; Number of locals
00fb INIT_00f8:
00fb e003 | | Load 0x0,0x3
00fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fd e004 | | Load 0x0,0x4
00fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ff e005 | | Load 0x0,0x5
0100 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
0101 0322 | " | Declare_Variable Record
0102 e5fd | | Load 0x2,-0x3
0103 e005 | | Load 0x0,0x5
0104 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0105 00d9 | | Load_Top At_Offset_1
0106 017d | } | Execute Record,Structure_Write
0107 BODY_00f8:
0107 e5fc | | Load 0x2,-0x4
0108 0092 0276 | v| Action Push_String_Extended,0x276 ; "Rcf_Imports.Get_Imports"
010a e006 | | Load 0x0,0x6
010b 180e | | Execute Package,Field_Execute,Field_Number 0xe
010c e5fa | | Load 0x2,-0x6
010d e5fb | | Load 0x2,-0x5
010e 0120 | | Execute Any,Is_Value
010f 6804 |h | Jump_Zero 0x114
0110 e007 | | Load 0x0,0x7
0111 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0112 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0113 7801 |x | Jump 0x115
0114 e5fb | | Load 0x2,-0x5
0115 e5fc | | Load 0x2,-0x4
0116 00db | | Load_Top At_Offset_3
0117 e5fe | | Load 0x2,-0x2
0118 e5ff | | Load 0x2,-0x1
0119 e008 | | Load 0x0,0x8
011a 1b19 | | Execute Package,Field_Read,Field_Number 0x19
011b 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
011c c5fb | | Store 0x2,-0x5
011d c5fa | | Store 0x2,-0x6
011e 4505 |E | Exit_Subprogram 0x5
011f TRAP_00f8:
011f e004 | | Load 0x0,0x4
0120 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0121 010f | | Execute Exception,Equal
0122 6804 |h | Jump_Zero 0x127
0123 e004 | | Load 0x0,0x4
0124 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0125 a5fa | | Store_Unchecked 0x2,-0x6
0126 4505 |E | Exit_Subprogram 0x5
0127 0092 0276 | v| Action Push_String_Extended,0x276 ; "Rcf_Imports.Get_Imports"
0129 e006 | | Load 0x0,0x6
012a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
012b a5fa | | Store_Unchecked 0x2,-0x6
012c 4505 |E | Exit_Subprogram 0x5
012d 0000 0000 | | .XXX[0x3]
012f 0000 | |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0146 | F | .CONST 0x0146 ; Address of begin
0131 0196 | | .CONST 0x0196 ; Address of exception handler
0132 0005 | | .CONST 0x0005 ; Number of locals
0133 INIT_0130:
0133 e007 | | Load 0x0,0x7
0134 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0135 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0136 02c7 | | Declare_Variable Any
0137 00d8 | | Load_Top At_Offset_0
0138 1c00 | | Execute_Immediate Run_Utility,0x0
0139 e004 | | Load 0x0,0x4
013a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
013c e005 | | Load 0x0,0x5
013d 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
013e 0322 | " | Declare_Variable Record
013f e5fd | | Load 0x2,-0x3
0140 e005 | | Load 0x0,0x5
0141 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0142 00d9 | | Load_Top At_Offset_1
0143 017d | } | Execute Record,Structure_Write
0144 029f 021b | | Declare_Subprogram For_Call,INIT_0218
0146 BODY_0130:
0146 e004 | | Load 0x0,0x4
0147 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0148 e402 | | Load 0x2,0x2
0149 0120 | | Execute Any,Is_Value
014a 6804 |h | Jump_Zero 0x14f
014b e007 | | Load 0x0,0x7
014c 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
014d 1b17 | | Execute Package,Field_Read,Field_Number 0x17
014e 7801 |x | Jump 0x150
014f e402 | | Load 0x2,0x2
0150 e5fc | | Load 0x2,-0x4
0151 e5fd | | Load 0x2,-0x3
0152 e5fe | | Load 0x2,-0x2
0153 e5ff | | Load 0x2,-0x1
0154 821d | | Call 0x1,0x1d
0155 c402 | | Store 0x2,0x2
0156 005b | [ | Store_Top Discrete,At_Offset_3
0157 4800 |H | Short_Literal 0x0
0158 00db | | Load_Top At_Offset_3
0159 e004 | | Load 0x0,0x4
015a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
015b 7003 |p | Jump_Nonzero 0x15f
015c 00da | | Load_Top At_Offset_2
015d a5fa | | Store_Unchecked 0x2,-0x6
015e 4505 |E | Exit_Subprogram 0x5
015f 00cf | | Action Mark_Auxiliary
0160 7824 |x$ | Jump 0x185
0161 8405 | | Call 0x2,0x5
0162 e5fb | | Load 0x2,-0x5
0163 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0164 0a01 | | Execute_Immediate Plus,0x1
0165 e5fb | | Load 0x2,-0x5
0166 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0167 e5fb | | Load 0x2,-0x5
0168 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0169 0c81 | | Execute_Immediate Greater_Equal,0x81
016a 6814 |h | Jump_Zero 0x17f
016b 4801 |H | Short_Literal 0x1
016c 4801 |H | Short_Literal 0x1
016d e009 | | Load 0x0,0x9
016e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016f 035b | [ | Declare_Type Array,Constrained
0170 0337 | 7 | Declare_Variable Array
0171 e5ff | | Load 0x2,-0x1
0172 e009 | | Load 0x0,0x9
0173 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0174 e009 | | Load 0x0,0x9
0175 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0176 0119 | | Execute Any,Check_In_Formal_Type
0177 4801 |H | Short_Literal 0x1
0178 00da | | Load_Top At_Offset_2
0179 01d6 | | Execute Vector,Field_Write
017a 6029 |`) | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x0000815f}
017b e004 | | Load 0x0,0x4
017c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017d a5fa | | Store_Unchecked 0x2,-0x6
017e 4505 |E | Exit_Subprogram 0x5
017f e402 | | Load 0x2,0x2
0180 e007 | | Load 0x0,0x7
0181 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0182 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0183 c402 | | Store 0x2,0x2
0184 00c9 | | Action Pop_Auxiliary_Loop
0185 e402 | | Load 0x2,0x2
0186 e007 | | Load 0x0,0x7
0187 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0188 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0189 6fd7 |o | Jump_Zero 0x161
018a 00ce | | Action Pop_Auxiliary
018b e5fb | | Load 0x2,-0x5
018c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
018d 0aff | | Execute_Immediate Plus,-0x1
018e e5fb | | Load 0x2,-0x5
018f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0190 4801 |H | Short_Literal 0x1
0191 e5fb | | Load 0x2,-0x5
0192 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0193 00da | | Load_Top At_Offset_2
0194 a5fa | | Store_Unchecked 0x2,-0x6
0195 4505 |E | Exit_Subprogram 0x5
0196 TRAP_0130:
0196 e004 | | Load 0x0,0x4
0197 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0198 010f | | Execute Exception,Equal
0199 6804 |h | Jump_Zero 0x19e
019a e004 | | Load 0x0,0x4
019b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
019c a5fa | | Store_Unchecked 0x2,-0x6
019d 4505 |E | Exit_Subprogram 0x5
019e 0092 0277 | w| Action Push_String_Extended,0x277 ; "Rcf_Imports.Get_Remote_Imports"
01a0 e006 | | Load 0x0,0x6
01a1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a2 a5fa | | Store_Unchecked 0x2,-0x6
01a3 4505 |E | Exit_Subprogram 0x5
01a4 0000 0000 | | .LITERAL {0x00000000, 0x0000815f}
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 01b5 | | .CONST 0x01b5 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab e5fd | | Load 0x2,-0x3
01ac 0092 0278 | x| Action Push_String_Extended,0x278 ; "Rcf_Imports.Has_Static_Imports"
01ae e006 | | Load 0x0,0x6
01af 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b0 4801 |H | Short_Literal 0x1
01b1 a5fc | | Store_Unchecked 0x2,-0x4
01b2 4800 |H | Short_Literal 0x0
01b3 a5fb | | Store_Unchecked 0x2,-0x5
01b4 4504 |E | Exit_Subprogram 0x4
01b5 TRAP_01a8:
01b5 e004 | | Load 0x0,0x4
01b6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01b7 010f | | Execute Exception,Equal
01b8 6806 |h | Jump_Zero 0x1bf
01b9 e004 | | Load 0x0,0x4
01ba 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01bb a5fb | | Store_Unchecked 0x2,-0x5
01bc 4800 |H | Short_Literal 0x0
01bd a5fc | | Store_Unchecked 0x2,-0x4
01be 4504 |E | Exit_Subprogram 0x4
01bf 0092 0278 | x| Action Push_String_Extended,0x278 ; "Rcf_Imports.Has_Static_Imports"
01c1 e006 | | Load 0x0,0x6
01c2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01c3 a5fb | | Store_Unchecked 0x2,-0x5
01c4 4800 |H | Short_Literal 0x0
01c5 a5fc | | Store_Unchecked 0x2,-0x4
01c6 4504 |E | Exit_Subprogram 0x4
01c7 0000 | | .XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 01d3 | | .CONST 0x01d3 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00db | | Load_Top At_Offset_3
01cc 00db | | Load_Top At_Offset_3
01cd e00a | | Load 0x0,0xa
01ce 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
01cf a5fc | | Store_Unchecked 0x2,-0x4
01d0 4800 |H | Short_Literal 0x0
01d1 a5fb | | Store_Unchecked 0x2,-0x5
01d2 4504 |E | Exit_Subprogram 0x4
01d3 TRAP_01c8:
01d3 e004 | | Load 0x0,0x4
01d4 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01d5 010f | | Execute Exception,Equal
01d6 6806 |h | Jump_Zero 0x1dd
01d7 e004 | | Load 0x0,0x4
01d8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01d9 a5fb | | Store_Unchecked 0x2,-0x5
01da 4800 |H | Short_Literal 0x0
01db a5fc | | Store_Unchecked 0x2,-0x4
01dc 4504 |E | Exit_Subprogram 0x4
01dd 0092 0279 | y| Action Push_String_Extended,0x279 ; "Rcf_Imports.Has_State_File"
01df e006 | | Load 0x0,0x6
01e0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01e1 a5fb | | Store_Unchecked 0x2,-0x5
01e2 4800 |H | Short_Literal 0x0
01e3 a5fc | | Store_Unchecked 0x2,-0x4
01e4 4504 |E | Exit_Subprogram 0x4
01e5 0000 0000 | | .XXX[0x3]
01e7 0000 | |
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4605 |F | Jump_Case 0x5
01ec 7804 |x | Jump 0x1f1 ; case 0x0
01ed 7814 |x | Jump 0x202 ; case 0x1
01ee 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
01ef 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
01f0 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
01f1 00da | | Load_Top At_Offset_2 ; case 0x5
01f2 01dc | | Execute Vector,Last
01f3 00db | | Load_Top At_Offset_3
01f4 01dd | | Execute Vector,First
01f5 0263 | c | Execute Discrete,Above_Bound
01f6 700a |p | Jump_Nonzero 0x201
01f7 00d8 | | Load_Top At_Offset_0
01f8 e5ff | | Load 0x2,-0x1
01f9 01d5 | | Execute Vector,Field_Reference
01fa 0125 | % | Execute Any,Set_Constraint
01fb 00d8 | | Load_Top At_Offset_0
01fc e5ff | | Load 0x2,-0x1
01fd 01d5 | | Execute Vector,Field_Reference
01fe 1c00 | | Execute_Immediate Run_Utility,0x0
01ff 0a01 | | Execute_Immediate Plus,0x1
0200 7ff4 | | Jump 0x1f5
0201 4302 |C | Exit_Subprogram From_Utility,0x2
0202 00da | | Load_Top At_Offset_2
0203 01dc | | Execute Vector,Last
0204 00db | | Load_Top At_Offset_3
0205 01dd | | Execute Vector,First
0206 0263 | c | Execute Discrete,Above_Bound
0207 700a |p | Jump_Nonzero 0x212
0208 00d8 | | Load_Top At_Offset_0
0209 e5ff | | Load 0x2,-0x1
020a 01d5 | | Execute Vector,Field_Reference
020b 0125 | % | Execute Any,Set_Constraint
020c 00d8 | | Load_Top At_Offset_0
020d e5ff | | Load 0x2,-0x1
020e 01d7 | | Execute Vector,Field_Read
020f 1c00 | | Execute_Immediate Run_Utility,0x0
0210 0a01 | | Execute_Immediate Plus,0x1
0211 7ff4 | | Jump 0x206
0212 4302 |C | Exit_Subprogram From_Utility,0x2
0213 0000 0000 | | .BLANK 0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0234 | 4 | .CONST 0x0234 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0005 | | .CONST 0x0005 ; Number of locals
021b INIT_0218:
021b e007 | | Load 0x0,0x7
021c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021d 02c7 | | Declare_Variable Any
021e e402 | | Load 0x2,0x2
021f e007 | | Load 0x0,0x7
0220 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0221 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0222 a602 | | Store_Unchecked 0x3,0x2
0223 e5fc | | Load 0x2,-0x4
0224 e5fd | | Load 0x2,-0x3
0225 00da | | Load_Top At_Offset_2
0226 e00b | | Load 0x0,0xb
0227 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0228 e5fc | | Load 0x2,-0x4
0229 e5fd | | Load 0x2,-0x3
022a 00db | | Load_Top At_Offset_3
022b e00b | | Load 0x0,0xb
022c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
022d 00d9 | | Load_Top At_Offset_1
022e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
022f 00d9 | | Load_Top At_Offset_1
0230 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0231 e404 | | Load 0x2,0x4
0232 e005 | | Load 0x0,0x5
0233 1870 | p | Execute Package,Field_Execute,Field_Number 0x70
0234 BODY_0218:
0234 e5fb | | Load 0x2,-0x5
0235 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0236 e5fb | | Load 0x2,-0x5
0237 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0238 01d5 | | Execute Vector,Field_Reference
0239 00d8 | | Load_Top At_Offset_0
023a 00da | | Load_Top At_Offset_2
023b e002 | | Load 0x0,0x2
023c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
023d e002 | | Load 0x0,0x2
023e 180f | | Execute Package,Field_Execute,Field_Number 0xf
023f 00d2 | | Pop_Control Pop_Count_2
0240 4800 |H | Short_Literal 0x0
0241 00da | | Load_Top At_Offset_2
0242 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0243 e004 | | Load 0x0,0x4
0244 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0245 7004 |p | Jump_Nonzero 0x24a
0246 00d9 | | Load_Top At_Offset_1
0247 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0248 a403 | | Store_Unchecked 0x2,0x3
0249 4501 |E | Exit_Subprogram 0x1
024a 4800 |H | Short_Literal 0x0
024b 00db | | Load_Top At_Offset_3
024c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
024d e004 | | Load 0x0,0x4
024e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
024f 7003 |p | Jump_Nonzero 0x253
0250 00da | | Load_Top At_Offset_2
0251 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0252 a403 | | Store_Unchecked 0x2,0x3
0253 4501 |E | Exit_Subprogram 0x1
0254 0000 0000 | | .BLANK 0000[0x4]
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 4608 |F | Jump_Case 0x8
025c 7808 |x | Jump 0x265 ; case 0x0
025d 7811 |x | Jump 0x26f ; case 0x1
025e 7814 |x | Jump 0x273 ; case 0x2
025f 7813 |x | Jump 0x273 ; case 0x3
0260 7812 |x | Jump 0x273 ; case 0x4
0261 7811 |x | Jump 0x273 ; case 0x5
0262 7810 |x | Jump 0x273 ; case 0x6
0263 780f |x | Jump 0x273 ; case 0x7
0264 780e |x | Jump 0x273 ; case 0x8
0265 00da | | Load_Top At_Offset_2
0266 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0267 1c00 | | Execute_Immediate Run_Utility,0x0
0268 4801 |H | Short_Literal 0x1
0269 00db | | Load_Top At_Offset_3
026a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
026b 4801 |H | Short_Literal 0x1
026c 00db | | Load_Top At_Offset_3
026d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
026e 4302 |C | Exit_Subprogram From_Utility,0x2
026f 00da | | Load_Top At_Offset_2
0270 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0271 1c01 | | Execute_Immediate Run_Utility,0x1
0272 4302 |C | Exit_Subprogram From_Utility,0x2
0273 0869 | i | Execute_Immediate Raise,0x69
0274 ; --------------------------------------------------------------------------------------
0274 ; STRING TABLE
0274 ; --------------------------------------------------------------------------------------
0274 000e | | .STRTAB 0x000e->0x027b ; "Rcf_Imports.Add_Import"
0275 0022 | " | .STRTAB 0x0022->0x0286 ; "Rcf_Imports.Remove_Import"
0276 0039 | 9 | .STRTAB 0x0039->0x0292 ; "Rcf_Imports.Get_Imports"
; "Rcf_Imports.Get_Imports"
0277 004e | N | .STRTAB 0x004e->0x029e ; "Rcf_Imports.Get_Remote_Imports"
0278 006a | j | .STRTAB 0x006a->0x02ad ; "Rcf_Imports.Has_Static_Imports"
; "Rcf_Imports.Has_Static_Imports"
0279 0086 | | .STRTAB 0x0086->0x02bc ; "Rcf_Imports.Has_State_File"
027a 009e | | .STREND 0x009e->0x02c9
027b 5263 665f |Rcf_| .STRTAB_STRINGS
02c9 0000 0000 | | .BLANK 0000[0x7]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug Table
02d0 ; --------------------------------------------------------------------------------------
02d0 0004 000d | | .DEBUG4 0x0004,0x000d,0x4f94,0x0000,0x0001,0x0000
02d6 0000 0000 | | .BLANK 0000[0x2a]
0300 000f a404 | | .XXX[0x6]
0302 0000 09d8 | |
0304 09bc 3404 | 4 |
0306 0000 0000 | | .BLANK 0000[0x8]
030e 0036 4494 | 6D | .XXX[0x2]
0310 0000 0000 | | .BLANK 0000[0x7]
0317 0007 002d | -| .XXX[0x5]
0319 7404 0000 |t |
031b 09c4 | |
031c 0000 0000 | | .BLANK 0000[0x4]
0320 000f e804 | | .XXX[0x4]
0322 0000 0158 | X|
0324 0000 0000 | | .BLANK 0000[0x16]
033a 0004 00a0 | | .XXX[0xc]
033c 0000 0000 | |
033e 0000 0800 | |
0340 0000 4400 | D |
0342 0000 0020 | |
0344 0000 0140 | @|
0346 0000 0000 | | .BLANK 0000[0x2e]
0374 8014 0000 | | .XXX[0xb]
0376 0000 0000 | |
0378 0100 0000 | |
037a 0880 0000 | |
037c 0004 0000 | |
037e 0028 | ( |
037f 0000 0000 | | .BLANK 0000[0x2e]
03ad 1002 8000 | | .XXX[0xb]
03af 0000 0000 | |
03b1 0020 0000 | |
03b3 0110 0000 | |
03b5 0000 8000 | |
03b7 0005 | |
03b8 0000 0000 | | .BLANK 0000[0x34]
03ec 000c 3413 | 4 | .XXX[0x14]
03ee 0000 2006 | |
03f0 0001 0404 | |
03f2 0000 0700 | |
03f4 000c 3413 | 4 |
03f6 0000 3a60 | :`|
03f8 ff91 0013 | |
03fa 1000 0001 | |
03fc 0000 0000 | |
03fe 0000 0003 | |