|
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: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01d0 | | .CONST 0x01d0 ; 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 003c | < | .CONST 0x003c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0018 | | .CONST 0x0018 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4801 |H | Short_Literal 0x1 000d 029f 0043 | C| Declare_Subprogram INIT_0040,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 e001 | | Load 0x0,0x1 0011 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0012 0129 | ) | Execute Any,Make_Visible 0013 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated 0015 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated 0017 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0019 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 001b 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 001d 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 001f 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0021 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 0023 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0025 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0027 00bf | | Action Accept_Activation 0028 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0029 00c7 | | Action Elaborate_Subprogram 002a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 002b 00c7 | | Action Elaborate_Subprogram 002c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 002d 00c7 | | Action Elaborate_Subprogram 002e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 002f 00c7 | | Action Elaborate_Subprogram 0030 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0031 00c7 | | Action Elaborate_Subprogram 0032 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0033 00c7 | | Action Elaborate_Subprogram 0034 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0035 00c7 | | Action Elaborate_Subprogram 0036 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0037 00c7 | | Action Elaborate_Subprogram 0038 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0039 00c7 | | Action Elaborate_Subprogram 003a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 003b 00c7 | | Action Elaborate_Subprogram 003c BODY_0008: 003c 00bc | | Action Signal_Activated 003d 00bb | | Action Signal_Completion 003e 0000 0000 | | .XXX[0x2] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0043 | C | .CONST 0x0043 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0001 | | .CONST 0x0001 ; Number of locals 0043 BODY_0040: 0043 INIT_0040: 0043 4607 |F | Jump_Case 0x8 0044 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0045 7806 |x | Jump 0x4c ; case 0x1 0046 7809 |x | Jump 0x50 ; case 0x2 0047 780d |x | Jump 0x55 ; case 0x3 0048 7810 |x | Jump 0x59 ; case 0x4 0049 7811 |x | Jump 0x5b ; case 0x5 004a 7812 |x | Jump 0x5d ; case 0x6 004b 7815 |x | Jump 0x61 ; case 0x7 004c 00da | | Load_Top At_Offset_2 004d 0091 01ad | | Action Push_String_Extended_Indexed,0x1ad ; "TEXT" 004f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0050 00db | | Load_Top At_Offset_3 0051 00db | | Load_Top At_Offset_3 0052 00e0 | | Load_Encached Standard_Cache 0053 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0054 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0055 00da | | Load_Top At_Offset_2 0056 00e0 | | Load_Encached Standard_Cache 0057 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0058 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0059 00db | | Load_Top At_Offset_3 005a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 005b 00db | | Load_Top At_Offset_3 005c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 005d e20d | | Load 0x1,0xd 005e 00dc | | Load_Top At_Offset_4 005f 0267 | g | Execute Discrete,Predecessor 0060 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0061 e20d | | Load 0x1,0xd 0062 00dc | | Load_Top At_Offset_4 0063 0268 | h | Execute Discrete,Successor 0064 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0065 0000 0000 | | .XXX[0x3] 0067 0000 | | 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006d | m | .CONST 0x006d ; Address of begin 0069 008c | | .CONST 0x008c ; Address of exception handler 006a 0002 | | .CONST 0x0002 ; Number of locals 006b INIT_0068: 006b e002 | | Load 0x0,0x2 006c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006d BODY_0068: 006d e002 | | Load 0x0,0x2 006e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006f e5fa | | Load 0x2,-0x6 0070 0120 | | Execute Any,Is_Value 0071 6803 |h | Jump_Zero 0x75 0072 e001 | | Load 0x0,0x1 0073 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0074 7804 |x | Jump 0x79 0075 e5fa | | Load 0x2,-0x6 0076 e001 | | Load 0x0,0x1 0077 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0078 011e | | Execute Any,Convert 0079 e5fb | | Load 0x2,-0x5 007a e5fc | | Load 0x2,-0x4 007b e5fd | | Load 0x2,-0x3 007c e5fe | | Load 0x2,-0x2 007d e5ff | | Load 0x2,-0x1 007e e003 | | Load 0x0,0x3 007f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0080 e004 | | Load 0x0,0x4 0081 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 0082 e001 | | Load 0x0,0x1 0083 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0084 c5fa | | Store 0x2,-0x6 0085 0059 | Y | Store_Top Discrete,At_Offset_1 0086 e5f9 | | Load 0x2,-0x7 0087 00d9 | | Load_Top At_Offset_1 0088 e005 | | Load 0x0,0x5 0089 1817 | | Execute Package,Field_Execute,Field_Number 0x17 008a c5f9 | | Store 0x2,-0x7 008b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 008c TRAP_0068: 008c 010e | | Execute Exception,Is_Constraint_Error 008d 680f |h | Jump_Zero 0x9d 008e e5f9 | | Load 0x2,-0x7 008f 4802 |H | Short_Literal 0x2 0090 0092 01af | | Action Push_String_Extended,0x1af ; "\x22" 0092 e5ff | | Load 0x2,-0x1 0093 01cc | | Execute Vector,Catenate 0094 0092 01b0 | | Action Push_String_Extended,0x1b0 ; "\x22 is an unregistered target key" 0096 01cc | | Execute Vector,Catenate 0097 0092 01b1 | | Action Push_String_Extended,0x1b1 ; "Acquire failed" 0099 e006 | | Load 0x0,0x6 009a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 009b c5f9 | | Store 0x2,-0x7 009c 4506 |E | Exit_Suprogram New_Top_Offset 0x6 009d 0100 | | Execute Exception,Raise 009e 0000 0000 | | .XXX[0x2] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a5 | | .CONST 0x00a5 ; Address of begin 00a1 00c6 | | .CONST 0x00c6 ; Address of exception handler 00a2 0002 | | .CONST 0x0002 ; Number of locals 00a3 INIT_00a0: 00a3 e002 | | Load 0x0,0x2 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 BODY_00a0: 00a5 e002 | | Load 0x0,0x2 00a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a7 e5f8 | | Load 0x2,-0x8 00a8 0120 | | Execute Any,Is_Value 00a9 6803 |h | Jump_Zero 0xad 00aa e001 | | Load 0x0,0x1 00ab 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00ac 7804 |x | Jump 0xb1 00ad e5f8 | | Load 0x2,-0x8 00ae e001 | | Load 0x0,0x1 00af 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00b0 011e | | Execute Any,Convert 00b1 e5f9 | | Load 0x2,-0x7 00b2 e5fa | | Load 0x2,-0x6 00b3 e5fb | | Load 0x2,-0x5 00b4 e5fc | | Load 0x2,-0x4 00b5 e5fd | | Load 0x2,-0x3 00b6 e5fe | | Load 0x2,-0x2 00b7 e5ff | | Load 0x2,-0x1 00b8 e003 | | Load 0x0,0x3 00b9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 00ba e004 | | Load 0x0,0x4 00bb 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 00bc e001 | | Load 0x0,0x1 00bd 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 00be c5f8 | | Store 0x2,-0x8 00bf 0059 | Y | Store_Top Discrete,At_Offset_1 00c0 e5f7 | | Load 0x2,-0x9 00c1 00d9 | | Load_Top At_Offset_1 00c2 e005 | | Load 0x0,0x5 00c3 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00c4 c5f7 | | Store 0x2,-0x9 00c5 4508 |E | Exit_Suprogram New_Top_Offset 0x8 00c6 TRAP_00a0: 00c6 010e | | Execute Exception,Is_Constraint_Error 00c7 680f |h | Jump_Zero 0xd7 00c8 e5f7 | | Load 0x2,-0x9 00c9 4802 |H | Short_Literal 0x2 00ca 0092 01af | | Action Push_String_Extended,0x1af ; "\x22" 00cc e5ff | | Load 0x2,-0x1 00cd 01cc | | Execute Vector,Catenate 00ce 0092 01b0 | | Action Push_String_Extended,0x1b0 ; "\x22 is an unregistered target key" 00d0 01cc | | Execute Vector,Catenate 00d1 0092 01b1 | | Action Push_String_Extended,0x1b1 ; "Acquire failed" 00d3 e006 | | Load 0x0,0x6 00d4 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00d5 c5f7 | | Store 0x2,-0x9 00d6 4508 |E | Exit_Suprogram New_Top_Offset 0x8 00d7 0100 | | Execute Exception,Raise 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00dd | | .CONST 0x00dd ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0002 | | .CONST 0x0002 ; Number of locals 00db INIT_00d8: 00db e002 | | Load 0x0,0x2 00dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00dd BODY_00d8: 00dd e002 | | Load 0x0,0x2 00de 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00df e5fe | | Load 0x2,-0x2 00e0 e5ff | | Load 0x2,-0x1 00e1 e001 | | Load 0x0,0x1 00e2 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 00e3 0059 | Y | Store_Top Discrete,At_Offset_1 00e4 e5fd | | Load 0x2,-0x3 00e5 00d9 | | Load_Top At_Offset_1 00e6 e005 | | Load 0x0,0x5 00e7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00e8 c5fd | | Store 0x2,-0x3 00e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00ea 0000 0000 | | .BLANK 0000[0x6] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f5 | | .CONST 0x00f5 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0002 | | .CONST 0x0002 ; Number of locals 00f3 INIT_00f0: 00f3 e002 | | Load 0x0,0x2 00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f5 BODY_00f0: 00f5 e002 | | Load 0x0,0x2 00f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f7 e5fc | | Load 0x2,-0x4 00f8 e5fd | | Load 0x2,-0x3 00f9 e5fe | | Load 0x2,-0x2 00fa e5ff | | Load 0x2,-0x1 00fb e001 | | Load 0x0,0x1 00fc 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00fd 0059 | Y | Store_Top Discrete,At_Offset_1 00fe e5fb | | Load 0x2,-0x5 00ff 00d9 | | Load_Top At_Offset_1 0100 e005 | | Load 0x0,0x5 0101 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0102 c5fb | | Store 0x2,-0x5 0103 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0104 0000 0000 | | .BLANK 0000[0x4] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 0110 | | .CONST 0x0110 ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0003 | | .CONST 0x0003 ; Number of locals 010b INIT_0108: 010b e002 | | Load 0x0,0x2 010c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 010d e004 | | Load 0x0,0x4 010e 1bcb | | Execute Package,Field_Read,Field_Number 0xcb 010f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0110 BODY_0108: 0110 e5fc | | Load 0x2,-0x4 0111 0f01 | | Execute_Immediate Equal,0x1 0112 6802 |h | Jump_Zero 0x115 0113 4801 |H | Short_Literal 0x1 0114 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0115 e002 | | Load 0x0,0x2 0116 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0117 e5fb | | Load 0x2,-0x5 0118 00da | | Load_Top At_Offset_2 0119 e5fd | | Load 0x2,-0x3 011a e5fe | | Load 0x2,-0x2 011b e5ff | | Load 0x2,-0x1 011c e001 | | Load 0x0,0x1 011d 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 011e 005a | Z | Store_Top Discrete,At_Offset_2 011f e5fa | | Load 0x2,-0x6 0120 00da | | Load_Top At_Offset_2 0121 e005 | | Load 0x0,0x5 0122 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0123 c5fa | | Store 0x2,-0x6 0124 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0125 0000 0000 | | .XXX[0x3] 0127 0000 | | 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 0130 | 0 | .CONST 0x0130 ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0003 | | .CONST 0x0003 ; Number of locals 012b INIT_0128: 012b e002 | | Load 0x0,0x2 012c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 012d e004 | | Load 0x0,0x4 012e 1bcb | | Execute Package,Field_Read,Field_Number 0xcb 012f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0130 BODY_0128: 0130 e5fc | | Load 0x2,-0x4 0131 0f01 | | Execute_Immediate Equal,0x1 0132 6802 |h | Jump_Zero 0x135 0133 4801 |H | Short_Literal 0x1 0134 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0135 e002 | | Load 0x0,0x2 0136 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0137 e5fb | | Load 0x2,-0x5 0138 00da | | Load_Top At_Offset_2 0139 e5fd | | Load 0x2,-0x3 013a e5fe | | Load 0x2,-0x2 013b e5ff | | Load 0x2,-0x1 013c e001 | | Load 0x0,0x1 013d 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 013e 005a | Z | Store_Top Discrete,At_Offset_2 013f e5fa | | Load 0x2,-0x6 0140 00da | | Load_Top At_Offset_2 0141 e005 | | Load 0x0,0x5 0142 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0143 c5fa | | Store 0x2,-0x6 0144 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0145 0000 0000 | | .XXX[0x3] 0147 0000 | | 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014d | M | .CONST 0x014d ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b e002 | | Load 0x0,0x2 014c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 014d BODY_0148: 014d e002 | | Load 0x0,0x2 014e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 014f e5f9 | | Load 0x2,-0x7 0150 e5fa | | Load 0x2,-0x6 0151 e5fb | | Load 0x2,-0x5 0152 e5fc | | Load 0x2,-0x4 0153 e5fd | | Load 0x2,-0x3 0154 e5fe | | Load 0x2,-0x2 0155 e5ff | | Load 0x2,-0x1 0156 e001 | | Load 0x0,0x1 0157 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0158 0059 | Y | Store_Top Discrete,At_Offset_1 0159 e5f8 | | Load 0x2,-0x8 015a 00d9 | | Load_Top At_Offset_1 015b e005 | | Load 0x0,0x5 015c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 015d c5f8 | | Store 0x2,-0x8 015e 4508 |E | Exit_Suprogram New_Top_Offset 0x8 015f 0000 | | .XXX[0x1] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0165 | e | .CONST 0x0165 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0002 | | .CONST 0x0002 ; Number of locals 0163 INIT_0160: 0163 e002 | | Load 0x0,0x2 0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0165 BODY_0160: 0165 e5fb | | Load 0x2,-0x5 0166 0120 | | Execute Any,Is_Value 0167 6803 |h | Jump_Zero 0x16b 0168 e007 | | Load 0x0,0x7 0169 1b0d | | Execute Package,Field_Read,Field_Number 0xd 016a 7801 |x | Jump 0x16c 016b e5fb | | Load 0x2,-0x5 016c e002 | | Load 0x0,0x2 016d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 016e e5fd | | Load 0x2,-0x3 016f e5fe | | Load 0x2,-0x2 0170 e5ff | | Load 0x2,-0x1 0171 e001 | | Load 0x0,0x1 0172 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0173 005a | Z | Store_Top Discrete,At_Offset_2 0174 c5fb | | Store 0x2,-0x5 0175 e5fc | | Load 0x2,-0x4 0176 00d9 | | Load_Top At_Offset_1 0177 e005 | | Load 0x0,0x5 0178 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0179 c5fc | | Store 0x2,-0x4 017a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 017b 0000 0000 | | .BLANK 0000[0x5] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0185 | | .CONST 0x0185 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0002 | | .CONST 0x0002 ; Number of locals 0183 INIT_0180: 0183 e002 | | Load 0x0,0x2 0184 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0185 BODY_0180: 0185 e002 | | Load 0x0,0x2 0186 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0187 e5fe | | Load 0x2,-0x2 0188 e5ff | | Load 0x2,-0x1 0189 e001 | | Load 0x0,0x1 018a 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 018b 0059 | Y | Store_Top Discrete,At_Offset_1 018c e5fd | | Load 0x2,-0x3 018d 00d9 | | Load_Top At_Offset_1 018e e005 | | Load 0x0,0x5 018f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0190 c5fd | | Store 0x2,-0x3 0191 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0192 0000 0000 | | .BLANK 0000[0x6] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019d | | .CONST 0x019d ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b e002 | | Load 0x0,0x2 019c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 019d BODY_0198: 019d 00e1 | | Load_Encached Boolean_Cache 019e e002 | | Load 0x0,0x2 019f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01a0 e5fd | | Load 0x2,-0x3 01a1 e5fe | | Load 0x2,-0x2 01a2 e5ff | | Load 0x2,-0x1 01a3 e001 | | Load 0x0,0x1 01a4 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 01a5 005a | Z | Store_Top Discrete,At_Offset_2 01a6 c5fb | | Store 0x2,-0x5 01a7 e5fc | | Load 0x2,-0x4 01a8 00d9 | | Load_Top At_Offset_1 01a9 e005 | | Load 0x0,0x5 01aa 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01ab c5fc | | Store 0x2,-0x4 01ac 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01ad ; -------------------------------------------------------------------------------------- 01ad ; STRING TABLE 01ad ; -------------------------------------------------------------------------------------- 01ad 000c | | .STRTAB 0x000c->0x01b3 ; "TEXT" 01ae 000e | | .STRTAB 0x000e->0x01b5 ; "BINARY" 01af 0012 | | .STRTAB 0x0012->0x01b8 ; "\x22" 01b0 0011 | | .STRTAB 0x0011->0x01b8 ; "\x22 is an unregistered target key" 01b1 002e | . | .STRTAB 0x002e->0x01c8 ; "Acquire failed" 01b2 003a | : | .STREND 0x003a->0x01cf 01b3 5445 5854 |TEXT| .STRTAB_STRINGS 01cf 0000 | | .XXX[0x1] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; Debug Table 01d0 ; -------------------------------------------------------------------------------------- 01d0 0004 000b | | .DEBUG4 0x0004,0x000b,0x47f6,0x0000,0x0001,0x0000 01d6 0000 0000 | | .BLANK 0000[0x2a]