|
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_0694fc
└─⟦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 0248 | H | .CONST 0x0248 ; 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 0073 | s | .CONST 0x0073 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0023 | # | .CONST 0x0023 ; Number of locals
000b INIT_0008:
000b 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078
000d 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080
000f 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090
0011 029a 00bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b8
0013 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
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 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8
0028 c221 | ! | Store 0x1,0x21
0029 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100
002b c222 | " | Store 0x1,0x22
002c 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118
002e c212 | | Store 0x1,0x12
002f 029a 012b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0128
0031 c213 | | Store 0x1,0x13
0032 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138
0034 c220 | | Store 0x1,0x20
0035 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
0037 c214 | | Store 0x1,0x14
0038 029a 015b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0158
003a c215 | | Store 0x1,0x15
003b 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168
003d c21a | | Store 0x1,0x1a
003e 029a 01c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c0
0040 c21b | | Store 0x1,0x1b
0041 029a 01cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c8
0043 c21f | | Store 0x1,0x1f
0044 029a 01d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d0
0046 c216 | | Store 0x1,0x16
0047 029a 01e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e0
0049 c217 | | Store 0x1,0x17
004a 00bf | | Action Accept_Activation
004b e001 | | Load 0x0,0x1
004c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004d 02c7 | | Declare_Variable Any
004e e001 | | Load 0x0,0x1
004f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0050 a223 | # | Store_Unchecked 0x1,0x23
0051 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0052 00c7 | | Action Elaborate_Subprogram
0053 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0054 00c7 | | Action Elaborate_Subprogram
0055 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0056 00c7 | | Action Elaborate_Subprogram
0057 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0058 00c7 | | Action Elaborate_Subprogram
0059 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
005a 00c7 | | Action Elaborate_Subprogram
005b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
005c 00c7 | | Action Elaborate_Subprogram
005d 1d16 | | Execute_Immediate Reference_Lex_1,0x16
005e 00c7 | | Action Elaborate_Subprogram
005f 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0060 00c7 | | Action Elaborate_Subprogram
0061 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0062 00c7 | | Action Elaborate_Subprogram
0063 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0064 00c7 | | Action Elaborate_Subprogram
0065 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0066 00c7 | | Action Elaborate_Subprogram
0067 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0068 00c7 | | Action Elaborate_Subprogram
0069 1d20 | | Execute_Immediate Reference_Lex_1,0x20
006a 00c7 | | Action Elaborate_Subprogram
006b 1d14 | | Execute_Immediate Reference_Lex_1,0x14
006c 00c7 | | Action Elaborate_Subprogram
006d 1d15 | | Execute_Immediate Reference_Lex_1,0x15
006e 00c7 | | Action Elaborate_Subprogram
006f 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0070 00c7 | | Action Elaborate_Subprogram
0071 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0072 00c7 | | Action Elaborate_Subprogram
0073 BODY_0008:
0073 00bc | | Action Signal_Activated
0074 00bb | | Action Signal_Completion
0075 0000 0000 | | .XXX[0x3]
0077 0000 | |
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00da | | Load_Top At_Offset_2
007c e002 | | Load 0x0,0x2
007d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
007e 4502 |E | Exit_Subprogram 0x2
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 e001 | | Load 0x0,0x1
0084 180e | | Execute Package,Field_Execute,Field_Number 0xe
0085 e002 | | Load 0x0,0x2
0086 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0087 e002 | | Load 0x0,0x2
0088 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0089 4501 |E | Exit_Subprogram 0x1
008a 0000 0000 | | .BLANK 0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 009a | | .CONST 0x009a ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0003 | | .CONST 0x0003 ; Number of locals
0093 INIT_0090:
0093 e003 | | Load 0x0,0x3
0094 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b
0095 02c7 | | Declare_Variable Any
0096 00d8 | | Load_Top At_Offset_0
0097 1c00 | | Execute_Immediate Run_Utility,0x0
0098 029f 01f3 | | Declare_Subprogram For_Call,INIT_01f0
009a BODY_0090:
009a 00d9 | | Load_Top At_Offset_1
009b 0120 | | Execute Any,Is_Value
009c 6803 |h | Jump_Zero 0xa0
009d e003 | | Load 0x0,0x3
009e 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b
009f 7801 |x | Jump 0xa1
00a0 00d9 | | Load_Top At_Offset_1
00a1 e003 | | Load 0x0,0x3
00a2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00a3 e003 | | Load 0x0,0x3
00a4 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
00a5 c402 | | Store 0x2,0x2
00a6 00cf | | Action Mark_Auxiliary
00a7 7806 |x | Jump 0xae
00a8 8403 | | Call 0x2,0x3
00a9 00da | | Load_Top At_Offset_2
00aa e003 | | Load 0x0,0x3
00ab 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00ac c402 | | Store 0x2,0x2
00ad 00c9 | | Action Pop_Auxiliary_Loop
00ae 00da | | Load_Top At_Offset_2
00af e003 | | Load 0x0,0x3
00b0 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
00b1 6ff6 |o | Jump_Zero 0xa8
00b2 00ce | | Action Pop_Auxiliary
00b3 4800 |H | Short_Literal 0x0
00b4 4401 |D | Exit_Subprogram With_Result,0x1
00b5 0000 0000 | | .XXX[0x3]
00b7 0000 | |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00d3 | | .CONST 0x00d3 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0002 | | .CONST 0x0002 ; Number of locals
00bb INIT_00b8:
00bb e001 | | Load 0x0,0x1
00bc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00bd e001 | | Load 0x0,0x1
00be 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00bf e001 | | Load 0x0,0x1
00c0 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c1 e001 | | Load 0x0,0x1
00c2 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
00c3 e001 | | Load 0x0,0x1
00c4 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c5 e001 | | Load 0x0,0x1
00c6 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
00c7 e001 | | Load 0x0,0x1
00c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c9 e001 | | Load 0x0,0x1
00ca 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00cb e001 | | Load 0x0,0x1
00cc 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
00cd 4801 |H | Short_Literal 0x1
00ce e001 | | Load 0x0,0x1
00cf 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00d0 e001 | | Load 0x0,0x1
00d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d2 011e | | Execute Any,Convert
00d3 BODY_00b8:
00d3 e001 | | Load 0x0,0x1
00d4 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d5 c223 | # | Store 0x1,0x23
00d6 00d8 | | Load_Top At_Offset_0
00d7 e001 | | Load 0x0,0x1
00d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00d9 4501 |E | Exit_Subprogram 0x1
00da 0000 0000 | | .BLANK 0000[0x6]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 e223 | # | Load 0x1,0x23
00e4 e001 | | Load 0x0,0x1
00e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00e6 4501 |E | Exit_Subprogram 0x1
00e7 0000 | | .XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 00f7 | | .CONST 0x00f7 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 4801 |H | Short_Literal 0x1
00ec 4806 |H | Short_Literal 0x6
00ed 00e9 | | Load_Encached String_Cache
00ee 0334 | 4 | Declare_Variable Array,With_Constraint
00ef 500c |P | Indirect_Literal Any,0xfc,{0x5443502f, 0x49502020}
00f0 e004 | | Load 0x0,0x4
00f1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00f2 e004 | | Load 0x0,0x4
00f3 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f4 e005 | | Load 0x0,0x5
00f5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00f6 00ca | | Action Exit_Nullary_Function
00f7 TRAP_00e8:
00f7 0007 | | Action Break_Optional
00f8 00ea | | Load_Encached Null_String_Cache
00f9 00ca | | Action Exit_Nullary_Function
00fa 0000 0000 | | .XXX[0x2]
00fc 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 010d | | .CONST 0x010d ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 4801 |H | Short_Literal 0x1
0104 4806 |H | Short_Literal 0x6
0105 00e9 | | Load_Encached String_Cache
0106 0334 | 4 | Declare_Variable Array,With_Constraint
0107 5008 |P | Indirect_Literal Any,0x110,{0x5443502f, 0x49502020}
0108 e004 | | Load 0x0,0x4
0109 1817 | | Execute Package,Field_Execute,Field_Number 0x17
010a e006 | | Load 0x0,0x6
010b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
010c 00ca | | Action Exit_Nullary_Function
010d TRAP_0100:
010d 0007 | | Action Break_Optional
010e 00ea | | Load_Encached Null_String_Cache
010f 00ca | | Action Exit_Nullary_Function
0110 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
0114 0000 0000 | | .BLANK 0000[0x4]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b | | .CONST 0x011b ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0001 | | .CONST 0x0001 ; Number of locals
011b BODY_0118:
011b INIT_0118:
011b e001 | | Load 0x0,0x1
011c 180e | | Execute Package,Field_Execute,Field_Number 0xe
011d 4800 |H | Short_Literal 0x0
011e e5ff | | Load 0x2,-0x1
011f e002 | | Load 0x0,0x2
0120 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0121 4502 |E | Exit_Subprogram 0x2
0122 0000 0000 | | .BLANK 0000[0x6]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0131 | 1 | .CONST 0x0131 ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0002 | | .CONST 0x0002 ; Number of locals
012b INIT_0128:
012b e001 | | Load 0x0,0x1
012c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012d 02c7 | | Declare_Variable Any
012e e001 | | Load 0x0,0x1
012f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0130 a402 | | Store_Unchecked 0x2,0x2
0131 BODY_0128:
0131 e001 | | Load 0x0,0x1
0132 180e | | Execute Package,Field_Execute,Field_Number 0xe
0133 4802 |H | Short_Literal 0x2
0134 e5ff | | Load 0x2,-0x1
0135 e002 | | Load 0x0,0x2
0136 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0137 4502 |E | Exit_Subprogram 0x2
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b e001 | | Load 0x0,0x1
013c 180e | | Execute Package,Field_Execute,Field_Number 0xe
013d 4801 |H | Short_Literal 0x1
013e e5ff | | Load 0x2,-0x1
013f e002 | | Load 0x0,0x2
0140 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0141 4502 |E | Exit_Subprogram 0x2
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b e001 | | Load 0x0,0x1
014c 180e | | Execute Package,Field_Execute,Field_Number 0xe
014d 4806 |H | Short_Literal 0x6
014e e5ff | | Load 0x2,-0x1
014f e002 | | Load 0x0,0x2
0150 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0151 4502 |E | Exit_Subprogram 0x2
0152 0000 0000 | | .BLANK 0000[0x6]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b e001 | | Load 0x0,0x1
015c 180e | | Execute Package,Field_Execute,Field_Number 0xe
015d 4807 |H | Short_Literal 0x7
015e e5ff | | Load 0x2,-0x1
015f e002 | | Load 0x0,0x2
0160 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0161 4502 |E | Exit_Subprogram 0x2
0162 0000 0000 | | .BLANK 0000[0x6]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0192 | | .CONST 0x0192 ; Address of begin
0169 01ba | | .CONST 0x01ba ; Address of exception handler
016a 0005 | | .CONST 0x0005 ; Number of locals
016b INIT_0168:
016b 4801 |H | Short_Literal 0x1
016c 00db | | Load_Top At_Offset_3
016d 01db | | Execute Vector,Length
016e 00d8 | | Load_Top At_Offset_0
016f 00e2 | | Load_Encached Integer_Cache
0170 0260 | ` | Execute Discrete,In_Type
0171 7001 |p | Jump_Nonzero 0x173
0172 0801 | | Execute_Immediate Raise,0x1
0173 00e9 | | Load_Encached String_Cache
0174 035b | [ | Declare_Type Array,Constrained
0175 0337 | 7 | Declare_Variable Array
0176 00db | | Load_Top At_Offset_3
0177 01dd | | Execute Vector,First
0178 e5ff | | Load 0x2,-0x1
0179 01d7 | | Execute Vector,Field_Read
017a e006 | | Load 0x0,0x6
017b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
017c e5ff | | Load 0x2,-0x1
017d 01dd | | Execute Vector,First
017e 0a01 | | Execute_Immediate Plus,0x1
017f 00d8 | | Load_Top At_Offset_0
0180 00e2 | | Load_Encached Integer_Cache
0181 0260 | ` | Execute Discrete,In_Type
0182 7001 |p | Jump_Nonzero 0x184
0183 0801 | | Execute_Immediate Raise,0x1
0184 e5ff | | Load 0x2,-0x1
0185 01dc | | Execute Vector,Last
0186 e5ff | | Load 0x2,-0x1
0187 01cf | | Execute Vector,Slice_Read
0188 e006 | | Load 0x0,0x6
0189 1815 | | Execute Package,Field_Execute,Field_Number 0x15
018a 01ca | | Execute Vector,Prepend
018b 00d9 | | Load_Top At_Offset_1
018c 01d4 | | Execute Vector,Structure_Write
018d 00e3 | | Load_Encached Natural_Cache
018e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
018f 00e2 | | Load_Encached Integer_Cache
0190 029f 020b | | Declare_Subprogram For_Call,INIT_0208
0192 BODY_0168:
0192 00cf | | Action Mark_Auxiliary
0193 00db | | Load_Top At_Offset_3
0194 e5ff | | Load 0x2,-0x1
0195 01db | | Execute Vector,Length
0196 00d8 | | Load_Top At_Offset_0
0197 00e2 | | Load_Encached Integer_Cache
0198 0260 | ` | Execute Discrete,In_Type
0199 7001 |p | Jump_Nonzero 0x19b
019a 0801 | | Execute_Immediate Raise,0x1
019b e402 | | Load 0x2,0x2
019c 01cf | | Execute Vector,Slice_Read
019d 8405 | | Call 0x2,0x5
019e 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
019f 00da | | Load_Top At_Offset_2
01a0 0a01 | | Execute_Immediate Plus,0x1
01a1 c403 | | Store 0x2,0x3
01a2 00da | | Load_Top At_Offset_2
01a3 0f00 | | Execute_Immediate Equal,0x0
01a4 e403 | | Load 0x2,0x3
01a5 e5ff | | Load 0x2,-0x1
01a6 01db | | Execute Vector,Length
01a7 027d | } | Execute Discrete,Greater
01a8 0278 | x | Execute Discrete,Or
01a9 6801 |h | Jump_Zero 0x1ab
01aa 780a |x | Jump 0x1b5
01ab 00db | | Load_Top At_Offset_3
01ac e402 | | Load 0x2,0x2
01ad 01d7 | | Execute Vector,Field_Read
01ae e006 | | Load 0x0,0x6
01af 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b0 e403 | | Load 0x2,0x3
01b1 e402 | | Load 0x2,0x2
01b2 01d6 | | Execute Vector,Field_Write
01b3 00c9 | | Action Pop_Auxiliary_Loop
01b4 7fde | | Jump 0x193
01b5 00ce | | Action Pop_Auxiliary
01b6 00db | | Load_Top At_Offset_3
01b7 00e9 | | Load_Encached String_Cache
01b8 01c6 | | Execute Vector,Convert_To_Formal
01b9 4401 |D | Exit_Subprogram With_Result,0x1
01ba TRAP_0168:
01ba 0007 | | Action Break_Optional
01bb e402 | | Load 0x2,0x2
01bc 00e9 | | Load_Encached String_Cache
01bd 01c6 | | Execute Vector,Convert_To_Formal
01be 4401 |D | Exit_Subprogram With_Result,0x1
01bf 0000 | | .XXX[0x1]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 00da | | Load_Top At_Offset_2
01c4 e006 | | Load 0x0,0x6
01c5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01c6 4401 |D | Exit_Subprogram With_Result,0x1
01c7 0000 | | .XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00da | | Load_Top At_Offset_2
01cc e006 | | Load 0x0,0x6
01cd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01ce 4401 |D | Exit_Subprogram With_Result,0x1
01cf 0000 | | .XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 01dd | | .CONST 0x01dd ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 8210 | | Call 0x1,0x10
01d4 0092 0226 | &| Action Push_String_Extended,0x226 ; "<PROFILE>"
01d6 0092 0227 | '| Action Push_String_Extended,0x227 ; "<DIRECTORIES>"
01d8 e5ff | | Load 0x2,-0x1
01d9 e007 | | Load 0x0,0x7
01da 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01db 8211 | | Call 0x1,0x11
01dc 4502 |E | Exit_Subprogram 0x2
01dd TRAP_01d0:
01dd 0007 | | Action Break_Optional
01de 4502 |E | Exit_Subprogram 0x2
01df 0000 | | .XXX[0x1]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 0092 0228 | (| Action Push_String_Extended,0x228 ; "!machine.temporary.discover_"
01e5 4800 |H | Short_Literal 0x0
01e6 4803 |H | Short_Literal 0x3
01e7 4804 |H | Short_Literal 0x4
01e8 e008 | | Load 0x0,0x8
01e9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01ea e008 | | Load 0x0,0x8
01eb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01ec 01cc | | Execute Vector,Catenate
01ed 00ca | | Action Exit_Nullary_Function
01ee 0000 0000 | | .XXX[0x2]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f8 | | .CONST 0x01f8 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0002 | | .CONST 0x0002 ; Number of locals
01f3 INIT_01f0:
01f3 e402 | | Load 0x2,0x2
01f4 e003 | | Load 0x0,0x3
01f5 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
01f6 e003 | | Load 0x0,0x3
01f7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01f8 BODY_01f0:
01f8 4801 |H | Short_Literal 0x1
01f9 00d9 | | Load_Top At_Offset_1
01fa e5ff | | Load 0x2,-0x1
01fb e006 | | Load 0x0,0x6
01fc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01fd 6803 |h | Jump_Zero 0x201
01fe 4801 |H | Short_Literal 0x1
01ff 00cb | | Action Pop_Block_With_Result
0200 4401 |D | Exit_Subprogram With_Result,0x1
0201 4501 |E | Exit_Subprogram 0x1
0202 0000 0000 | | .BLANK 0000[0x6]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 00cf | | Action Mark_Auxiliary
020c 00db | | Load_Top At_Offset_3
020d 01d9 | | Execute Vector,Reverse_Bounds
020e 0263 | c | Execute Discrete,Above_Bound
020f 7013 |p | Jump_Nonzero 0x223
0210 00d8 | | Load_Top At_Offset_0
0211 e7ff | | Load 0x3,-0x1
0212 01d7 | | Execute Vector,Field_Read
0213 0f5f | _ | Execute_Immediate Equal,0x5f
0214 00d9 | | Load_Top At_Offset_1
0215 e7ff | | Load 0x3,-0x1
0216 01d7 | | Execute Vector,Field_Read
0217 0f2e | . | Execute_Immediate Equal,0x2e
0218 0278 | x | Execute Discrete,Or
0219 00d9 | | Load_Top At_Offset_1
021a e7ff | | Load 0x3,-0x1
021b 01d7 | | Execute Vector,Field_Read
021c 0f21 | ! | Execute_Immediate Equal,0x21
021d 0278 | x | Execute Discrete,Or
021e 6802 |h | Jump_Zero 0x221
021f 00d8 | | Load_Top At_Offset_0
0220 4401 |D | Exit_Subprogram With_Result,0x1
0221 00c8 | | Action Pop_Auxiliary_Range
0222 3fed |? | Loop_Increasing 0x210
0223 00ce | | Action Pop_Auxiliary
0224 4800 |H | Short_Literal 0x0
0225 4401 |D | Exit_Subprogram With_Result,0x1
0226 ; --------------------------------------------------------------------------------------
0226 ; STRING TABLE
0226 ; --------------------------------------------------------------------------------------
0226 0008 | | .STRTAB 0x0008->0x022a ; "<PROFILE>"
0227 000f | | .STRTAB 0x000f->0x022e ; "<DIRECTORIES>"
0228 001a | | .STRTAB 0x001a->0x0235 ; "!machine.temporary.discover_"
0229 0034 | 4 | .STREND 0x0034->0x0243
022a 3c50 524f |<PRO| .STRTAB_STRINGS
0243 0000 0000 | | .BLANK 0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug Table
0248 ; --------------------------------------------------------------------------------------
0248 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0e3a,0x0000,0x0001,0x0000
024e bdd1 957d | }| .XXX[0xf3]
0250 55cd 95c9 |U |
0252 b985 b594 | |
0254 80f4 f881 | |
0256 4995 b5bd |I |
0258 d195 7d55 | }U|
025a cd95 c9b9 | |
025c 85b5 9481 | |
025e bd89 d185 | |
0260 a5b9 9590 | |
0262 81d5 cda5 | |
0264 b99c 8149 | I|
0266 c18d 7d05 | } |
0268 8d8d 95cd | |
026a cd7d 55d1 | }U |
026c a5b1 a5d1 | |
026e a595 cd49 | I|
0270 95b5 bdd1 | |
0272 957d 55cd | }U |
0274 95c9 b985 | |
0276 b594 81a5 | |
0278 cc81 85cd | |
027a cdd5 b595 | |
027c 9081 d1bc | |
027e 8189 9481 | |
0280 d1a1 9481 | |
0282 cd85 b594 | |
0284 8185 cc81 | |
0286 31bd 8d85 |1 |
0288 b17d 55cd | }U |
028a 95c9 b985 | |
028c b595 19d1 | |
028e c0b9 4185 | A |
0290 cdcd ddbd | |
0292 c991 4995 | I |
0294 b5bd d195 | |
0296 7d41 85cd |}A |
0298 cddd bdc9 | |
029a 9081 bd89 | |
029c d185 a5b9 | |
029e 9590 8199 | |
02a0 c9bd b481 | |
02a2 d1a1 9481 | |
02a4 b1a5 89c9 | |
02a6 85c9 e481 | |
02a8 cddd a5d1 | |
02aa 8da0 8119 | |
02ac d1c0 b941 | A|
02ae 85cd cddd | |
02b0 bdc9 9149 | I|
02b2 95b5 bdd1 | |
02b4 957d 4185 | }A |
02b6 cdcd ddbd | |
02b8 c990 80f4 | |
02ba f881 4995 | I |
02bc b5bd d195 | |
02be 7d41 85cd |}A |
02c0 cddd bdc9 | |
02c2 9081 bd89 | |
02c4 d185 a5b9 | |
02c6 9590 81d5 | |
02c8 cda5 b99c | |
02ca 8149 c18d | I |
02cc 7d05 8d8d |} |
02ce 95cd cd7d | }|
02d0 55d1 a5b1 |U |
02d2 a5d1 a595 | |
02d4 cd19 d1c0 | |
02d6 b949 95b5 | I |
02d8 bdd1 957d | }|
02da 11a5 c995 | |
02dc 8dd1 bdc9 | |
02de e549 95b5 | I |
02e0 bdd1 957d | }|
02e2 11a5 c995 | |
02e4 8dd1 bdc9 | |
02e6 e481 bd89 | |
02e8 d185 a5b9 | |
02ea 9590 8199 | |
02ec c9bd b481 | |
02ee d1a1 9481 | |
02f0 b1a5 89c9 | |
02f2 85c9 e481 | |
02f4 cddd a5d1 | |
02f6 8da0 8119 | |
02f8 d1c0 b949 | I|
02fa 95b5 bdd1 | |
02fc 957d 11a5 | } |
02fe c995 8dd1 | |
0300 bdc9 e549 | I|
0302 95b5 bdd1 | |
0304 957d 11a5 | } |
0306 c995 8dd1 | |
0308 bdc9 e480 | |
030a f4f8 814d | M|
030c 95cd cda5 | |
030e bdb9 7d19 | } |
0310 d1c0 b949 | I|
0312 95b5 bdd1 | |
0314 957d 11a5 | } |
0316 c995 8dd1 | |
0318 bdc9 e549 | I|
031a 95b5 bdd1 | |
031c 957d 11a5 | } |
031e c995 8dd1 | |
0320 bdc9 e481 | |
0322 bd89 d185 | |
0324 a5b9 9590 | |
0326 8199 c9bd | |
0328 b481 d1a1 | |
032a 9481 cd95 | |
032c cdcd a5bd | |
032e b881 cddd | |
0330 a5d1 8da0 | |
0332 814d 95cd | M |
0334 cda5 bdb9 | |
0336 7d19 d1c0 |} |
0338 b949 95b5 | I |
033a bdd1 957d | }|
033c 11a5 c995 | |
033e 8dd1 bdc9 | |
0340 e400 | |
0341 0000 0000 | | .BLANK 0000[0x5]
0346 1000 3779 | 7y| .XXX[0x1c]
0348 3400 0000 |4 |
034a 0400 0000 | |
034c 0000 14c4 | |
034e d0d9 1504 | |
0350 0000 0018 | |
0352 c8cc c4e4 | |
0354 c0cc 0000 | |
0356 02b0 003d | =|
0358 6000 0000 |` |
035a 0140 0400 | @ |
035c 02ec 0002 | |
035e 0000 0098 | |
0360 0010 004c | L|
0362 0310 0310 | | .BLANK 0310[0x6]
0368 0313 8004 | | .XXX[0x21]
036a 6c34 04a7 |l4 |
036c 0844 0a68 | D h|
036e 00af 0848 | H|
0370 0a68 00ef | h |
0372 084c 0a68 | L h|
0374 010f 0840 | @|
0376 02fc 7448 | tH|
0378 031c 744c | tL|
037a 031c 7440 | t@|
037c 031c 02f0 | |
037e 02ec 00ac | |
0380 0010 0005 | |
0382 2028 036c | ( l|
0384 072f 97fb | / |
0386 8004 60ad | ` |
0388 1408 | |
0389 0000 0000 | | .BLANK 0000[0x6]
038f 00ec 0010 | | .XXX[0x14]
0391 0004 036b | k|
0393 97fb 8004 | |
0395 60ad 1408 |` |
0397 010c 0010 | |
0399 0004 036b | k|
039b 8004 6095 | ` |
039d a010 036b | k|
039f 8004 6067 | `g|
03a1 17fd 1404 | |
03a3 0000 0000 | | .BLANK 0000[0x4]
03a7 0010 0036 | 6| .XXX[0x34]
03a9 4700 0000 |G |
03ab 0004 0000 | |
03ad 0000 0014 | |
03af c4d0 d915 | |
03b1 0800 0000 | |
03b3 18c8 cce4 | |
03b5 c4c0 cc00 | |
03b7 0003 7000 | p |
03b9 3d60 0000 |=` |
03bb 0001 a004 | |
03bd 0002 ec00 | |
03bf 0200 0000 | |
03c1 8000 1000 | |
03c3 4380 046c |C l|
03c5 6b80 046c |k l|
03c7 340a 7c01 |4 | |
03c9 4d20 080c |M |
03cb b80a 6800 | h |
03cd ac0a 6800 | h |
03cf ec0a 6801 | h |
03d1 2c02 fc74 |, t|
03d3 3803 1c74 |8 t|
03d5 3c03 1c74 |< t|
03d7 4003 1c02 |@ |
03d9 f002 ec00 | |
03db 0000 0000 | | .BLANK 0000[0x6]
03e1 ac00 1000 | | .XXX[0xb]
03e3 0403 6cf0 | l |
03e5 0797 f8f0 | |
03e7 0397 ff80 | |
03e9 0860 4d14 | `M |
03eb 0800 | |
03ec 0000 0000 | | .BLANK 0000[0x5]
03f1 ec00 1000 | | .XXX[0xb]
03f3 0403 6cf0 | l |
03f5 0797 f8f0 | |
03f7 0397 ff80 | |
03f9 0860 4d14 | `M |
03fb 0800 | |
03fc 0000 0000 | | .BLANK 0000[0x4]