|
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_06e8fd
└─⟦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 0250 | P | .CONST 0x0250 ; 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 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call 0012 029d 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call 0014 029d 018b | | Declare_Subprogram INIT_0188,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 0062 | b | .CONST 0x0062 ; 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 e5fd | | Load 0x2,-0x3 0035 8004 | | Call 0x0,0x4 0036 c402 | | Store 0x2,0x2 0037 005a | Z | Store_Top Discrete,At_Offset_2 0038 00d9 | | Load_Top At_Offset_1 0039 6811 |h | Jump_Zero 0x4b 003a e005 | | Load 0x0,0x5 003b e006 | | Load 0x0,0x6 003c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 003d c005 | | Store 0x0,0x5 003e 00d8 | | Load_Top At_Offset_0 003f e007 | | Load 0x0,0x7 0040 e402 | | Load 0x2,0x2 0041 e5fe | | Load 0x2,-0x2 0042 e5ff | | Load 0x2,-0x1 0043 e008 | | Load 0x0,0x8 0044 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0045 c007 | | Store 0x0,0x7 0046 c404 | | Store 0x2,0x4 0047 e005 | | Load 0x0,0x5 0048 e006 | | Load 0x0,0x6 0049 1815 | | Execute Package,Field_Execute,Field_Number 0x15 004a c005 | | Store 0x0,0x5 004b 4802 |H | Short_Literal 0x2 004c 00d9 | | Load_Top At_Offset_1 004d e003 | | Load 0x0,0x3 004e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 004f 6811 |h | Jump_Zero 0x61 0050 480a |H | Short_Literal 0xa 0051 480a |H | Short_Literal 0xa 0052 0092 01c7 | | Action Push_String_Extended,0x1c7 ; "The history for " 0054 e402 | | Load 0x2,0x2 0055 820f | | Call 0x1,0xf 0056 01cc | | Execute Vector,Catenate 0057 0092 01c8 | | Action Push_String_Extended,0x1c8 ; " could not be displayed:" 0059 01cc | | Execute Vector,Catenate 005a 01cb | | Execute Vector,Append 005b 00da | | Load_Top At_Offset_2 005c e003 | | Load 0x0,0x3 005d 1820 | | Execute Package,Field_Execute,Field_Number 0x20 005e 01cc | | Execute Vector,Catenate 005f 01cb | | Execute Vector,Append 0060 8009 | | Call 0x0,0x9 0061 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0062 TRAP_0020: 0062 0007 | | Action Break_Optional 0063 480a |H | Short_Literal 0xa 0064 0092 01c9 | | Action Push_String_Extended,0x1c9 ; "Exception raised during command processing: " 0066 e00a | | Load 0x0,0xa 0067 180d | | Execute Package,Field_Execute,Field_Number 0xd 0068 01cc | | Execute Vector,Catenate 0069 01cb | | Execute Vector,Append 006a 8009 | | Call 0x0,0x9 006b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 006c 0000 0000 | | .BLANK 0000[0x4] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0081 | | .CONST 0x0081 ; Address of begin 0071 015e | ^ | .CONST 0x015e ; 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 e5fd | | Load 0x2,-0x3 0089 8004 | | Call 0x0,0x4 008a c402 | | Store 0x2,0x2 008b 005b | [ | Store_Top Discrete,At_Offset_3 008c 00da | | Load_Top At_Offset_2 008d 68cf |h | Jump_Zero 0x15d 008e 00d9 | | Load_Top At_Offset_1 008f 00d9 | | Load_Top At_Offset_1 0090 e5fc | | Load 0x2,-0x4 0091 800c | | Call 0x0,0xc 0092 00d1 | | Pop_Control Pop_Count_1 0093 c404 | | Store 0x2,0x4 0094 4802 |H | Short_Literal 0x2 0095 00da | | Load_Top At_Offset_2 0096 e003 | | Load 0x0,0x3 0097 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0098 6801 |h | Jump_Zero 0x9a 0099 4506 |E | Exit_Suprogram New_Top_Offset 0x6 009a e5fe | | Load 0x2,-0x2 009b 4606 |F | Jump_Case 0x7 009c 781b |x | Jump 0xb8 ; case 0x0 009d 7857 |xW | Jump 0xf5 ; case 0x1 009e 786b |xk | Jump 0x10a ; case 0x2 009f 78a9 |x | Jump 0x149 ; case 0x3 00a0 787e |x~ | Jump 0x11f ; case 0x4 00a1 7892 |x | Jump 0x134 ; case 0x5 00a2 7800 |x | Jump 0xa3 ; case 0x6 00a3 00d9 | | Load_Top At_Offset_1 00a4 00d9 | | Load_Top At_Offset_1 00a5 e007 | | Load 0x0,0x7 00a6 e5fb | | Load 0x2,-0x5 00a7 e402 | | Load 0x2,0x2 00a8 4801 |H | Short_Literal 0x1 00a9 e5ff | | Load 0x2,-0x1 00aa e008 | | Load 0x0,0x8 00ab 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00ac c007 | | Store 0x0,0x7 00ad 00d1 | | Pop_Control Pop_Count_1 00ae c404 | | Store 0x2,0x4 00af 00db | | Load_Top At_Offset_3 00b0 00d9 | | Load_Top At_Offset_1 00b1 e5fc | | Load 0x2,-0x4 00b2 e5ff | | Load 0x2,-0x1 00b3 0092 01ca | | Action Push_String_Extended,0x1ca ; "Statement" 00b5 e404 | | Load 0x2,0x4 00b6 8211 | | Call 0x1,0x11 00b7 4506 |E | Exit_Suprogram New_Top_Offset 0x6 00b8 00d9 | | Load_Top At_Offset_1 00b9 00d9 | | Load_Top At_Offset_1 00ba e007 | | Load 0x0,0x7 00bb e5fb | | Load 0x2,-0x5 00bc e402 | | Load 0x2,0x2 00bd 4800 |H | Short_Literal 0x0 00be e5ff | | Load 0x2,-0x1 00bf e008 | | Load 0x0,0x8 00c0 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00c1 c007 | | Store 0x0,0x7 00c2 00d1 | | Pop_Control Pop_Count_1 00c3 c404 | | Store 0x2,0x4 00c4 00db | | Load_Top At_Offset_3 00c5 00d9 | | Load_Top At_Offset_1 00c6 e5fc | | Load 0x2,-0x4 00c7 e5ff | | Load 0x2,-0x1 00c8 0092 01cb | | Action Push_String_Extended,0x1cb ; "Call" 00ca e404 | | Load 0x2,0x4 00cb 8211 | | Call 0x1,0x11 00cc 00d9 | | Load_Top At_Offset_1 00cd 00d9 | | Load_Top At_Offset_1 00ce e007 | | Load 0x0,0x7 00cf e5fb | | Load 0x2,-0x5 00d0 e402 | | Load 0x2,0x2 00d1 4806 |H | Short_Literal 0x6 00d2 e5ff | | Load 0x2,-0x1 00d3 e008 | | Load 0x0,0x8 00d4 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00d5 c007 | | Store 0x0,0x7 00d6 00d1 | | Pop_Control Pop_Count_1 00d7 c404 | | Store 0x2,0x4 00d8 00db | | Load_Top At_Offset_3 00d9 00d9 | | Load_Top At_Offset_1 00da e5fc | | Load 0x2,-0x4 00db e5ff | | Load 0x2,-0x1 00dc 0092 01cc | | Action Push_String_Extended,0x1cc ; "Exception" 00de e404 | | Load 0x2,0x4 00df 8211 | | Call 0x1,0x11 00e0 00d9 | | Load_Top At_Offset_1 00e1 00d9 | | Load_Top At_Offset_1 00e2 e007 | | Load 0x0,0x7 00e3 e5fb | | Load 0x2,-0x5 00e4 e402 | | Load 0x2,0x2 00e5 4801 |H | Short_Literal 0x1 00e6 e5ff | | Load 0x2,-0x1 00e7 e008 | | Load 0x0,0x8 00e8 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00e9 c007 | | Store 0x0,0x7 00ea 00d1 | | Pop_Control Pop_Count_1 00eb c404 | | Store 0x2,0x4 00ec 00db | | Load_Top At_Offset_3 00ed 00d9 | | Load_Top At_Offset_1 00ee e5fc | | Load 0x2,-0x4 00ef e5ff | | Load 0x2,-0x1 00f0 0092 01ca | | Action Push_String_Extended,0x1ca ; "Statement" 00f2 e404 | | Load 0x2,0x4 00f3 8211 | | Call 0x1,0x11 00f4 4506 |E | Exit_Suprogram New_Top_Offset 0x6 00f5 00d9 | | Load_Top At_Offset_1 00f6 00d9 | | Load_Top At_Offset_1 00f7 e007 | | Load 0x0,0x7 00f8 e5fb | | Load 0x2,-0x5 00f9 e402 | | Load 0x2,0x2 00fa 4800 |H | Short_Literal 0x0 00fb e5ff | | Load 0x2,-0x1 00fc e008 | | Load 0x0,0x8 00fd 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 00fe c007 | | Store 0x0,0x7 00ff 00d1 | | Pop_Control Pop_Count_1 0100 c404 | | Store 0x2,0x4 0101 00db | | Load_Top At_Offset_3 0102 00d9 | | Load_Top At_Offset_1 0103 e5fc | | Load 0x2,-0x4 0104 e5ff | | Load 0x2,-0x1 0105 0092 01cb | | Action Push_String_Extended,0x1cb ; "Call" 0107 e404 | | Load 0x2,0x4 0108 8211 | | Call 0x1,0x11 0109 4506 |E | Exit_Suprogram New_Top_Offset 0x6 010a 00d9 | | Load_Top At_Offset_1 010b 00d9 | | Load_Top At_Offset_1 010c e007 | | Load 0x0,0x7 010d e5fb | | Load 0x2,-0x5 010e e402 | | Load 0x2,0x2 010f 4806 |H | Short_Literal 0x6 0110 e5ff | | Load 0x2,-0x1 0111 e008 | | Load 0x0,0x8 0112 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0113 c007 | | Store 0x0,0x7 0114 00d1 | | Pop_Control Pop_Count_1 0115 c404 | | Store 0x2,0x4 0116 00db | | Load_Top At_Offset_3 0117 00d9 | | Load_Top At_Offset_1 0118 e5fc | | Load 0x2,-0x4 0119 e5ff | | Load 0x2,-0x1 011a 0092 01cc | | Action Push_String_Extended,0x1cc ; "Exception" 011c e404 | | Load 0x2,0x4 011d 8211 | | Call 0x1,0x11 011e 4506 |E | Exit_Suprogram New_Top_Offset 0x6 011f 00d9 | | Load_Top At_Offset_1 0120 00d9 | | Load_Top At_Offset_1 0121 e007 | | Load 0x0,0x7 0122 e5fb | | Load 0x2,-0x5 0123 e402 | | Load 0x2,0x2 0124 4804 |H | Short_Literal 0x4 0125 e5ff | | Load 0x2,-0x1 0126 e008 | | Load 0x0,0x8 0127 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0128 c007 | | Store 0x0,0x7 0129 00d1 | | Pop_Control Pop_Count_1 012a c404 | | Store 0x2,0x4 012b 00db | | Load_Top At_Offset_3 012c 00d9 | | Load_Top At_Offset_1 012d e5fc | | Load 0x2,-0x4 012e e5ff | | Load 0x2,-0x1 012f 0092 01cd | | Action Push_String_Extended,0x1cd ; "Frame_Pop" 0131 e404 | | Load 0x2,0x4 0132 8211 | | Call 0x1,0x11 0133 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0134 00d9 | | Load_Top At_Offset_1 0135 00d9 | | Load_Top At_Offset_1 0136 e007 | | Load 0x0,0x7 0137 e5fb | | Load 0x2,-0x5 0138 e402 | | Load 0x2,0x2 0139 4802 |H | Short_Literal 0x2 013a e5ff | | Load 0x2,-0x1 013b e008 | | Load 0x0,0x8 013c 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 013d c007 | | Store 0x0,0x7 013e 00d1 | | Pop_Control Pop_Count_1 013f c404 | | Store 0x2,0x4 0140 00db | | Load_Top At_Offset_3 0141 00d9 | | Load_Top At_Offset_1 0142 e5fc | | Load 0x2,-0x4 0143 e5ff | | Load 0x2,-0x1 0144 0092 01ce | | Action Push_String_Extended,0x1ce ; "Rendezvous" 0146 e404 | | Load 0x2,0x4 0147 8211 | | Call 0x1,0x11 0148 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0149 00d9 | | Load_Top At_Offset_1 014a 00d9 | | Load_Top At_Offset_1 014b e007 | | Load 0x0,0x7 014c e5fb | | Load 0x2,-0x5 014d e402 | | Load 0x2,0x2 014e 4805 |H | Short_Literal 0x5 014f e5ff | | Load 0x2,-0x1 0150 e008 | | Load 0x0,0x8 0151 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0152 c007 | | Store 0x0,0x7 0153 00d1 | | Pop_Control Pop_Count_1 0154 c404 | | Store 0x2,0x4 0155 00db | | Load_Top At_Offset_3 0156 00d9 | | Load_Top At_Offset_1 0157 e5fc | | Load 0x2,-0x4 0158 e5ff | | Load 0x2,-0x1 0159 0092 01cf | | Action Push_String_Extended,0x1cf ; "Instruction" 015b e404 | | Load 0x2,0x4 015c 8211 | | Call 0x1,0x11 015d 4506 |E | Exit_Suprogram New_Top_Offset 0x6 015e TRAP_0070: 015e 0007 | | Action Break_Optional 015f 480a |H | Short_Literal 0xa 0160 0092 01c9 | | Action Push_String_Extended,0x1c9 ; "Exception raised during command processing: " 0162 e00a | | Load 0x0,0xa 0163 180d | | Execute Package,Field_Execute,Field_Number 0xd 0164 01cc | | Execute Vector,Catenate 0165 01cb | | Execute Vector,Append 0166 8009 | | Call 0x0,0x9 0167 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b INIT_0168: 016b 00da | | Load_Top At_Offset_2 016c 800d | | Call 0x0,0xd 016d 6803 |h | Jump_Zero 0x171 016e 0092 01d0 | | Action Push_String_Extended,0x1d0 ; "all tasks" 0170 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0171 0092 01d1 | | Action Push_String_Extended,0x1d1 ; "task " 0173 00db | | Load_Top At_Offset_3 0174 800e | | Call 0x0,0xe 0175 01cc | | Execute Vector,Catenate 0176 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0177 0000 | | .XXX[0x1] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 00da | | Load_Top At_Offset_2 017c 6803 |h | Jump_Zero 0x180 017d 0092 01d2 | | Action Push_String_Extended,0x1d2 ; "enabled" 017f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0180 0092 01d3 | | Action Push_String_Extended,0x1d3 ; "disabled" 0182 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0183 0000 0000 | | .BLANK 0000[0x5] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 4802 |H | Short_Literal 0x2 018c 00db | | Load_Top At_Offset_3 018d e003 | | Load 0x0,0x3 018e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 018f 6820 |h | Jump_Zero 0x1b0 0190 480a |H | Short_Literal 0xa 0191 480a |H | Short_Literal 0xa 0192 e5fe | | Load 0x2,-0x2 0193 0092 01d4 | | Action Push_String_Extended,0x1d4 ; " history-taking could not be " 0195 01cc | | Execute Vector,Catenate 0196 e5fd | | Load 0x2,-0x3 0197 8210 | | Call 0x1,0x10 0198 01cc | | Execute Vector,Catenate 0199 0092 01d5 | | Action Push_String_Extended,0x1d5 ; " " 019b 01cc | | Execute Vector,Catenate 019c 4801 |H | Short_Literal 0x1 019d e5fa | | Load 0x2,-0x6 019e e5fb | | Load 0x2,-0x5 019f e5fc | | Load 0x2,-0x4 01a0 800f | | Call 0x0,0xf 01a1 01cc | | Execute Vector,Catenate 01a2 0092 01d6 | | Action Push_String_Extended,0x1d6 ; ":" 01a4 01cc | | Execute Vector,Catenate 01a5 01cb | | Execute Vector,Append 01a6 0092 01d7 | | Action Push_String_Extended,0x1d7 ; " " 01a8 01cc | | Execute Vector,Catenate 01a9 e5ff | | Load 0x2,-0x1 01aa e003 | | Load 0x0,0x3 01ab 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01ac 01cc | | Execute Vector,Catenate 01ad 01cb | | Execute Vector,Append 01ae 8009 | | Call 0x0,0x9 01af 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01b0 480a |H | Short_Literal 0xa 01b1 e5fe | | Load 0x2,-0x2 01b2 0092 01d8 | | Action Push_String_Extended,0x1d8 ; " history-taking has been " 01b4 01cc | | Execute Vector,Catenate 01b5 e5fd | | Load 0x2,-0x3 01b6 8210 | | Call 0x1,0x10 01b7 01cc | | Execute Vector,Catenate 01b8 0092 01d5 | | Action Push_String_Extended,0x1d5 ; " " 01ba 01cc | | Execute Vector,Catenate 01bb 4801 |H | Short_Literal 0x1 01bc e5fa | | Load 0x2,-0x6 01bd e5fb | | Load 0x2,-0x5 01be e5fc | | Load 0x2,-0x4 01bf 800f | | Call 0x0,0xf 01c0 01cc | | Execute Vector,Catenate 01c1 0092 01d9 | | Action Push_String_Extended,0x1d9 ; "." 01c3 01cc | | Execute Vector,Catenate 01c4 01cb | | Execute Vector,Append 01c5 8010 | | Call 0x0,0x10 01c6 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01c7 ; -------------------------------------------------------------------------------------- 01c7 ; STRING TABLE 01c7 ; -------------------------------------------------------------------------------------- 01c7 0028 | ( | .STRTAB 0x0028->0x01db ; "The history for " 01c8 0036 | 6 | .STRTAB 0x0036->0x01e3 ; " could not be displayed:" 01c9 004c | L | .STRTAB 0x004c->0x01ef ; "Exception raised during command processing: " 01ca 0076 | v | .STRTAB 0x0076->0x0205 ; "Statement" 01cb 007d | } | .STRTAB 0x007d->0x0209 ; "Call" 01cc 007f | | .STRTAB 0x007f->0x020b ; "Exception" 01cd 0086 | | .STRTAB 0x0086->0x0210 ; "Frame_Pop" 01ce 008d | | .STRTAB 0x008d->0x0214 ; "Rendezvous" 01cf 0095 | | .STRTAB 0x0095->0x0219 ; "Instruction" 01d0 009e | | .STRTAB 0x009e->0x021f ; "all tasks" 01d1 00a5 | | .STRTAB 0x00a5->0x0223 ; "task " 01d2 00a8 | | .STRTAB 0x00a8->0x0226 ; "enabled" 01d3 00ad | | .STRTAB 0x00ad->0x0229 ; "disabled" 01d4 00b3 | | .STRTAB 0x00b3->0x022d ; " history-taking could not be " 01d5 00ce | | .STRTAB 0x00ce->0x023c ; " " 01d6 00cd | | .STRTAB 0x00cd->0x023c ; ":" 01d7 00cc | | .STRTAB 0x00cc->0x023d ; " " 01d8 00cc | | .STRTAB 0x00cc->0x023e ; " history-taking has been " 01d9 00e3 | | .STRTAB 0x00e3->0x024a ; "." 01da 00e2 | | .STREND 0x00e2->0x024b 01db 5468 6520 |The | .STRTAB_STRINGS 024b 0000 0000 | | .BLANK 0000[0x5] 0250 ; -------------------------------------------------------------------------------------- 0250 ; Debug Table 0250 ; -------------------------------------------------------------------------------------- 0250 0004 0009 | | .DEBUG4 0x0004,0x0009,0x1651,0x0000,0x0001,0x0000 0256 0000 0000 | | .BLANK 0000[0x17d] 03d3 0040 0002 | @ | .XXX[0x3] 03d5 7dc0 |} | 03d6 0000 0000 | | .BLANK 0000[0x2a]