|
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 - metrics - 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 01e8 | | .CONST 0x01e8 ; 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 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x73, index=0x0 0008 ; -------------------------------------------------------------------------------------- 0008 0042 | B | .CONST 0x0042 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001d | | .CONST 0x001d ; Number of locals 000b INIT_0008: 000b INIT_0008: 000b 4802 |H | Short_Literal 0x2 ; Debug Table 0x0 = .DEBUG 0x000b,0x022a,0x0000,0x0000,0x0056,0xdd45,0x0000,0x0027 000c 02cb | | Declare_Variable Entry 000d 4801 |H | Short_Literal 0x1 000e 02cb | | Declare_Variable Entry 000f 4803 |H | Short_Literal 0x3 0010 02cb | | Declare_Variable Entry 0011 4804 |H | Short_Literal 0x4 0012 02cb | | Declare_Variable Entry 0013 00bf | | Action Accept_Activation 0014 4803 |H | Short_Literal 0x3 ; Debug Table 0x1 = .DEBUG 0x0014,0x022c,0x0000,0x0000,0x0056,0xdd55,0x0000,0x000c ; Debug Table 0x1.0x0 = 0x14,0xffff 0015 032a | * | Declare_Type Record,Incomplete 0016 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1 = 0x16,0xfffe 0017 02a0 | | Declare_Subprogram Null_Subprogram 0018 03ad | | Declare_Type Heap_Access,Defined 0019 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x19,0xfffd 001a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x3 = 0x1a,0xfffc 001b e001 | | Load 0x0,0x1 001c 1b18 | | Execute Package,Field_Read,Field_Number 0x18 001d 00da | | Load_Top At_Offset_2 001e 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0020 e211 | | Load 0x1,0x11 0021 0326 | & | Complete_Type Record,By_Defining 0022 61ad |a | Indirect_Literal Discrete,0x1d0,{0x00000000, 0x0056dd55} ; Debug Table 0x1.0x4 = 0x22,0xfffb 0023 482d |H- | Short_Literal 0x2d 0024 e002 | | Load 0x0,0x2 0025 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0026 00db | | Load_Top At_Offset_3 0027 00e5 | | Load_Encached Long_Integer_Cache 0028 e002 | | Load 0x0,0x2 0029 1913 | | Execute Package,Field_Reference,Field_Number 0x13 002a e003 | | Load 0x0,0x3 002b 0387 | | Declare_Variable Package 002c 00d8 | | Load_Top At_Offset_0 002d 020f | | Execute Module,Activate 002e 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x2e,0xfffa 002f e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x6 = 0x2f,0xfff9 0030 191d | | Execute Package,Field_Reference,Field_Number 0x1d 0031 0007 | | Action Break_Optional 0032 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x7 = 0x32,0xfff8 0033 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0034 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x8 = 0x34,0xfff7 0035 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0036 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1.0x9 = 0x36,0xfff6 0037 e212 | | Load 0x1,0x12 ; Debug Table 0x1.0xa = 0x37,0xfff5 0038 0007 | | Action Break_Optional 0039 0007 | | Action Break_Optional ; Debug Table 0x1.0xb = 0x39,0xfff4 003a 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0xc = 0x3a,0xfff3 003b e212 | | Load 0x1,0x12 ; Debug Table 0x1.0xd = 0x3b,0xfff2 003c 0007 | | Action Break_Optional 003d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0xe = 0x3d,0xfff1 003e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0xf = 0x3e,0xfff0 003f 029f 0073 | s| Declare_Subprogram INIT_0070,For_Call 0041 00bc | | Action Signal_Activated 0042 BODY_0008: 0042 BODY_0008: 0042 0092 01d4 | | Action Push_String_Extended,0x1d4 ; "Image_Database_Manager" ; Debug Table 0x1.0x10 = 0x42,0x1 0044 e005 | | Load 0x0,0x5 0045 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0046 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1.0x11 = 0x46,0x2 0047 48cd |H | Short_Literal 0xcd 0048 e006 | | Load 0x0,0x6 0049 180d | | Execute Package,Field_Execute,Field_Number 0xd 004a c217 | | Store 0x1,0x17 004b e213 | | Load 0x1,0x13 ; Debug Table 0x1.0x12 = 0x4b,0x3 004c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 004d e217 | | Load 0x1,0x17 004e e213 | | Load 0x1,0x13 004f 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0050 c216 | | Store 0x1,0x16 0051 00cf | | Action Mark_Auxiliary 0052 0007 | | Action Break_Optional ; Debug Table 0x1.0x13 = 0x52,0x4 0053 821d | | Call 0x1,0x1d ; Debug Table 0x1.0x14 = 0x53,0x5 0054 00c9 | | Action Pop_Auxiliary_Loop 0055 7ffd | | Jump 0x53 0056 0000 0000 | | .XXX[0x2] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 4608 |F | Jump_Case 0x9 ; Debug Table 0x2 = .DEBUG 0x005b,0x0258,0x0005,0x0000,0x0056,0xdd55,0x0000,0x001a 005c 7808 |x | Jump 0x65 ; case 0x0 005d 780b |x | Jump 0x69 ; case 0x1 005e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 005f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0060 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0061 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0062 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 0063 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 0064 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 0065 00da | | Load_Top At_Offset_2 0066 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0067 1c00 | | Execute_Immediate Run_Utility,0x0 0068 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0069 00da | | Load_Top At_Offset_2 006a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 006b 1c01 | | Execute_Immediate Run_Utility,0x1 006c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 006d 0000 0000 | | .XXX[0x3] 006f 0000 | | 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0080 | | .CONST 0x0080 ; Address of begin 0071 0087 | | .CONST 0x0087 ; Address of exception handler 0072 0002 | | .CONST 0x0002 ; Number of locals 0073 INIT_0070: 0073 4810 4812 |H H | Declare_Variable Select 0x000, 0x004, ; Debug Table 0x3 = .DEBUG 0x0073,0x025a,0x0004,0x0000,0x0056,0xdd55,0x0000,0x02be 0075 480f 4820 |H H | [0x000]: 0x001 = 0x0008, 0077 480e 482b |H H+| [0x00d]: 0x030 = 0x0180, 0079 480d 4830 |H H0| [0x00e]: 0x02b = 0x0158, 007b 4800 4801 |H H | [0x00f]: 0x020 = 0x0100, 007d 4800 4804 |H H | [0x010]: 0x012 = 0x0090 007f 02cf | | 0080 BODY_0070: 0080 00cf | | Action Mark_Auxiliary 0081 0007 | | Action Break_Optional ; Debug Table 0x3.0x0 = 0x81,0x1 0082 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x1 = 0x82,0x2 0083 013f | ? | Execute Select,Rendezvous 0084 00d1 | | Pop_Control Pop_Count_1 0085 00c9 | | Action Pop_Auxiliary_Loop 0086 7ffb | | Jump 0x82 0087 TRAP_0070: 0087 0007 | | Action Break_Optional 0088 e215 | | Load 0x1,0x15 ; Debug Table 0x3.0x2 = 0x88,0x7 0089 0a01 | | Execute_Immediate Plus,0x1 008a c215 | | Store 0x1,0x15 008b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 008c 0000 0000 | | .BLANK 0000[0x4] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; See instruction 0x02cf at 0x73, index=0x10 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4 = .DEBUG 0x0093,0x0262,0x0003,0x0000,0x0056,0xdd55,0x0000,0x02a6 ; Debug Table 0x4.0x0 = 0x93,0x1 0094 e21a | | Load 0x1,0x1a 0095 e7fd | | Load 0x3,-0x3 0096 e216 | | Load 0x1,0x16 0097 e213 | | Load 0x1,0x13 0098 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0099 c21a | | Store 0x1,0x1a 009a c219 | | Store 0x1,0x19 009b e219 | | Load 0x1,0x19 ; Debug Table 0x4.0x1 = 0x9b,0x2 009c 7001 |p | Jump_Nonzero 0x9e 009d 4100 |A | End_Rendezvous 0x0 ; Debug Table 0x4.0x2 = 0x9d,0x3 009e e21a | | Load 0x1,0x1a ; Debug Table 0x4.0x3 = 0x9e,0x4 009f 0217 | | Execute Heap_Access,All_Reference 00a0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00a1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00a2 0c01 | | Execute_Immediate Greater_Equal,0x1 00a3 6826 |h& | Jump_Zero 0xca 00a4 e21a | | Load 0x1,0x1a 00a5 0217 | | Execute Heap_Access,All_Reference 00a6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00a8 e21a | | Load 0x1,0x1a 00a9 0217 | | Execute Heap_Access,All_Reference 00aa 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00ab 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 00ac 01d5 | | Execute Vector,Field_Reference 00ad 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00ae e7fe | | Load 0x3,-0x2 00af 016f | o | Execute Variant_Record,Equal 00b0 6819 |h | Jump_Zero 0xca 00b1 e21a | | Load 0x1,0x1a ; Debug Table 0x4.0x4 = 0xb1,0x5 00b2 0217 | | Execute Heap_Access,All_Reference 00b3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00b5 a21b | | Store_Unchecked 0x1,0x1b 00b6 e7fb | | Load 0x3,-0x5 ; Debug Table 0x4.0x5 = 0xb6,0x6 00b7 e21b | | Load 0x1,0x1b 00b8 e21a | | Load 0x1,0x1a 00b9 0217 | | Execute Heap_Access,All_Reference 00ba 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00bb 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 00bc 01d5 | | Execute Vector,Field_Reference 00bd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00be e7fc | | Load 0x3,-0x4 ; Debug Table 0x4.0x6 = 0xbe,0x7 00bf 0e01 | | Execute_Immediate Not_Equal,0x1 00c0 6808 |h | Jump_Zero 0xc9 00c1 e7fc | | Load 0x3,-0x4 ; Debug Table 0x4.0x7 = 0xc1,0x8 00c2 e21b | | Load 0x1,0x1b 00c3 e21a | | Load 0x1,0x1a 00c4 0217 | | Execute Heap_Access,All_Reference 00c5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00c6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 00c7 01d5 | | Execute Vector,Field_Reference 00c8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00c9 4100 |A | End_Rendezvous 0x0 00ca e21a | | Load 0x1,0x1a ; Debug Table 0x4.0x8 = 0xca,0x9 00cb 0217 | | Execute Heap_Access,All_Reference 00cc 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00cd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ce 0a01 | | Execute_Immediate Plus,0x1 00cf 0248 | H | Execute Discrete,Check_In_Integer 00d0 480b |H | Short_Literal 0xb 00d1 026e | n | Execute Discrete,Modulo 00d2 c21b | | Store 0x1,0x1b 00d3 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x9 = 0xd3,0xa 00d4 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00d5 0322 | " | Declare_Variable Record 00d6 00d8 | | Load_Top At_Offset_0 00d7 1c01 | | Execute_Immediate Run_Utility,0x1 00d8 e7fe | | Load 0x3,-0x2 00d9 00d9 | | Load_Top At_Offset_1 00da 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00db e7fc | | Load 0x3,-0x4 00dc 00d9 | | Load_Top At_Offset_1 00dd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00de e7fb | | Load 0x3,-0x5 00df e004 | | Load 0x0,0x4 00e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e1 0119 | | Execute Any,Check_In_Formal_Type 00e2 00d9 | | Load_Top At_Offset_1 00e3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00e4 e21b | | Load 0x1,0x1b 00e5 e21a | | Load 0x1,0x1a 00e6 0217 | | Execute Heap_Access,All_Reference 00e7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00e8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 00e9 01d6 | | Execute Vector,Field_Write 00ea e21a | | Load 0x1,0x1a ; Debug Table 0x4.0xa = 0xea,0xb 00eb 0217 | | Execute Heap_Access,All_Reference 00ec 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00ed 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ee 0d0b | | Execute_Immediate Less,0xb 00ef 6809 |h | Jump_Zero 0xf9 00f0 e21a | | Load 0x1,0x1a ; Debug Table 0x4.0xb = 0xf0,0xc 00f1 0217 | | Execute Heap_Access,All_Reference 00f2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00f4 0a01 | | Execute_Immediate Plus,0x1 00f5 e21a | | Load 0x1,0x1a 00f6 0217 | | Execute Heap_Access,All_Reference 00f7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00f8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00f9 e21b | | Load 0x1,0x1b ; Debug Table 0x4.0xc = 0xf9,0xd 00fa e21a | | Load 0x1,0x1a 00fb 0217 | | Execute Heap_Access,All_Reference 00fc 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00fd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00fe 4100 |A | End_Rendezvous 0x0 00ff 0000 | | .XXX[0x1] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; See instruction 0x02cf at 0x73, index=0xf 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5 = .DEBUG 0x0103,0x027e,0x0003,0x0000,0x0056,0xdd55,0x0000,0x01ef ; Debug Table 0x5.0x0 = 0x103,0x1 0104 e21a | | Load 0x1,0x1a 0105 e7fe | | Load 0x3,-0x2 0106 e216 | | Load 0x1,0x16 0107 e213 | | Load 0x1,0x13 0108 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0109 c21a | | Store 0x1,0x1a 010a c219 | | Store 0x1,0x19 010b e219 | | Load 0x1,0x19 ; Debug Table 0x5.0x1 = 0x10b,0x2 010c 6845 |hE | Jump_Zero 0x152 010d e21a | | Load 0x1,0x1a ; Debug Table 0x5.0x2 = 0x10d,0x3 010e 0217 | | Execute Heap_Access,All_Reference 010f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0110 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0111 e7fc | | Load 0x3,-0x4 0112 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0113 e21a | | Load 0x1,0x1a ; Debug Table 0x5.0x3 = 0x113,0x4 0114 0217 | | Execute Heap_Access,All_Reference 0115 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0116 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0117 a21b | | Store_Unchecked 0x1,0x1b 0118 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x4 = 0x118,0x5 0119 a21c | | Store_Unchecked 0x1,0x1c 011a 00cf | | Action Mark_Auxiliary 011b e21b | | Load 0x1,0x1b ; Debug Table 0x5.0x5 = 0x11b,0x6 011c 0a0b | | Execute_Immediate Plus,0xb 011d 0248 | H | Execute Discrete,Check_In_Integer 011e e21a | | Load 0x1,0x1a 011f 0217 | | Execute Heap_Access,All_Reference 0120 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0121 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0122 0272 | r | Execute Discrete,Minus 0123 0a01 | | Execute_Immediate Plus,0x1 0124 0248 | H | Execute Discrete,Check_In_Integer 0125 e21b | | Load 0x1,0x1b 0126 0a0b | | Execute_Immediate Plus,0xb 0127 0248 | H | Execute Discrete,Check_In_Integer 0128 0264 | d | Execute Discrete,Below_Bound 0129 7015 |p | Jump_Nonzero 0x13f 012a e7fd | | Load 0x3,-0x3 ; Debug Table 0x5.0x6 = 0x12a,0x7 012b 00d9 | | Load_Top At_Offset_1 012c 480b |H | Short_Literal 0xb 012d 026e | n | Execute Discrete,Modulo 012e e21a | | Load 0x1,0x1a 012f 0217 | | Execute Heap_Access,All_Reference 0130 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0131 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0132 01d5 | | Execute Vector,Field_Reference 0133 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0134 8214 | | Call 0x1,0x14 0135 6802 |h | Jump_Zero 0x138 0136 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x5.0x7 = 0x136,0x8 0137 7807 |x | Jump 0x13f 0138 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x8 = 0x138,0x9 0139 c21b | | Store 0x1,0x1b 013a e21c | | Load 0x1,0x1c ; Debug Table 0x5.0x9 = 0x13a,0xa 013b 0a01 | | Execute_Immediate Plus,0x1 013c c21c | | Store 0x1,0x1c 013d 00c8 | | Action Pop_Auxiliary_Range 013e 37eb |7 | Loop_Decreasing 0x12a 013f 00ce | | Action Pop_Auxiliary 0140 e21c | | Load 0x1,0x1c ; Debug Table 0x5.0xa = 0x140,0xb 0141 0c0b | | Execute_Immediate Greater_Equal,0xb 0142 6807 |h | Jump_Zero 0x14a 0143 6088 |` | Indirect_Literal Discrete,0x1cc,{0x00000000, 0x7fffffff} ; Debug Table 0x5.0xb = 0x143,0xc 0144 e7fc | | Load 0x3,-0x4 0145 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0146 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xc = 0x146,0xd 0147 e7fc | | Load 0x3,-0x4 0148 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0149 4101 |A | End_Rendezvous 0x1 014a e21c | | Load 0x1,0x1c ; Debug Table 0x5.0xd = 0x14a,0xe 014b e7fc | | Load 0x3,-0x4 014c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 014d e21b | | Load 0x1,0x1b ; Debug Table 0x5.0xe = 0x14d,0xf 014e 480b |H | Short_Literal 0xb 014f 026e | n | Execute Discrete,Modulo 0150 e7fc | | Load 0x3,-0x4 0151 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0152 4101 |A | End_Rendezvous 0x1 0153 0000 0000 | | .BLANK 0000[0x5] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; See instruction 0x02cf at 0x73, index=0xe 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6 = .DEBUG 0x015b,0x029e,0x0003,0x0000,0x0056,0xdd55,0x0000,0x0154 ; Debug Table 0x6.0x0 = 0x15b,0x1 015c e21a | | Load 0x1,0x1a 015d e7fe | | Load 0x3,-0x2 015e e216 | | Load 0x1,0x16 015f e213 | | Load 0x1,0x13 0160 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0161 c21a | | Store 0x1,0x1a 0162 c219 | | Store 0x1,0x19 0163 e219 | | Load 0x1,0x19 ; Debug Table 0x6.0x1 = 0x163,0x2 0164 7001 |p | Jump_Nonzero 0x166 0165 4100 |A | End_Rendezvous 0x0 ; Debug Table 0x6.0x2 = 0x165,0x3 0166 e21a | | Load 0x1,0x1a ; Debug Table 0x6.0x3 = 0x166,0x4 0167 0217 | | Execute Heap_Access,All_Reference 0168 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0169 0d02 | | Execute_Immediate Less,0x2 016a 680b |h | Jump_Zero 0x176 016b 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x4 = 0x16b,0x5 016c e216 | | Load 0x1,0x16 016d e213 | | Load 0x1,0x13 016e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 016f e218 | | Load 0x1,0x18 ; Debug Table 0x6.0x5 = 0x16f,0x6 0170 e21a | | Load 0x1,0x1a 0171 0217 | | Execute Heap_Access,All_Reference 0172 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0173 e21a | | Load 0x1,0x1a ; Debug Table 0x6.0x6 = 0x173,0x7 0174 a218 | | Store_Unchecked 0x1,0x18 0175 4100 |A | End_Rendezvous 0x0 0176 e21a | | Load 0x1,0x1a ; Debug Table 0x6.0x7 = 0x176,0x8 0177 0217 | | Execute Heap_Access,All_Reference 0178 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0179 0aff | | Execute_Immediate Plus,-0x1 017a e21a | | Load 0x1,0x1a 017b 0217 | | Execute Heap_Access,All_Reference 017c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 017d 4100 |A | End_Rendezvous 0x0 017e 0000 0000 | | .XXX[0x2] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; See instruction 0x02cf at 0x73, index=0xd 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 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7 = .DEBUG 0x0183,0x02b0,0x0003,0x0000,0x0056,0xdd55,0x0000,0x0112 ; Debug Table 0x7.0x0 = 0x183,0x1 0184 e21a | | Load 0x1,0x1a 0185 e7fe | | Load 0x3,-0x2 0186 e216 | | Load 0x1,0x16 0187 e213 | | Load 0x1,0x13 0188 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0189 c21a | | Store 0x1,0x1a 018a c219 | | Store 0x1,0x19 018b e219 | | Load 0x1,0x19 ; Debug Table 0x7.0x1 = 0x18b,0x2 018c 6808 |h | Jump_Zero 0x195 018d e21a | | Load 0x1,0x1a ; Debug Table 0x7.0x2 = 0x18d,0x3 018e 0217 | | Execute Heap_Access,All_Reference 018f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0190 0a01 | | Execute_Immediate Plus,0x1 0191 e21a | | Load 0x1,0x1a 0192 0217 | | Execute Heap_Access,All_Reference 0193 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0194 4100 |A | End_Rendezvous 0x0 0195 e218 | | Load 0x1,0x18 ; Debug Table 0x7.0x3 = 0x195,0x4 0196 681c |h | Jump_Zero 0x1b3 0197 e218 | | Load 0x1,0x18 ; Debug Table 0x7.0x4 = 0x197,0x5 0198 a21a | | Store_Unchecked 0x1,0x1a 0199 e218 | | Load 0x1,0x18 ; Debug Table 0x7.0x5 = 0x199,0x6 019a 0217 | | Execute Heap_Access,All_Reference 019b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 019c a218 | | Store_Unchecked 0x1,0x18 019d e211 | | Load 0x1,0x11 ; Debug Table 0x7.0x6 = 0x19d,0x7 019e 0322 | " | Declare_Variable Record 019f 00d8 | | Load_Top At_Offset_0 01a0 1c01 | | Execute_Immediate Run_Utility,0x1 01a1 4801 |H | Short_Literal 0x1 01a2 00d9 | | Load_Top At_Offset_1 01a3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01a4 8007 | | Call 0x0,0x7 01a5 00d9 | | Load_Top At_Offset_1 01a6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01a7 e212 | | Load 0x1,0x12 01a8 00d9 | | Load_Top At_Offset_1 01a9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01aa e21a | | Load 0x1,0x1a 01ab 0218 | | Execute Heap_Access,All_Write 01ac 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x7 = 0x1ac,0x8 01ad e21a | | Load 0x1,0x1a 01ae e7fe | | Load 0x3,-0x2 01af e216 | | Load 0x1,0x16 01b0 e213 | | Load 0x1,0x13 01b1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01b2 4100 |A | End_Rendezvous 0x0 01b3 e211 | | Load 0x1,0x11 ; Debug Table 0x7.0x8 = 0x1b3,0x9 01b4 0322 | " | Declare_Variable Record 01b5 00d8 | | Load_Top At_Offset_0 01b6 1c01 | | Execute_Immediate Run_Utility,0x1 01b7 4801 |H | Short_Literal 0x1 01b8 00d9 | | Load_Top At_Offset_1 01b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01ba 8007 | | Call 0x0,0x7 01bb 00d9 | | Load_Top At_Offset_1 01bc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01bd e212 | | Load 0x1,0x12 01be 00d9 | | Load_Top At_Offset_1 01bf 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01c0 e212 | | Load 0x1,0x12 01c1 e217 | | Load 0x1,0x17 01c2 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 01c3 a21a | | Store_Unchecked 0x1,0x1a 01c4 0007 | | Action Break_Optional ; Debug Table 0x7.0x9 = 0x1c4,0xa 01c5 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0xa = 0x1c5,0xb 01c6 e21a | | Load 0x1,0x1a 01c7 e7fe | | Load 0x3,-0x2 01c8 e216 | | Load 0x1,0x16 01c9 e213 | | Load 0x1,0x13 01ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01cb 4100 |A | End_Rendezvous 0x0 01cc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 01d0 0000 0000 | | .LITERAL {0x00000000, 0x0056dd55} 01d4 ; -------------------------------------------------------------------------------------- 01d4 ; STRING TABLE 01d4 ; -------------------------------------------------------------------------------------- 01d4 0004 | | .STRTAB 0x0004->0x01d6 ; "Image_Database_Manager" 01d5 0018 | | .STREND 0x0018->0x01e1 01d6 496d 6167 |Imag| .STRTAB_STRINGS 01e1 0000 0000 | | .BLANK 0000[0x7] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; Debug Table 01e8 ; -------------------------------------------------------------------------------------- 01e8 0003 0008 | | .CONST 0x0003,0x0008 01ea 000b 022a | *| .DEBUG 0x000b,0x022a,0x0000,0x0000,0x0056,0xdd45,0x0000,0x0027 01f2 0014 022c | ,| .DEBUG 0x0014,0x022c,0x0000,0x0000,0x0056,0xdd55,0x0000,0x000c 01fa 005b 0258 | [ X| .DEBUG 0x005b,0x0258,0x0005,0x0000,0x0056,0xdd55,0x0000,0x001a 0202 0073 025a | s Z| .DEBUG 0x0073,0x025a,0x0004,0x0000,0x0056,0xdd55,0x0000,0x02be 020a 0093 0262 | b| .DEBUG 0x0093,0x0262,0x0003,0x0000,0x0056,0xdd55,0x0000,0x02a6 0212 0103 027e | ~| .DEBUG 0x0103,0x027e,0x0003,0x0000,0x0056,0xdd55,0x0000,0x01ef 021a 015b 029e | [ | .DEBUG 0x015b,0x029e,0x0003,0x0000,0x0056,0xdd55,0x0000,0x0154 0222 0183 02b0 | | .DEBUG 0x0183,0x02b0,0x0003,0x0000,0x0056,0xdd55,0x0000,0x0112 022a ; -------------------------------------------------------------------------------------- 022a ; Debug3 Subtable 0x0 022a ; -------------------------------------------------------------------------------------- 022a 0000 0000 | | .DBG3TAB 0x0000,0x0000 022c ; -------------------------------------------------------------------------------------- 022c ; Debug3 Subtable 0x1 022c ; -------------------------------------------------------------------------------------- 022c 0010 0005 | | .DBG3TAB 0x0010,0x0005 022e 0014 ffff | | .CONST 0x0014,0xffff 0230 0016 fffe | | .CONST 0x0016,0xfffe 0232 0019 fffd | | .CONST 0x0019,0xfffd 0234 001a fffc | | .CONST 0x001a,0xfffc 0236 0022 fffb | " | .CONST 0x0022,0xfffb 0238 002e fffa | . | .CONST 0x002e,0xfffa 023a 002f fff9 | / | .CONST 0x002f,0xfff9 023c 0032 fff8 | 2 | .CONST 0x0032,0xfff8 023e 0034 fff7 | 4 | .CONST 0x0034,0xfff7 0240 0036 fff6 | 6 | .CONST 0x0036,0xfff6 0242 0037 fff5 | 7 | .CONST 0x0037,0xfff5 0244 0039 fff4 | 9 | .CONST 0x0039,0xfff4 0246 003a fff3 | : | .CONST 0x003a,0xfff3 0248 003b fff2 | ; | .CONST 0x003b,0xfff2 024a 003d fff1 | = | .CONST 0x003d,0xfff1 024c 003e fff0 | > | .CONST 0x003e,0xfff0 024e 0042 0001 | B | .CONST 0x0042,0x0001 0250 0046 0002 | F | .CONST 0x0046,0x0002 0252 004b 0003 | K | .CONST 0x004b,0x0003 0254 0052 0004 | R | .CONST 0x0052,0x0004 0256 0053 0005 | S | .CONST 0x0053,0x0005 0258 ; -------------------------------------------------------------------------------------- 0258 ; Debug3 Subtable 0x2 0258 ; -------------------------------------------------------------------------------------- 0258 0000 0000 | | .DBG3TAB 0x0000,0x0000 025a ; -------------------------------------------------------------------------------------- 025a ; Debug3 Subtable 0x3 025a ; -------------------------------------------------------------------------------------- 025a 0000 0003 | | .DBG3TAB 0x0000,0x0003 025c 0081 0001 | | .CONST 0x0081,0x0001 025e 0082 0002 | | .CONST 0x0082,0x0002 0260 0088 0007 | | .CONST 0x0088,0x0007 0262 ; -------------------------------------------------------------------------------------- 0262 ; Debug3 Subtable 0x4 0262 ; -------------------------------------------------------------------------------------- 0262 0000 000d | | .DBG3TAB 0x0000,0x000d 0264 0093 0001 | | .CONST 0x0093,0x0001 0266 009b 0002 | | .CONST 0x009b,0x0002 0268 009d 0003 | | .CONST 0x009d,0x0003 026a 009e 0004 | | .CONST 0x009e,0x0004 026c 00b1 0005 | | .CONST 0x00b1,0x0005 026e 00b6 0006 | | .CONST 0x00b6,0x0006 0270 00be 0007 | | .CONST 0x00be,0x0007 0272 00c1 0008 | | .CONST 0x00c1,0x0008 0274 00ca 0009 | | .CONST 0x00ca,0x0009 0276 00d3 000a | | .CONST 0x00d3,0x000a 0278 00ea 000b | | .CONST 0x00ea,0x000b 027a 00f0 000c | | .CONST 0x00f0,0x000c 027c 00f9 000d | | .CONST 0x00f9,0x000d 027e ; -------------------------------------------------------------------------------------- 027e ; Debug3 Subtable 0x5 027e ; -------------------------------------------------------------------------------------- 027e 0000 000f | | .DBG3TAB 0x0000,0x000f 0280 0103 0001 | | .CONST 0x0103,0x0001 0282 010b 0002 | | .CONST 0x010b,0x0002 0284 010d 0003 | | .CONST 0x010d,0x0003 0286 0113 0004 | | .CONST 0x0113,0x0004 0288 0118 0005 | | .CONST 0x0118,0x0005 028a 011b 0006 | | .CONST 0x011b,0x0006 028c 012a 0007 | * | .CONST 0x012a,0x0007 028e 0136 0008 | 6 | .CONST 0x0136,0x0008 0290 0138 0009 | 8 | .CONST 0x0138,0x0009 0292 013a 000a | : | .CONST 0x013a,0x000a 0294 0140 000b | @ | .CONST 0x0140,0x000b 0296 0143 000c | C | .CONST 0x0143,0x000c 0298 0146 000d | F | .CONST 0x0146,0x000d 029a 014a 000e | J | .CONST 0x014a,0x000e 029c 014d 000f | M | .CONST 0x014d,0x000f 029e ; -------------------------------------------------------------------------------------- 029e ; Debug3 Subtable 0x6 029e ; -------------------------------------------------------------------------------------- 029e 0000 0008 | | .DBG3TAB 0x0000,0x0008 02a0 015b 0001 | [ | .CONST 0x015b,0x0001 02a2 0163 0002 | c | .CONST 0x0163,0x0002 02a4 0165 0003 | e | .CONST 0x0165,0x0003 02a6 0166 0004 | f | .CONST 0x0166,0x0004 02a8 016b 0005 | k | .CONST 0x016b,0x0005 02aa 016f 0006 | o | .CONST 0x016f,0x0006 02ac 0173 0007 | s | .CONST 0x0173,0x0007 02ae 0176 0008 | v | .CONST 0x0176,0x0008 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; Debug3 Subtable 0x7 02b0 ; -------------------------------------------------------------------------------------- 02b0 0000 000b | | .DBG3TAB 0x0000,0x000b 02b2 0183 0001 | | .CONST 0x0183,0x0001 02b4 018b 0002 | | .CONST 0x018b,0x0002 02b6 018d 0003 | | .CONST 0x018d,0x0003 02b8 0195 0004 | | .CONST 0x0195,0x0004 02ba 0197 0005 | | .CONST 0x0197,0x0005 02bc 0199 0006 | | .CONST 0x0199,0x0006 02be 019d 0007 | | .CONST 0x019d,0x0007 02c0 01ac 0008 | | .CONST 0x01ac,0x0008 02c2 01b3 0009 | | .CONST 0x01b3,0x0009 02c4 01c4 000a | | .CONST 0x01c4,0x000a 02c6 01c5 000b | | .CONST 0x01c5,0x000b 02c8 0000 0000 | | .BLANK 0000[0x138]