|
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_03b8fe
└─⟦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 0258 | X | .CONST 0x0258 ; 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 001a | | .CONST 0x001a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0011 | | .CONST 0x0011 ; Number of locals 000b INIT_0008: 000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 000d 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 029d 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call 0012 029d 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call 0014 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call 0016 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0017 00c7 | | Action Elaborate_Subprogram 0018 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0019 00c7 | | Action Elaborate_Subprogram 001a BODY_0008: 001a 00bc | | Action Signal_Activated 001b 00bb | | Action Signal_Completion 001c 0000 0000 | | .BLANK 0000[0x4] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 002d | - | .CONST 0x002d ; Address of begin 0021 0063 | c | .CONST 0x0063 ; Address of exception handler 0022 0004 | | .CONST 0x0004 ; Number of locals 0023 INIT_0020: 0023 e002 | | Load 0x0,0x2 0024 02c7 | | Declare_Variable Any 0025 00d8 | | Load_Top At_Offset_0 0026 1c00 | | Execute_Immediate Run_Utility,0x0 0027 00e1 | | Load_Encached Boolean_Cache 0028 e003 | | Load 0x0,0x3 0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002a 02c7 | | Declare_Variable Any 002b 00d8 | | Load_Top At_Offset_0 002c 1c00 | | Execute_Immediate Run_Utility,0x0 002d BODY_0020: 002d 00e1 | | Load_Encached Boolean_Cache 002e 00db | | Load_Top At_Offset_3 002f 0120 | | Execute Any,Is_Value 0030 6802 |h | Jump_Zero 0x33 0031 e002 | | Load 0x0,0x2 0032 7801 |x | Jump 0x34 0033 00db | | Load_Top At_Offset_3 0034 4801 |H | Short_Literal 0x1 0035 e5fd | | Load 0x2,-0x3 0036 8004 | | Call 0x0,0x4 0037 c402 | | Store 0x2,0x2 0038 005a | Z | Store_Top Discrete,At_Offset_2 0039 00d9 | | Load_Top At_Offset_1 003a 6811 |h | Jump_Zero 0x4c 003b e005 | | Load 0x0,0x5 003c e006 | | Load 0x0,0x6 003d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 003e c005 | | Store 0x0,0x5 003f 00d8 | | Load_Top At_Offset_0 0040 e007 | | Load 0x0,0x7 0041 e402 | | Load 0x2,0x2 0042 e5fe | | Load 0x2,-0x2 0043 e5ff | | Load 0x2,-0x1 0044 e008 | | Load 0x0,0x8 0045 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0046 c007 | | Store 0x0,0x7 0047 c404 | | Store 0x2,0x4 0048 e005 | | Load 0x0,0x5 0049 e006 | | Load 0x0,0x6 004a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 004b c005 | | Store 0x0,0x5 004c 4802 |H | Short_Literal 0x2 004d 00d9 | | Load_Top At_Offset_1 004e e003 | | Load 0x0,0x3 004f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0050 6811 |h | Jump_Zero 0x62 0051 480a |H | Short_Literal 0xa 0052 480a |H | Short_Literal 0xa 0053 0092 01cf | | Action Push_String_Extended,0x1cf ; "The history for " 0055 e402 | | Load 0x2,0x2 0056 820f | | Call 0x1,0xf 0057 01cc | | Execute Vector,Catenate 0058 0092 01d0 | | Action Push_String_Extended,0x1d0 ; " could not be displayed:" 005a 01cc | | Execute Vector,Catenate 005b 01cb | | Execute Vector,Append 005c 00da | | Load_Top At_Offset_2 005d e003 | | Load 0x0,0x3 005e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 005f 01cc | | Execute Vector,Catenate 0060 01cb | | Execute Vector,Append 0061 8009 | | Call 0x0,0x9 0062 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0063 TRAP_0020: 0063 0007 | | Action Break_Optional 0064 480a |H | Short_Literal 0xa 0065 0092 01d1 | | Action Push_String_Extended,0x1d1 ; "Exception raised during command processing: " 0067 e00a | | Load 0x0,0xa 0068 180d | | Execute Package,Field_Execute,Field_Number 0xd 0069 01cc | | Execute Vector,Catenate 006a 01cb | | Execute Vector,Append 006b 8009 | | Call 0x0,0x9 006c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 006d 0000 0000 | | .XXX[0x3] 006f 0000 | | 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0081 | | .CONST 0x0081 ; Address of begin 0071 015f | _ | .CONST 0x015f ; Address of exception handler 0072 0005 | | .CONST 0x0005 ; Number of locals 0073 INIT_0070: 0073 e002 | | Load 0x0,0x2 0074 02c7 | | Declare_Variable Any 0075 00d8 | | Load_Top At_Offset_0 0076 1c00 | | Execute_Immediate Run_Utility,0x0 0077 00e1 | | Load_Encached Boolean_Cache 0078 e003 | | Load 0x0,0x3 0079 1b0d | | Execute Package,Field_Read,Field_Number 0xd 007a 02c7 | | Declare_Variable Any 007b 00d8 | | Load_Top At_Offset_0 007c 1c00 | | Execute_Immediate Run_Utility,0x0 007d e00b | | Load 0x0,0xb 007e 0322 | " | Declare_Variable Record 007f 00d8 | | Load_Top At_Offset_0 0080 1c00 | | Execute_Immediate Run_Utility,0x0 0081 BODY_0070: 0081 00e1 | | Load_Encached Boolean_Cache 0082 e402 | | Load 0x2,0x2 0083 0120 | | Execute Any,Is_Value 0084 6802 |h | Jump_Zero 0x87 0085 e002 | | Load 0x0,0x2 0086 7801 |x | Jump 0x88 0087 e402 | | Load 0x2,0x2 0088 4801 |H | Short_Literal 0x1 0089 e5fd | | Load 0x2,-0x3 008a 8004 | | Call 0x0,0x4 008b c402 | | Store 0x2,0x2 008c 005b | [ | Store_Top Discrete,At_Offset_3 008d 00da | | Load_Top At_Offset_2 008e 68cf |h | Jump_Zero 0x15e 008f 00d9 | | Load_Top At_Offset_1 0090 00d9 | | Load_Top At_Offset_1 0091 e5fc | | Load 0x2,-0x4 0092 800c | | Call 0x0,0xc 0093 00d1 | | Pop_Control Pop_Count_1 0094 c404 | | Store 0x2,0x4 0095 4802 |H | Short_Literal 0x2 0096 00da | | Load_Top At_Offset_2 0097 e003 | | Load 0x0,0x3 0098 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0099 6801 |h | Jump_Zero 0x9b 009a 4506 |E | Exit_Suprogram New_Top_Offset 0x6 009b e5fe | | Load 0x2,-0x2 009c 4606 |F | Jump_Case 0x7 009d 781b |x | Jump 0xb9 ; case 0x0 009e 7857 |xW | Jump 0xf6 ; case 0x1 009f 786b |xk | Jump 0x10b ; case 0x2 00a0 78a9 |x | Jump 0x14a ; case 0x3 00a1 787e |x~ | Jump 0x120 ; case 0x4 00a2 7892 |x | Jump 0x135 ; case 0x5 00a3 7800 |x | Jump 0xa4 ; case 0x6 00a4 00d9 | | Load_Top At_Offset_1 00a5 00d9 | | Load_Top At_Offset_1 00a6 e007 | | Load 0x0,0x7 00a7 e5fb | | Load 0x2,-0x5 00a8 e402 | | Load 0x2,0x2 00a9 4801 |H | Short_Literal 0x1 00aa e5ff | | Load 0x2,-0x1 00ab e008 | | Load 0x0,0x8 00ac 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00ad c007 | | Store 0x0,0x7 00ae 00d1 | | Pop_Control Pop_Count_1 00af c404 | | Store 0x2,0x4 00b0 00db | | Load_Top At_Offset_3 00b1 00d9 | | Load_Top At_Offset_1 00b2 e5fc | | Load 0x2,-0x4 00b3 e5ff | | Load 0x2,-0x1 00b4 0092 01d2 | | Action Push_String_Extended,0x1d2 ; "Statement" 00b6 e404 | | Load 0x2,0x4 00b7 8211 | | Call 0x1,0x11 00b8 4506 |E | Exit_Suprogram New_Top_Offset 0x6 00b9 00d9 | | Load_Top At_Offset_1 00ba 00d9 | | Load_Top At_Offset_1 00bb e007 | | Load 0x0,0x7 00bc e5fb | | Load 0x2,-0x5 00bd e402 | | Load 0x2,0x2 00be 4800 |H | Short_Literal 0x0 00bf e5ff | | Load 0x2,-0x1 00c0 e008 | | Load 0x0,0x8 00c1 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00c2 c007 | | Store 0x0,0x7 00c3 00d1 | | Pop_Control Pop_Count_1 00c4 c404 | | Store 0x2,0x4 00c5 00db | | Load_Top At_Offset_3 00c6 00d9 | | Load_Top At_Offset_1 00c7 e5fc | | Load 0x2,-0x4 00c8 e5ff | | Load 0x2,-0x1 00c9 0092 01d3 | | Action Push_String_Extended,0x1d3 ; "Call" 00cb e404 | | Load 0x2,0x4 00cc 8211 | | Call 0x1,0x11 00cd 00d9 | | Load_Top At_Offset_1 00ce 00d9 | | Load_Top At_Offset_1 00cf e007 | | Load 0x0,0x7 00d0 e5fb | | Load 0x2,-0x5 00d1 e402 | | Load 0x2,0x2 00d2 4806 |H | Short_Literal 0x6 00d3 e5ff | | Load 0x2,-0x1 00d4 e008 | | Load 0x0,0x8 00d5 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00d6 c007 | | Store 0x0,0x7 00d7 00d1 | | Pop_Control Pop_Count_1 00d8 c404 | | Store 0x2,0x4 00d9 00db | | Load_Top At_Offset_3 00da 00d9 | | Load_Top At_Offset_1 00db e5fc | | Load 0x2,-0x4 00dc e5ff | | Load 0x2,-0x1 00dd 0092 01d4 | | Action Push_String_Extended,0x1d4 ; "Exception" 00df e404 | | Load 0x2,0x4 00e0 8211 | | Call 0x1,0x11 00e1 00d9 | | Load_Top At_Offset_1 00e2 00d9 | | Load_Top At_Offset_1 00e3 e007 | | Load 0x0,0x7 00e4 e5fb | | Load 0x2,-0x5 00e5 e402 | | Load 0x2,0x2 00e6 4801 |H | Short_Literal 0x1 00e7 e5ff | | Load 0x2,-0x1 00e8 e008 | | Load 0x0,0x8 00e9 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00ea c007 | | Store 0x0,0x7 00eb 00d1 | | Pop_Control Pop_Count_1 00ec c404 | | Store 0x2,0x4 00ed 00db | | Load_Top At_Offset_3 00ee 00d9 | | Load_Top At_Offset_1 00ef e5fc | | Load 0x2,-0x4 00f0 e5ff | | Load 0x2,-0x1 00f1 0092 01d2 | | Action Push_String_Extended,0x1d2 ; "Statement" 00f3 e404 | | Load 0x2,0x4 00f4 8211 | | Call 0x1,0x11 00f5 4506 |E | Exit_Suprogram New_Top_Offset 0x6 00f6 00d9 | | Load_Top At_Offset_1 00f7 00d9 | | Load_Top At_Offset_1 00f8 e007 | | Load 0x0,0x7 00f9 e5fb | | Load 0x2,-0x5 00fa e402 | | Load 0x2,0x2 00fb 4800 |H | Short_Literal 0x0 00fc e5ff | | Load 0x2,-0x1 00fd e008 | | Load 0x0,0x8 00fe 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00ff c007 | | Store 0x0,0x7 0100 00d1 | | Pop_Control Pop_Count_1 0101 c404 | | Store 0x2,0x4 0102 00db | | Load_Top At_Offset_3 0103 00d9 | | Load_Top At_Offset_1 0104 e5fc | | Load 0x2,-0x4 0105 e5ff | | Load 0x2,-0x1 0106 0092 01d3 | | Action Push_String_Extended,0x1d3 ; "Call" 0108 e404 | | Load 0x2,0x4 0109 8211 | | Call 0x1,0x11 010a 4506 |E | Exit_Suprogram New_Top_Offset 0x6 010b 00d9 | | Load_Top At_Offset_1 010c 00d9 | | Load_Top At_Offset_1 010d e007 | | Load 0x0,0x7 010e e5fb | | Load 0x2,-0x5 010f e402 | | Load 0x2,0x2 0110 4806 |H | Short_Literal 0x6 0111 e5ff | | Load 0x2,-0x1 0112 e008 | | Load 0x0,0x8 0113 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0114 c007 | | Store 0x0,0x7 0115 00d1 | | Pop_Control Pop_Count_1 0116 c404 | | Store 0x2,0x4 0117 00db | | Load_Top At_Offset_3 0118 00d9 | | Load_Top At_Offset_1 0119 e5fc | | Load 0x2,-0x4 011a e5ff | | Load 0x2,-0x1 011b 0092 01d4 | | Action Push_String_Extended,0x1d4 ; "Exception" 011d e404 | | Load 0x2,0x4 011e 8211 | | Call 0x1,0x11 011f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0120 00d9 | | Load_Top At_Offset_1 0121 00d9 | | Load_Top At_Offset_1 0122 e007 | | Load 0x0,0x7 0123 e5fb | | Load 0x2,-0x5 0124 e402 | | Load 0x2,0x2 0125 4804 |H | Short_Literal 0x4 0126 e5ff | | Load 0x2,-0x1 0127 e008 | | Load 0x0,0x8 0128 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0129 c007 | | Store 0x0,0x7 012a 00d1 | | Pop_Control Pop_Count_1 012b c404 | | Store 0x2,0x4 012c 00db | | Load_Top At_Offset_3 012d 00d9 | | Load_Top At_Offset_1 012e e5fc | | Load 0x2,-0x4 012f e5ff | | Load 0x2,-0x1 0130 0092 01d5 | | Action Push_String_Extended,0x1d5 ; "Frame_Pop" 0132 e404 | | Load 0x2,0x4 0133 8211 | | Call 0x1,0x11 0134 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0135 00d9 | | Load_Top At_Offset_1 0136 00d9 | | Load_Top At_Offset_1 0137 e007 | | Load 0x0,0x7 0138 e5fb | | Load 0x2,-0x5 0139 e402 | | Load 0x2,0x2 013a 4802 |H | Short_Literal 0x2 013b e5ff | | Load 0x2,-0x1 013c e008 | | Load 0x0,0x8 013d 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 013e c007 | | Store 0x0,0x7 013f 00d1 | | Pop_Control Pop_Count_1 0140 c404 | | Store 0x2,0x4 0141 00db | | Load_Top At_Offset_3 0142 00d9 | | Load_Top At_Offset_1 0143 e5fc | | Load 0x2,-0x4 0144 e5ff | | Load 0x2,-0x1 0145 0092 01d6 | | Action Push_String_Extended,0x1d6 ; "Rendezvous" 0147 e404 | | Load 0x2,0x4 0148 8211 | | Call 0x1,0x11 0149 4506 |E | Exit_Suprogram New_Top_Offset 0x6 014a 00d9 | | Load_Top At_Offset_1 014b 00d9 | | Load_Top At_Offset_1 014c e007 | | Load 0x0,0x7 014d e5fb | | Load 0x2,-0x5 014e e402 | | Load 0x2,0x2 014f 4805 |H | Short_Literal 0x5 0150 e5ff | | Load 0x2,-0x1 0151 e008 | | Load 0x0,0x8 0152 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0153 c007 | | Store 0x0,0x7 0154 00d1 | | Pop_Control Pop_Count_1 0155 c404 | | Store 0x2,0x4 0156 00db | | Load_Top At_Offset_3 0157 00d9 | | Load_Top At_Offset_1 0158 e5fc | | Load 0x2,-0x4 0159 e5ff | | Load 0x2,-0x1 015a 0092 01d7 | | Action Push_String_Extended,0x1d7 ; "Instruction" 015c e404 | | Load 0x2,0x4 015d 8211 | | Call 0x1,0x11 015e 4506 |E | Exit_Suprogram New_Top_Offset 0x6 015f TRAP_0070: 015f 0007 | | Action Break_Optional 0160 480a |H | Short_Literal 0xa 0161 0092 01d1 | | Action Push_String_Extended,0x1d1 ; "Exception raised during command processing: " 0163 e00a | | Load 0x0,0xa 0164 180d | | Execute Package,Field_Execute,Field_Number 0xd 0165 01cc | | Execute Vector,Catenate 0166 01cb | | Execute Vector,Append 0167 8009 | | Call 0x0,0x9 0168 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0169 0000 0000 | | .BLANK 0000[0x7] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 0174 800d | | Call 0x0,0xd 0175 6803 |h | Jump_Zero 0x179 0176 0092 01d8 | | Action Push_String_Extended,0x1d8 ; "all tasks" 0178 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0179 0092 01d9 | | Action Push_String_Extended,0x1d9 ; "task " 017b 00db | | Load_Top At_Offset_3 017c 800e | | Call 0x0,0xe 017d 01cc | | Execute Vector,Catenate 017e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017f 0000 | | .XXX[0x1] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 00da | | Load_Top At_Offset_2 0184 6803 |h | Jump_Zero 0x188 0185 0092 01da | | Action Push_String_Extended,0x1da ; "enabled" 0187 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0188 0092 01db | | Action Push_String_Extended,0x1db ; "disabled" 018a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018b 0000 0000 | | .BLANK 0000[0x5] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 4802 |H | Short_Literal 0x2 0194 00db | | Load_Top At_Offset_3 0195 e003 | | Load 0x0,0x3 0196 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0197 6820 |h | Jump_Zero 0x1b8 0198 480a |H | Short_Literal 0xa 0199 480a |H | Short_Literal 0xa 019a e5fe | | Load 0x2,-0x2 019b 0092 01dc | | Action Push_String_Extended,0x1dc ; " history-taking could not be " 019d 01cc | | Execute Vector,Catenate 019e e5fd | | Load 0x2,-0x3 019f 8210 | | Call 0x1,0x10 01a0 01cc | | Execute Vector,Catenate 01a1 0092 01dd | | Action Push_String_Extended,0x1dd ; " " 01a3 01cc | | Execute Vector,Catenate 01a4 4801 |H | Short_Literal 0x1 01a5 e5fa | | Load 0x2,-0x6 01a6 e5fb | | Load 0x2,-0x5 01a7 e5fc | | Load 0x2,-0x4 01a8 800f | | Call 0x0,0xf 01a9 01cc | | Execute Vector,Catenate 01aa 0092 01de | | Action Push_String_Extended,0x1de ; ":" 01ac 01cc | | Execute Vector,Catenate 01ad 01cb | | Execute Vector,Append 01ae 0092 01df | | Action Push_String_Extended,0x1df ; " " 01b0 01cc | | Execute Vector,Catenate 01b1 e5ff | | Load 0x2,-0x1 01b2 e003 | | Load 0x0,0x3 01b3 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01b4 01cc | | Execute Vector,Catenate 01b5 01cb | | Execute Vector,Append 01b6 8009 | | Call 0x0,0x9 01b7 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01b8 480a |H | Short_Literal 0xa 01b9 e5fe | | Load 0x2,-0x2 01ba 0092 01e0 | | Action Push_String_Extended,0x1e0 ; " history-taking has been " 01bc 01cc | | Execute Vector,Catenate 01bd e5fd | | Load 0x2,-0x3 01be 8210 | | Call 0x1,0x10 01bf 01cc | | Execute Vector,Catenate 01c0 0092 01dd | | Action Push_String_Extended,0x1dd ; " " 01c2 01cc | | Execute Vector,Catenate 01c3 4801 |H | Short_Literal 0x1 01c4 e5fa | | Load 0x2,-0x6 01c5 e5fb | | Load 0x2,-0x5 01c6 e5fc | | Load 0x2,-0x4 01c7 800f | | Call 0x0,0xf 01c8 01cc | | Execute Vector,Catenate 01c9 0092 01e1 | | Action Push_String_Extended,0x1e1 ; "." 01cb 01cc | | Execute Vector,Catenate 01cc 01cb | | Execute Vector,Append 01cd 8010 | | Call 0x0,0x10 01ce 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01cf ; -------------------------------------------------------------------------------------- 01cf ; STRING TABLE 01cf ; -------------------------------------------------------------------------------------- 01cf 0028 | ( | .STRTAB 0x0028->0x01e3 ; "The history for " 01d0 0036 | 6 | .STRTAB 0x0036->0x01eb ; " could not be displayed:" 01d1 004c | L | .STRTAB 0x004c->0x01f7 ; "Exception raised during command processing: " 01d2 0076 | v | .STRTAB 0x0076->0x020d ; "Statement" 01d3 007d | } | .STRTAB 0x007d->0x0211 ; "Call" 01d4 007f | | .STRTAB 0x007f->0x0213 ; "Exception" 01d5 0086 | | .STRTAB 0x0086->0x0218 ; "Frame_Pop" 01d6 008d | | .STRTAB 0x008d->0x021c ; "Rendezvous" 01d7 0095 | | .STRTAB 0x0095->0x0221 ; "Instruction" 01d8 009e | | .STRTAB 0x009e->0x0227 ; "all tasks" 01d9 00a5 | | .STRTAB 0x00a5->0x022b ; "task " 01da 00a8 | | .STRTAB 0x00a8->0x022e ; "enabled" 01db 00ad | | .STRTAB 0x00ad->0x0231 ; "disabled" 01dc 00b3 | | .STRTAB 0x00b3->0x0235 ; " history-taking could not be " 01dd 00ce | | .STRTAB 0x00ce->0x0244 ; " " 01de 00cd | | .STRTAB 0x00cd->0x0244 ; ":" 01df 00cc | | .STRTAB 0x00cc->0x0245 ; " " 01e0 00cc | | .STRTAB 0x00cc->0x0246 ; " history-taking has been " 01e1 00e3 | | .STRTAB 0x00e3->0x0252 ; "." 01e2 00e2 | | .STREND 0x00e2->0x0253 01e3 5468 6520 |The | .STRTAB_STRINGS 0253 0000 0000 | | .BLANK 0000[0x5] 0258 ; -------------------------------------------------------------------------------------- 0258 ; Debug Table 0258 ; -------------------------------------------------------------------------------------- 0258 0004 000d | | .DEBUG4 0x0004,0x000d,0x76ab,0x0000,0x0001,0x0000 025e ca6a 8a49 | j I| .XXX[0x1a2] 0260 29c8 e160 |) `| 0262 000f d204 | | 0264 6001 0a48 |` H| 0266 aa6a 09e9 | j | 0268 ca68 a2e0 | h | 026a 01ea 6a88 | j | 026c 29c8 882a |) *| 026e 4885 ca6a |H j| 0270 8a49 29c8 | I) | 0272 e160 00e7 | ` | 0274 8a2a a928 | * (| 0276 aa87 c2e0 | | 0278 01ea 6a88 | j | 027a 29c8 882a |) *| 027c 4885 ca6a |H j| 027e 8a49 29c8 | I) | 0280 e000 0000 | | 0282 0000 0000 | | 0284 05c0 0000 | | 0286 0040 0000 | @ | 0288 4a80 0854 |J T| 028a 1493 d1d4 | | 028c 9053 57d3 | SW | 028e 1250 9490 | P | 0290 5496 57d3 |T W | 0292 5052 5395 |PRS | 0294 1153 9053 | S S| 0296 90d1 4b90 | K | 0298 9552 5311 | RS | 029a 0f5e e51f | ^ | 029c a408 c001 | | 029e 95d3 d493 | | 02a0 1114 c5c0 | | 02a2 03d4 d510 | | 02a4 5391 1054 |S T| 02a6 910b 94d5 | | 02a8 1492 5391 | S | 02aa c2c0 02cf | | 02ac 14d1 5311 | S | 02ae 50d5 1253 |P S| 02b0 d38f 9fa4 | | 02b2 08c0 0190 | | 02b4 5513 d352 |U R| 02b6 50c5 c004 |P | 02b8 14d5 1053 | S| 02ba 9110 5491 | T | 02bc 0b90 93d3 | | 02be d311 5053 | PS| 02c0 8580 0594 | | 02c2 d510 5391 | S | 02c4 1054 910b | T | 02c6 9093 d3d3 | | 02c8 1150 538b | PS | 02ca 9190 5314 | S | 02cc d15f a408 | _ | 02ce c009 1414 | | 02d0 9154 d154 | T T| 02d2 9591 57d5 | W | 02d4 5394 9150 |S P| 02d6 d3d3 94d5 | | 02d8 1495 50d5 | P | 02da 1050 9311 | P | 02dc 57d3 1250 |W P| 02de 9490 5492 | T | 02e0 5154 c5c0 |QT | 02e2 0414 d510 | | 02e4 5391 1054 |S T| 02e6 910b 9093 | | 02e8 d3d3 1150 | P| 02ea 5385 8005 |S | 02ec 94d5 1053 | S| 02ee 9110 5491 | T | 02f0 0b90 93d3 | | 02f2 d311 5053 | PS| 02f4 8b91 9053 | S| 02f6 14d1 5fa4 | _ | 02f8 08c0 01d3 | | 02fa d415 1253 | S| 02fc d394 c5c0 | | 02fe 03d4 d510 | | 0300 5391 1054 |S T| 0302 910b 94d5 | | 0304 1492 5391 | S | 0306 c2c0 001f | | 0308 a408 c002 | | 030a 1491 54d4 | T | 030c 13d3 94d1 | | 030e 45c0 03d4 |E | 0310 d510 5391 | S | 0312 1054 910b | T | 0314 94d5 1492 | | 0316 5391 c2c0 |S | 0318 024f 1414 | O | 031a 93d1 9253 | S| 031c 114f 8000 | O | 031e 0000 0000 | | 0320 0000 0600 | | 0322 0000 0080 | | 0324 0000 bb80 | | 0326 1fa8 2927 | )'| 0328 a3a9 20a6 | | 032a afa6 24a1 | $ | 032c 2920 a92c |) ,| 032e afa6 a0a4 | | 0330 a72a 22a7 | *" | 0332 20a7 21a2 | ! | 0334 9721 a422 | ! "| 0336 a1a5 afa1 | | 0338 a7a2 22af | " | 033a a9a2 a3a6 | | 033c a2a7 2a2f | */| 033e a922 a322 | " "| 0340 a922 a721 | " !| 0342 a2af a1a7 | | 0344 aaa7 2a29 | *)| 0346 9ebd ca3f | ?| 0348 4811 8003 |H | 034a 2ba7 a926 |+ &| 034c 2229 8b80 |") | 034e 07a9 aa20 | | 0350 a722 20a9 | " | 0352 2217 29aa |" ) | 0354 2924 a723 |)$ #| 0356 8580 0610 | | 0358 9f9f 93b1 | | 035a 943b b7b9 | ; | 035c 3632 14bf |62 | 035e 4811 8016 |H | 0360 24a7 21a9 |$ ! | 0362 22a0 a9a2 |" | 0364 afa9 22a3 | " | 0366 22a9 22a7 |" " | 0368 21a2 afa1 |! | 036a a7aa a72a | *| 036c 29af aa24 |) $| 036e 20aa 2fa0 | / | 0370 a922 afaa | " | 0372 27a7 afa9 |' | 0374 a6a0 a626 | &| 0376 0b80 0829 | )| 0378 aa20 a722 | "| 037a 20a9 2217 | " | 037c 2127 a7a6 |!' | 037e 22a0 a70b |" | 0380 000b 29aa | ) | 0382 20a7 2220 | " | 0384 a922 1721 | " !| 0386 27a7 a622 |' "| 0388 a0a7 1723 | #| 038a 20a6 29a2 | ) | 038c bf48 1180 | H | 038e 1622 22a1 | "" | 0390 a922 a0a9 | " | 0392 a2af a922 | "| 0394 a322 a922 | " "| 0396 a721 a2af | ! | 0398 a1a7 aaa7 | | 039a 2a29 afaa |*) | 039c 2420 aa2f |$ /| 039e a0a9 22af | " | 03a0 aa27 a7af | ' | 03a2 a620 a923 | #| 03a4 a28b 8008 | | 03a6 29aa 20a7 |) | 03a8 2220 a922 |" "| 03aa 1721 27a7 | !' | 03ac a622 a0a7 | " | 03ae 0b00 0b29 | )| 03b0 aa20 a722 | "| 03b2 20a9 2217 | " | 03b4 2127 a7a6 |!' | 03b6 22a0 a717 |" | 03b8 2320 a629 |# )| 03ba a2bf 4811 | H | 03bc 8003 a7a8 | | 03be 2a24 a7a7 |*$ | 03c0 298b 8007 |) | 03c2 a9aa 20a7 | | 03c4 2220 a922 |" "| 03c6 1729 aa29 | ) )| 03c8 24a7 2385 |$ # | 03ca 8000 3f48 | ?H| 03cc 1180 0429 | )| 03ce 22a9 a827 |" '| 03d0 a729 a28b | ) | 03d2 8007 a9aa | | 03d4 20a7 2220 | " | 03d6 a922 1729 | " )| 03d8 aa29 24a7 | )$ | 03da 2385 8004 |# | 03dc 9e28 2927 | ()'| 03de a324 a622 | $ "| 03e0 9f00 0000 | | 03e2 0000 0000 | | 03e4 0009 0000 | | 03e6 0001 0000 | | 03e8 0052 0020 | R | 03ea 5052 4f47 |PROG| 03ec 5241 4d5f |RAM_| 03ee 4c49 4252 |LIBR| 03f0 4152 595f |ARY_| 03f2 4d41 494e |MAIN| 03f4 5445 4e41 |TENA| 03f6 4e43 452e |NCE.| 03f8 4544 4954 |EDIT| 03fa 3d7b 947e |={ ~| 03fc 9023 0009 | # | 03fe 464f 525f |FOR_|