|
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_1060f5
└─⟦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 INIT_0078,For_Outer_Call,Visible,Unelaborated
000d 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
000f 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated
0011 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
0013 029a 00e3 | | Declare_Subprogram INIT_00e0,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 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0028 c221 | ! | Store 0x1,0x21
0029 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
002b c222 | " | Store 0x1,0x22
002c 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
002e c212 | | Store 0x1,0x12
002f 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
0031 c213 | | Store 0x1,0x13
0032 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
0034 c220 | | Store 0x1,0x20
0035 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0037 c214 | | Store 0x1,0x14
0038 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
003a c215 | | Store 0x1,0x15
003b 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
003d c21a | | Store 0x1,0x1a
003e 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
0040 c21b | | Store 0x1,0x1b
0041 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
0043 c21f | | Store 0x1,0x1f
0044 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0046 c216 | | Store 0x1,0x16
0047 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_01f0,For_Call
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_Value,New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_0208,For_Call
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_Uncheched 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Suprogram New_Top_Offset 0x2
01dd TRAP_01d0:
01dd 0007 | | Action Break_Optional
01de 4502 |E | Exit_Suprogram New_Top_Offset 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_Value,New_Top_Offset 0x1
0201 4501 |E | Exit_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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 664c e880 |fL | .XXX[0x1b2]
0250 127c ed80 | | |
0252 127c cf80 | | |
0254 6e4c c980 |nL |
0256 6e40 0900 |n@ |
0258 2278 0f00 |"x |
025a 367c ef80 |6| |
025c 1644 e880 | D |
025e 1644 a880 | D |
0260 0a7c af80 | | |
0262 1658 1881 | X |
0264 8258 0b00 | X |
0266 2390 0b00 |# |
0268 0268 8d00 | h |
026a 3e80 4080 |> @ |
026c 0684 b000 | |
026e 3690 5200 |6 R |
0270 4390 8b00 |C |
0272 0202 3d80 | = |
0274 108a 0000 | |
0276 5f68 1882 |_h |
0278 8240 4000 | @@ |
027a 6698 4000 |f @ |
027c 66a4 f380 |f |
027e 124c e880 | L |
0280 124c c980 | L |
0282 6ea4 d480 |n |
0284 6e98 1400 |n |
0286 4e48 0900 |NH |
0288 224c e980 |"L |
028a 169c f380 | |
028c 169c b380 | |
028e 0a4c a980 | L |
0290 16b0 1882 | |
0292 02b0 1600 | |
0294 4f60 1600 |O` |
0296 0240 8800 | @ |
0298 2650 4080 |&P@ |
029a 0654 aa00 | T |
029c 2260 4c00 |"`L |
029e 2b60 9600 |+` |
02a0 0368 1882 | h |
02a2 82c8 1980 | |
02a4 0602 8d00 | |
02a6 64da 0000 |d |
02a8 1378 1882 | x |
02aa 93c8 9882 | |
02ac 8378 1882 | x |
02ae 9278 0f80 | x |
02b0 0778 9882 | x |
02b2 9207 1f80 | |
02b4 2247 a000 |"G |
02b6 6a77 8efe |jw |
02b8 83d8 1880 | |
02ba 43d0 1880 |C |
02bc 53e8 1b80 |S |
02be 72e0 4080 |r @ |
02c0 0202 4000 | @ |
02c2 740a 0000 |t |
02c4 46c8 4080 |F @ |
02c6 0202 9d00 | |
02c8 60ca 0000 |` |
02ca 2ae0 4000 |* @ |
02cc 7602 4000 |v @ |
02ce 70ca 0000 |p |
02d0 1748 1d80 | H |
02d2 3340 1d80 |3@ |
02d4 3042 0000 |0B |
02d6 0f40 9b80 | @ |
02d8 7348 9c80 |sH |
02da 32e0 4000 |2 @ |
02dc 77e8 1d80 |w |
02de 3202 4000 |2 @ |
02e0 74ca ffff |t |
02e2 d202 9d00 | |
02e4 6350 1b80 |cP |
02e6 6202 4000 |b @ |
02e8 288a 0001 |( |
02ea e602 4000 | @ |
02ec 67e8 1b80 |g |
02ee 625c ba80 |b\ |
02f0 0be8 1d00 | |
02f2 2e02 4000 |. @ |
02f4 748a 0001 |t |
02f6 ce02 4000 | @ |
02f8 6602 4000 |f @ |
02fa 740a 0001 |t |
02fc bee0 4080 | @ |
02fe 0202 9d00 | |
0300 60ca 0001 |` |
0302 a2e0 4000 | @ |
0304 7602 4000 |v @ |
0306 70ca 0000 |p |
0308 1f90 1d80 | |
030a 2380 1b80 |# |
030c 6388 1d80 |c |
030e 227c ba80 |"| |
0310 0842 0000 | B |
0312 0f88 9000 | |
0314 3f90 9c80 |? |
0316 23e0 1d80 |# |
0318 22c0 4080 |" @ |
031a 0202 4000 | @ |
031c 708a 0000 |p |
031e 27a0 1d80 |' |
0320 6398 1c80 |c |
0322 63e0 1c80 |c |
0324 22c0 5800 |" X |
0326 4e02 4000 |N @ |
0328 70ca ffff |p |
032a f798 1c80 | |
032c 63a0 1d80 |c |
032e 6202 3480 |b 4 |
0330 048a 0000 | |
0332 6b80 1d80 |k |
0334 6202 3880 |b 8 |
0336 04ca 0000 | |
0338 5f80 1d80 |_ |
033a 6250 4000 |bP@ |
033c 6aa8 4000 |j @ |
033e 6ab4 f580 |j |
0340 125c ea80 | \ |
0342 125c cb80 | \ |
0344 6eb4 d680 |n |
0346 6ea8 1600 |n |
0348 5658 0b00 |VX |
034a 2a5c eb80 |*\ |
034c 16ac f580 | |
034e 16ac b580 | |
0350 0a5c ab80 | \ |
0352 1640 1b81 | @ |
0354 0240 0800 | @ |
0356 5778 0800 |Wx |
0358 0250 8a00 | P |
035a 2e60 4080 |.`@ |
035c 0664 ac00 | d |
035e 2a78 af00 |*x |
0360 3378 8800 |3x |
0362 0380 1d80 | |
0364 6202 3080 |b 0 |
0366 088a 0000 | |
0368 6b58 1d80 |kX |
036a 6202 3880 |b 8 |
036c 08ca 0000 | |
036e 5f58 1d80 |_X |
0370 62b0 4000 |b @ |
0372 6a88 4000 |j @ |
0374 6a94 f180 |j |
0376 12bc f680 | |
0378 12bc d780 | |
037a 6e94 d280 |n |
037c 6e88 1200 |n |
037e 46b8 1700 |F |
0380 5abc f780 |Z |
0382 168c f180 | |
0384 168c b180 | |
0386 0abc b780 | |
0388 16a0 1b81 | |
038a 82a0 1400 | |
038c 4750 1400 |GP |
038e 02b0 9600 | |
0390 5e40 4080 |^@@ |
0392 0644 a800 | D |
0394 5a50 aa00 |ZP |
0396 2350 9400 |#P |
0398 0358 1d80 | X |
039a 6202 2b80 |b + |
039c 100a 0000 | |
039e 5a02 3880 |Z 8 |
03a0 104a 0000 | J |
03a2 5260 4000 |R`@ |
03a4 6a6c ec80 |jl |
03a6 129c fa80 | |
03a8 129c d380 | |
03aa 6e6c cd80 |nl |
03ac 6e60 0d00 |n` |
03ae 3298 1300 |2 |
03b0 6a9c f380 |j |
03b2 1664 ec80 | d |
03b4 1664 ac80 | d |
03b6 0a9c b380 | |
03b8 1680 1b82 | |
03ba 0280 1000 | |
03bc 33b0 1000 |3 |
03be 02d0 9a00 | |
03c0 4ea0 4080 |N @ |
03c2 06a4 b400 | |
03c4 6ab0 b600 |j |
03c6 53b0 9000 |S |
03c8 01ff fef3 | |
03ca ea40 4000 | @@ |
03cc 7442 0000 |tB |
03ce 1ac8 4080 | @ |
03d0 07e8 1d80 | |
03d2 2202 4000 |" @ |
03d4 74ca fffe |t |
03d6 5a02 9d00 |Z |
03d8 6202 4000 |b @ |
03da 648a 0000 |d |
03dc 1b00 8e81 | |
03de 73b8 1b82 |s |
03e0 92b8 9780 | |
03e2 0442 0000 | B |
03e4 37b8 9b82 |7 |
03e6 9064 001d | d |
03e8 285c 001d |(\ |
03ea 2758 0b83 |'X |
03ec a054 001d | T |
03ee 284c 001d |(L |
03f0 2a48 4985 |*HI |
03f2 0250 4a85 | PJ |
03f4 4660 4c85 |F`L |
03f6 7a68 4080 |zh@ |
03f8 01ff ff6e | n|
03fa fe40 4000 | @@ |
03fc 6e07 1f80 |n |
03fe 2207 a000 |" |