|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0198 | | .CONST 0x0198 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 004f | O | .CONST 0x004f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001c | | .CONST 0x001c ; Number of locals 000b INIT_0008: 000b 4805 |H | Short_Literal 0x5 ; Debug Table 0x0 = .DEBUG 0x000b,0x01da,0x0000,0x0000,0x0059,0x89c5,0x0000,0x00ea 000c 00b8 | | Action Set_Priority 000d 4801 |H | Short_Literal 0x1 000e 02cb | | Declare_Variable Entry 000f 00bf | | Action Accept_Activation 0010 4806 |H | Short_Literal 0x6 ; Debug Table 0x1 = .DEBUG 0x0010,0x01dc,0x0000,0x0000,0x0059,0x8b45,0x0000,0x0018 ; Debug Table 0x1.0x0 = 0x10,0xffff 0011 e001 | | Load 0x0,0x1 0012 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 0013 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0014 1c08 | | Execute_Immediate Run_Utility,0x8 0015 00d8 | | Load_Top At_Offset_0 0016 1c00 | | Execute_Immediate Run_Utility,0x0 0017 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x1 = 0x17,0xfffe 0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0019 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x2 = 0x19,0xfffd 001a e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x3 = 0x1a,0xfffc 001b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001c e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x4 = 0x1c,0xfffb 001d 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 001e 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 001f 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0020 e005 | | Load 0x0,0x5 ; Debug Table 0x1.0x5 = 0x20,0xfffa 0021 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0022 0322 | " | Declare_Variable Record 0023 4801 |H | Short_Literal 0x1 0024 00d9 | | Load_Top At_Offset_1 0025 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0026 4897 |H | Short_Literal 0x97 0027 e006 | | Load 0x0,0x6 0028 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0029 1815 | | Execute Package,Field_Execute,Field_Number 0x15 002a 00d9 | | Load_Top At_Offset_1 002b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 002c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x6 = 0x2c,0x401 002d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1.0x7 = 0x2d,0xfffa 002e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 002f 4800 |H | Short_Literal 0x0 0030 00d9 | | Load_Top At_Offset_1 0031 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0032 4800 |H | Short_Literal 0x0 0033 00d9 | | Load_Top At_Offset_1 0034 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0035 4800 |H | Short_Literal 0x0 0036 00d9 | | Load_Top At_Offset_1 0037 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0038 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x8 = 0x38,0xfff9 0039 e007 | | Load 0x0,0x7 ; Debug Table 0x1.0x9 = 0x39,0xfff8 003a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 003b 02c7 | | Declare_Variable Any 003c e007 | | Load 0x0,0x7 003d 1b15 | | Execute Package,Field_Read,Field_Number 0x15 003e c215 | | Store 0x1,0x15 003f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0xa = 0x3f,0xfff7 0040 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0041 029d 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call ; Debug Table 0x1.0xb = 0x41,0xfff6 0043 029d 008b | | Declare_Subprogram INIT_0088,For_Outer_Call ; Debug Table 0x1.0xc = 0x43,0xfff5 0045 029d 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call ; Debug Table 0x1.0xd = 0x45,0xfff4 0047 029d 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call ; Debug Table 0x1.0xe = 0x47,0xfff3 0049 480d |H | Short_Literal 0xd ; Debug Table 0x1.0x10 = 0x49,0xfff1 ; Debug Table 0x1.0x11 = 0x49,0xfff0 ; Debug Table 0x1.0x12 = 0x49,0xffef ; Debug Table 0x1.0x13 = 0x49,0xffee ; Debug Table 0x1.0xf = 0x49,0xfff2 004a 0299 0113 | | Declare_Subprogram INIT_0110,For_Accept 004c 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call 004e 00bc | | Action Signal_Activated 004f BODY_0008: 004f 0092 0188 | | Action Push_String_Extended,0x188 ; "ce:USER" ; Debug Table 0x1.0x14 = 0x4f,0x1 0051 e008 | | Load 0x0,0x8 0052 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0053 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x15 = 0x53,0x2 0054 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0055 0137 | 7 | Execute Entry,Rendezvous 0056 00cf | | Action Mark_Auxiliary 0057 821c | | Call 0x1,0x1c ; Debug Table 0x1.0x16 = 0x57,0x3 ; Debug Table 0x1.0x17 = 0x57,0x4 0058 00c9 | | Action Pop_Auxiliary_Loop 0059 7ffd | | Jump 0x57 005a 0000 0000 | | .BLANK 0000[0x6] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0079 | y | .CONST 0x0079 ; Address of begin 0061 0086 | | .CONST 0x0086 ; Address of exception handler 0062 0002 | | .CONST 0x0002 ; Number of locals 0063 INIT_0060: 0063 482e |H. | Short_Literal 0x2e ; Debug Table 0x2 = .DEBUG 0x0063,0x020e,0x0001,0x0000,0x0059,0x8b45,0x0000,0x008e ; Debug Table 0x2.0x0 = 0x63,0xffff 0064 e009 | | Load 0x0,0x9 0065 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0066 e00a | | Load 0x0,0xa 0067 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0068 e00b | | Load 0x0,0xb 0069 1819 | | Execute Package,Field_Execute,Field_Number 0x19 006a e00b | | Load 0x0,0xb 006b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 006c 01cb | | Execute Vector,Append 006d e009 | | Load 0x0,0x9 006e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 006f e00a | | Load 0x0,0xa 0070 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0071 e00b | | Load 0x0,0xb 0072 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0073 e00b | | Load 0x0,0xb 0074 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0075 01cc | | Execute Vector,Catenate 0076 0092 0189 | | Action Push_String_Extended,0x189 ; "_lost_keys" 0078 01cc | | Execute Vector,Catenate 0079 BODY_0060: 0079 e215 | | Load 0x1,0x15 ; Debug Table 0x2.0x1 = 0x79,0x1 007a 6109 |a | Indirect_Literal Discrete,0x184,{0x00000000, 0x00004000} 007b e007 | | Load 0x0,0x7 007c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007d 4800 |H | Short_Literal 0x0 007e e402 | | Load 0x2,0x2 007f 4803 |H | Short_Literal 0x3 0080 e007 | | Load 0x0,0x7 0081 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0082 c215 | | Store 0x1,0x15 0083 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x2 = 0x83,0x2 0084 a216 | | Store_Unchecked 0x1,0x16 0085 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0086 TRAP_0060: 0086 0007 | | Action Break_Optional 0087 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x2.0x3 = 0x87,0x3 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 009c | | .CONST 0x009c ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b 00cf | | Action Mark_Auxiliary ; Debug Table 0x3 = .DEBUG 0x008b,0x0218,0x0001,0x0000,0x0059,0x8b45,0x0000,0x00c2 008c 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x0 = 0x8c,0x1 008d 01d9 | | Execute Vector,Reverse_Bounds 008e 0263 | c | Execute Discrete,Above_Bound 008f 700b |p | Jump_Nonzero 0x9b 0090 e215 | | Load 0x1,0x15 ; Debug Table 0x3.0x1 = 0x90,0x2 0091 4800 |H | Short_Literal 0x0 0092 00da | | Load_Top At_Offset_2 0093 e5ff | | Load 0x2,-0x1 0094 01d7 | | Execute Vector,Field_Read 0095 e001 | | Load 0x0,0x1 0096 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 0097 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0098 c215 | | Store 0x1,0x15 0099 00c8 | | Action Pop_Auxiliary_Range 009a 3ff5 |? | Loop_Increasing 0x90 009b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 009c TRAP_0088: 009c 0007 | | Action Break_Optional 009d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x3.0x2 = 0x9d,0x3 009e 0000 0000 | | .XXX[0x2] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00aa | | .CONST 0x00aa ; Address of begin 00a1 00ee | | .CONST 0x00ee ; Address of exception handler 00a2 0003 | | .CONST 0x0003 ; Number of locals 00a3 INIT_00a0: 00a3 e003 | | Load 0x0,0x3 ; Debug Table 0x4 = .DEBUG 0x00a3,0x0220,0x0001,0x0000,0x0059,0x8b45,0x0000,0x00e9 ; Debug Table 0x4.0x0 = 0xa3,0xffff 00a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00a5 e005 | | Load 0x0,0x5 ; Debug Table 0x4.0x1 = 0xa5,0xfffe 00a6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00a7 0322 | " | Declare_Variable Record 00a8 00d8 | | Load_Top At_Offset_0 00a9 1c00 | | Execute_Immediate Run_Utility,0x0 00aa BODY_00a0: 00aa e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x2 = 0xaa,0x1 00ab 6807 |h | Jump_Zero 0xb3 00ac e20e | | Load 0x1,0xe ; Debug Table 0x4.0x3 = 0xac,0x2 00ad 4800 |H | Short_Literal 0x0 00ae 4800 |H | Short_Literal 0x0 00af e001 | | Load 0x0,0x1 00b0 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00b1 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 00b2 00d1 | | Pop_Control Pop_Count_1 00b3 e20e | | Load 0x1,0xe ; Debug Table 0x4.0x4 = 0xb3,0x3 00b4 e5ff | | Load 0x2,-0x1 00b5 e001 | | Load 0x0,0x1 00b6 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00b7 181f | | Execute Package,Field_Execute,Field_Number 0x1f 00b8 00d1 | | Pop_Control Pop_Count_1 00b9 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x5 = 0xb9,0x4 00ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00bb 00d9 | | Load_Top At_Offset_1 00bc e20e | | Load 0x1,0xe 00bd e001 | | Load 0x0,0x1 00be 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00bf 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00c0 e211 | | Load 0x1,0x11 00c1 e003 | | Load 0x0,0x3 00c2 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00c3 00d1 | | Pop_Control Pop_Count_1 00c4 005a | Z | Store_Top Discrete,At_Offset_2 00c5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x6 = 0xc5,0x5 00c6 4602 |F | Jump_Case 0x3 00c7 7802 |x | Jump 0xca ; case 0x0 00c8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x1 00c9 780e |x | Jump 0xd8 ; case 0x2 00ca e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x7 = 0xca,0x7 00cb 4800 |H | Short_Literal 0x0 00cc 00da | | Load_Top At_Offset_2 00cd 4803 |H | Short_Literal 0x3 00ce e00c | | Load 0x0,0xc 00cf 171b | | Execute Task,Entry_Call,Field_Number 0x1b 00d0 e20e | | Load 0x1,0xe ; Debug Table 0x4.0x8 = 0xd0,0x8 00d1 4800 |H | Short_Literal 0x0 00d2 4800 |H | Short_Literal 0x0 00d3 e001 | | Load 0x0,0x1 00d4 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00d5 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 00d6 00d1 | | Pop_Control Pop_Count_1 00d7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00d8 e216 | | Load 0x1,0x16 ; Debug Table 0x4.0x9 = 0xd8,0x9 00d9 6806 |h | Jump_Zero 0xe0 00da e20e | | Load 0x1,0xe ; Debug Table 0x4.0xa = 0xda,0xa 00db e001 | | Load 0x0,0x1 00dc 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00de 8218 | | Call 0x1,0x18 00df 7806 |x | Jump 0xe6 00e0 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0xb = 0xe0,0xb 00e1 4800 |H | Short_Literal 0x0 00e2 e213 | | Load 0x1,0x13 00e3 4803 |H | Short_Literal 0x3 00e4 e00c | | Load 0x0,0xc 00e5 171b | | Execute Task,Entry_Call,Field_Number 0x1b 00e6 e20e | | Load 0x1,0xe ; Debug Table 0x4.0xc = 0xe6,0xc 00e7 4800 |H | Short_Literal 0x0 00e8 4800 |H | Short_Literal 0x0 00e9 e001 | | Load 0x0,0x1 00ea 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00eb 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 00ec 00d1 | | Pop_Control Pop_Count_1 00ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00ee TRAP_00a0: 00ee 0007 | | Action Break_Optional 00ef e20e | | Load 0x1,0xe ; Debug Table 0x4.0xd = 0xef,0xd 00f0 4800 |H | Short_Literal 0x0 00f1 4800 |H | Short_Literal 0x0 00f2 e001 | | Load 0x0,0x1 00f3 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00f4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 00f5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00f6 0000 0000 | | .XXX[0x2] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb e20e | | Load 0x1,0xe ; Debug Table 0x5 = .DEBUG 0x00fb,0x023e,0x0002,0x0000,0x0059,0x8b45,0x0000,0x017f ; Debug Table 0x5.0x0 = 0xfb,0x1 00fc e001 | | Load 0x0,0x1 00fd 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 00fe 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 00ff 0c01 | | Execute_Immediate Greater_Equal,0x1 0100 6809 |h | Jump_Zero 0x10a 0101 e20e | | Load 0x1,0xe ; Debug Table 0x5.0x1 = 0x101,0x2 0102 e001 | | Load 0x0,0x1 0103 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 0104 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0105 e212 | | Load 0x1,0x12 0106 e002 | | Load 0x0,0x2 0107 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0108 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0109 00ca | | Action Exit_Nullary_Function 010a 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x5.0x2 = 0x10a,0x3 010b 00ca | | Action Exit_Nullary_Function 010c 0000 0000 | | .BLANK 0000[0x4] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0113 | | .CONST 0x0113 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0001 | | .CONST 0x0001 ; Number of locals 0113 BODY_0110: 0113 INIT_0110: 0113 e00a | | Load 0x0,0xa ; Debug Table 0x6 = .DEBUG 0x0113,0x0246,0x0003,0x0000,0x0059,0x8b45,0x0000,0x0225 ; Debug Table 0x6.0x0 = 0x113,0x1 0114 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0115 a5fe | | Store_Unchecked 0x2,-0x2 0116 e004 | | Load 0x0,0x4 ; Debug Table 0x6.0x1 = 0x116,0x2 0117 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 0118 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0119 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 011a a211 | | Store_Unchecked 0x1,0x11 011b 8217 | | Call 0x1,0x17 ; Debug Table 0x6.0x2 = 0x11b,0x3 011c 4101 |A | End_Rendezvous 0x1 011d 0000 0000 | | .XXX[0x3] 011f 0000 | | 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 017c | | | .CONST 0x017c ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00cf | | Action Mark_Auxiliary ; Debug Table 0x7 = .DEBUG 0x0123,0x024e,0x0004,0x0000,0x0059,0x8b45,0x0000,0x0288 0124 e20e | | Load 0x1,0xe ; Debug Table 0x7.0x0 = 0x124,0x1 ; Debug Table 0x7.0x1 = 0x124,0x2 0125 e001 | | Load 0x0,0x1 0126 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b 0127 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0128 7011 |p | Jump_Nonzero 0x13a 0129 e004 | | Load 0x0,0x4 012a 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 012b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 012c 700d |p | Jump_Nonzero 0x13a 012d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x2 = 0x12d,0x3 012e 00e1 | | Load_Encached Boolean_Cache 012f e002 | | Load 0x0,0x2 0130 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0131 00e7 | | Load_Encached Duration_Cache 0132 0269 | i | Execute Discrete,Last 0133 e00d | | Load 0x0,0xd 0134 e00e | | Load 0x0,0xe 0135 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0136 c20f | | Store 0x1,0xf 0137 c214 | | Store 0x1,0x14 0138 c210 | | Store 0x1,0x10 0139 783d |x= | Jump 0x177 013a 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x3 = 0x13a,0x4 013b 00e1 | | Load_Encached Boolean_Cache 013c e002 | | Load 0x0,0x2 013d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 013e 6041 |`A | Indirect_Literal Discrete,0x180,{0x00000000, 0x0000c000} 013f e00d | | Load 0x0,0xd 0140 e00e | | Load 0x0,0xe 0141 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0142 c20f | | Store 0x1,0xf 0143 c214 | | Store 0x1,0x14 0144 c210 | | Store 0x1,0x10 0145 e214 | | Load 0x1,0x14 ; Debug Table 0x7.0x4 = 0x145,0x5 0146 7030 |p0 | Jump_Nonzero 0x177 0147 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x5 = 0x147,0x6 ; Debug Table 0x7.0x6 = 0x147,0xfbff 0148 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x7 = 0x148,0x401 0149 4800 |H | Short_Literal 0x0 014a 4801 |H | Short_Literal 0x1 014b 4820 |H | Short_Literal 0x20 014c 0092 018a | | Action Push_String_Extended,0x18a ; "Input:" 014e e004 | | Load 0x0,0x4 014f 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 0150 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0151 e004 | | Load 0x0,0x4 0152 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 0153 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0154 0271 | q | Execute Discrete,Times 0155 0248 | H | Execute Discrete,Check_In_Integer 0156 00e0 | | Load_Encached Standard_Cache 0157 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0158 01cc | | Execute Vector,Catenate 0159 01cb | | Execute Vector,Append 015a 821a | | Call 0x1,0x1a 015b 01cc | | Execute Vector,Catenate 015c 4804 |H | Short_Literal 0x4 015d e00c | | Load 0x0,0xc 015e 171c | | Execute Task,Entry_Call,Field_Number 0x1c 015f 0059 | Y | Store_Top Discrete,At_Offset_1 0160 00d1 | | Pop_Control Pop_Count_1 0161 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x8 = 0x161,0x7 0162 00e1 | | Load_Encached Boolean_Cache 0163 e002 | | Load 0x0,0x2 0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0165 00e7 | | Load_Encached Duration_Cache 0166 0269 | i | Execute Discrete,Last 0167 e00d | | Load 0x0,0xd 0168 e00e | | Load 0x0,0xe 0169 181c | | Execute Package,Field_Execute,Field_Number 0x1c 016a c20f | | Store 0x1,0xf 016b c214 | | Store 0x1,0x14 016c c210 | | Store 0x1,0x10 016d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x9 = 0x16d,0x8 ; Debug Table 0x7.0xa = 0x16d,0xf7ff 016e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0xb = 0x16e,0x801 016f 4800 |H | Short_Literal 0x0 0170 4801 |H | Short_Literal 0x1 0171 00ea | | Load_Encached Null_String_Cache 0172 4804 |H | Short_Literal 0x4 0173 e00c | | Load 0x0,0xc 0174 171c | | Execute Task,Entry_Call,Field_Number 0x1c 0175 0059 | Y | Store_Top Discrete,At_Offset_1 0176 00d1 | | Pop_Control Pop_Count_1 0177 e210 | | Load 0x1,0x10 ; Debug Table 0x7.0xc = 0x177,0x9 0178 e20f | | Load 0x1,0xf 0179 8219 | | Call 0x1,0x19 017a 00c9 | | Action Pop_Auxiliary_Loop 017b 7fa8 | | Jump 0x124 017c TRAP_0120: 017c 0007 | | Action Break_Optional 017d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x7.0xd = 0x17d,0xa 017e 0000 0000 | | .XXX[0x2] 0180 0000 0000 | | .LITERAL {0x00000000, 0x0000c000} 0184 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0188 ; -------------------------------------------------------------------------------------- 0188 ; STRING TABLE 0188 ; -------------------------------------------------------------------------------------- 0188 0008 | | .STRTAB 0x0008->0x018c ; "ce:USER" 0189 000d | | .STRTAB 0x000d->0x018f ; "_lost_keys" 018a 0015 | | .STRTAB 0x0015->0x0194 ; "Input:" 018b 0019 | | .STREND 0x0019->0x0197 018c 6365 3a55 |ce:U| .STRTAB_STRINGS 0198 ; -------------------------------------------------------------------------------------- 0198 ; Debug Table 0198 ; -------------------------------------------------------------------------------------- 0198 0003 0008 | | .CONST 0x0003,0x0008 019a 000b 01da | | .DEBUG 0x000b,0x01da,0x0000,0x0000,0x0059,0x89c5,0x0000,0x00ea 01a2 0010 01dc | | .DEBUG 0x0010,0x01dc,0x0000,0x0000,0x0059,0x8b45,0x0000,0x0018 01aa 0063 020e | c | .DEBUG 0x0063,0x020e,0x0001,0x0000,0x0059,0x8b45,0x0000,0x008e 01b2 008b 0218 | | .DEBUG 0x008b,0x0218,0x0001,0x0000,0x0059,0x8b45,0x0000,0x00c2 01ba 00a3 0220 | | .DEBUG 0x00a3,0x0220,0x0001,0x0000,0x0059,0x8b45,0x0000,0x00e9 01c2 00fb 023e | >| .DEBUG 0x00fb,0x023e,0x0002,0x0000,0x0059,0x8b45,0x0000,0x017f 01ca 0113 0246 | F| .DEBUG 0x0113,0x0246,0x0003,0x0000,0x0059,0x8b45,0x0000,0x0225 01d2 0123 024e | # N| .DEBUG 0x0123,0x024e,0x0004,0x0000,0x0059,0x8b45,0x0000,0x0288 01da ; -------------------------------------------------------------------------------------- 01da ; Debug3 Subtable 0x0 01da ; -------------------------------------------------------------------------------------- 01da 0000 0000 | | .DBG3TAB 0x0000,0x0000 01dc ; -------------------------------------------------------------------------------------- 01dc ; Debug3 Subtable 0x1 01dc ; -------------------------------------------------------------------------------------- 01dc 0013 0005 | | .DBG3TAB 0x0013,0x0005 01de 0010 ffff | | .CONST 0x0010,0xffff 01e0 0017 fffe | | .CONST 0x0017,0xfffe 01e2 0019 fffd | | .CONST 0x0019,0xfffd 01e4 001a fffc | | .CONST 0x001a,0xfffc 01e6 001c fffb | | .CONST 0x001c,0xfffb 01e8 0020 fffa | | .CONST 0x0020,0xfffa 01ea 002c 0401 | , | .CONST 0x002c,0x0401 01ec 002d fffa | - | .CONST 0x002d,0xfffa 01ee 0038 fff9 | 8 | .CONST 0x0038,0xfff9 01f0 0039 fff8 | 9 | .CONST 0x0039,0xfff8 01f2 003f fff7 | ? | .CONST 0x003f,0xfff7 01f4 0041 fff6 | A | .CONST 0x0041,0xfff6 01f6 0043 fff5 | C | .CONST 0x0043,0xfff5 01f8 0045 fff4 | E | .CONST 0x0045,0xfff4 01fa 0047 fff3 | G | .CONST 0x0047,0xfff3 01fc 0049 fff2 | I | .CONST 0x0049,0xfff2 01fe 0049 fff1 | I | .CONST 0x0049,0xfff1 0200 0049 fff0 | I | .CONST 0x0049,0xfff0 0202 0049 ffef | I | .CONST 0x0049,0xffef 0204 0049 ffee | I | .CONST 0x0049,0xffee 0206 004f 0001 | O | .CONST 0x004f,0x0001 0208 0053 0002 | S | .CONST 0x0053,0x0002 020a 0057 0003 | W | .CONST 0x0057,0x0003 020c 0057 0004 | W | .CONST 0x0057,0x0004 020e ; -------------------------------------------------------------------------------------- 020e ; Debug3 Subtable 0x2 020e ; -------------------------------------------------------------------------------------- 020e 0001 0003 | | .DBG3TAB 0x0001,0x0003 0210 0063 ffff | c | .CONST 0x0063,0xffff 0212 0079 0001 | y | .CONST 0x0079,0x0001 0214 0083 0002 | | .CONST 0x0083,0x0002 0216 0087 0003 | | .CONST 0x0087,0x0003 0218 ; -------------------------------------------------------------------------------------- 0218 ; Debug3 Subtable 0x3 0218 ; -------------------------------------------------------------------------------------- 0218 0000 0003 | | .DBG3TAB 0x0000,0x0003 021a 008c 0001 | | .CONST 0x008c,0x0001 021c 0090 0002 | | .CONST 0x0090,0x0002 021e 009d 0003 | | .CONST 0x009d,0x0003 0220 ; -------------------------------------------------------------------------------------- 0220 ; Debug3 Subtable 0x4 0220 ; -------------------------------------------------------------------------------------- 0220 0002 000c | | .DBG3TAB 0x0002,0x000c 0222 00a3 ffff | | .CONST 0x00a3,0xffff 0224 00a5 fffe | | .CONST 0x00a5,0xfffe 0226 00aa 0001 | | .CONST 0x00aa,0x0001 0228 00ac 0002 | | .CONST 0x00ac,0x0002 022a 00b3 0003 | | .CONST 0x00b3,0x0003 022c 00b9 0004 | | .CONST 0x00b9,0x0004 022e 00c5 0005 | | .CONST 0x00c5,0x0005 0230 00ca 0007 | | .CONST 0x00ca,0x0007 0232 00d0 0008 | | .CONST 0x00d0,0x0008 0234 00d8 0009 | | .CONST 0x00d8,0x0009 0236 00da 000a | | .CONST 0x00da,0x000a 0238 00e0 000b | | .CONST 0x00e0,0x000b 023a 00e6 000c | | .CONST 0x00e6,0x000c 023c 00ef 000d | | .CONST 0x00ef,0x000d 023e ; -------------------------------------------------------------------------------------- 023e ; Debug3 Subtable 0x5 023e ; -------------------------------------------------------------------------------------- 023e 0000 0003 | | .DBG3TAB 0x0000,0x0003 0240 00fb 0001 | | .CONST 0x00fb,0x0001 0242 0101 0002 | | .CONST 0x0101,0x0002 0244 010a 0003 | | .CONST 0x010a,0x0003 0246 ; -------------------------------------------------------------------------------------- 0246 ; Debug3 Subtable 0x6 0246 ; -------------------------------------------------------------------------------------- 0246 0000 0003 | | .DBG3TAB 0x0000,0x0003 0248 0113 0001 | | .CONST 0x0113,0x0001 024a 0116 0002 | | .CONST 0x0116,0x0002 024c 011b 0003 | | .CONST 0x011b,0x0003 024e ; -------------------------------------------------------------------------------------- 024e ; Debug3 Subtable 0x7 024e ; -------------------------------------------------------------------------------------- 024e 0002 000c | | .DBG3TAB 0x0002,0x000c 0250 0124 0001 | $ | .CONST 0x0124,0x0001 0252 0124 0002 | $ | .CONST 0x0124,0x0002 0254 012d 0003 | - | .CONST 0x012d,0x0003 0256 013a 0004 | : | .CONST 0x013a,0x0004 0258 0145 0005 | E | .CONST 0x0145,0x0005 025a 0147 0006 | G | .CONST 0x0147,0x0006 025c 0147 fbff | G | .CONST 0x0147,0xfbff 025e 0148 0401 | H | .CONST 0x0148,0x0401 0260 0161 0007 | a | .CONST 0x0161,0x0007 0262 016d 0008 | m | .CONST 0x016d,0x0008 0264 016d f7ff | m | .CONST 0x016d,0xf7ff 0266 016e 0801 | n | .CONST 0x016e,0x0801 0268 0177 0009 | w | .CONST 0x0177,0x0009 026a 017d 000a | } | .CONST 0x017d,0x000a 026c 0000 0000 | | .BLANK 0000[0x194]