|
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_03bcfe, seg_03c0fe
└─⟦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 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 0000 0000 | | .BLANK 0000[0x1a2]