|
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_0500e0
└─⟦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 0200 | | .CONST 0x0200 ; 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 002c | , | .CONST 0x002c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0012 | | .CONST 0x0012 ; Number of locals 000b INIT_0008: 000b 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x022a,0x8000,0x0000,0x0057,0xadd5,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 00bf | | Action Accept_Activation 000e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x000e,0x022e,0x8000,0x0000,0x0057,0xb315,0x0000,0x0019 ; Debug Table 0x1.0x0 = 0xe,0xffff 000f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0xf,0xfffe 0010 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x10,0xfffd 0011 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x11,0xfffc 0012 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x12,0xfffb 0013 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29 0014 0007 | | Action Break_Optional 0015 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x15,0xfffa 0016 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0017 0007 | | Action Break_Optional 0018 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x6 = 0x18,0xfff9 0019 4800 |H | Short_Literal 0x0 001a 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 001c 03fd | | Declare_Type Discrete,Defined 001d 6166 |af | Indirect_Literal Discrete,0x184,{0x00000000, 0x0057b315} ; Debug Table 0x1.0x7 = 0x1d,0xfff8 001e 4861 |Ha | Short_Literal 0x61 001f 00ec | | Load_Encached Diana_Tree_Cache 0020 00db | | Load_Top At_Offset_3 0021 00e5 | | Load_Encached Long_Integer_Cache 0022 00eb | | Load_Encached Diana_Cache 0023 1918 | | Execute Package,Field_Reference,Field_Number 0x18 0024 e003 | | Load 0x0,0x3 0025 0387 | | Declare_Variable Package 0026 00d8 | | Load_Top At_Offset_0 0027 020f | | Execute Module,Activate 0028 029d 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call ; Debug Table 0x1.0x8 = 0x28,0xfff7 002a 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x9 = 0x2a,0xfff6 002b 00c7 | | Action Elaborate_Subprogram 002c BODY_0008: 002c 00bc | | Action Signal_Activated 002d 00bb | | Action Signal_Completion 002e 0000 0000 | | .XXX[0x2] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0047 | G | .CONST 0x0047 ; Address of begin 0031 00c8 | | .CONST 0x00c8 ; Address of exception handler 0032 0007 | | .CONST 0x0007 ; Number of locals 0033 INIT_0030: 0033 e004 | | Load 0x0,0x4 ; Debug Table 0x2 = .DEBUG 0x0033,0x0244,0x0001,0x0000,0x0057,0xadd5,0x0000,0x0008 ; Debug Table 0x2.0x0 = 0x33,0xffff 0034 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0035 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0036 02c7 | | Declare_Variable Any 0037 00d8 | | Load_Top At_Offset_0 0038 1c00 | | Execute_Immediate Run_Utility,0x0 0039 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x1 = 0x39,0xfffe 003a e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x2 = 0x3a,0xfffd 003b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 003c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 003d 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x2.0x3 = 0x3d,0xfffc 003e e005 | | Load 0x0,0x5 003f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0040 e006 | | Load 0x0,0x6 0041 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0042 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0043 e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x4 = 0x43,0xfffb 0044 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0045 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0x5 = 0x45,0xfffa 0046 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0047 BODY_0030: 0047 e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x6 = 0x47,0x1 0048 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0049 1b0f | | Execute Package,Field_Read,Field_Number 0xf 004a e402 | | Load 0x2,0x2 004b 6134 |a4 | Indirect_Literal Discrete,0x180,{0x00000000, 0x00004000} 004c e007 | | Load 0x0,0x7 004d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004e e005 | | Load 0x0,0x5 004f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0050 e006 | | Load 0x0,0x6 0051 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0052 4800 |H | Short_Literal 0x0 0053 4800 |H | Short_Literal 0x0 0054 e005 | | Load 0x0,0x5 0055 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0056 e004 | | Load 0x0,0x4 0057 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0058 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0059 e5ff | | Load 0x2,-0x1 005a e004 | | Load 0x0,0x4 005b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 005c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 005d c402 | | Store 0x2,0x2 005e c404 | | Store 0x2,0x4 005f 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x7 = 0x5f,0x2 0060 6809 |h | Jump_Zero 0x6a 0061 4805 |H | Short_Literal 0x5 ; Debug Table 0x2.0x8 = 0x61,0x3 0062 e5fd | | Load 0x2,-0x3 0063 e5ff | | Load 0x2,-0x1 0064 0092 0189 | | Action Push_String_Extended,0x189 ; "resolving names" 0066 e404 | | Load 0x2,0x4 0067 e008 | | Load 0x0,0x8 0068 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0069 7858 |xX | Jump 0xc2 006a e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x9 = 0x6a,0x4 006b e004 | | Load 0x0,0x4 006c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 006d 181e | | Execute Package,Field_Execute,Field_Number 0x1e 006e 6808 |h | Jump_Zero 0x77 006f e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0xa = 0x6f,0x5 0070 0092 018a | | Action Push_String_Extended,0x18a ; "No units match " 0072 e5ff | | Load 0x2,-0x1 0073 01cc | | Execute Vector,Catenate 0074 4805 |H | Short_Literal 0x5 0075 820e | | Call 0x1,0xe 0076 784b |xK | Jump 0xc2 0077 00cf | | Action Mark_Auxiliary 0078 7843 |xC | Jump 0xbc 0079 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0xb = 0x79,0x7 007a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 007b e405 | | Load 0x2,0x5 007c e211 | | Load 0x1,0x11 007d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 007e 0032 | 2 | Store_Top Heap_Access,At_Offset_2 007f e004 | | Load 0x0,0x4 ; Debug Table 0x2.0xc = 0x7f,0x8 0080 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0081 00ec | | Load_Encached Diana_Tree_Cache 0082 60fd |` | Indirect_Literal Discrete,0x180,{0x00000000, 0x00004000} 0083 e007 | | Load 0x0,0x7 0084 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0085 e402 | | Load 0x2,0x2 0086 e004 | | Load 0x0,0x4 0087 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0088 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0089 c403 | | Store 0x2,0x3 008a 005b | [ | Store_Top Discrete,At_Offset_3 008b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xd = 0x8b,0x9 008c 700c |p | Jump_Nonzero 0x99 008d e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xe = 0x8d,0xa 008e 00eb | | Load_Encached Diana_Cache 008f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0090 0fa8 | | Execute_Immediate Equal,-0x58 0091 681d |h | Jump_Zero 0xaf 0092 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xf = 0x92,0xb 0093 4976 |Iv | Short_Literal 0x176 0094 00eb | | Load_Encached Diana_Cache 0095 0098 | | Execute Package,Field_Read_Dynamic 0096 180f | | Execute Package,Field_Execute,Field_Number 0xf 0097 a403 | | Store_Unchecked 0x2,0x3 0098 7816 |x | Jump 0xaf 0099 e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x10 = 0x99,0xc 009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009b e004 | | Load 0x0,0x4 009c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 009d 60e2 |` | Indirect_Literal Discrete,0x180,{0x00000000, 0x00004000} 009e e007 | | Load 0x0,0x7 009f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00a0 e402 | | Load 0x2,0x2 00a1 e004 | | Load 0x0,0x4 00a2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00a3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00a4 c403 | | Store 0x2,0x3 00a5 005b | [ | Store_Top Discrete,At_Offset_3 00a6 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x11 = 0xa6,0xd 00a7 6807 |h | Jump_Zero 0xaf 00a8 4805 |H | Short_Literal 0x5 ; Debug Table 0x2.0x12 = 0xa8,0xe 00a9 e5fd | | Load 0x2,-0x3 00aa 0092 018b | | Action Push_String_Extended,0x18b ; "getting declaration" 00ac e406 | | Load 0x2,0x6 00ad e008 | | Load 0x0,0x8 00ae 180f | | Execute Package,Field_Execute,Field_Number 0xf 00af 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x13 = 0xaf,0xf 00b0 4800 |H | Short_Literal 0x0 00b1 00db | | Load_Top At_Offset_3 00b2 e5fd | | Load 0x2,-0x3 00b3 e5fe | | Load 0x2,-0x2 00b4 e403 | | Load 0x2,0x3 00b5 8212 | | Call 0x1,0x12 00b6 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x14 = 0xb6,0x10 00b7 e004 | | Load 0x0,0x4 00b8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00b9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00ba c402 | | Store 0x2,0x2 00bb 00c9 | | Action Pop_Auxiliary_Loop 00bc e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x15 = 0xbc,0x6 00bd e004 | | Load 0x0,0x4 00be 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00bf 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00c0 6fb8 |o | Jump_Zero 0x79 00c1 00ce | | Action Pop_Auxiliary 00c2 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x16 = 0xc2,0x11 00c3 e004 | | Load 0x0,0x4 00c4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00c5 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 00c6 c402 | | Store 0x2,0x2 00c7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00c8 TRAP_0030: 00c8 e009 | | Load 0x0,0x9 00c9 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 00ca 010f | | Execute Exception,Equal 00cb 680c |h | Jump_Zero 0xd8 00cc e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x17 = 0xcc,0x12 00cd e004 | | Load 0x0,0x4 00ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00cf 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 00d0 c402 | | Store 0x2,0x2 00d1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x18 = 0xd1,0x13 00d2 0092 018c | | Action Push_String_Extended,0x18c ; "[End of Dependents Command]" 00d4 4802 |H | Short_Literal 0x2 00d5 820e | | Call 0x1,0xe 00d6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x19 = 0xd6,0x14 00d7 0101 | | Execute Exception,Reraise 00d8 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x1a = 0xd8,0x15 00d9 e004 | | Load 0x0,0x4 00da 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00db 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 00dc c402 | | Store 0x2,0x2 00dd 4808 |H | Short_Literal 0x8 ; Debug Table 0x2.0x1b = 0xdd,0x16 00de e5fd | | Load 0x2,-0x3 00df e00a | | Load 0x0,0xa 00e0 180d | | Execute Package,Field_Execute,Field_Number 0xd 00e1 0092 018d | | Action Push_String_Extended,0x18d ; " raised by Dependents command" 00e3 01cc | | Execute Vector,Catenate 00e4 e008 | | Load 0x0,0x8 00e5 180e | | Execute Package,Field_Execute,Field_Number 0xe 00e6 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00e7 0000 | | .XXX[0x1] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4603 |F | Jump_Case 0x4 ; Debug Table 0x3 = .DEBUG 0x00eb,0x027e,0x0005,0x0000,0x0057,0xb315,0x0000,0x005c 00ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00ed 7802 |x | Jump 0xf0 ; case 0x1 00ee 7805 |x | Jump 0xf4 ; case 0x2 00ef 7809 |x | Jump 0xf9 ; case 0x3 00f0 00da | | Load_Top At_Offset_2 00f1 0091 0188 | | Action Push_String_Extended_Indexed,0x188 ; "NIL" 00f3 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f4 00db | | Load_Top At_Offset_3 00f5 00db | | Load_Top At_Offset_3 00f6 00e0 | | Load_Encached Standard_Cache 00f7 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00f8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00f9 00da | | Load_Top At_Offset_2 00fa 00e0 | | Load_Encached Standard_Cache 00fb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00fc 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00fd 0000 0000 | | .XXX[0x3] 00ff 0000 | | 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0110 | | .CONST 0x0110 ; Address of begin 0101 0173 | s | .CONST 0x0173 ; Address of exception handler 0102 0006 | | .CONST 0x0006 ; Number of locals 0103 INIT_0100: 0103 4801 |H | Short_Literal 0x1 ; Debug Table 0x4 = .DEBUG 0x0103,0x0280,0x0001,0x0000,0x0057,0xb315,0x0000,0x0076 ; Debug Table 0x4.0x0 = 0x103,0xffff 0104 00db | | Load_Top At_Offset_3 0105 e001 | | Load 0x0,0x1 0106 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0107 e00b | | Load 0x0,0xb ; Debug Table 0x4.0x1 = 0x107,0xfffe 0108 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0109 02c7 | | Declare_Variable Any 010a 00d8 | | Load_Top At_Offset_0 010b 1c00 | | Execute_Immediate Run_Utility,0x0 010c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x2 = 0x10c,0xfffd 010d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x3 = 0x10d,0xfffc 010e e210 | | Load 0x1,0x10 ; Debug Table 0x4.0x4 = 0x10e,0xfffb 010f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0110 BODY_0100: 0110 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x5 = 0x110,0x1 0111 00d9 | | Load_Top At_Offset_1 0112 e5ff | | Load 0x2,-0x1 0113 e5fc | | Load 0x2,-0x4 0114 e211 | | Load 0x1,0x11 0115 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0116 005a | Z | Store_Top Discrete,At_Offset_2 0117 005a | Z | Store_Top Discrete,At_Offset_2 0118 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x6 = 0x118,0x2 0119 6801 |h | Jump_Zero 0x11b 011a 4507 |E | Exit_Suprogram New_Top_Offset 0x7 ; Debug Table 0x4.0x7 = 0x11a,0x3 011b 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x8 = 0x11b,0x4 011c 4800 |H | Short_Literal 0x0 011d e5ff | | Load 0x2,-0x1 011e e5fc | | Load 0x2,-0x4 011f e211 | | Load 0x1,0x11 0120 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0121 e007 | | Load 0x0,0x7 ; Debug Table 0x4.0x9 = 0x121,0x5 0122 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0123 e5fa | | Load 0x2,-0x6 0124 e5ff | | Load 0x2,-0x1 0125 e00b | | Load 0x0,0xb 0126 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0127 c403 | | Store 0x2,0x3 0128 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xa = 0x128,0x6 0129 e00b | | Load 0x0,0xb 012a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 012b 680a |h | Jump_Zero 0x136 012c e5fb | | Load 0x2,-0x5 ; Debug Table 0x4.0xb = 0x12c,0x7 012d 7007 |p | Jump_Nonzero 0x135 012e e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0xc = 0x12e,0x8 012f e402 | | Load 0x2,0x2 0130 0092 018e | | Action Push_String_Extended,0x18e ; " has no dependents" 0132 01cc | | Execute Vector,Catenate 0133 4802 |H | Short_Literal 0x2 0134 820e | | Call 0x1,0xe 0135 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0136 e5fb | | Load 0x2,-0x5 ; Debug Table 0x4.0xd = 0x136,0x9 0137 7005 |p | Jump_Nonzero 0x13d 0138 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0xe = 0x138,0xa 0139 0092 018f | | Action Push_String_Extended,0x18f ; " has the following dependents:" 013b 01cc | | Execute Vector,Catenate 013c 820f | | Call 0x1,0xf 013d 00cf | | Action Mark_Auxiliary 013e 782e |x. | Jump 0x16d 013f e403 | | Load 0x2,0x3 ; Debug Table 0x4.0xf = 0x13f,0xc 0140 e00b | | Load 0x0,0xb 0141 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0142 a404 | | Store_Unchecked 0x2,0x4 0143 e5fb | | Load 0x2,-0x5 ; Debug Table 0x4.0x10 = 0x143,0xd 0144 7009 |p | Jump_Nonzero 0x14e 0145 0092 0190 | | Action Push_String_Extended,0x190 ; " " ; Debug Table 0x4.0x11 = 0x145,0xe 0147 4801 |H | Short_Literal 0x1 0148 e404 | | Load 0x2,0x4 0149 e001 | | Load 0x0,0x1 014a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 014b 01cc | | Execute Vector,Catenate 014c 820f | | Call 0x1,0xf 014d 780f |x | Jump 0x15d 014e 0092 0191 | | Action Push_String_Extended,0x191 ; " (Level" ; Debug Table 0x4.0x12 = 0x14e,0xf 0150 e5fb | | Load 0x2,-0x5 0151 00e0 | | Load_Encached Standard_Cache 0152 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0153 01cc | | Execute Vector,Catenate 0154 0092 0192 | | Action Push_String_Extended,0x192 ; "): " 0156 01cc | | Execute Vector,Catenate 0157 4801 |H | Short_Literal 0x1 0158 e404 | | Load 0x2,0x4 0159 e001 | | Load 0x0,0x1 015a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 015b 01cc | | Execute Vector,Catenate 015c 820f | | Call 0x1,0xf 015d e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x13 = 0x15d,0x10 015e 6809 |h | Jump_Zero 0x168 015f e5fa | | Load 0x2,-0x6 ; Debug Table 0x4.0x14 = 0x15f,0x11 0160 e5fb | | Load 0x2,-0x5 0161 0a01 | | Execute_Immediate Plus,0x1 0162 0248 | H | Execute Discrete,Check_In_Integer 0163 e5fc | | Load 0x2,-0x4 0164 e5fd | | Load 0x2,-0x3 0165 e5fe | | Load 0x2,-0x2 0166 e404 | | Load 0x2,0x4 0167 8212 | | Call 0x1,0x12 0168 e403 | | Load 0x2,0x3 ; Debug Table 0x4.0x15 = 0x168,0x12 0169 e00b | | Load 0x0,0xb 016a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 016b c403 | | Store 0x2,0x3 016c 00c9 | | Action Pop_Auxiliary_Loop 016d e403 | | Load 0x2,0x3 ; Debug Table 0x4.0x16 = 0x16d,0xb 016e e00b | | Load 0x0,0xb 016f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0170 6fce |o | Jump_Zero 0x13f 0171 00ce | | Action Pop_Auxiliary 0172 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0173 TRAP_0100: 0173 0007 | | Action Break_Optional 0174 4808 |H | Short_Literal 0x8 ; Debug Table 0x4.0x17 = 0x174,0x13 0175 e5fd | | Load 0x2,-0x3 0176 e00a | | Load 0x0,0xa 0177 180d | | Execute Package,Field_Execute,Field_Number 0xd 0178 0092 0193 | | Action Push_String_Extended,0x193 ; " raised while computing dependents of " 017a 01cc | | Execute Vector,Catenate 017b e402 | | Load 0x2,0x2 017c 01cc | | Execute Vector,Catenate 017d e008 | | Load 0x0,0x8 017e 180e | | Execute Package,Field_Execute,Field_Number 0xe 017f 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0180 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0184 0000 0000 | | .LITERAL {0x00000000, 0x0057b315} 0188 ; -------------------------------------------------------------------------------------- 0188 ; STRING TABLE 0188 ; -------------------------------------------------------------------------------------- 0188 001a | | .STRTAB 0x001a->0x0195 ; "NIL" 0189 001b | | .STRTAB 0x001b->0x0196 ; "resolving names" 018a 0028 | ( | .STRTAB 0x0028->0x019e ; "No units match " 018b 0035 | 5 | .STRTAB 0x0035->0x01a5 ; "getting declaration" 018c 0046 | F | .STRTAB 0x0046->0x01af ; "[End of Dependents Command]" 018d 005f | _ | .STRTAB 0x005f->0x01bc ; " raised by Dependents command" 018e 007a | z | .STRTAB 0x007a->0x01cb ; " has no dependents" 018f 008a | | .STRTAB 0x008a->0x01d4 ; " has the following dependents:" 0190 00a6 | | .STRTAB 0x00a6->0x01e3 ; " " 0191 00a6 | | .STRTAB 0x00a6->0x01e4 ; " (Level" 0192 00ab | | .STRTAB 0x00ab->0x01e7 ; "): " 0193 00ac | | .STRTAB 0x00ac->0x01e9 ; " raised while computing dependents of " 0194 00d0 | | .STREND 0x00d0->0x01fc 0195 4e49 4c72 |NILr| .STRTAB_STRINGS 01fc 0000 0000 | | .BLANK 0000[0x4] 0200 ; -------------------------------------------------------------------------------------- 0200 ; Debug Table 0200 ; -------------------------------------------------------------------------------------- 0200 0003 0005 | | .CONST 0x0003,0x0005 0202 000b 022a | *| .DEBUG 0x000b,0x022a,0x8000,0x0000,0x0057,0xadd5,0x0000,0x0007 020a 000e 022e | .| .DEBUG 0x000e,0x022e,0x8000,0x0000,0x0057,0xb315,0x0000,0x0019 0212 0033 0244 | 3 D| .DEBUG 0x0033,0x0244,0x0001,0x0000,0x0057,0xadd5,0x0000,0x0008 021a 00eb 027e | ~| .DEBUG 0x00eb,0x027e,0x0005,0x0000,0x0057,0xb315,0x0000,0x005c 0222 0103 0280 | | .DEBUG 0x0103,0x0280,0x0001,0x0000,0x0057,0xb315,0x0000,0x0076 022a ; -------------------------------------------------------------------------------------- 022a ; Debug3 Subtable 0x0 022a ; -------------------------------------------------------------------------------------- 022a 0001 0000 | | .DBG3TAB 0x0001,0x0000 022c 000b ffff | | .CONST 0x000b,0xffff 022e ; -------------------------------------------------------------------------------------- 022e ; Debug3 Subtable 0x1 022e ; -------------------------------------------------------------------------------------- 022e 000a 0000 | | .DBG3TAB 0x000a,0x0000 0230 000e ffff | | .CONST 0x000e,0xffff 0232 000f fffe | | .CONST 0x000f,0xfffe 0234 0010 fffd | | .CONST 0x0010,0xfffd 0236 0011 fffc | | .CONST 0x0011,0xfffc 0238 0012 fffb | | .CONST 0x0012,0xfffb 023a 0015 fffa | | .CONST 0x0015,0xfffa 023c 0018 fff9 | | .CONST 0x0018,0xfff9 023e 001d fff8 | | .CONST 0x001d,0xfff8 0240 0028 fff7 | ( | .CONST 0x0028,0xfff7 0242 002a fff6 | * | .CONST 0x002a,0xfff6 0244 ; -------------------------------------------------------------------------------------- 0244 ; Debug3 Subtable 0x2 0244 ; -------------------------------------------------------------------------------------- 0244 0006 0016 | | .DBG3TAB 0x0006,0x0016 0246 0033 ffff | 3 | .CONST 0x0033,0xffff 0248 0039 fffe | 9 | .CONST 0x0039,0xfffe 024a 003a fffd | : | .CONST 0x003a,0xfffd 024c 003d fffc | = | .CONST 0x003d,0xfffc 024e 0043 fffb | C | .CONST 0x0043,0xfffb 0250 0045 fffa | E | .CONST 0x0045,0xfffa 0252 0047 0001 | G | .CONST 0x0047,0x0001 0254 005f 0002 | _ | .CONST 0x005f,0x0002 0256 0061 0003 | a | .CONST 0x0061,0x0003 0258 006a 0004 | j | .CONST 0x006a,0x0004 025a 006f 0005 | o | .CONST 0x006f,0x0005 025c 0079 0007 | y | .CONST 0x0079,0x0007 025e 007f 0008 | | .CONST 0x007f,0x0008 0260 008b 0009 | | .CONST 0x008b,0x0009 0262 008d 000a | | .CONST 0x008d,0x000a 0264 0092 000b | | .CONST 0x0092,0x000b 0266 0099 000c | | .CONST 0x0099,0x000c 0268 00a6 000d | | .CONST 0x00a6,0x000d 026a 00a8 000e | | .CONST 0x00a8,0x000e 026c 00af 000f | | .CONST 0x00af,0x000f 026e 00b6 0010 | | .CONST 0x00b6,0x0010 0270 00bc 0006 | | .CONST 0x00bc,0x0006 0272 00c2 0011 | | .CONST 0x00c2,0x0011 0274 00cc 0012 | | .CONST 0x00cc,0x0012 0276 00d1 0013 | | .CONST 0x00d1,0x0013 0278 00d6 0014 | | .CONST 0x00d6,0x0014 027a 00d8 0015 | | .CONST 0x00d8,0x0015 027c 00dd 0016 | | .CONST 0x00dd,0x0016 027e ; -------------------------------------------------------------------------------------- 027e ; Debug3 Subtable 0x3 027e ; -------------------------------------------------------------------------------------- 027e 0000 0000 | | .DBG3TAB 0x0000,0x0000 0280 ; -------------------------------------------------------------------------------------- 0280 ; Debug3 Subtable 0x4 0280 ; -------------------------------------------------------------------------------------- 0280 0005 0013 | | .DBG3TAB 0x0005,0x0013 0282 0103 ffff | | .CONST 0x0103,0xffff 0284 0107 fffe | | .CONST 0x0107,0xfffe 0286 010c fffd | | .CONST 0x010c,0xfffd 0288 010d fffc | | .CONST 0x010d,0xfffc 028a 010e fffb | | .CONST 0x010e,0xfffb 028c 0110 0001 | | .CONST 0x0110,0x0001 028e 0118 0002 | | .CONST 0x0118,0x0002 0290 011a 0003 | | .CONST 0x011a,0x0003 0292 011b 0004 | | .CONST 0x011b,0x0004 0294 0121 0005 | ! | .CONST 0x0121,0x0005 0296 0128 0006 | ( | .CONST 0x0128,0x0006 0298 012c 0007 | , | .CONST 0x012c,0x0007 029a 012e 0008 | . | .CONST 0x012e,0x0008 029c 0136 0009 | 6 | .CONST 0x0136,0x0009 029e 0138 000a | 8 | .CONST 0x0138,0x000a 02a0 013f 000c | ? | .CONST 0x013f,0x000c 02a2 0143 000d | C | .CONST 0x0143,0x000d 02a4 0145 000e | E | .CONST 0x0145,0x000e 02a6 014e 000f | N | .CONST 0x014e,0x000f 02a8 015d 0010 | ] | .CONST 0x015d,0x0010 02aa 015f 0011 | _ | .CONST 0x015f,0x0011 02ac 0168 0012 | h | .CONST 0x0168,0x0012 02ae 016d 000b | m | .CONST 0x016d,0x000b 02b0 0174 0013 | t | .CONST 0x0174,0x0013 02b2 0000 0000 | | .BLANK 0000[0x14e]