|
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: 4096 (0x1000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0660 | ` | .CONST 0x0660 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0030 | 0 | .CONST 0x0030 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001c | | .CONST 0x001c ; Number of locals
000b INIT_0008:
000b 029a 003b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0038
000d 029a 00cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c8
000f 00bf | | Action Accept_Activation
0010 0092 0286 | | Action Push_String_Extended,0x286 ; "!machine.rcf.rcf1_2_"
0012 0092 0287 | | Action Push_String_Extended,0x287 ; "!machine.rcf.rcf1_2_host_only_views"
0014 0092 0288 | | Action Push_String_Extended,0x288 ; "!machine.rcf.rcf1_2_regular_views"
0016 0092 0289 | | Action Push_String_Extended,0x289 ; "!machine.rcf.rcf1_2_freeze_file"
0018 0092 028a | | Action Push_String_Extended,0x28a ; "_!machine.rcf.rcf1_2_freeze_file"
001a 0092 028b | | Action Push_String_Extended,0x28b ; "!machine.rcf.rcf1_2_demote_file"
001c 0092 028c | | Action Push_String_Extended,0x28c ; "!machine.rcf.rcf1_2_install_file"
001e 0092 028d | | Action Push_String_Extended,0x28d ; "!machine.rcf.rcf1_2_code_file"
0020 0092 028e | | Action Push_String_Extended,0x28e ; "[_!machine.rcf.rcf1_2_install_file,_!machine.rcf.rcf1_2_code_file]"
0022 0092 028f | | Action Push_String_Extended,0x28f ; "<ERRORS>"
0024 0092 0290 | | Action Push_String_Extended,0x290 ; "<PROGRESS>"
0026 0092 0291 | | Action Push_String_Extended,0x291 ; "rcf.host_only"
0028 029d 00fb | | Declare_Subprogram For_Outer_Call,INIT_00f8
002a 029d 0123 | #| Declare_Subprogram For_Outer_Call,INIT_0120
002c 1d0d | | Execute_Immediate Reference_Lex_1,0xd
002d 00c7 | | Action Elaborate_Subprogram
002e 1d0e | | Execute_Immediate Reference_Lex_1,0xe
002f 00c7 | | Action Elaborate_Subprogram
0030 BODY_0008:
0030 00bc | | Action Signal_Activated
0031 00bb | | Action Signal_Completion
0032 0000 0000 | | .BLANK 0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0040 | @ | .CONST 0x0040 ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0003 | | .CONST 0x0003 ; Number of locals
003b INIT_0038:
003b 0092 0292 | | Action Push_String_Extended,0x292 ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]"
003d e002 | | Load 0x0,0x2
003e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
003f 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0040 BODY_0038:
0040 e003 | | Load 0x0,0x3
0041 180e | | Execute Package,Field_Execute,Field_Number 0xe
0042 480a |H | Short_Literal 0xa
0043 0092 0293 | | Action Push_String_Extended,0x293 ; "Find_All_Target_Worlds"
0045 e004 | | Load 0x0,0x4
0046 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0047 821b | | Call 0x1,0x1b
0048 e003 | | Load 0x0,0x3
0049 180e | | Execute Package,Field_Execute,Field_Number 0xe
004a 480a |H | Short_Literal 0xa
004b 0092 0294 | | Action Push_String_Extended,0x294 ; "Resolving frozen items: freeze_file => !machine.rcf.rcf1_2_freeze_file, Naming => [_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i,c)[,$,$$.state.tool_state.[,@state_file]]'if(frozen)"
004d e004 | | Load 0x0,0x4
004e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
004f e003 | | Load 0x0,0x3
0050 180e | | Execute Package,Field_Execute,Field_Number 0xe
0051 e003 | | Load 0x0,0x3
0052 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0053 e212 | | Load 0x1,0x12
0054 e004 | | Load 0x0,0x4
0055 180e | | Execute Package,Field_Execute,Field_Number 0xe
0056 0092 0295 | | Action Push_String_Extended,0x295 ; "<QUIET>"
0058 4801 |H | Short_Literal 0x1
0059 00ea | | Load_Encached Null_String_Cache
005a 0092 0296 | | Action Push_String_Extended,0x296 ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i,c)[,$,$$.state.tool_state.[,@state_file]]'if(frozen)"
005c e005 | | Load 0x0,0x5
005d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
005e e003 | | Load 0x0,0x3
005f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0060 e003 | | Load 0x0,0x3
0061 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0062 e004 | | Load 0x0,0x4
0063 180f | | Execute Package,Field_Execute,Field_Number 0xf
0064 e003 | | Load 0x0,0x3
0065 180e | | Execute Package,Field_Execute,Field_Number 0xe
0066 480a |H | Short_Literal 0xa
0067 0092 0297 | | Action Push_String_Extended,0x297 ; "Resolving coded units: code_file => !machine.rcf.rcf1_2_code_file, Naming => [_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(c)"
0069 e004 | | Load 0x0,0x4
006a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
006b e003 | | Load 0x0,0x3
006c 180e | | Execute Package,Field_Execute,Field_Number 0xe
006d e003 | | Load 0x0,0x3
006e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
006f e216 | | Load 0x1,0x16
0070 e004 | | Load 0x0,0x4
0071 180e | | Execute Package,Field_Execute,Field_Number 0xe
0072 0092 0295 | | Action Push_String_Extended,0x295 ; "<QUIET>"
0074 4801 |H | Short_Literal 0x1
0075 00ea | | Load_Encached Null_String_Cache
0076 0092 0298 | | Action Push_String_Extended,0x298 ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(c)"
0078 e005 | | Load 0x0,0x5
0079 1810 | | Execute Package,Field_Execute,Field_Number 0x10
007a e003 | | Load 0x0,0x3
007b 180e | | Execute Package,Field_Execute,Field_Number 0xe
007c e003 | | Load 0x0,0x3
007d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
007e e004 | | Load 0x0,0x4
007f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0080 e003 | | Load 0x0,0x3
0081 180e | | Execute Package,Field_Execute,Field_Number 0xe
0082 480a |H | Short_Literal 0xa
0083 0092 0299 | | Action Push_String_Extended,0x299 ; "Resolving installed units: install_file => !machine.rcf.rcf1_2_install_file, Naming => [_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i)"
0085 e004 | | Load 0x0,0x4
0086 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0087 e003 | | Load 0x0,0x3
0088 180e | | Execute Package,Field_Execute,Field_Number 0xe
0089 e003 | | Load 0x0,0x3
008a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
008b e215 | | Load 0x1,0x15
008c e004 | | Load 0x0,0x4
008d 180e | | Execute Package,Field_Execute,Field_Number 0xe
008e 0092 0295 | | Action Push_String_Extended,0x295 ; "<QUIET>"
0090 4801 |H | Short_Literal 0x1
0091 00ea | | Load_Encached Null_String_Cache
0092 0092 029a | | Action Push_String_Extended,0x29a ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i)"
0094 e005 | | Load 0x0,0x5
0095 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0096 e003 | | Load 0x0,0x3
0097 180e | | Execute Package,Field_Execute,Field_Number 0xe
0098 e003 | | Load 0x0,0x3
0099 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
009a e004 | | Load 0x0,0x4
009b 180f | | Execute Package,Field_Execute,Field_Number 0xf
009c e5ff | | Load 0x2,-0x1
009d 701d |p | Jump_Nonzero 0xbb
009e e003 | | Load 0x0,0x3
009f 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a0 480a |H | Short_Literal 0xa
00a1 0092 029b | | Action Push_String_Extended,0x29b ; "Library.Unfreeze (_!machine.rcf.rcf1_2_freeze_file);"
00a3 e004 | | Load 0x0,0x4
00a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a5 0092 029c | | Action Push_String_Extended,0x29c ; "<PROFILE>"
00a7 4800 |H | Short_Literal 0x0
00a8 e213 | | Load 0x1,0x13
00a9 e005 | | Load 0x0,0x5
00aa 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00ab e003 | | Load 0x0,0x3
00ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ad 480a |H | Short_Literal 0xa
00ae 0092 029d | | Action Push_String_Extended,0x29d ; "Compilation.Demote ('_'!machine.rcf.rcf1_2_demote_file);"
00b0 e004 | | Load 0x0,0x4
00b1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b2 0092 029c | | Action Push_String_Extended,0x29c ; "<PROFILE>"
00b4 4800 |H | Short_Literal 0x0
00b5 e002 | | Load 0x0,0x2
00b6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00b7 00db | | Load_Top At_Offset_3
00b8 e217 | | Load 0x1,0x17
00b9 e002 | | Load 0x0,0x2
00ba 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00bb e003 | | Load 0x0,0x3
00bc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00bd 480a |H | Short_Literal 0xa
00be 0092 029e | | Action Push_String_Extended,0x29e ; "Uncode finished"
00c0 e004 | | Load 0x0,0x4
00c1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00c2 4502 |E | Exit_Subprogram 0x2
00c3 0000 0000 | | .BLANK 0000[0x5]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 4801 |H | Short_Literal 0x1
00cc 821c | | Call 0x1,0x1c
00cd 0092 029c | | Action Push_String_Extended,0x29c ; "<PROFILE>"
00cf 4800 |H | Short_Literal 0x0
00d0 e002 | | Load 0x0,0x2
00d1 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00d2 4803 |H | Short_Literal 0x3
00d3 4801 |H | Short_Literal 0x1
00d4 0092 029f | | Action Push_String_Extended,0x29f ; "_!machine.rcf.rcf1_2_code_file"
00d6 e002 | | Load 0x0,0x2
00d7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00d8 0092 029c | | Action Push_String_Extended,0x29c ; "<PROFILE>"
00da 4800 |H | Short_Literal 0x0
00db e002 | | Load 0x0,0x2
00dc 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00dd 4802 |H | Short_Literal 0x2
00de 4801 |H | Short_Literal 0x1
00df 0092 02a0 | | Action Push_String_Extended,0x2a0 ; "_!machine.rcf.rcf1_2_install_file"
00e1 e002 | | Load 0x0,0x2
00e2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00e3 4800 |H | Short_Literal 0x0
00e4 821c | | Call 0x1,0x1c
00e5 0092 029c | | Action Push_String_Extended,0x29c ; "<PROFILE>"
00e7 4800 |H | Short_Literal 0x0
00e8 e213 | | Load 0x1,0x13
00e9 e005 | | Load 0x0,0x5
00ea 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00eb e003 | | Load 0x0,0x3
00ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ed 480a |H | Short_Literal 0xa
00ee 0092 02a1 | | Action Push_String_Extended,0x2a1 ; "Recode finished"
00f0 e004 | | Load 0x0,0x4
00f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00f2 4501 |E | Exit_Subprogram 0x1
00f3 0000 0000 | | .BLANK 0000[0x5]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0113 | | .CONST 0x0113 ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 000a | | .CONST 0x000a ; Number of locals
00fb INIT_00f8:
00fb e006 | | Load 0x0,0x6
00fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fd 02c7 | | Declare_Variable Any
00fe 00d8 | | Load_Top At_Offset_0
00ff 1c00 | | Execute_Immediate Run_Utility,0x0
0100 e006 | | Load 0x0,0x6
0101 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0102 02c7 | | Declare_Variable Any
0103 00d8 | | Load_Top At_Offset_0
0104 1c00 | | Execute_Immediate Run_Utility,0x0
0105 0092 02a2 | | Action Push_String_Extended,0x2a2 ; "!machine.rcf"
0107 029f 018b | | Declare_Subprogram For_Call,INIT_0188
0109 029f 01cb | | Declare_Subprogram For_Call,INIT_01c8
010b 029f 01f3 | | Declare_Subprogram For_Call,INIT_01f0
010d 029f 021b | | Declare_Subprogram For_Call,INIT_0218
010f 029f 024b | K| Declare_Subprogram For_Call,INIT_0248
0111 029f 0263 | c| Declare_Subprogram For_Call,INIT_0260
0113 BODY_00f8:
0113 8409 | | Call 0x2,0x9
0114 840a | | Call 0x2,0xa
0115 8407 | | Call 0x2,0x7
0116 8408 | | Call 0x2,0x8
0117 e402 | | Load 0x2,0x2
0118 e006 | | Load 0x0,0x6
0119 181b | | Execute Package,Field_Execute,Field_Number 0x1b
011a c402 | | Store 0x2,0x2
011b e403 | | Load 0x2,0x3
011c e006 | | Load 0x0,0x6
011d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
011e c403 | | Store 0x2,0x3
011f 4501 |E | Exit_Subprogram 0x1
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0138 | 8 | .CONST 0x0138 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0004 | | .CONST 0x0004 ; Number of locals
0123 INIT_0120:
0123 e007 | | Load 0x0,0x7
0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0125 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0126 02c7 | | Declare_Variable Any
0127 4801 |H | Short_Literal 0x1
0128 e007 | | Load 0x0,0x7
0129 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
012b 0092 02a3 | | Action Push_String_Extended,0x2a3 ; "_!machine.rcf.rcf1_2_regular_views"
012d e007 | | Load 0x0,0x7
012e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012f 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0130 a402 | | Store_Unchecked 0x2,0x2
0131 e008 | | Load 0x0,0x8
0132 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0133 02ff | | Declare_Variable Variant_Record
0134 00d8 | | Load_Top At_Offset_0
0135 1c00 | | Execute_Immediate Run_Utility,0x0
0136 e008 | | Load 0x0,0x8
0137 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0138 BODY_0120:
0138 00cf | | Action Mark_Auxiliary
0139 7842 |xB | Jump 0x17c
013a e008 | | Load 0x0,0x8
013b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013c 00db | | Load_Top At_Offset_3
013d 6046 |`F | Indirect_Literal Discrete,0x184,{0x00000000, 0x00004000}
013e e009 | | Load 0x0,0x9
013f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0140 e402 | | Load 0x2,0x2
0141 e007 | | Load 0x0,0x7
0142 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0143 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0144 e007 | | Load 0x0,0x7
0145 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0146 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0147 e007 | | Load 0x0,0x7
0148 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0149 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
014a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014b 00d1 | | Pop_Control Pop_Count_1
014c 005a | Z | Store_Top Discrete,At_Offset_2
014d 00d9 | | Load_Top At_Offset_1
014e 700c |p | Jump_Nonzero 0x15b
014f 6034 |`4 | Indirect_Literal Discrete,0x184,{0x00000000, 0x00004000}
0150 e009 | | Load 0x0,0x9
0151 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0152 e5ff | | Load 0x2,-0x1
0153 00e1 | | Load_Encached Boolean_Cache
0154 011c | | Execute Any,Convert_Unchecked
0155 1c01 | | Execute_Immediate Run_Utility,0x1
0156 e21a | | Load 0x1,0x1a
0157 e403 | | Load 0x2,0x3
0158 e00a | | Load 0x0,0xa
0159 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
015a 781b |x | Jump 0x176
015b e003 | | Load 0x0,0x3
015c 180e | | Execute Package,Field_Execute,Field_Number 0xe
015d 4806 |H | Short_Literal 0x6
015e 0092 02a4 | | Action Push_String_Extended,0x2a4 ; "Error while obtaining version of switch file for"
0160 e402 | | Load 0x2,0x2
0161 e007 | | Load 0x0,0x7
0162 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0163 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0164 e007 | | Load 0x0,0x7
0165 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0166 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0167 01cc | | Execute Vector,Catenate
0168 0092 02a5 | | Action Push_String_Extended,0x2a5 ; ": "
016a 01cc | | Execute Vector,Catenate
016b e404 | | Load 0x2,0x4
016c e008 | | Load 0x0,0x8
016d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016e 011c | | Execute Any,Convert_Unchecked
016f 1c01 | | Execute_Immediate Run_Utility,0x1
0170 01cc | | Execute Vector,Catenate
0171 0092 02a6 | | Action Push_String_Extended,0x2a6 ; ". Assuming the view was not host-only."
0173 01cc | | Execute Vector,Catenate
0174 e004 | | Load 0x0,0x4
0175 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0176 00db | | Load_Top At_Offset_3
0177 e007 | | Load 0x0,0x7
0178 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0179 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
017a c402 | | Store 0x2,0x2
017b 00c9 | | Action Pop_Auxiliary_Loop
017c 00db | | Load_Top At_Offset_3
017d e007 | | Load 0x0,0x7
017e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0180 6fb9 |o | Jump_Zero 0x13a
0181 4502 |E | Exit_Subprogram 0x2
0182 0000 0000 | | .XXX[0x2]
0184 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0192 | | .CONST 0x0192 ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0003 | | .CONST 0x0003 ; Number of locals
018b INIT_0188:
018b e008 | | Load 0x0,0x8
018c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
018d 02ff | | Declare_Variable Variant_Record
018e 00d8 | | Load_Top At_Offset_0
018f 1c00 | | Execute_Immediate Run_Utility,0x0
0190 e008 | | Load 0x0,0x8
0191 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0192 BODY_0188:
0192 e008 | | Load 0x0,0x8
0193 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0194 00da | | Load_Top At_Offset_2
0195 67ee |g | Indirect_Literal Discrete,0x184,{0x00000000, 0x00004000}
0196 e009 | | Load 0x0,0x9
0197 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0198 e7ff | | Load 0x3,-0x1
0199 e007 | | Load 0x0,0x7
019a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
019b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
019c e007 | | Load 0x0,0x7
019d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
019f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a0 00d1 | | Pop_Control Pop_Count_1
01a1 0059 | Y | Store_Top Discrete,At_Offset_1
01a2 00d8 | | Load_Top At_Offset_0
01a3 681a |h | Jump_Zero 0x1be
01a4 e003 | | Load 0x0,0x3
01a5 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a6 4806 |H | Short_Literal 0x6
01a7 0092 02a4 | | Action Push_String_Extended,0x2a4 ; "Error while obtaining version of switch file for"
01a9 e7ff | | Load 0x3,-0x1
01aa e007 | | Load 0x0,0x7
01ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ac 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01ad 01cc | | Execute Vector,Catenate
01ae 0092 02a5 | | Action Push_String_Extended,0x2a5 ; ": "
01b0 01cc | | Execute Vector,Catenate
01b1 00db | | Load_Top At_Offset_3
01b2 e008 | | Load 0x0,0x8
01b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b4 011c | | Execute Any,Convert_Unchecked
01b5 1c01 | | Execute_Immediate Run_Utility,0x1
01b6 01cc | | Execute Vector,Catenate
01b7 0092 02a6 | | Action Push_String_Extended,0x2a6 ; ". Assuming the view was not host-only."
01b9 01cc | | Execute Vector,Catenate
01ba e004 | | Load 0x0,0x4
01bb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01bc 4800 |H | Short_Literal 0x0
01bd 4401 |D | Exit_Subprogram With_Result,0x1
01be 67c5 |g | Indirect_Literal Discrete,0x184,{0x00000000, 0x00004000}
01bf e009 | | Load 0x0,0x9
01c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c1 e21a | | Load 0x1,0x1a
01c2 e602 | | Load 0x3,0x2
01c3 e00a | | Load 0x0,0xa
01c4 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
01c5 4401 |D | Exit_Subprogram With_Result,0x1
01c6 0000 0000 | | .XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cf | | .CONST 0x01cf ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb 00da | | Load_Top At_Offset_2
01cc e007 | | Load 0x0,0x7
01cd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ce 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01cf BODY_01c8:
01cf 00db | | Load_Top At_Offset_3
01d0 8405 | | Call 0x2,0x5
01d1 680e |h | Jump_Zero 0x1e0
01d2 e003 | | Load 0x0,0x3
01d3 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d4 480a |H | Short_Literal 0xa
01d5 0092 02a7 | | Action Push_String_Extended,0x2a7 ; "Adding host_only view "
01d7 00db | | Load_Top At_Offset_3
01d8 01cc | | Execute Vector,Catenate
01d9 e004 | | Load 0x0,0x4
01da 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01db 00d8 | | Load_Top At_Offset_0
01dc e402 | | Load 0x2,0x2
01dd e006 | | Load 0x0,0x6
01de 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
01df 4502 |E | Exit_Subprogram 0x2
01e0 e003 | | Load 0x0,0x3
01e1 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e2 480a |H | Short_Literal 0xa
01e3 0092 02a8 | | Action Push_String_Extended,0x2a8 ; "Adding view "
01e5 00db | | Load_Top At_Offset_3
01e6 01cc | | Execute Vector,Catenate
01e7 e004 | | Load 0x0,0x4
01e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e9 00d8 | | Load_Top At_Offset_0
01ea e403 | | Load 0x2,0x3
01eb e006 | | Load 0x0,0x6
01ec 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
01ed 4502 |E | Exit_Subprogram 0x2
01ee 0000 0000 | | .XXX[0x2]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01fa | | .CONST 0x01fa ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0003 | | .CONST 0x0003 ; Number of locals
01f3 INIT_01f0:
01f3 e00b | | Load 0x0,0xb
01f4 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01f5 02c7 | | Declare_Variable Any
01f6 00d8 | | Load_Top At_Offset_0
01f7 1c00 | | Execute_Immediate Run_Utility,0x0
01f8 029f 027b | {| Declare_Subprogram For_Call,INIT_0278
01fa BODY_01f0:
01fa 00d9 | | Load_Top At_Offset_1
01fb 0120 | | Execute Any,Is_Value
01fc 6803 |h | Jump_Zero 0x200
01fd e00b | | Load 0x0,0xb
01fe 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01ff 7801 |x | Jump 0x201
0200 00d9 | | Load_Top At_Offset_1
0201 e00b | | Load 0x0,0xb
0202 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0203 c602 | | Store 0x3,0x2
0204 00cf | | Action Mark_Auxiliary
0205 7806 |x | Jump 0x20c
0206 8603 | | Call 0x3,0x3
0207 00da | | Load_Top At_Offset_2
0208 e00b | | Load 0x0,0xb
0209 181a | | Execute Package,Field_Execute,Field_Number 0x1a
020a c602 | | Store 0x3,0x2
020b 00c9 | | Action Pop_Auxiliary_Loop
020c 00da | | Load_Top At_Offset_2
020d e00b | | Load 0x0,0xb
020e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
020f 6ff6 |o | Jump_Zero 0x206
0210 4501 |E | Exit_Subprogram 0x1
0211 0000 0000 | | .BLANK 0000[0x7]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0229 | ) | .CONST 0x0229 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0002 | | .CONST 0x0002 ; Number of locals
021b INIT_0218:
021b e007 | | Load 0x0,0x7
021c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
021e 02c7 | | Declare_Variable Any
021f 4801 |H | Short_Literal 0x1
0220 e007 | | Load 0x0,0x7
0221 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0222 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0223 0092 02a9 | | Action Push_String_Extended,0x2a9 ; "!??'c(combined_view).state.tool_state.@state_file$$"
0225 e007 | | Load 0x0,0x7
0226 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0227 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0228 a602 | | Store_Unchecked 0x3,0x2
0229 BODY_0218:
0229 e003 | | Load 0x0,0x3
022a 180e | | Execute Package,Field_Execute,Field_Number 0xe
022b 480a |H | Short_Literal 0xa
022c 0092 02aa | | Action Push_String_Extended,0x2aa ; "Done resolving views"
022e e004 | | Load 0x0,0x4
022f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0230 00cf | | Action Mark_Auxiliary
0231 780b |x | Jump 0x23d
0232 00d9 | | Load_Top At_Offset_1
0233 e007 | | Load 0x0,0x7
0234 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0235 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0236 8406 | | Call 0x2,0x6
0237 00d9 | | Load_Top At_Offset_1
0238 e007 | | Load 0x0,0x7
0239 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
023b c602 | | Store 0x3,0x2
023c 00c9 | | Action Pop_Auxiliary_Loop
023d 00d9 | | Load_Top At_Offset_1
023e e007 | | Load 0x0,0x7
023f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0240 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0241 6ff0 |o | Jump_Zero 0x232
0242 4501 |E | Exit_Subprogram 0x1
0243 0000 0000 | | .BLANK 0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0253 | S | .CONST 0x0253 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b e402 | | Load 0x2,0x2
024c 00ea | | Load_Encached Null_String_Cache
024d e210 | | Load 0x1,0x10
024e 4801 |H | Short_Literal 0x1
024f e006 | | Load 0x0,0x6
0250 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0251 c402 | | Store 0x2,0x2
0252 4501 |E | Exit_Subprogram 0x1
0253 TRAP_0248:
0253 0007 | | Action Break_Optional
0254 e003 | | Load 0x0,0x3
0255 180e | | Execute Package,Field_Execute,Field_Number 0xe
0256 4807 |H | Short_Literal 0x7
0257 0092 02ab | | Action Push_String_Extended,0x2ab ; "Unable to create file !machine.rcf.rcf1_2_host_only_views"
0259 e004 | | Load 0x0,0x4
025a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
025b 00cc | | Action Pop_Block
025c 4501 |E | Exit_Subprogram 0x1
025d 0000 0000 | | .XXX[0x3]
025f 0000 | |
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 026b | k | .CONST 0x026b ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 e403 | | Load 0x2,0x3
0264 00ea | | Load_Encached Null_String_Cache
0265 e211 | | Load 0x1,0x11
0266 4801 |H | Short_Literal 0x1
0267 e006 | | Load 0x0,0x6
0268 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0269 c403 | | Store 0x2,0x3
026a 4501 |E | Exit_Subprogram 0x1
026b TRAP_0260:
026b 0007 | | Action Break_Optional
026c e003 | | Load 0x0,0x3
026d 180e | | Execute Package,Field_Execute,Field_Number 0xe
026e 4807 |H | Short_Literal 0x7
026f 0092 02ac | | Action Push_String_Extended,0x2ac ; "Unable to create file !machine.rcf.rcf1_2_regular_views"
0271 e004 | | Load 0x0,0x4
0272 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0273 00cc | | Action Pop_Block
0274 4501 |E | Exit_Subprogram 0x1
0275 0000 0000 | | .XXX[0x3]
0277 0000 | |
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027e | ~ | .CONST 0x027e ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b e602 | | Load 0x3,0x2
027c e00b | | Load 0x0,0xb
027d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
027e BODY_0278:
027e 0092 02ad | | Action Push_String_Extended,0x2ad ; "!Targets."
0280 00d9 | | Load_Top At_Offset_1
0281 01cc | | Execute Vector,Catenate
0282 e402 | | Load 0x2,0x2
0283 e006 | | Load 0x0,0x6
0284 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0285 4501 |E | Exit_Subprogram 0x1
0286 ; --------------------------------------------------------------------------------------
0286 ; STRING TABLE
0286 ; --------------------------------------------------------------------------------------
0286 0052 | R | .STRTAB 0x0052->0x02af ; "!machine.rcf.rcf1_2_"
0287 0064 | d | .STRTAB 0x0064->0x02b9 ; "!machine.rcf.rcf1_2_host_only_views"
0288 0085 | | .STRTAB 0x0085->0x02ca ; "!machine.rcf.rcf1_2_regular_views"
0289 00a4 | | .STRTAB 0x00a4->0x02db ; "!machine.rcf.rcf1_2_freeze_file"
028a 00c1 | | .STRTAB 0x00c1->0x02ea ; "_!machine.rcf.rcf1_2_freeze_file"
028b 00df | | .STRTAB 0x00df->0x02fa ; "!machine.rcf.rcf1_2_demote_file"
028c 00fc | | .STRTAB 0x00fc->0x030a ; "!machine.rcf.rcf1_2_install_file"
028d 011a | | .STRTAB 0x011a->0x031a ; "!machine.rcf.rcf1_2_code_file"
028e 0135 | 5 | .STRTAB 0x0135->0x0328 ; "[_!machine.rcf.rcf1_2_install_file,_!machine.rcf.rcf1_2_code_file]"
028f 0175 | u | .STRTAB 0x0175->0x0349 ; "<ERRORS>"
0290 017b | { | .STRTAB 0x017b->0x034d ; "<PROGRESS>"
0291 0183 | | .STRTAB 0x0183->0x0352 ; "rcf.host_only"
0292 018e | | .STRTAB 0x018e->0x0359 ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]"
0293 01d5 | | .STRTAB 0x01d5->0x037d ; "Find_All_Target_Worlds"
0294 01e9 | | .STRTAB 0x01e9->0x0388 ; "Resolving frozen items: freeze_file => !machine.rcf.rcf1_2_freeze_file, Naming => [_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i,c)[,$,$$.state.tool_state.[,@state_file]]'if(frozen)"
0295 02c3 | | .STRTAB 0x02c3->0x03f6 ; "<QUIET>"
; "<QUIET>"
; "<QUIET>"
0296 02c8 | | .STRTAB 0x02c8->0x03fa ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i,c)[,$,$$.state.tool_state.[,@state_file]]'if(frozen)"
0297 0350 | P | .STRTAB 0x0350->0x043f ; "Resolving coded units: code_file => !machine.rcf.rcf1_2_code_file, Naming => [_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(c)"
0298 03f1 | | .STRTAB 0x03f1->0x0490 ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(c)"
0299 0445 | E | .STRTAB 0x0445->0x04bb ; "Resolving installed units: install_file => !machine.rcf.rcf1_2_install_file, Naming => [_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i)"
029a 04f0 | | .STRTAB 0x04f0->0x0512 ; "[_!machine.rcf.rcf1_2_host_only_views,_!machine.rcf.rcf1_2_regular_views]?'c(ada)'s(i)"
029b 0544 | D | .STRTAB 0x0544->0x053d ; "Library.Unfreeze (_!machine.rcf.rcf1_2_freeze_file);"
029c 0576 | v | .STRTAB 0x0576->0x0557 ; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
029d 057d | } | .STRTAB 0x057d->0x055b ; "Compilation.Demote ('_'!machine.rcf.rcf1_2_demote_file);"
029e 05b3 | | .STRTAB 0x05b3->0x0577 ; "Uncode finished"
029f 05c0 | | .STRTAB 0x05c0->0x057f ; "_!machine.rcf.rcf1_2_code_file"
02a0 05dc | | .STRTAB 0x05dc->0x058e ; "_!machine.rcf.rcf1_2_install_file"
02a1 05fb | | .STRTAB 0x05fb->0x059e ; "Recode finished"
02a2 0608 | | .STRTAB 0x0608->0x05a6 ; "!machine.rcf"
02a3 0612 | | .STRTAB 0x0612->0x05ac ; "_!machine.rcf.rcf1_2_regular_views"
02a4 0632 | 2 | .STRTAB 0x0632->0x05bd ; "Error while obtaining version of switch file for"
; "Error while obtaining version of switch file for"
02a5 0660 | ` | .STRTAB 0x0660->0x05d5 ; ": "
; ": "
02a6 0660 | ` | .STRTAB 0x0660->0x05d6 ; ". Assuming the view was not host-only."
; ". Assuming the view was not host-only."
02a7 0685 | | .STRTAB 0x0685->0x05e9 ; "Adding host_only view "
02a8 0699 | | .STRTAB 0x0699->0x05f4 ; "Adding view "
02a9 06a3 | | .STRTAB 0x06a3->0x05fa ; "!??'c(combined_view).state.tool_state.@state_file$$"
02aa 06d4 | | .STRTAB 0x06d4->0x0614 ; "Done resolving views"
02ab 06e6 | | .STRTAB 0x06e6->0x061e ; "Unable to create file !machine.rcf.rcf1_2_host_only_views"
02ac 071d | | .STRTAB 0x071d->0x063a ; "Unable to create file !machine.rcf.rcf1_2_regular_views"
02ad 0752 | R | .STRTAB 0x0752->0x0656 ; "!Targets."
02ae 0759 | Y | .STREND 0x0759->0x065a
02af 216d 6163 |!mac| .STRTAB_STRINGS
065b 0000 0000 | | .BLANK 0000[0x5]
0660 ; --------------------------------------------------------------------------------------
0660 ; Debug Table
0660 ; --------------------------------------------------------------------------------------
0660 0004 000e | | .DEBUG4 0x0004,0x000e,0xdab4,0x0000,0x0001,0x0000
0666 0000 0000 | | .BLANK 0000[0xca]
0730 208a 0760 | `| .XXX[0x4c]
0732 0000 0602 | |
0734 0082 0149 | I|
0736 8100 001c | |
0738 0d40 0000 | @ |
073a 0104 3c00 | < |
073c a584 0000 | |
073e 0000 0a50 | P|
0740 c402 94b7 | |
0742 0000 4a0b | J |
0744 4029 3a70 |@):p|
0746 0000 0004 | |
0748 5000 0294 |P |
074a b700 0116 | |
074c 6600 a4e9 |f |
074e c000 0000 | |
0750 0a56 6400 | Vd |
0752 0000 0280 | |
0754 1c35 6050 | 5`P|
0756 0386 ac0a | |
0758 006e 24ce | n$ |
075a c5c0 294b | )K|
075c 7000 0000 |p |
075e 0388 1400 | |
0760 dadf 8646 | F|
0762 0000 0000 | |
0764 14b5 0005 | |
0766 2718 0000 |' |
0768 0000 0000 | |
076a 8080 2080 | |
076c 0000 0000 | |
076e 0708 6400 | d |
0770 00e9 e180 | |
0772 52e6 6000 |R ` |
0774 0752 6802 | Rh |
0776 9770 0000 | p |
0778 44e4 c000 |D |
077a 0004 7634 | v4|
077c 0000 0000 | | .BLANK 0000[0x5]
0781 0a5b d800 | [ | .XXX[0x16]
0783 00f2 cd00 | |
0785 530c 6000 |S ` |
0787 0799 c402 | |
0789 98a0 0000 | |
078b 47ec c014 |G |
078d c6e8 0002 | |
078f 4285 00a6 |B |
0791 4680 0012 |F |
0793 2d20 0000 |- |
0795 011d 8d00 | |
0797 0000 0000 | | .BLANK 0000[0x4]
079b 0002 9826 | &| .XXX[0x6]
079d 0000 0000 | |
079f 0002 9a10 | |
07a1 0000 0000 | | .BLANK 0000[0x4]
07a5 0002 a6f0 | | .XXX[0x2]
07a7 0000 0000 | | .BLANK 0000[0x6]
07ad 0002 a737 | 7| .XXX[0x6]
07af 0000 0000 | |
07b1 0002 a77e | ~|
07b3 0000 0000 | | .BLANK 0000[0x6]
07b9 0002 a7c5 | | .XXX[0x2]
07bb 0000 0000 | | .BLANK 0000[0x6]
07c1 0002 a853 | S| .XXX[0xc]
07c3 0002 a89a | |
07c5 0000 0000 | |
07c7 0003 6592 | e |
07c9 0000 0000 | |
07cb 0002 a8e1 | |
07cd 0000 0000 | | .BLANK 0000[0x6]
07d3 0002 a928 | (| .XXX[0x12]
07d5 0002 a96f | o|
07d7 0000 0000 | |
07d9 0002 a9b6 | |
07db 0002 aa44 | D|
07dd 0000 0000 | |
07df 0002 aa8b | |
07e1 0000 0000 | |
07e3 0002 aad2 | |
07e5 0000 0000 | | .BLANK 0000[0x4]
07e9 0002 ab19 | | .XXX[0x6]
07eb 0000 0000 | |
07ed 0002 aba7 | |
07ef 0000 0000 | | .BLANK 0000[0x4]
07f3 0002 ac7c | || .XXX[0x2]
07f5 0000 0000 | | .BLANK 0000[0x6]
07fb 0002 ad0a | | .XXX[0x5]
07fd 0000 0000 | |
07ff 0000 | |