|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 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 INIT_0068,For_Outer_Call,Visible,Unelaborated 000f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0011 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 0013 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 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 INIT_00a8,For_Outer_Call,Visible,Unelaborated 0028 c21b | | Store 0x1,0x1b 0029 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 002b c21c | | Store 0x1,0x1c 002c 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 002e c21d | | Store 0x1,0x1d 002f 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 0031 c21e | | Store 0x1,0x1e 0032 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0034 c21f | | Store 0x1,0x1f 0035 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 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 INIT_01e8,For_Call 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 INIT_0258,For_Call 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Suprogram New_Top_Offset 0x5 00c0 TRAP_00a8: 00c0 0007 | | Action Break_Optional 00c1 4505 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 0x5 00f4 4505 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_0218,For_Call 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_Suprogram New_Top_Offset 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,-0x7f 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 0x6 01ec 7804 |x | Jump 0x1f1 ; case 0x0 01ed 7814 |x | Jump 0x202 ; case 0x1 01ee 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 01ef 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 01f0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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,Indirect,Field_Number 0x3 022f 00d9 | | Load_Top At_Offset_1 0230 2503 |% | Execute Variant_Record,Field_Reference,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 0x9 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,New_Top_Offset 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,New_Top_Offset 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" 0277 004e | N | .STRTAB 0x004e->0x029e ; "Rcf_Imports.Get_Remote_Imports" 0278 006a | j | .STRTAB 0x006a->0x02ad ; "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 | |