|
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_11cacfe
└─⟦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 0228 | ( | .CONST 0x0228 ; 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 006c | l | .CONST 0x006c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated
000d 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
000f 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
0011 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
0013 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
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 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
0026 c21e | | Store 0x1,0x1e
0027 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated
0029 c212 | | Store 0x1,0x12
002a 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
002c c213 | | Store 0x1,0x13
002d 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
002f c220 | | Store 0x1,0x20
0030 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
0032 c214 | | Store 0x1,0x14
0033 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
0035 c215 | | Store 0x1,0x15
0036 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0038 c21a | | Store 0x1,0x1a
0039 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
003b c21b | | Store 0x1,0x1b
003c 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
003e c21f | | Store 0x1,0x1f
003f 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
0041 c216 | | Store 0x1,0x16
0042 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
0044 c217 | | Store 0x1,0x17
0045 00bf | | Action Accept_Activation
0046 e001 | | Load 0x0,0x1
0047 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0048 02c7 | | Declare_Variable Any
0049 e001 | | Load 0x0,0x1
004a 180e | | Execute Package,Field_Execute,Field_Number 0xe
004b a221 | ! | Store_Unchecked 0x1,0x21
004c 1d0d | | Execute_Immediate Reference_Lex_1,0xd
004d 00c7 | | Action Elaborate_Subprogram
004e 1d0e | | Execute_Immediate Reference_Lex_1,0xe
004f 00c7 | | Action Elaborate_Subprogram
0050 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0051 00c7 | | Action Elaborate_Subprogram
0052 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0053 00c7 | | Action Elaborate_Subprogram
0054 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0055 00c7 | | Action Elaborate_Subprogram
0056 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0057 00c7 | | Action Elaborate_Subprogram
0058 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0059 00c7 | | Action Elaborate_Subprogram
005a 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
005b 00c7 | | Action Elaborate_Subprogram
005c 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
005d 00c7 | | Action Elaborate_Subprogram
005e 1d12 | | Execute_Immediate Reference_Lex_1,0x12
005f 00c7 | | Action Elaborate_Subprogram
0060 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0061 00c7 | | Action Elaborate_Subprogram
0062 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0063 00c7 | | Action Elaborate_Subprogram
0064 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0065 00c7 | | Action Elaborate_Subprogram
0066 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0067 00c7 | | Action Elaborate_Subprogram
0068 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0069 00c7 | | Action Elaborate_Subprogram
006a 1d11 | | Execute_Immediate Reference_Lex_1,0x11
006b 00c7 | | Action Elaborate_Subprogram
006c BODY_0008:
006c 00bc | | Action Signal_Activated
006d 00bb | | Action Signal_Completion
006e 0000 0000 | | .XXX[0x2]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 00da | | Load_Top At_Offset_2
0074 e002 | | Load 0x0,0x2
0075 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0076 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0077 0000 | | .XXX[0x1]
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 e001 | | Load 0x0,0x1
007c 180e | | Execute Package,Field_Execute,Field_Number 0xe
007d e002 | | Load 0x0,0x2
007e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
007f e002 | | Load 0x0,0x2
0080 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0081 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0092 | | .CONST 0x0092 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0003 | | .CONST 0x0003 ; Number of locals
008b INIT_0088:
008b e003 | | Load 0x0,0x3
008c 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b
008d 02c7 | | Declare_Variable Any
008e 00d8 | | Load_Top At_Offset_0
008f 1c00 | | Execute_Immediate Run_Utility,0x0
0090 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call
0092 BODY_0088:
0092 00d9 | | Load_Top At_Offset_1
0093 0120 | | Execute Any,Is_Value
0094 6803 |h | Jump_Zero 0x98
0095 e003 | | Load 0x0,0x3
0096 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b
0097 7801 |x | Jump 0x99
0098 00d9 | | Load_Top At_Offset_1
0099 e003 | | Load 0x0,0x3
009a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
009b e003 | | Load 0x0,0x3
009c 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
009d c402 | | Store 0x2,0x2
009e 00cf | | Action Mark_Auxiliary
009f 7806 |x | Jump 0xa6
00a0 8403 | | Call 0x2,0x3
00a1 00da | | Load_Top At_Offset_2
00a2 e003 | | Load 0x0,0x3
00a3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00a4 c402 | | Store 0x2,0x2
00a5 00c9 | | Action Pop_Auxiliary_Loop
00a6 00da | | Load_Top At_Offset_2
00a7 e003 | | Load 0x0,0x3
00a8 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
00a9 6ff6 |o | Jump_Zero 0xa0
00aa 00ce | | Action Pop_Auxiliary
00ab 4800 |H | Short_Literal 0x0
00ac 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00ad 0000 0000 | | .XXX[0x3]
00af 0000 | |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00cb | | .CONST 0x00cb ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0002 | | .CONST 0x0002 ; Number of locals
00b3 INIT_00b0:
00b3 e001 | | Load 0x0,0x1
00b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b5 e001 | | Load 0x0,0x1
00b6 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00b7 e001 | | Load 0x0,0x1
00b8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b9 e001 | | Load 0x0,0x1
00ba 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
00bb e001 | | Load 0x0,0x1
00bc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00bd e001 | | Load 0x0,0x1
00be 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
00bf e001 | | Load 0x0,0x1
00c0 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c1 e001 | | Load 0x0,0x1
00c2 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00c3 e001 | | Load 0x0,0x1
00c4 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
00c5 4801 |H | Short_Literal 0x1
00c6 e001 | | Load 0x0,0x1
00c7 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00c8 e001 | | Load 0x0,0x1
00c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ca 011e | | Execute Any,Convert
00cb BODY_00b0:
00cb e001 | | Load 0x0,0x1
00cc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00cd c221 | ! | Store 0x1,0x21
00ce 00d8 | | Load_Top At_Offset_0
00cf e001 | | Load 0x0,0x1
00d0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00d1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00d2 0000 0000 | | .BLANK 0000[0x6]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db e221 | ! | Load 0x1,0x21
00dc e001 | | Load 0x0,0x1
00dd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00de 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 00ed | | .CONST 0x00ed ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 4801 |H | Short_Literal 0x1
00e4 4806 |H | Short_Literal 0x6
00e5 00e9 | | Load_Encached String_Cache
00e6 0334 | 4 | Declare_Variable Array,With_Constraint
00e7 5008 |P | Indirect_Literal Any,0xf0,{0x5443502f, 0x49502020}
00e8 e004 | | Load 0x0,0x4
00e9 180f | | Execute Package,Field_Execute,Field_Number 0xf
00ea e005 | | Load 0x0,0x5
00eb 180f | | Execute Package,Field_Execute,Field_Number 0xf
00ec 00ca | | Action Exit_Nullary_Function
00ed TRAP_00e0:
00ed 0007 | | Action Break_Optional
00ee 00ea | | Load_Encached Null_String_Cache
00ef 00ca | | Action Exit_Nullary_Function
00f0 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
00f4 0000 0000 | | .BLANK 0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb e001 | | Load 0x0,0x1
00fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00fd 4800 |H | Short_Literal 0x0
00fe e5ff | | Load 0x2,-0x1
00ff e002 | | Load 0x0,0x2
0100 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0101 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0102 0000 0000 | | .BLANK 0000[0x6]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0111 | | .CONST 0x0111 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0002 | | .CONST 0x0002 ; Number of locals
010b INIT_0108:
010b e001 | | Load 0x0,0x1
010c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010d 02c7 | | Declare_Variable Any
010e e001 | | Load 0x0,0x1
010f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0110 a402 | | Store_Unchecked 0x2,0x2
0111 BODY_0108:
0111 e001 | | Load 0x0,0x1
0112 180e | | Execute Package,Field_Execute,Field_Number 0xe
0113 4802 |H | Short_Literal 0x2
0114 e5ff | | Load 0x2,-0x1
0115 e002 | | Load 0x0,0x2
0116 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0117 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 4801 |H | Short_Literal 0x1
011e e5ff | | Load 0x2,-0x1
011f e002 | | Load 0x0,0x2
0120 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0121 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0122 0000 0000 | | .BLANK 0000[0x6]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b e001 | | Load 0x0,0x1
012c 180e | | Execute Package,Field_Execute,Field_Number 0xe
012d 4806 |H | Short_Literal 0x6
012e e5ff | | Load 0x2,-0x1
012f e002 | | Load 0x0,0x2
0130 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0131 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0132 0000 0000 | | .BLANK 0000[0x6]
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 4807 |H | Short_Literal 0x7
013e e5ff | | Load 0x2,-0x1
013f e002 | | Load 0x0,0x2
0140 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0141 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0172 | r | .CONST 0x0172 ; Address of begin
0149 019a | | .CONST 0x019a ; Address of exception handler
014a 0005 | | .CONST 0x0005 ; Number of locals
014b INIT_0148:
014b 4801 |H | Short_Literal 0x1
014c 00db | | Load_Top At_Offset_3
014d 01db | | Execute Vector,Length
014e 00d8 | | Load_Top At_Offset_0
014f 00e2 | | Load_Encached Integer_Cache
0150 0260 | ` | Execute Discrete,In_Type
0151 7001 |p | Jump_Nonzero 0x153
0152 0801 | | Execute_Immediate Raise,0x1
0153 00e9 | | Load_Encached String_Cache
0154 035b | [ | Declare_Type Array,Constrained
0155 0337 | 7 | Declare_Variable Array
0156 00db | | Load_Top At_Offset_3
0157 01dd | | Execute Vector,First
0158 e5ff | | Load 0x2,-0x1
0159 01d7 | | Execute Vector,Field_Read
015a e006 | | Load 0x0,0x6
015b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
015c e5ff | | Load 0x2,-0x1
015d 01dd | | Execute Vector,First
015e 0a01 | | Execute_Immediate Plus,0x1
015f 00d8 | | Load_Top At_Offset_0
0160 00e2 | | Load_Encached Integer_Cache
0161 0260 | ` | Execute Discrete,In_Type
0162 7001 |p | Jump_Nonzero 0x164
0163 0801 | | Execute_Immediate Raise,0x1
0164 e5ff | | Load 0x2,-0x1
0165 01dc | | Execute Vector,Last
0166 e5ff | | Load 0x2,-0x1
0167 01cf | | Execute Vector,Slice_Read
0168 e006 | | Load 0x0,0x6
0169 1815 | | Execute Package,Field_Execute,Field_Number 0x15
016a 01ca | | Execute Vector,Prepend
016b 00d9 | | Load_Top At_Offset_1
016c 01d4 | | Execute Vector,Structure_Write
016d 00e3 | | Load_Encached Natural_Cache
016e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
016f 00e2 | | Load_Encached Integer_Cache
0170 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call
0172 BODY_0148:
0172 00cf | | Action Mark_Auxiliary
0173 00db | | Load_Top At_Offset_3
0174 e5ff | | Load 0x2,-0x1
0175 01db | | Execute Vector,Length
0176 00d8 | | Load_Top At_Offset_0
0177 00e2 | | Load_Encached Integer_Cache
0178 0260 | ` | Execute Discrete,In_Type
0179 7001 |p | Jump_Nonzero 0x17b
017a 0801 | | Execute_Immediate Raise,0x1
017b e402 | | Load 0x2,0x2
017c 01cf | | Execute Vector,Slice_Read
017d 8405 | | Call 0x2,0x5
017e 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
017f 00da | | Load_Top At_Offset_2
0180 0a01 | | Execute_Immediate Plus,0x1
0181 c403 | | Store 0x2,0x3
0182 00da | | Load_Top At_Offset_2
0183 0f00 | | Execute_Immediate Equal,0x0
0184 e403 | | Load 0x2,0x3
0185 e5ff | | Load 0x2,-0x1
0186 01db | | Execute Vector,Length
0187 027d | } | Execute Discrete,Greater
0188 0278 | x | Execute Discrete,Or
0189 6801 |h | Jump_Zero 0x18b
018a 780a |x | Jump 0x195
018b 00db | | Load_Top At_Offset_3
018c e402 | | Load 0x2,0x2
018d 01d7 | | Execute Vector,Field_Read
018e e006 | | Load 0x0,0x6
018f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0190 e403 | | Load 0x2,0x3
0191 e402 | | Load 0x2,0x2
0192 01d6 | | Execute Vector,Field_Write
0193 00c9 | | Action Pop_Auxiliary_Loop
0194 7fde | | Jump 0x173
0195 00ce | | Action Pop_Auxiliary
0196 00db | | Load_Top At_Offset_3
0197 00e9 | | Load_Encached String_Cache
0198 01c6 | | Execute Vector,Convert_To_Formal
0199 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
019a TRAP_0148:
019a 0007 | | Action Break_Optional
019b e402 | | Load 0x2,0x2
019c 00e9 | | Load_Encached String_Cache
019d 01c6 | | Execute Vector,Convert_To_Formal
019e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
019f 0000 | | .XXX[0x1]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 00da | | Load_Top At_Offset_2
01a4 e006 | | Load 0x0,0x6
01a5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01a7 0000 | | .XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 00da | | Load_Top At_Offset_2
01ac e006 | | Load 0x0,0x6
01ad 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01af 0000 | | .XXX[0x1]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 01bd | | .CONST 0x01bd ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 8210 | | Call 0x1,0x10
01b4 0092 0206 | | Action Push_String_Extended,0x206 ; "<PROFILE>"
01b6 0092 0207 | | Action Push_String_Extended,0x207 ; "<DIRECTORIES>"
01b8 e5ff | | Load 0x2,-0x1
01b9 e007 | | Load 0x0,0x7
01ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01bb 8211 | | Call 0x1,0x11
01bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01bd TRAP_01b0:
01bd 0007 | | Action Break_Optional
01be 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 0092 0208 | | Action Push_String_Extended,0x208 ; "!machine.temporary.discover_"
01c5 4800 |H | Short_Literal 0x0
01c6 4803 |H | Short_Literal 0x3
01c7 4804 |H | Short_Literal 0x4
01c8 e008 | | Load 0x0,0x8
01c9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01ca e008 | | Load 0x0,0x8
01cb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01cc 01cc | | Execute Vector,Catenate
01cd 00ca | | Action Exit_Nullary_Function
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d8 | | .CONST 0x01d8 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0002 | | .CONST 0x0002 ; Number of locals
01d3 INIT_01d0:
01d3 e402 | | Load 0x2,0x2
01d4 e003 | | Load 0x0,0x3
01d5 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
01d6 e003 | | Load 0x0,0x3
01d7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d8 BODY_01d0:
01d8 4801 |H | Short_Literal 0x1
01d9 00d9 | | Load_Top At_Offset_1
01da e5ff | | Load 0x2,-0x1
01db e006 | | Load 0x0,0x6
01dc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01dd 6803 |h | Jump_Zero 0x1e1
01de 4801 |H | Short_Literal 0x1
01df 00cb | | Action Pop_Block_With_Result
01e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01e2 0000 0000 | | .BLANK 0000[0x6]
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 00cf | | Action Mark_Auxiliary
01ec 00db | | Load_Top At_Offset_3
01ed 01d9 | | Execute Vector,Reverse_Bounds
01ee 0263 | c | Execute Discrete,Above_Bound
01ef 7013 |p | Jump_Nonzero 0x203
01f0 00d8 | | Load_Top At_Offset_0
01f1 e7ff | | Load 0x3,-0x1
01f2 01d7 | | Execute Vector,Field_Read
01f3 0f5f | _ | Execute_Immediate Equal,0x5f
01f4 00d9 | | Load_Top At_Offset_1
01f5 e7ff | | Load 0x3,-0x1
01f6 01d7 | | Execute Vector,Field_Read
01f7 0f2e | . | Execute_Immediate Equal,0x2e
01f8 0278 | x | Execute Discrete,Or
01f9 00d9 | | Load_Top At_Offset_1
01fa e7ff | | Load 0x3,-0x1
01fb 01d7 | | Execute Vector,Field_Read
01fc 0f21 | ! | Execute_Immediate Equal,0x21
01fd 0278 | x | Execute Discrete,Or
01fe 6802 |h | Jump_Zero 0x201
01ff 00d8 | | Load_Top At_Offset_0
0200 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0201 00c8 | | Action Pop_Auxiliary_Range
0202 3fed |? | Loop_Increasing 0x1f0
0203 00ce | | Action Pop_Auxiliary
0204 4800 |H | Short_Literal 0x0
0205 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0206 ; --------------------------------------------------------------------------------------
0206 ; STRING TABLE
0206 ; --------------------------------------------------------------------------------------
0206 0008 | | .STRTAB 0x0008->0x020a ; "<PROFILE>"
0207 000f | | .STRTAB 0x000f->0x020e ; "<DIRECTORIES>"
0208 001a | | .STRTAB 0x001a->0x0215 ; "!machine.temporary.discover_"
0209 0034 | 4 | .STREND 0x0034->0x0223
020a 3c50 524f |<PRO| .STRTAB_STRINGS
0223 0000 0000 | | .BLANK 0000[0x5]
0228 ; --------------------------------------------------------------------------------------
0228 ; Debug Table
0228 ; --------------------------------------------------------------------------------------
0228 0004 0011 | | .DEBUG4 0x0004,0x0011,0x8a06,0x0000,0x0001,0x0000
022e 2ee0 1800 |. | .XXX[0x1d2]
0230 5690 1a00 |V |
0232 5759 5c00 |WY\ |
0234 02d8 9880 | |
0236 0ad8 1500 | |
0238 6f49 5b00 |oI[ |
023a 0064 0025 | d %|
023c ee4c a980 | L |
023e 0758 d600 | X |
0240 2760 0c86 |'` |
0242 b278 1eff | x |
0244 e260 0c00 | ` |
0246 4e80 0c85 |N |
0248 4340 1000 |C@ |
024a 0380 1080 | |
024c 1340 8f80 | @ |
024e 0380 8f80 | |
0250 1359 5b00 | Y[ |
0252 0360 0c85 | ` |
0254 a25c ab80 | \ |
0256 0658 1600 | X |
0258 2ed0 8b00 |. |
025a 3240 4000 |2@@ |
025c 6900 100b |i |
025e 6648 4000 |fH@ |
0260 6748 1eff |gH |
0262 e2e0 1c80 | |
0264 0a48 0900 | H |
0266 2348 9eff |#H |
0268 e248 4000 | H@ |
026a 6500 100e |e |
026c 0240 4000 | @@ |
026e 6b40 9eff |k@ |
0270 b250 4080 | P@ |
0272 0b50 9eff | P |
0274 c3d9 5b00 | [ |
0276 0240 1eff | @ |
0278 e2dc bb80 | |
027a 06d8 1600 | |
027c 6fd8 9eff |o |
027e d100 003e | >|
0280 7e48 1eff |~H |
0282 b202 9c00 | |
0284 4ae8 1d80 |J |
0286 042a ffff | * |
0288 5ac0 1880 |Z |
028a 0a8c b180 | |
028c 0aec bd80 | |
028e 06e8 9d80 | |
0290 0a6c b180 | l |
0292 0a88 9100 | |
0294 36e0 1500 |6 |
0296 7749 5c00 |wI\ |
0298 026c ad80 | l |
029a 0e88 1100 | |
029c 366c ad80 |6l |
029e 06e8 1100 | |
02a0 364c a980 |6L |
02a2 0658 40ff | X@ |
02a4 ff58 d600 | X |
02a6 248c 0025 |$ %|
02a8 ef80 1186 | |
02aa b240 1eff | @ |
02ac e280 1000 | |
02ae 7648 1085 |vH |
02b0 4350 0900 |CP |
02b2 0348 0980 | H |
02b4 1350 8880 | P |
02b6 0348 8880 | H |
02b8 1369 5c00 | i\ |
02ba 0380 1085 | |
02bc a360 1eff | ` |
02be e26c ad80 | l |
02c0 0668 1600 | h |
02c2 3668 8d00 |6h |
02c4 4250 4000 |BP@ |
02c6 367c ed80 |6| |
02c8 367c cf80 |6| |
02ca 4a5c ea80 |J\ |
02cc 365c cb80 |6\ |
02ce 4a78 0f00 |Jx |
02d0 3650 0b00 |6P |
02d2 2a7c ef80 |*| |
02d4 3a7c af80 |:| |
02d6 3a54 ea80 |:T |
02d8 3a80 4080 |: @ |
02da 0b80 9eff | |
02dc c260 0c00 | ` |
02de 2a68 8d00 |*h |
02e0 3f68 9eff |?h |
02e2 b360 9eff | ` |
02e4 e3e1 5c00 | \ |
02e6 0240 1eff | @ |
02e8 e2e4 bc80 | |
02ea 06b0 1600 | |
02ec 73b0 9eff |s |
02ee d100 003d | =|
02f0 9e48 1eff | H |
02f2 b1ff fe04 | |
02f4 f640 4000 | @@ |
02f6 5740 1186 |W@ |
02f8 b248 4080 | H@ |
02fa 0a40 0800 | @ |
02fc 75ff fe7f |u |
02fe 5e40 0885 |^@ |
0300 c340 1186 | @ |
0302 b248 4080 | H@ |
0304 0e40 0800 | @ |
0306 75ff fe7f |u |
0308 4a40 0885 |J@ |
030a c359 5482 | YT |
030c f260 1780 | ` |
030e 0658 0b80 | X |
0310 0758 d482 | X |
0312 f360 d482 | ` |
0314 fbe0 1186 | |
0316 b280 1eff | |
0318 e2e0 1c00 | |
031a 7640 1c85 |v@ |
031c 0350 0800 | P |
031e 0340 0880 | @ |
0320 1350 9080 | P |
0322 0340 9080 | @ |
0324 13d8 1c85 | |
0326 8348 1eff | H |
0328 e250 1b82 | P |
032a fa50 8a00 | P |
032c 6e80 4000 |n @ |
032e 2a44 f080 |*D |
0330 3644 c880 |6D |
0332 4a5c ea80 |J\ |
0334 365c cb80 |6\ |
0336 4a80 0800 |J |
0338 4258 0b00 |BX |
033a 2a5c eb80 |*\ |
033c 3a84 f080 |: |
033e 3a48 0900 |:H |
0340 425c ab80 |B\ |
0342 3b48 9eff |;H |
0344 e250 8a00 | P |
0346 2e60 4080 |.`@ |
0348 0b60 9eff | ` |
034a c350 9eff | P |
034c b3e0 1c85 | |
034e 8248 1eff | H |
0350 b2e0 1c82 | |
0352 fbe0 9eff | |
0354 d100 003c | <|
0356 d240 1eff | @ |
0358 e3e0 1186 | |
035a b248 1eff | H |
035c e2e0 1c00 | |
035e 7650 1c85 |vP |
0360 0368 0a00 | h |
0362 0350 0a80 | P |
0364 1368 8980 | h |
0366 0350 8980 | P |
0368 13d8 1c85 | |
036a 8358 1eff | X |
036c e260 1b82 | ` |
036e f260 8c00 | ` |
0370 6e48 4000 |nH@ |
0372 3254 e980 |2T |
0374 366c ec80 |6l |
0376 366c cd80 |6l |
0378 4a54 ca80 |JT |
037a 4a48 0a00 |JH |
037c 2668 0d00 |&h |
037e 326c ed80 |2l |
0380 3a4c e980 |:L |
0382 3a58 0b00 |:X |
0384 266c ad80 |&l |
0386 3a60 8c00 |:` |
0388 3678 4080 |6x@ |
038a 0b60 9eff | ` |
038c b358 9eff | X |
038e e378 9eff | x |
0390 c3e0 1c85 | |
0392 8248 1eff | H |
0394 b2e0 1c82 | |
0396 f3e0 9eff | |
0398 d100 003c | <|
039a 4a40 1eff |J@ |
039c e388 1186 | |
039e b248 4080 | H@ |
03a0 0288 1100 | |
03a2 75ff fe7e |u ~|
03a4 1240 1185 | @ |
03a6 c2e8 4000 | @ |
03a8 5e07 1f80 |^ |
03aa 2247 a000 |"G |
03ac 7677 8efe |vw |
03ae 2244 b880 |"D |
03b0 0a4c a880 | L |
03b2 0a40 8800 | @ |
03b4 2660 4000 |&`@ |
03b6 666c ec80 |fl |
03b8 2e4c a980 |.L |
03ba 0e80 4000 | @ |
03bc 668c f080 |f |
03be 2e40 0800 |.@ |
03c0 266c cd80 |&l |
03c2 5268 0d00 |Rh |
03c4 324c a980 |2L |
03c6 068c d180 | |
03c8 5054 0025 |PT %|
03ca ef50 0a86 | P |
03cc b280 1100 | |
03ce 4240 0800 |B@ |
03d0 266c ed80 |&l |
03d2 0000 0040 | @|
03d4 0002 7dc0 | } |
03d6 01d8 4d11 | M |
03d8 150d 3105 | 1 |
03da 4905 5125 |I Q%|
03dc 3d39 7d39 |=9}9|
03de 5535 0915 |U5 |
03e0 494c 00a0 |IL |
03e2 1119 2531 | %1|
03e4 1400 0431 | 1|
03e6 0511 057d | }|
03e8 1125 4d0d | %M |
03ea 3d59 1548 |=Y H|
03ec 0074 2d05 | t- |
03ee 1105 7d25 | }%|
03f0 394d 251d |9M% |
03f2 2150 00b8 |!P |
03f4 4105 1105 |A |
03f6 7d25 394d |}%9M|
03f8 251d 2151 |% !Q|
03fa 7d35 0525 |}5 %|
03fc 3ae0 1c80 |: |
03fe 0602 4000 | @ |