|
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_|