|
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: 9216 (0x2400) 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 0bb0 | | .CONST 0x0bb0 ; 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 0008 | | .CONST 0x0008 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0014 | | .CONST 0x0014 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0019 | | .CONST 0x0019 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0d0a,0x4000,0x0000,0x0057,0x3ff5,0x0000,0x03d0 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 00bf | | Action Accept_Activation 0010 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1 = .DEBUG 0x0010,0x0d10,0x4000,0x0000,0x0058,0xc8e5,0x0000,0x000c ; Debug Table 0x1.0x0 = 0x10,0xffff 0011 00c7 | | Action Elaborate_Subprogram 0012 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x1 = 0x12,0xfffe 0013 00c7 | | Action Elaborate_Subprogram 0014 BODY_0008: 0014 00bc | | Action Signal_Activated 0015 00bb | | Action Signal_Completion 0016 0000 0000 | | .XXX[0x2] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 00db | | Load_Top At_Offset_3 ; Debug Table 0x2 = .DEBUG 0x001b,0x0d16,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0427 ; Debug Table 0x2.0x0 = 0x1b,0x1 001c 0120 | | Execute Any,Is_Value 001d 6803 |h | Jump_Zero 0x21 001e e001 | | Load 0x0,0x1 001f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0020 7801 |x | Jump 0x22 0021 00db | | Load_Top At_Offset_3 0022 00e1 | | Load_Encached Boolean_Cache 0023 e002 | | Load 0x0,0x2 0024 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0025 8219 | | Call 0x1,0x19 0026 c5ff | | Store 0x2,-0x1 0027 c5fe | | Store 0x2,-0x2 0028 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0029 0000 0000 | | .BLANK 0000[0x7] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 00be | | .CONST 0x00be ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0029 | ) | .CONST 0x0029 ; Number of locals 0033 INIT_0030: 0033 029e 00cb | | Declare_Subprogram INIT_00c8,For_Call,Unelaborated ; Debug Table 0x3 = .DEBUG 0x0033,0x0d1a,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0435 ; Debug Table 0x3.0x0 = 0x33,0xffff 0035 630e |c | Indirect_Literal Discrete,0x344,{0x00000000, 0x0058c985} ; Debug Table 0x3.0x1 = 0x35,0xfffe 0036 4831 |H1 | Short_Literal 0x31 0037 4865 |He | Short_Literal 0x65 0038 e003 | | Load 0x0,0x3 0039 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003a 00e4 | | Load_Encached Positive_Cache 003b 4802 |H | Short_Literal 0x2 003c 4802 |H | Short_Literal 0x2 003d 0099 | | Action Reference_Dynamic 003e e004 | | Load 0x0,0x4 003f 0387 | | Declare_Variable Package 0040 00d8 | | Load_Top At_Offset_0 0041 020f | | Execute Module,Activate 0042 0007 | | Action Break_Optional ; Debug Table 0x3.0x2 = 0x42,0xfffd 0043 029e 00db | | Declare_Subprogram INIT_00d8,For_Call,Unelaborated ; Debug Table 0x3.0x3 = 0x43,0xfffc 0045 62fe |b | Indirect_Literal Discrete,0x344,{0x00000000, 0x0058c985} ; Debug Table 0x3.0x4 = 0x45,0xfffb 0046 4851 |HQ | Short_Literal 0x51 0047 4865 |He | Short_Literal 0x65 0048 00e4 | | Load_Encached Positive_Cache 0049 e003 | | Load 0x0,0x3 004a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004b 4804 |H | Short_Literal 0x4 004c 4802 |H | Short_Literal 0x2 004d 0099 | | Action Reference_Dynamic 004e e004 | | Load 0x0,0x4 004f 0387 | | Declare_Variable Package 0050 00d8 | | Load_Top At_Offset_0 0051 020f | | Execute Module,Activate 0052 0007 | | Action Break_Optional ; Debug Table 0x3.0x5 = 0x52,0xfffa 0053 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x6 = 0x53,0xfff9 0054 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0055 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x7 = 0x55,0xfff8 0056 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0057 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x3.0x8 = 0x57,0xfff7 0058 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0059 e005 | | Load 0x0,0x5 ; Debug Table 0x3.0x9 = 0x59,0xfff6 005a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 005b 02c7 | | Declare_Variable Any 005c e005 | | Load 0x0,0x5 005d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 005e c409 | | Store 0x2,0x9 005f 62e4 |b | Indirect_Literal Discrete,0x344,{0x00000000, 0x0058c985} ; Debug Table 0x3.0xa = 0x5f,0xfff5 0060 4886 |H | Short_Literal 0x86 0061 e006 | | Load 0x0,0x6 0062 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0063 e007 | | Load 0x0,0x7 0064 0387 | | Declare_Variable Package 0065 00d8 | | Load_Top At_Offset_0 0066 020f | | Execute Module,Activate 0067 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xb = 0x67,0xfff4 0068 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0069 4802 |H | Short_Literal 0x2 ; Debug Table 0x3.0xc = 0x69,0xfff3 006a 4802 |H | Short_Literal 0x2 006b 0099 | | Action Reference_Dynamic 006c 00c7 | | Action Elaborate_Subprogram 006d 4804 |H | Short_Literal 0x4 ; Debug Table 0x3.0xd = 0x6d,0xfff2 006e 4802 |H | Short_Literal 0x2 006f 0099 | | Action Reference_Dynamic 0070 00c7 | | Action Elaborate_Subprogram 0071 029f 00e3 | | Declare_Subprogram INIT_00e0,For_Call ; Debug Table 0x3.0xe = 0x71,0xfff1 0073 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call ; Debug Table 0x3.0xf = 0x73,0xfff0 0075 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call ; Debug Table 0x3.0x10 = 0x75,0xffef 0077 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call ; Debug Table 0x3.0x11 = 0x77,0xffee 0079 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call ; Debug Table 0x3.0x12 = 0x79,0xffed 007b 029f 020b | | Declare_Subprogram INIT_0208,For_Call ; Debug Table 0x3.0x13 = 0x7b,0xffec 007d 029f 021b | | Declare_Subprogram INIT_0218,For_Call ; Debug Table 0x3.0x14 = 0x7d,0xffeb 007f 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call ; Debug Table 0x3.0x15 = 0x7f,0xffea 0081 029f 028b | | Declare_Subprogram INIT_0288,For_Call ; Debug Table 0x3.0x16 = 0x81,0xffe9 0083 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call ; Debug Table 0x3.0x17 = 0x83,0xffe8 0085 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call ; Debug Table 0x3.0x18 = 0x85,0xffe7 0087 029e 02d3 | | Declare_Subprogram INIT_02d0,For_Call,Unelaborated ; Debug Table 0x3.0x19 = 0x87,0xffe6 0089 029f 034b | K| Declare_Subprogram INIT_0348,For_Call ; Debug Table 0x3.0x1a = 0x89,0xffe5 008b 029f 0363 | c| Declare_Subprogram INIT_0360,For_Call ; Debug Table 0x3.0x1b = 0x8b,0xffe4 008d 029f 0373 | s| Declare_Subprogram INIT_0370,For_Call ; Debug Table 0x3.0x1c = 0x8d,0xffe3 008f 62b4 |b | Indirect_Literal Discrete,0x344,{0x00000000, 0x0058c985} ; Debug Table 0x3.0x1d = 0x8f,0xffe2 0090 62af |b | Indirect_Literal Discrete,0x340,{0x00000000, 0x000004f3} 0091 4865 |He | Short_Literal 0x65 0092 e006 | | Load 0x0,0x6 0093 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0094 e008 | | Load 0x0,0x8 0095 481a |H | Short_Literal 0x1a 0096 4802 |H | Short_Literal 0x2 0097 0099 | | Action Reference_Dynamic 0098 e004 | | Load 0x0,0x4 0099 0387 | | Declare_Variable Package 009a 00d8 | | Load_Top At_Offset_0 009b 020f | | Execute Module,Activate 009c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1e = 0x9c,0xffe1 009d 1b13 | | Execute Package,Field_Read,Field_Number 0x13 009e 0007 | | Action Break_Optional ; Debug Table 0x3.0x1f = 0x9e,0xffe0 009f 029f 0383 | | Declare_Subprogram INIT_0380,For_Call ; Debug Table 0x3.0x20 = 0x9f,0xffdf 00a1 481d |H | Short_Literal 0x1d ; Debug Table 0x3.0x21 = 0xa1,0xffde 00a2 4802 |H | Short_Literal 0x2 00a3 0099 | | Action Reference_Dynamic 00a4 029f 0433 | 3| Declare_Subprogram INIT_0430,For_Call ; Debug Table 0x3.0x22 = 0xa4,0xffdd 00a6 029f 0473 | s| Declare_Subprogram INIT_0470,For_Call ; Debug Table 0x3.0x23 = 0xa6,0xffdc 00a8 029f 04db | | Declare_Subprogram INIT_04d8,For_Call ; Debug Table 0x3.0x24 = 0xa8,0xffdb 00aa 029f 04f3 | | Declare_Subprogram INIT_04f0,For_Call ; Debug Table 0x3.0x25 = 0xaa,0xffda 00ac 029f 05a3 | | Declare_Subprogram INIT_05a0,For_Call ; Debug Table 0x3.0x26 = 0xac,0xffd9 00ae 029f 068b | | Declare_Subprogram INIT_0688,For_Call ; Debug Table 0x3.0x27 = 0xae,0xffd8 00b0 029f 069b | | Declare_Subprogram INIT_0698,For_Call ; Debug Table 0x3.0x28 = 0xb0,0xffd7 00b2 029f 06bb | | Declare_Subprogram INIT_06b8,For_Call ; Debug Table 0x3.0x29 = 0xb2,0xffd6 00b4 4817 |H | Short_Literal 0x17 ; Debug Table 0x3.0x2a = 0xb4,0xffd5 00b5 4802 |H | Short_Literal 0x2 00b6 0099 | | Action Reference_Dynamic 00b7 00c7 | | Action Elaborate_Subprogram 00b8 029f 06d3 | | Declare_Subprogram INIT_06d0,For_Call ; Debug Table 0x3.0x2b = 0xb8,0xffd4 00ba 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call ; Debug Table 0x3.0x2c = 0xba,0xffd3 00bc 029f 072b | +| Declare_Subprogram INIT_0728,For_Call ; Debug Table 0x3.0x2d = 0xbc,0xffd2 00be BODY_0030: 00be e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x2e = 0xbe,0x1 00bf 8429 | ) | Call 0x2,0x29 00c0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00c1 0000 0000 | | .BLANK 0000[0x7] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x00cb,0x0d7a,0x1002,0x0000,0x0058,0xc985,0x0000,0x0026 ; Debug Table 0x4.0x0 = 0xcb,0x1 00cc e009 | | Load 0x0,0x9 00cd 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 00ce 626d |bm | Indirect_Literal Discrete,0x33c,{0x00000000, 0x7fffffff} 00cf 0a01 | | Execute_Immediate Plus,0x1 00d0 026e | n | Execute Discrete,Modulo 00d1 0248 | H | Execute Discrete,Check_In_Integer 00d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00d3 0000 0000 | | .BLANK 0000[0x5] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x00db,0x0d7e,0x1002,0x0000,0x0058,0xc985,0x0000,0x0048 ; Debug Table 0x5.0x0 = 0xdb,0x1 00dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00dd 0000 0000 | | .XXX[0x3] 00df 0000 | | 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00f5 | | .CONST 0x00f5 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0004 | | .CONST 0x0004 ; Number of locals 00e3 INIT_00e0: 00e3 e005 | | Load 0x0,0x5 ; Debug Table 0x6 = .DEBUG 0x00e3,0x0d82,0x1001,0x0000,0x0058,0xc985,0x0000,0x00ce ; Debug Table 0x6.0x0 = 0xe3,0xffff 00e4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 00e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00e6 02c7 | | Declare_Variable Any 00e7 00d8 | | Load_Top At_Offset_0 00e8 1c00 | | Execute_Immediate Run_Utility,0x0 00e9 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x1 = 0xe9,0xfffe 00ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00eb e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x2 = 0xeb,0xfffd 00ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ed 02c7 | | Declare_Variable Any 00ee e7ff | | Load 0x3,-0x1 00ef 0217 | | Execute Heap_Access,All_Reference 00f0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00f1 e005 | | Load 0x0,0x5 00f2 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 00f3 180e | | Execute Package,Field_Execute,Field_Number 0xe 00f4 c604 | | Store 0x3,0x4 00f5 BODY_00e0: 00f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x3 = 0xf5,0x1 00f6 e005 | | Load 0x0,0x5 00f7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00f8 682a |h* | Jump_Zero 0x123 00f9 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x4 = 0xf9,0x2 00fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00fb 00d9 | | Load_Top At_Offset_1 00fc 0120 | | Execute Any,Is_Value 00fd 6803 |h | Jump_Zero 0x101 00fe e005 | | Load 0x0,0x5 00ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0100 7801 |x | Jump 0x102 0101 00d9 | | Load_Top At_Offset_1 0102 6235 |b5 | Indirect_Literal Discrete,0x338,{0x00000000, 0x00004000} 0103 e002 | | Load 0x0,0x2 0104 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0105 e7ff | | Load 0x3,-0x1 0106 e009 | | Load 0x0,0x9 0107 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0108 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0109 e005 | | Load 0x0,0x5 010a 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 010b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 010c c604 | | Store 0x3,0x4 010d 005a | Z | Store_Top Discrete,At_Offset_2 010e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x5 = 0x10e,0x3 010f 680d |h | Jump_Zero 0x11d 0110 e7ff | | Load 0x3,-0x1 ; Debug Table 0x6.0x6 = 0x110,0x4 0111 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " 0113 00db | | Load_Top At_Offset_3 0114 e005 | | Load 0x0,0x5 0115 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0116 025e | ^ | Execute Discrete,Convert 0117 1c01 | | Execute_Immediate Run_Utility,0x1 0118 01cc | | Execute Vector,Catenate 0119 0092 0a19 | | Action Push_String_Extended,0xa19 ; " getting directory object for archive of unit" 011b 01cc | | Execute Vector,Catenate 011c 800a | | Call 0x0,0xa 011d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x7 = 0x11d,0x5 011e e005 | | Load 0x0,0x5 011f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0120 6802 |h | Jump_Zero 0x123 0121 4887 |H | Short_Literal 0x87 0122 0257 | W | Execute Discrete,Raise 0123 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x8 = 0x123,0x6 0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0125 00db | | Load_Top At_Offset_3 0126 0120 | | Execute Any,Is_Value 0127 6804 |h | Jump_Zero 0x12c 0128 e005 | | Load 0x0,0x5 0129 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 012a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 012b 7801 |x | Jump 0x12d 012c 00db | | Load_Top At_Offset_3 012d 00da | | Load_Top At_Offset_2 012e e005 | | Load 0x0,0x5 012f 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0130 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0131 c602 | | Store 0x3,0x2 0132 005a | Z | Store_Top Discrete,At_Offset_2 0133 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x9 = 0x133,0x7 0134 680d |h | Jump_Zero 0x142 0135 e7ff | | Load 0x3,-0x1 ; Debug Table 0x6.0xa = 0x135,0x8 0136 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " 0138 00db | | Load_Top At_Offset_3 0139 e005 | | Load 0x0,0x5 013a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 013b 025e | ^ | Execute Discrete,Convert 013c 1c01 | | Execute_Immediate Run_Utility,0x1 013d 01cc | | Execute Vector,Catenate 013e 0092 0a1a | | Action Push_String_Extended,0xa1a ; " getting enclosing world for unit" 0140 01cc | | Execute Vector,Catenate 0141 800a | | Call 0x0,0xa 0142 e409 | | Load 0x2,0x9 ; Debug Table 0x6.0xb = 0x142,0x9 0143 e005 | | Load 0x0,0x5 0144 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0145 680c |h | Jump_Zero 0x152 0146 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0xc = 0x146,0xa 0147 e005 | | Load 0x0,0x5 0148 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0149 1812 | | Execute Package,Field_Execute,Field_Number 0x12 014a c409 | | Store 0x2,0x9 014b e409 | | Load 0x2,0x9 ; Debug Table 0x6.0xd = 0x14b,0xb 014c e005 | | Load 0x0,0x5 014d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 014e 6802 |h | Jump_Zero 0x151 014f 4887 |H | Short_Literal 0x87 0150 0257 | W | Execute Discrete,Raise 0151 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0152 e409 | | Load 0x2,0x9 ; Debug Table 0x6.0xe = 0x152,0xc 0153 00db | | Load_Top At_Offset_3 0154 e005 | | Load 0x0,0x5 0155 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0156 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0157 012e | . | Execute Any,Not_Equal 0158 6803 |h | Jump_Zero 0x15c 0159 0092 0a1b | | Action Push_String_Extended,0xa1b ; "Units being saved are not all in one world" ; Debug Table 0x6.0xf = 0x159,0xd 015b 800b | | Call 0x0,0xb 015c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0169 | i | .CONST 0x0169 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0003 | | .CONST 0x0003 ; Number of locals 0163 INIT_0160: 0163 e003 | | Load 0x0,0x3 ; Debug Table 0x7 = .DEBUG 0x0163,0x0da4,0x1001,0x0000,0x0058,0xc985,0x0000,0x01a1 ; Debug Table 0x7.0x0 = 0x163,0xffff 0164 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0165 00db | | Load_Top At_Offset_3 0166 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0167 e009 | | Load 0x0,0x9 ; Debug Table 0x7.0x1 = 0x167,0xfffe 0168 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0169 BODY_0160: 0169 e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x2 = 0x169,0x1 016a 0217 | | Execute Heap_Access,All_Reference 016b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 016c e00c | | Load 0x0,0xc 016d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 016e 6803 |h | Jump_Zero 0x172 016f e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x3 = 0x16f,0x2 0170 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0171 7815 |x | Jump 0x187 0172 e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x4 = 0x172,0x3 0173 0217 | | Execute Heap_Access,All_Reference 0174 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0175 800d | | Call 0x0,0xd 0176 e009 | | Load 0x0,0x9 0177 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0178 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0179 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x5 = 0x179,0x4 017a e7ff | | Load 0x3,-0x1 017b 021e | | Execute Heap_Access,Maximum 017c 680a |h | Jump_Zero 0x187 017d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x6 = 0x17d,0x5 017e e009 | | Load 0x0,0x9 017f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0180 021f | | Execute Heap_Access,Equal 0181 7003 |p | Jump_Nonzero 0x185 0182 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x7 = 0x182,0x6 0183 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0184 7802 |x | Jump 0x187 0185 e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x8 = 0x185,0x7 0186 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0187 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x9 = 0x187,0x8 0188 00da | | Load_Top At_Offset_2 0189 021f | | Execute Heap_Access,Equal 018a 7002 |p | Jump_Nonzero 0x18d 018b 4887 |H | Short_Literal 0x87 018c 0257 | W | Execute Discrete,Raise 018d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xa = 0x18d,0x9 018e e009 | | Load 0x0,0x9 018f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0190 7008 |p | Jump_Nonzero 0x199 0191 00d8 | | Load_Top At_Offset_0 0192 e009 | | Load 0x0,0x9 0193 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0194 7004 |p | Jump_Nonzero 0x199 0195 00d8 | | Load_Top At_Offset_0 0196 e009 | | Load 0x0,0x9 0197 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0198 6804 |h | Jump_Zero 0x19d 0199 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xb = 0x199,0xa 019a 0092 0a1c | | Action Push_String_Extended,0xa1c ; "Unit to be saved is a body, subunit, or command unit" 019c 800e | | Call 0x0,0xe 019d e7fe | | Load 0x3,-0x2 ; Debug Table 0x7.0xc = 0x19d,0xb 019e 6802 |h | Jump_Zero 0x1a1 019f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0xd = 0x19f,0xc 01a0 840c | | Call 0x2,0xc 01a1 e408 | | Load 0x2,0x8 ; Debug Table 0x7.0xe = 0x1a1,0xd 01a2 0a01 | | Execute_Immediate Plus,0x1 01a3 c408 | | Store 0x2,0x8 01a4 e406 | | Load 0x2,0x6 ; Debug Table 0x7.0xf = 0x1a4,0xe 01a5 4801 |H | Short_Literal 0x1 01a6 e408 | | Load 0x2,0x8 01a7 00e4 | | Load_Encached Positive_Cache 01a8 025b | [ | Execute Discrete,Check_In_Type 01a9 e602 | | Load 0x3,0x2 01aa e403 | | Load 0x2,0x3 01ab 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01ac c406 | | Store 0x2,0x6 01ad e407 | | Load 0x2,0x7 ; Debug Table 0x7.0x10 = 0x1ad,0xf 01ae 4801 |H | Short_Literal 0x1 01af 00db | | Load_Top At_Offset_3 01b0 e408 | | Load 0x2,0x8 01b1 00e4 | | Load_Encached Positive_Cache 01b2 025b | [ | Execute Discrete,Check_In_Type 01b3 e405 | | Load 0x2,0x5 01b4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01b5 c407 | | Store 0x2,0x7 01b6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01b7 0000 | | .XXX[0x1] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb e217 | | Load 0x1,0x17 ; Debug Table 0x8 = .DEBUG 0x01bb,0x0dc8,0x1001,0x0000,0x0058,0xc985,0x0000,0x0249 ; Debug Table 0x8.0x0 = 0x1bb,0x1 01bc 4801 |H | Short_Literal 0x1 01bd e00f | | Load 0x0,0xf 01be 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01bf e010 | | Load 0x0,0x10 01c0 025b | [ | Execute Discrete,Check_In_Type 01c1 8011 | | Call 0x0,0x11 01c2 e009 | | Load 0x0,0x9 01c3 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 01c4 0261 | a | Execute Discrete,Not_In_Range 01c5 680a |h | Jump_Zero 0x1d0 01c6 0092 0a1d | | Action Push_String_Extended,0xa1d ; "Version" ; Debug Table 0x8.0x1 = 0x1c6,0x2 01c8 e217 | | Load 0x1,0x17 01c9 00e0 | | Load_Encached Standard_Cache 01ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01cb 01cc | | Execute Vector,Catenate 01cc 0092 0a1e | | Action Push_String_Extended,0xa1e ; " is not supported" 01ce 01cc | | Execute Vector,Catenate 01cf 800b | | Call 0x0,0xb 01d0 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x2 = 0x1d0,0x3 01d1 8012 | | Call 0x0,0x12 01d2 e405 | | Load 0x2,0x5 ; Debug Table 0x8.0x3 = 0x1d2,0x4 01d3 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01d4 4865 |He | Short_Literal 0x65 01d5 e405 | | Load 0x2,0x5 01d6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01d7 c407 | | Store 0x2,0x7 01d8 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x4 = 0x1d8,0x5 01d9 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01da 4865 |He | Short_Literal 0x65 01db e403 | | Load 0x2,0x3 01dc 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01dd c406 | | Store 0x2,0x6 01de e40a | | Load 0x2,0xa ; Debug Table 0x8.0x5 = 0x1de,0x6 01df 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01e0 e40a | | Load 0x2,0xa 01e1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01e2 c40b | | Store 0x2,0xb 01e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01e4 0000 0000 | | .BLANK 0000[0x4] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x01eb,0x0dd6,0x1001,0x0000,0x0058,0xc985,0x0000,0x028d ; Debug Table 0x9.0x0 = 0x1eb,0x1 01ec e006 | | Load 0x0,0x6 01ed 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01ee 025b | [ | Execute Discrete,Check_In_Type 01ef 8210 | | Call 0x1,0x10 01f0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01f1 0000 0000 | | .BLANK 0000[0x7] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x01fb,0x0dda,0x1001,0x0000,0x0058,0xc985,0x0000,0x02aa ; Debug Table 0xa.0x0 = 0x1fb,0x1 01fc e006 | | Load 0x0,0x6 01fd 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01fe 025b | [ | Execute Discrete,Check_In_Type 01ff 8210 | | Call 0x1,0x10 0200 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0201 0000 0000 | | .BLANK 0000[0x7] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x020b,0x0dde,0x1001,0x0000,0x0058,0xc985,0x0000,0x02c7 ; Debug Table 0xb.0x0 = 0x20b,0x1 020c 6808 |h | Jump_Zero 0x215 020d 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x1 = 0x20d,0x2 020e 820f | | Call 0x1,0xf 020f 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x2 = 0x20f,0x3 0210 0217 | | Execute Heap_Access,All_Reference 0211 e013 | | Load 0x0,0x13 0212 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0213 8214 | | Call 0x1,0x14 0214 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0215 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x3 = 0x215,0x4 0216 820f | | Call 0x1,0xf 0217 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0220 | | .CONST 0x0220 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0002 | | .CONST 0x0002 ; Number of locals 021b INIT_0218: 021b 4801 |H | Short_Literal 0x1 ; Debug Table 0xc = .DEBUG 0x021b,0x0de8,0x1001,0x0000,0x0058,0xc985,0x0000,0x02f3 ; Debug Table 0xc.0x0 = 0x21b,0xffff 021c 00db | | Load_Top At_Offset_3 021d 8014 | | Call 0x0,0x14 021e 00e2 | | Load_Encached Integer_Cache 021f 03f1 | | Declare_Variable Discrete,With_Value 0220 BODY_0218: 0220 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x1 = 0x220,0x1 0221 0e09 | | Execute_Immediate Not_Equal,0x9 0222 6809 |h | Jump_Zero 0x22c 0223 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x2 = 0x223,0x2 0224 0c0a | | Execute_Immediate Greater_Equal,0xa 0225 7002 |p | Jump_Nonzero 0x228 0226 4887 |H | Short_Literal 0x87 0227 0257 | W | Execute Discrete,Raise 0228 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x3 = 0x228,0x3 0229 0092 0a1f | | Action Push_String_Extended,0xa1f ; "Unit to be saved (or unit referenced by a saved unit) was not coded with a Delta1-compatible code generator" 022b 800e | | Call 0x0,0xe 022c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 022d 0000 0000 | | .XXX[0x3] 022f 0000 | | 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0237 | 7 | .CONST 0x0237 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0003 | | .CONST 0x0003 ; Number of locals 0233 INIT_0230: 0233 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd = .DEBUG 0x0233,0x0df2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0324 ; Debug Table 0xd.0x0 = 0x233,0xffff 0234 6107 |a | Indirect_Literal Discrete,0x33c,{0x00000000, 0x7fffffff} ; Debug Table 0xd.0x1 = 0x234,0xfffe 0235 00e3 | | Load_Encached Natural_Cache 0236 03f1 | | Declare_Variable Discrete,With_Value 0237 BODY_0230: 0237 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x2 = 0x237,0x1 0238 00d9 | | Load_Top At_Offset_1 0239 e403 | | Load 0x2,0x3 023a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 023b 025e | ^ | Execute Discrete,Convert 023c e7ff | | Load 0x3,-0x1 023d e406 | | Load 0x2,0x6 023e e403 | | Load 0x2,0x3 023f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0240 005a | Z | Store_Top Discrete,At_Offset_2 0241 005a | Z | Store_Top Discrete,At_Offset_2 0242 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x3 = 0x242,0x2 0243 7002 |p | Jump_Nonzero 0x246 0244 e7ff | | Load 0x3,-0x1 0245 7009 |p | Jump_Nonzero 0x24f 0246 e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0x4 = 0x246,0x3 0247 7002 |p | Jump_Nonzero 0x24a 0248 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x5 = 0x248,0x4 0249 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 024a 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x6 = 0x24a,0x5 024b 820f | | Call 0x1,0xf 024c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x7 = 0x24c,0x6 024d 8211 | | Call 0x1,0x11 024e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 024f e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0x8 = 0x24f,0x7 0250 0217 | | Execute Heap_Access,All_Reference 0251 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0252 7010 |p | Jump_Nonzero 0x263 0253 4800 |H | Short_Literal 0x0 0254 e7ff | | Load 0x3,-0x1 0255 8015 | | Call 0x0,0x15 0256 700c |p | Jump_Nonzero 0x263 0257 4801 |H | Short_Literal 0x1 0258 e7ff | | Load 0x3,-0x1 0259 8016 | | Call 0x0,0x16 025a 0217 | | Execute Heap_Access,All_Reference 025b 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 025c 6806 |h | Jump_Zero 0x263 025d 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x9 = 0x25d,0x8 025e e7ff | | Load 0x3,-0x1 025f 840d | | Call 0x2,0xd 0260 e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0xa = 0x260,0x9 0261 8413 | | Call 0x2,0x13 0262 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0xd.0xb = 0x262,0xa 0263 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xc = 0x263,0xb 0264 820f | | Call 0x1,0xf 0265 e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0xd = 0x265,0xc 0266 0217 | | Execute Heap_Access,All_Reference 0267 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0268 e00c | | Load 0x0,0xc 0269 1811 | | Execute Package,Field_Execute,Field_Number 0x11 026a 700b |p | Jump_Nonzero 0x276 026b e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0xe = 0x26b,0xd 026c 0217 | | Execute Heap_Access,All_Reference 026d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 026e e005 | | Load 0x0,0x5 026f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0270 180e | | Execute Package,Field_Execute,Field_Number 0xe 0271 e005 | | Load 0x0,0x5 0272 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0273 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0274 8215 | | Call 0x1,0x15 0275 7805 |x | Jump 0x27b 0276 e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0xf = 0x276,0xe 0277 0217 | | Execute Heap_Access,All_Reference 0278 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0279 0217 | | Execute Heap_Access,All_Reference 027a 8215 | | Call 0x1,0x15 027b e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0x10 = 0x27b,0xf 027c 0217 | | Execute Heap_Access,All_Reference 027d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 027e 8411 | | Call 0x2,0x11 027f e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0x11 = 0x27f,0x10 0280 8412 | | Call 0x2,0x12 0281 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0282 0000 0000 | | .BLANK 0000[0x6] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028e | | .CONST 0x028e ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0002 | | .CONST 0x0002 ; Number of locals 028b INIT_0288: 028b 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x028b,0x0e18,0x1001,0x0000,0x0058,0xc985,0x0000,0x03cc ; Debug Table 0xe.0x0 = 0x28b,0xffff 028c 0217 | | Execute Heap_Access,All_Reference 028d 0007 | | Action Break_Optional 028e BODY_0288: 028e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1 = 0x28e,0x1 028f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0290 8410 | | Call 0x2,0x10 0291 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x2 = 0x291,0x2 0292 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0293 8413 | | Call 0x2,0x13 0294 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x3 = 0x294,0x3 0295 0217 | | Execute Heap_Access,All_Reference 0296 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0297 8212 | | Call 0x1,0x12 0298 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0299 0000 0000 | | .BLANK 0000[0x7] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02a3 | | .CONST 0x02a3 ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0001 | | .CONST 0x0001 ; Number of locals 02a3 BODY_02a0: 02a3 INIT_02a0: 02a3 00da | | Load_Top At_Offset_2 ; Debug Table 0xf = .DEBUG 0x02a3,0x0e22,0x1001,0x0000,0x0058,0xc985,0x0000,0x03f4 ; Debug Table 0xf.0x0 = 0x2a3,0x1 02a4 680b |h | Jump_Zero 0x2b0 02a5 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x1 = 0x2a5,0x2 02a6 00db | | Load_Top At_Offset_3 02a7 0217 | | Execute Heap_Access,All_Reference 02a8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a9 8415 | | Call 0x2,0x15 02aa 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x2 = 0x2aa,0x3 02ab 820f | | Call 0x1,0xf 02ac 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x3 = 0x2ac,0x4 02ad 0217 | | Execute Heap_Access,All_Reference 02ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02af 8414 | | Call 0x2,0x14 02b0 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x4 = 0x2b0,0x5 02b1 7002 |p | Jump_Nonzero 0x2b4 02b2 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0x5 = 0x2b2,0x6 02b3 820f | | Call 0x1,0xf 02b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02b5 0000 0000 | | .XXX[0x3] 02b7 0000 | | 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bb | | .CONST 0x02bb ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0001 | | .CONST 0x0001 ; Number of locals 02bb BODY_02b8: 02bb INIT_02b8: 02bb 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x02bb,0x0e30,0x1001,0x0000,0x0058,0xc985,0x0000,0x042f ; Debug Table 0x10.0x0 = 0x2bb,0x1 02bc 680b |h | Jump_Zero 0x2c8 02bd 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x1 = 0x2bd,0x2 02be 00db | | Load_Top At_Offset_3 02bf 0217 | | Execute Heap_Access,All_Reference 02c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02c1 8416 | | Call 0x2,0x16 02c2 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x2 = 0x2c2,0x3 02c3 820f | | Call 0x1,0xf 02c4 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x3 = 0x2c4,0x4 02c5 0217 | | Execute Heap_Access,All_Reference 02c6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c7 8413 | | Call 0x2,0x13 02c8 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x4 = 0x2c8,0x5 02c9 7002 |p | Jump_Nonzero 0x2cc 02ca 4800 |H | Short_Literal 0x0 ; Debug Table 0x10.0x5 = 0x2ca,0x6 02cb 820f | | Call 0x1,0xf 02cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02cd 0000 0000 | | .XXX[0x3] 02cf 0000 | | 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d8 | | .CONST 0x02d8 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0002 | | .CONST 0x0002 ; Number of locals 02d3 INIT_02d0: 02d3 e017 | | Load 0x0,0x17 ; Debug Table 0x11 = .DEBUG 0x02d3,0x0e3e,0x1001,0x0000,0x0058,0xc985,0x0000,0x046a ; Debug Table 0x11.0x0 = 0x2d3,0xffff 02d4 4801 |H | Short_Literal 0x1 02d5 e7ff | | Load 0x3,-0x1 02d6 8016 | | Call 0x0,0x16 02d7 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02d8 BODY_02d0: 02d8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x1 = 0x2d8,0x1 02d9 0217 | | Execute Heap_Access,All_Reference 02da 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02db 0217 | | Execute Heap_Access,All_Reference 02dc 8213 | | Call 0x1,0x13 02dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x2dd,0x2 02de 0217 | | Execute Heap_Access,All_Reference 02df 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 02e0 840f | | Call 0x2,0xf 02e1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x2e1,0x3 02e2 0217 | | Execute Heap_Access,All_Reference 02e3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 02e4 840f | | Call 0x2,0xf 02e5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x4 = 0x2e5,0x4 02e6 0217 | | Execute Heap_Access,All_Reference 02e7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 02e8 840f | | Call 0x2,0xf 02e9 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x5 = 0x2e9,0x5 02ea e41c | | Load 0x2,0x1c 02eb 4800 |H | Short_Literal 0x0 02ec 00db | | Load_Top At_Offset_3 02ed 0217 | | Execute Heap_Access,All_Reference 02ee 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 02ef 841e | | Call 0x2,0x1e 02f0 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x6 = 0x2f0,0x6 02f1 00d9 | | Load_Top At_Offset_1 02f2 0217 | | Execute Heap_Access,All_Reference 02f3 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 02f4 8416 | | Call 0x2,0x16 02f5 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x7 = 0x2f5,0x7 02f6 00d9 | | Load_Top At_Offset_1 02f7 0217 | | Execute Heap_Access,All_Reference 02f8 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 02f9 8416 | | Call 0x2,0x16 02fa 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x8 = 0x2fa,0x8 02fb 00d9 | | Load_Top At_Offset_1 02fc 0217 | | Execute Heap_Access,All_Reference 02fd 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 02fe 8415 | | Call 0x2,0x15 02ff 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x9 = 0x2ff,0x9 0300 0217 | | Execute Heap_Access,All_Reference 0301 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0302 820f | | Call 0x1,0xf 0303 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xa = 0x303,0xa 0304 0217 | | Execute Heap_Access,All_Reference 0305 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0306 820f | | Call 0x1,0xf 0307 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xb = 0x307,0xb 0308 0217 | | Execute Heap_Access,All_Reference 0309 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 030a 8211 | | Call 0x1,0x11 030b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xc = 0x30b,0xc 030c 0217 | | Execute Heap_Access,All_Reference 030d 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 030e 8211 | | Call 0x1,0x11 030f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xd = 0x30f,0xd 0310 0217 | | Execute Heap_Access,All_Reference 0311 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0312 820f | | Call 0x1,0xf 0313 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xe = 0x313,0xe 0314 0217 | | Execute Heap_Access,All_Reference 0315 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0316 6807 |h | Jump_Zero 0x31e 0317 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0xf = 0x317,0xf 0318 e7ff | | Load 0x3,-0x1 0319 8423 | # | Call 0x2,0x23 031a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x10 = 0x31a,0x10 031b 0217 | | Execute Heap_Access,All_Reference 031c 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 031d 8426 | & | Call 0x2,0x26 031e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x11 = 0x31e,0x11 031f 0217 | | Execute Heap_Access,All_Reference 0320 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 0321 820f | | Call 0x1,0xf 0322 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x12 = 0x322,0x12 0323 0217 | | Execute Heap_Access,All_Reference 0324 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 0325 8211 | | Call 0x1,0x11 0326 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x13 = 0x326,0x13 0327 0217 | | Execute Heap_Access,All_Reference 0328 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0329 8211 | | Call 0x1,0x11 032a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x14 = 0x32a,0x14 032b 0217 | | Execute Heap_Access,All_Reference 032c 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 032d 8211 | | Call 0x1,0x11 032e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x15 = 0x32e,0x15 032f 0217 | | Execute Heap_Access,All_Reference 0330 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0331 8211 | | Call 0x1,0x11 0332 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x16 = 0x332,0x16 0333 00d9 | | Load_Top At_Offset_1 0334 0217 | | Execute Heap_Access,All_Reference 0335 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0336 8418 | | Call 0x2,0x18 0337 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0338 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 033c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0340 0000 0000 | | .LITERAL {0x00000000, 0x000004f3} 0344 0000 0000 | | .LITERAL {0x00000000, 0x0058c985} 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 034b | K | .CONST 0x034b ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0001 | | .CONST 0x0001 ; Number of locals 034b BODY_0348: 034b INIT_0348: 034b 00da | | Load_Top At_Offset_2 ; Debug Table 0x12 = .DEBUG 0x034b,0x0e6e,0x1001,0x0000,0x0058,0xc985,0x0000,0x0474 ; Debug Table 0x12.0x0 = 0x34b,0x1 034c 680b |h | Jump_Zero 0x358 034d 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x34d,0x2 034e 00db | | Load_Top At_Offset_3 034f 0217 | | Execute Heap_Access,All_Reference 0350 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0351 8418 | | Call 0x2,0x18 0352 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x2 = 0x352,0x3 0353 820f | | Call 0x1,0xf 0354 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0x3 = 0x354,0x4 0355 0217 | | Execute Heap_Access,All_Reference 0356 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0357 8417 | | Call 0x2,0x17 0358 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x4 = 0x358,0x5 0359 7002 |p | Jump_Nonzero 0x35c 035a 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x5 = 0x35a,0x6 035b 820f | | Call 0x1,0xf 035c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 035d 0000 0000 | | .XXX[0x3] 035f 0000 | | 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 00da | | Load_Top At_Offset_2 ; Debug Table 0x13 = .DEBUG 0x0363,0x0e7c,0x1002,0x0000,0x0058,0xc985,0x0000,0x04af ; Debug Table 0x13.0x0 = 0x363,0x1 0364 6806 |h | Jump_Zero 0x36b 0365 00da | | Load_Top At_Offset_2 0366 e40b | | Load 0x2,0xb 0367 e40a | | Load 0x2,0xa 0368 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0369 0f00 | | Execute_Immediate Equal,0x0 036a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 036b 4800 |H | Short_Literal 0x0 036c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 036d 0000 0000 | | .XXX[0x3] 036f 0000 | | 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 00da | | Load_Top At_Offset_2 ; Debug Table 0x14 = .DEBUG 0x0373,0x0e80,0x1002,0x0000,0x0058,0xc985,0x0000,0x04d3 ; Debug Table 0x14.0x0 = 0x373,0x1 0374 4802 |H | Short_Literal 0x2 0375 481f |H | Short_Literal 0x1f 0376 026d | m | Execute Discrete,Exponentiate 0377 026e | n | Execute Discrete,Modulo 0378 0248 | H | Execute Discrete,Check_In_Integer 0379 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 037a 0000 0000 | | .BLANK 0000[0x6] 0380 ; -------------------------------------------------------------------------------------- 0380 ; SUBPROGRAM 0380 ; -------------------------------------------------------------------------------------- 0380 03a2 | | .CONST 0x03a2 ; Address of begin 0381 0004 | | .CONST 0x0004 ; Address of exception handler 0382 000d | | .CONST 0x000d ; Number of locals 0383 INIT_0380: 0383 0007 | | Action Break_Optional ; Debug Table 0x15 = .DEBUG 0x0383,0x0e84,0x1001,0x0000,0x0058,0xc985,0x0000,0x0510 ; Debug Table 0x15.0x0 = 0x383,0xffff 0384 00da | | Load_Top At_Offset_2 ; Debug Table 0x15.0x1 = 0x384,0xfffe 0385 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0386 e006 | | Load 0x0,0x6 0387 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0388 03f1 | | Declare_Variable Discrete,With_Value 0389 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0x2 = 0x389,0xfffd 038a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 038b 02fd | | Declare_Variable Variant_Record,Duplicate 038c 00d0 | | Action Swap_Control 038d 00d1 | | Pop_Control Pop_Count_1 038e e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x3 = 0x38e,0xfffc 038f 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0390 02c7 | | Declare_Variable Any 0391 00d8 | | Load_Top At_Offset_0 0392 1c00 | | Execute_Immediate Run_Utility,0x0 0393 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x4 = 0x393,0xfffb 0394 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0395 e019 | | Load 0x0,0x19 ; Debug Table 0x15.0x5 = 0x395,0xfffa 0396 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0397 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x15.0x6 = 0x397,0xfff9 0398 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x7 = 0x398,0xfff8 0399 1b11 | | Execute Package,Field_Read,Field_Number 0x11 039a 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x15.0x8 = 0x39a,0xfff7 039b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x15.0x9 = 0x39b,0xfff6 039c 029f 0773 | s| Declare_Subprogram INIT_0770,For_Call ; Debug Table 0x15.0xa = 0x39c,0xfff5 039e 029f 078b | | Declare_Subprogram INIT_0788,For_Call ; Debug Table 0x15.0xb = 0x39e,0xfff4 03a0 029f 07a3 | | Declare_Subprogram INIT_07a0,For_Call ; Debug Table 0x15.0xc = 0x3a0,0xfff3 03a2 BODY_0380: 03a2 00be | | Action Activate_Tasks 03a3 e602 | | Load 0x3,0x2 ; Debug Table 0x15.0xd = 0x3a3,0x1 03a4 8419 | | Call 0x2,0x19 03a5 7005 |p | Jump_Nonzero 0x3ab 03a6 e7fe | | Load 0x3,-0x2 ; Debug Table 0x15.0xe = 0x3a6,0x2 03a7 7002 |p | Jump_Nonzero 0x3aa 03a8 e602 | | Load 0x3,0x2 ; Debug Table 0x15.0xf = 0x3a8,0x3 03a9 8212 | | Call 0x1,0x12 03aa 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x15.0x10 = 0x3aa,0x4 03ab e019 | | Load 0x0,0x19 ; Debug Table 0x15.0x11 = 0x3ab,0x5 03ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03ad e604 | | Load 0x3,0x4 03ae 0120 | | Execute Any,Is_Value 03af 6803 |h | Jump_Zero 0x3b3 03b0 e018 | | Load 0x0,0x18 03b1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 03b2 7801 |x | Jump 0x3b4 03b3 e604 | | Load 0x3,0x4 03b4 e01a | | Load 0x0,0x1a 03b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03b6 e01a | | Load 0x0,0x1a 03b7 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03b8 4800 |H | Short_Literal 0x0 03b9 e018 | | Load 0x0,0x18 03ba 1b13 | | Execute Package,Field_Read,Field_Number 0x13 03bb e01b | | Load 0x0,0x1b 03bc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03bd 4801 |H | Short_Literal 0x1 03be e603 | | Load 0x3,0x3 03bf e018 | | Load 0x0,0x18 03c0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03c1 c604 | | Store 0x3,0x4 03c2 c606 | | Store 0x3,0x6 03c3 0092 0a20 | | Action Push_String_Extended,0xa20 ; "opening code segment to read" ; Debug Table 0x15.0x12 = 0x3c3,0x6 03c5 860b | | Call 0x3,0xb 03c6 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x13 = 0x3c6,0x7 03c7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 03c8 4806 |H | Short_Literal 0x6 03c9 860c | | Call 0x3,0xc 03ca c605 | | Store 0x3,0x5 03cb e605 | | Load 0x3,0x5 ; Debug Table 0x15.0x14 = 0x3cb,0x8 03cc 6802 |h | Jump_Zero 0x3cf 03cd e605 | | Load 0x3,0x5 ; Debug Table 0x15.0x15 = 0x3cd,0x9 03ce 860d | | Call 0x3,0xd 03cf e602 | | Load 0x3,0x2 ; Debug Table 0x15.0x16 = 0x3cf,0xa 03d0 8212 | | Call 0x1,0x12 03d1 e40b | | Load 0x2,0xb ; Debug Table 0x15.0x17 = 0x3d1,0xb 03d2 e602 | | Load 0x3,0x2 03d3 e40a | | Load 0x2,0xa 03d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03d5 c40b | | Store 0x2,0xb 03d6 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x18 = 0x3d6,0xc 03d7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 03d8 4803 |H | Short_Literal 0x3 03d9 860c | | Call 0x3,0xc 03da c605 | | Store 0x3,0x5 03db e605 | | Load 0x3,0x5 ; Debug Table 0x15.0x19 = 0x3db,0xd 03dc 0e00 | | Execute_Immediate Not_Equal,0x0 03dd a609 | | Store_Unchecked 0x3,0x9 03de e609 | | Load 0x3,0x9 ; Debug Table 0x15.0x1a = 0x3de,0xe 03df 6805 |h | Jump_Zero 0x3e5 03e0 4828 |H( | Short_Literal 0x28 03e1 e01c | | Load 0x0,0x1c 03e2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03e3 0f00 | | Execute_Immediate Equal,0x0 03e4 7801 |x | Jump 0x3e6 03e5 4800 |H | Short_Literal 0x0 03e6 a60a | | Store_Unchecked 0x3,0xa 03e7 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0x1b = 0x3e7,0xf 03e8 7017 |p | Jump_Nonzero 0x400 03e9 e604 | | Load 0x3,0x4 ; Debug Table 0x15.0x1c = 0x3e9,0x10 03ea e018 | | Load 0x0,0x18 03eb 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03ec a607 | | Store_Unchecked 0x3,0x7 03ed e607 | | Load 0x3,0x7 ; Debug Table 0x15.0x1d = 0x3ed,0x11 03ee e018 | | Load 0x0,0x18 03ef 1b10 | | Execute Package,Field_Read,Field_Number 0x10 03f0 012c | , | Execute Any,Size 03f1 026e | n | Execute Discrete,Modulo 03f2 6802 |h | Jump_Zero 0x3f5 03f3 4887 |H | Short_Literal 0x87 03f4 0257 | W | Execute Discrete,Raise 03f5 e607 | | Load 0x3,0x7 ; Debug Table 0x15.0x1e = 0x3f5,0x12 03f6 e018 | | Load 0x0,0x18 03f7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 03f8 012c | , | Execute Any,Size 03f9 0270 | p | Execute Discrete,Divide 03fa 0aff | | Execute_Immediate Plus,-0x1 03fb e01d | | Load 0x0,0x1d 03fc 1b11 | | Execute Package,Field_Read,Field_Number 0x11 03fd 025b | [ | Execute Discrete,Check_In_Type 03fe a608 | | Store_Unchecked 0x3,0x8 03ff 7806 |x | Jump 0x406 0400 e605 | | Load 0x3,0x5 ; Debug Table 0x15.0x1f = 0x400,0x13 0401 0a05 | | Execute_Immediate Plus,0x5 0402 e01d | | Load 0x0,0x1d 0403 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0404 025b | [ | Execute Discrete,Check_In_Type 0405 a608 | | Store_Unchecked 0x3,0x8 0406 00cf | | Action Mark_Auxiliary ; Debug Table 0x15.0x20 = 0x406,0x14 0407 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x21 = 0x407,0xfbff 0408 e608 | | Load 0x3,0x8 0409 0901 | | Execute_Immediate Binary_Scale,0x1 040a 0a01 | | Execute_Immediate Plus,0x1 040b 0248 | H | Execute Discrete,Check_In_Integer 040c e006 | | Load 0x0,0x6 040d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 040e 0334 | 4 | Declare_Variable Array,With_Constraint 040f 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x15.0x22 = 0x40f,0xfbfe 0410 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0411 029f 0863 | c| Declare_Subprogram INIT_0860,For_Call ; Debug Table 0x15.0x23 = 0x411,0xfbfd 0413 00cf | | Action Mark_Auxiliary 0414 e608 | | Load 0x3,0x8 ; Debug Table 0x15.0x24 = 0x414,0x401 0415 4800 |H | Short_Literal 0x0 0416 0263 | c | Execute Discrete,Above_Bound 0417 7008 |p | Jump_Nonzero 0x420 0418 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x25 = 0x418,0x402 0419 1b10 | | Execute Package,Field_Read,Field_Number 0x10 041a 00d9 | | Load_Top At_Offset_1 041b 860c | | Call 0x3,0xc 041c c605 | | Store 0x3,0x5 041d 8611 | | Call 0x3,0x11 ; Debug Table 0x15.0x26 = 0x41d,0x403 041e 00c8 | | Action Pop_Auxiliary_Range 041f 3ff8 |? | Loop_Increasing 0x418 0420 00ce | | Action Pop_Auxiliary 0421 e60a | | Load 0x3,0xa ; Debug Table 0x15.0x27 = 0x421,0x404 0422 6806 |h | Jump_Zero 0x429 0423 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x28 = 0x423,0x405 0424 a605 | | Store_Unchecked 0x3,0x5 0425 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x29 = 0x425,0x406 0426 0afe | | Execute_Immediate Plus,-0x2 0427 005a | Z | Store_Top Discrete,At_Offset_2 0428 8611 | | Call 0x3,0x11 ; Debug Table 0x15.0x2a = 0x428,0x407 0429 00da | | Load_Top At_Offset_2 ; Debug Table 0x15.0x2b = 0x429,0x408 042a 8214 | | Call 0x1,0x14 042b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 042c 0000 0000 | | .BLANK 0000[0x4] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0442 | B | .CONST 0x0442 ; Address of begin 0431 0004 | | .CONST 0x0004 ; Address of exception handler 0432 0004 | | .CONST 0x0004 ; Number of locals 0433 INIT_0430: 0433 e008 | | Load 0x0,0x8 ; Debug Table 0x16 = .DEBUG 0x0433,0x0ede,0x1001,0x0000,0x0058,0xc985,0x0000,0x0542 ; Debug Table 0x16.0x0 = 0x433,0xffff 0434 0322 | " | Declare_Variable Record 0435 00d8 | | Load_Top At_Offset_0 0436 1c01 | | Execute_Immediate Run_Utility,0x1 0437 4801 |H | Short_Literal 0x1 0438 e7ff | | Load 0x3,-0x1 0439 8016 | | Call 0x0,0x16 043a 0217 | | Execute Heap_Access,All_Reference 043b 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 043c 00d9 | | Load_Top At_Offset_1 043d 017d | } | Execute Record,Structure_Write 043e e003 | | Load 0x0,0x3 ; Debug Table 0x16.0x1 = 0x43e,0xfffe 043f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0440 e003 | | Load 0x0,0x3 ; Debug Table 0x16.0x2 = 0x440,0xfffd 0441 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0442 BODY_0430: 0442 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x3 = 0x442,0x1 0443 e41c | | Load 0x2,0x1c 0444 4801 |H | Short_Literal 0x1 0445 e602 | | Load 0x3,0x2 0446 841e | | Call 0x2,0x1e 0447 e7fe | | Load 0x3,-0x2 ; Debug Table 0x16.0x4 = 0x447,0x2 0448 700d |p | Jump_Nonzero 0x456 0449 e7ff | | Load 0x3,-0x1 ; Debug Table 0x16.0x5 = 0x449,0x3 044a e009 | | Load 0x0,0x9 044b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 044c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 044d e7ff | | Load 0x3,-0x1 ; Debug Table 0x16.0x6 = 0x44d,0x4 044e 00da | | Load_Top At_Offset_2 044f 021f | | Execute Heap_Access,Equal 0450 7005 |p | Jump_Nonzero 0x456 0451 00d9 | | Load_Top At_Offset_1 0452 6803 |h | Jump_Zero 0x456 0453 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x7 = 0x453,0x5 0454 00da | | Load_Top At_Offset_2 0455 841f | | Call 0x2,0x1f 0456 e7ff | | Load 0x3,-0x1 ; Debug Table 0x16.0x8 = 0x456,0x6 0457 e009 | | Load 0x0,0x9 0458 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0459 0031 | 1 | Store_Top Heap_Access,At_Offset_1 045a 00cf | | Action Mark_Auxiliary 045b 780a |x | Jump 0x466 045c 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x9 = 0x45c,0x8 045d 00da | | Load_Top At_Offset_2 045e 0217 | | Execute Heap_Access,All_Reference 045f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0460 841f | | Call 0x2,0x1f 0461 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0xa = 0x461,0x9 0462 0217 | | Execute Heap_Access,All_Reference 0463 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0464 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0465 00c9 | | Action Pop_Auxiliary_Loop 0466 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0xb = 0x466,0x7 0467 77f4 |w | Jump_Nonzero 0x45c 0468 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0469 0000 0000 | | .BLANK 0000[0x7] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0498 | | .CONST 0x0498 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0007 | | .CONST 0x0007 ; Number of locals 0473 INIT_0470: 0473 0007 | | Action Break_Optional ; Debug Table 0x17 = .DEBUG 0x0473,0x0ef8,0x1001,0x0000,0x0058,0xc985,0x0000,0x05c9 ; Debug Table 0x17.0x0 = 0x473,0xffff 0474 e00f | | Load 0x0,0xf ; Debug Table 0x17.0x1 = 0x474,0xfffe 0475 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0476 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0477 801e | | Call 0x0,0x1e 0478 e7ff | | Load 0x3,-0x1 0479 e009 | | Load 0x0,0x9 047a 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 047b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 047c 801f | | Call 0x0,0x1f 047d 0217 | | Execute Heap_Access,All_Reference 047e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 047f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0480 e00f | | Load 0x0,0xf ; Debug Table 0x17.0x2 = 0x480,0xfffd 0481 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0482 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 0483 e008 | | Load 0x0,0x8 ; Debug Table 0x17.0x3 = 0x483,0xfffc 0484 0322 | " | Declare_Variable Record 0485 00d8 | | Load_Top At_Offset_0 0486 1c00 | | Execute_Immediate Run_Utility,0x0 0487 e41b | | Load 0x2,0x1b ; Debug Table 0x17.0x4 = 0x487,0xfffb 0488 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0489 e008 | | Load 0x0,0x8 ; Debug Table 0x17.0x5 = 0x489,0xfffa 048a 0322 | " | Declare_Variable Record 048b 00d8 | | Load_Top At_Offset_0 048c 1c01 | | Execute_Immediate Run_Utility,0x1 048d e7ff | | Load 0x3,-0x1 048e 0217 | | Execute Heap_Access,All_Reference 048f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0490 0217 | | Execute Heap_Access,All_Reference 0491 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 0492 0217 | | Execute Heap_Access,All_Reference 0493 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0494 00d9 | | Load_Top At_Offset_1 0495 017d | } | Execute Record,Structure_Write 0496 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x17.0x6 = 0x496,0xfff9 0497 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0498 BODY_0470: 0498 e00f | | Load 0x0,0xf ; Debug Table 0x17.0x7 = 0x498,0x1 0499 1b19 | | Execute Package,Field_Read,Field_Number 0x19 049a 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 049b e01a | | Load 0x0,0x1a 049c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 049d e01a | | Load 0x0,0x1a 049e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 049f e602 | | Load 0x3,0x2 04a0 e00f | | Load 0x0,0xf 04a1 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04a2 181f | | Execute Package,Field_Execute,Field_Number 0x1f 04a3 c603 | | Store 0x3,0x3 04a4 e41b | | Load 0x2,0x1b ; Debug Table 0x17.0x8 = 0x4a4,0x2 04a5 1b13 | | Execute Package,Field_Read,Field_Number 0x13 04a6 4865 |He | Short_Literal 0x65 04a7 e41b | | Load 0x2,0x1b 04a8 181a | | Execute Package,Field_Execute,Field_Number 0x1a 04a9 003b | ; | Store_Top Access,At_Offset_3 04aa 00cf | | Action Mark_Auxiliary 04ab 781a |x | Jump 0x4c6 04ac e603 | | Load 0x3,0x3 ; Debug Table 0x17.0x9 = 0x4ac,0x4 04ad e00f | | Load 0x0,0xf 04ae 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04af 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04b0 e604 | | Load 0x3,0x4 04b1 017d | } | Execute Record,Structure_Write 04b2 e603 | | Load 0x3,0x3 ; Debug Table 0x17.0xa = 0x4b2,0x5 04b3 e00f | | Load 0x0,0xf 04b4 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04b5 1820 | | Execute Package,Field_Execute,Field_Number 0x20 04b6 c603 | | Store 0x3,0x3 04b7 e604 | | Load 0x3,0x4 ; Debug Table 0x17.0xb = 0x4b7,0x6 04b8 00db | | Load_Top At_Offset_3 04b9 017f | | Execute Record,Equal 04ba 6802 |h | Jump_Zero 0x4bd 04bb 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0xc = 0x4bb,0x7 04bc 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 04bd 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0xd = 0x4bd,0x8 04be 4801 |H | Short_Literal 0x1 04bf e604 | | Load 0x3,0x4 04c0 e604 | | Load 0x3,0x4 04c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04c2 e41b | | Load 0x2,0x1b 04c3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04c4 c605 | | Store 0x3,0x5 04c5 00c9 | | Action Pop_Auxiliary_Loop 04c6 e603 | | Load 0x3,0x3 ; Debug Table 0x17.0xe = 0x4c6,0x3 04c7 e00f | | Load 0x0,0xf 04c8 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04c9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 04ca 6fe1 |o | Jump_Zero 0x4ac 04cb 00ce | | Action Pop_Auxiliary 04cc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xf = 0x4cc,0x9 04cd 7002 |p | Jump_Nonzero 0x4d0 04ce 4887 |H | Short_Literal 0x87 04cf 0257 | W | Execute Discrete,Raise 04d0 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x10 = 0x4d0,0xa 04d1 00db | | Load_Top At_Offset_3 04d2 4801 |H | Short_Literal 0x1 04d3 e606 | | Load 0x3,0x6 04d4 841e | | Call 0x2,0x1e 04d5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04d6 0000 0000 | | .XXX[0x2] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04e2 | | .CONST 0x04e2 ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0003 | | .CONST 0x0003 ; Number of locals 04db INIT_04d8: 04db e020 | | Load 0x0,0x20 ; Debug Table 0x18 = .DEBUG 0x04db,0x0f1c,0x1001,0x0000,0x0058,0xc985,0x0000,0x066c ; Debug Table 0x18.0x0 = 0x4db,0xffff 04dc 1b13 | | Execute Package,Field_Read,Field_Number 0x13 04dd 02c7 | | Declare_Variable Any 04de 00d8 | | Load_Top At_Offset_0 04df 1c00 | | Execute_Immediate Run_Utility,0x0 04e0 029f 0883 | | Declare_Subprogram INIT_0880,For_Call 04e2 BODY_04d8: 04e2 8603 | | Call 0x3,0x3 ; Debug Table 0x18.0x1 = 0x4e2,0x1 04e3 00cf | | Action Mark_Auxiliary ; Debug Table 0x18.0x2 = 0x4e3,0x2 04e4 029f 0913 | | Declare_Subprogram INIT_0910,For_Call ; Debug Table 0x18.0x3 = 0x4e4,0xfbff 04e6 029f 094b | K| Declare_Subprogram INIT_0948,For_Call ; Debug Table 0x18.0x4 = 0x4e6,0xfbfe 04e8 029f 0983 | | Declare_Subprogram INIT_0980,For_Call ; Debug Table 0x18.0x5 = 0x4e8,0xfbfd 04ea 4800 |H | Short_Literal 0x0 ; Debug Table 0x18.0x6 = 0x4ea,0x401 04eb 4800 |H | Short_Literal 0x0 04ec e602 | | Load 0x3,0x2 04ed 8607 | | Call 0x3,0x7 04ee 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04ef 0000 | | .XXX[0x1] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 050b | | .CONST 0x050b ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0006 | | .CONST 0x0006 ; Number of locals 04f3 INIT_04f0: 04f3 e005 | | Load 0x0,0x5 ; Debug Table 0x19 = .DEBUG 0x04f3,0x0f2c,0x1002,0x0000,0x0058,0xc985,0x0000,0x08f7 ; Debug Table 0x19.0x0 = 0x4f3,0xffff 04f4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 04f5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04f6 02c7 | | Declare_Variable Any 04f7 00d8 | | Load_Top At_Offset_0 04f8 1c00 | | Execute_Immediate Run_Utility,0x0 04f9 e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x1 = 0x4f9,0xfffe 04fa 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 04fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04fc 02c7 | | Declare_Variable Any 04fd 00d8 | | Load_Top At_Offset_0 04fe 1c00 | | Execute_Immediate Run_Utility,0x0 04ff e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x2 = 0x4ff,0xfffd 0500 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0501 02c7 | | Declare_Variable Any 0502 00d8 | | Load_Top At_Offset_0 0503 1c00 | | Execute_Immediate Run_Utility,0x0 0504 e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x3 = 0x504,0xfffc 0505 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0506 02ff | | Declare_Variable Variant_Record 0507 00d8 | | Load_Top At_Offset_0 0508 1c00 | | Execute_Immediate Run_Utility,0x0 0509 e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x4 = 0x509,0xfffb 050a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 050b BODY_04f0: 050b e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x5 = 0x50b,0x1 050c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 050d e602 | | Load 0x3,0x2 050e 0120 | | Execute Any,Is_Value 050f 6804 |h | Jump_Zero 0x514 0510 e005 | | Load 0x0,0x5 0511 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0512 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0513 7801 |x | Jump 0x515 0514 e602 | | Load 0x3,0x2 0515 e7ff | | Load 0x3,-0x1 0516 e005 | | Load 0x0,0x5 0517 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0518 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0519 c602 | | Store 0x3,0x2 051a 0059 | Y | Store_Top Discrete,At_Offset_1 051b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x6 = 0x51b,0x2 051c 6811 |h | Jump_Zero 0x52e 051d 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x19.0x7 = 0x51d,0x3 051f 00d9 | | Load_Top At_Offset_1 0520 e005 | | Load 0x0,0x5 0521 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0522 025e | ^ | Execute Discrete,Convert 0523 1c01 | | Execute_Immediate Run_Utility,0x1 0524 01cc | | Execute Vector,Catenate 0525 0092 0a21 | !| Action Push_String_Extended,0xa21 ; " getting directory object for ada unit " 0527 01cc | | Execute Vector,Catenate 0528 e7ff | | Load 0x3,-0x1 0529 e005 | | Load 0x0,0x5 052a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 052b 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 052c 01cc | | Execute Vector,Catenate 052d 8021 | ! | Call 0x0,0x21 052e e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x8 = 0x52e,0x4 052f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0530 e603 | | Load 0x3,0x3 0531 0120 | | Execute Any,Is_Value 0532 6804 |h | Jump_Zero 0x537 0533 e005 | | Load 0x0,0x5 0534 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0535 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0536 7801 |x | Jump 0x538 0537 e603 | | Load 0x3,0x3 0538 e602 | | Load 0x3,0x2 0539 e005 | | Load 0x0,0x5 053a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 053b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 053c e005 | | Load 0x0,0x5 053d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 053e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 053f c603 | | Store 0x3,0x3 0540 0059 | Y | Store_Top Discrete,At_Offset_1 0541 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x9 = 0x541,0x5 0542 6814 |h | Jump_Zero 0x557 0543 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x19.0xa = 0x543,0x6 0545 00d9 | | Load_Top At_Offset_1 0546 e005 | | Load 0x0,0x5 0547 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0548 025e | ^ | Execute Discrete,Convert 0549 1c01 | | Execute_Immediate Run_Utility,0x1 054a 01cc | | Execute Vector,Catenate 054b 0092 0a22 | "| Action Push_String_Extended,0xa22 ; " getting enclosing world for ada unit " 054d 01cc | | Execute Vector,Catenate 054e e602 | | Load 0x3,0x2 054f e005 | | Load 0x0,0x5 0550 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0551 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0552 e005 | | Load 0x0,0x5 0553 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0554 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0555 01cc | | Execute Vector,Catenate 0556 8021 | ! | Call 0x0,0x21 0557 e005 | | Load 0x0,0x5 ; Debug Table 0x19.0xb = 0x557,0x7 0558 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0559 00db | | Load_Top At_Offset_3 055a 0120 | | Execute Any,Is_Value 055b 6803 |h | Jump_Zero 0x55f 055c e005 | | Load 0x0,0x5 055d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 055e 7801 |x | Jump 0x560 055f 00db | | Load_Top At_Offset_3 0560 0092 0a23 | #| Action Push_String_Extended,0xa23 ; "*PROGRAM_LIBRARY" 0562 e603 | | Load 0x3,0x3 0563 e005 | | Load 0x0,0x5 0564 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0565 180f | | Execute Package,Field_Execute,Field_Number 0xf 0566 c604 | | Store 0x3,0x4 0567 0059 | Y | Store_Top Discrete,At_Offset_1 0568 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0xc = 0x568,0x8 0569 6814 |h | Jump_Zero 0x57e 056a 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x19.0xd = 0x56a,0x9 056c 00d9 | | Load_Top At_Offset_1 056d e005 | | Load 0x0,0x5 056e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 056f 025e | ^ | Execute Discrete,Convert 0570 1c01 | | Execute_Immediate Run_Utility,0x1 0571 01cc | | Execute Vector,Catenate 0572 0092 0a24 | $| Action Push_String_Extended,0xa24 ; " getting program library for world " 0574 01cc | | Execute Vector,Catenate 0575 e603 | | Load 0x3,0x3 0576 e005 | | Load 0x0,0x5 0577 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0578 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0579 e005 | | Load 0x0,0x5 057a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 057b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 057c 01cc | | Execute Vector,Catenate 057d 8021 | ! | Call 0x0,0x21 057e e005 | | Load 0x0,0x5 ; Debug Table 0x19.0xe = 0x57e,0xa 057f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0580 00da | | Load_Top At_Offset_2 0581 65b6 |e | Indirect_Literal Discrete,0x338,{0x00000000, 0x00004000} 0582 e002 | | Load 0x0,0x2 0583 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0584 4800 |H | Short_Literal 0x0 0585 e604 | | Load 0x3,0x4 0586 e005 | | Load 0x0,0x5 0587 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0588 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0589 00d1 | | Pop_Control Pop_Count_1 058a 0059 | Y | Store_Top Discrete,At_Offset_1 058b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0xf = 0x58b,0xb 058c 6811 |h | Jump_Zero 0x59e 058d 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x19.0x10 = 0x58d,0xc 058f 00d9 | | Load_Top At_Offset_1 0590 e005 | | Load 0x0,0x5 0591 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0592 025e | ^ | Execute Discrete,Convert 0593 1c01 | | Execute_Immediate Run_Utility,0x1 0594 01cc | | Execute Vector,Catenate 0595 0092 0a25 | %| Action Push_String_Extended,0xa25 ; " getting version of program_library " 0597 01cc | | Execute Vector,Catenate 0598 00db | | Load_Top At_Offset_3 0599 e005 | | Load 0x0,0x5 059a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 059b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 059c 01cc | | Execute Vector,Catenate 059d 8021 | ! | Call 0x0,0x21 059e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x11 = 0x59e,0xd 059f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05c6 | | .CONST 0x05c6 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 000f | | .CONST 0x000f ; Number of locals 05a3 INIT_05a0: 05a3 e017 | | Load 0x0,0x17 ; Debug Table 0x1a = .DEBUG 0x05a3,0x0f52,0x1001,0x0000,0x0058,0xc985,0x0000,0x0a20 ; Debug Table 0x1a.0x0 = 0x5a3,0xffff 05a4 00db | | Load_Top At_Offset_3 05a5 0217 | | Execute Heap_Access,All_Reference 05a6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 05a7 0031 | 1 | Store_Top Heap_Access,At_Offset_1 05a8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1a.0x1 = 0x5a8,0xfffe 05a9 e022 | " | Load 0x0,0x22 ; Debug Table 0x1a.0x2 = 0x5a9,0xfffd 05aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05ab 02c7 | | Declare_Variable Any 05ac 00d8 | | Load_Top At_Offset_0 05ad 1c00 | | Execute_Immediate Run_Utility,0x0 05ae 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1a.0x3 = 0x5ae,0xfffc 05af 02c7 | | Declare_Variable Any 05b0 00d8 | | Load_Top At_Offset_0 05b1 1c00 | | Execute_Immediate Run_Utility,0x0 05b2 00eb | | Load_Encached Diana_Cache ; Debug Table 0x1a.0x4 = 0x5b2,0xfffb 05b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05b4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1a.0x5 = 0x5b4,0xfffa 05b5 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1a.0x6 = 0x5b5,0xfff9 05b6 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1a.0x7 = 0x5b6,0xfff8 05b7 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1a.0x8 = 0x5b7,0xfff7 05b8 e005 | | Load 0x0,0x5 ; Debug Table 0x1a.0x9 = 0x5b8,0xfff6 05b9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 05ba 02ff | | Declare_Variable Variant_Record 05bb 00d8 | | Load_Top At_Offset_0 05bc 1c00 | | Execute_Immediate Run_Utility,0x0 05bd e022 | " | Load 0x0,0x22 ; Debug Table 0x1a.0xa = 0x5bd,0xfff5 05be 1b10 | | Execute Package,Field_Read,Field_Number 0x10 05bf e009 | | Load 0x0,0x9 ; Debug Table 0x1a.0xb = 0x5bf,0xfff4 05c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05c1 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1a.0xc = 0x5c1,0xfff3 05c2 e008 | | Load 0x0,0x8 ; Debug Table 0x1a.0xd = 0x5c2,0xfff2 05c3 0322 | " | Declare_Variable Record 05c4 00d8 | | Load_Top At_Offset_0 05c5 1c00 | | Execute_Immediate Run_Utility,0x0 05c6 BODY_05a0: 05c6 e602 | | Load 0x3,0x2 ; Debug Table 0x1a.0xe = 0x5c6,0x1 05c7 0217 | | Execute Heap_Access,All_Reference 05c8 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 05c9 0217 | | Execute Heap_Access,All_Reference 05ca 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05cb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05cc 8419 | | Call 0x2,0x19 05cd 68ac |h | Jump_Zero 0x67a 05ce e7ff | | Load 0x3,-0x1 ; Debug Table 0x1a.0xf = 0x5ce,0x2 05cf 0217 | | Execute Heap_Access,All_Reference 05d0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05d1 e00c | | Load 0x0,0xc 05d2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05d3 6803 |h | Jump_Zero 0x5d7 05d4 e7ff | | Load 0x3,-0x1 ; Debug Table 0x1a.0x10 = 0x5d4,0x3 05d5 8420 | | Call 0x2,0x20 05d6 7898 |x | Jump 0x66f 05d7 e7ff | | Load 0x3,-0x1 ; Debug Table 0x1a.0x11 = 0x5d7,0x4 05d8 0217 | | Execute Heap_Access,All_Reference 05d9 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05da 800d | | Call 0x0,0xd 05db a603 | | Store_Unchecked 0x3,0x3 05dc e603 | | Load 0x3,0x3 ; Debug Table 0x1a.0x12 = 0x5dc,0x5 05dd e023 | # | Load 0x0,0x23 05de 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05df 7002 |p | Jump_Nonzero 0x5e2 05e0 4887 |H | Short_Literal 0x87 05e1 0257 | W | Execute Discrete,Raise 05e2 e603 | | Load 0x3,0x3 ; Debug Table 0x1a.0x13 = 0x5e2,0x6 05e3 e023 | # | Load 0x0,0x23 05e4 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 05e5 c604 | | Store 0x3,0x4 05e6 e603 | | Load 0x3,0x3 ; Debug Table 0x1a.0x14 = 0x5e6,0x7 05e7 e023 | # | Load 0x0,0x23 05e8 1868 | h | Execute Package,Field_Execute,Field_Number 0x68 05e9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 05ea 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1a.0x15 = 0x5ea,0x8 05eb 6821 |h! | Jump_Zero 0x60d 05ec 00cf | | Action Mark_Auxiliary ; Debug Table 0x1a.0x16 = 0x5ec,0x9 05ed e603 | | Load 0x3,0x3 ; Debug Table 0x1a.0x17 = 0x5ed,0xfbff 05ee e023 | # | Load 0x0,0x23 05ef 1867 | g | Execute Package,Field_Execute,Field_Number 0x67 05f0 00cf | | Action Mark_Auxiliary 05f1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1a.0x18 = 0x5f1,0x401 05f2 01dc | | Execute Vector,Last 05f3 00da | | Load_Top At_Offset_2 05f4 01dd | | Execute Vector,First 05f5 0263 | c | Execute Discrete,Above_Bound 05f6 7013 |p | Jump_Nonzero 0x60a 05f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x19 = 0x5f7,0x402 05f8 e611 | | Load 0x3,0x11 05f9 01d5 | | Execute Vector,Field_Reference 05fa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05fb e60f | | Load 0x3,0xf 05fc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 05fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x1a = 0x5fd,0x403 05fe e611 | | Load 0x3,0x11 05ff 01d5 | | Execute Vector,Field_Reference 0600 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0601 e60f | | Load 0x3,0xf 0602 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0603 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x1b = 0x603,0x404 0604 e41c | | Load 0x2,0x1c 0605 4801 |H | Short_Literal 0x1 0606 e60f | | Load 0x3,0xf 0607 841e | | Call 0x2,0x1e 0608 00c8 | | Action Pop_Auxiliary_Range 0609 3fed |? | Loop_Increasing 0x5f7 060a 00ce | | Action Pop_Auxiliary 060b 00d1 | | Pop_Control Pop_Count_1 060c 00ce | | Action Pop_Auxiliary 060d 00cf | | Action Mark_Auxiliary 060e e604 | | Load 0x3,0x4 ; Debug Table 0x1a.0x1c = 0x60e,0xa 060f e022 | " | Load 0x0,0x22 0610 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0611 4801 |H | Short_Literal 0x1 0612 0263 | c | Execute Discrete,Above_Bound 0613 705a |pZ | Jump_Nonzero 0x66e 0614 e022 | " | Load 0x0,0x22 ; Debug Table 0x1a.0x1d = 0x614,0xb 0615 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0616 e60b | | Load 0x3,0xb 0617 00e1 | | Load_Encached Boolean_Cache 0618 00e1 | | Load_Encached Boolean_Cache 0619 00e3 | | Load_Encached Natural_Cache 061a 00ec | | Load_Encached Diana_Tree_Cache 061b 00eb | | Load_Encached Diana_Cache 061c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 061d e605 | | Load 0x3,0x5 061e 0120 | | Execute Any,Is_Value 061f 6802 |h | Jump_Zero 0x622 0620 00ed | | Load_Encached Diana_Symbol_Rep_Cache 0621 7801 |x | Jump 0x623 0622 e605 | | Load 0x3,0x5 0623 e612 | | Load 0x3,0x12 0624 e604 | | Load 0x3,0x4 0625 e022 | " | Load 0x0,0x22 0626 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0627 c605 | | Store 0x3,0x5 0628 c606 | | Store 0x3,0x6 0629 c607 | | Store 0x3,0x7 062a c608 | | Store 0x3,0x8 062b c609 | | Store 0x3,0x9 062c c60a | | Store 0x3,0xa 062d 00d1 | | Pop_Control Pop_Count_1 062e c60c | | Store 0x3,0xc 062f e60e | | Load 0x3,0xe ; Debug Table 0x1a.0x1e = 0x62f,0xc 0630 6802 |h | Jump_Zero 0x633 0631 e609 | | Load 0x3,0x9 0632 6806 |h | Jump_Zero 0x639 0633 e60a | | Load 0x3,0xa ; Debug Table 0x1a.0x1f = 0x633,0xd 0634 7004 |p | Jump_Nonzero 0x639 0635 e607 | | Load 0x3,0x7 ; Debug Table 0x1a.0x20 = 0x635,0xe 0636 e009 | | Load 0x0,0x9 0637 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0638 a60d | | Store_Unchecked 0x3,0xd 0639 e60a | | Load 0x3,0xa ; Debug Table 0x1a.0x21 = 0x639,0xf 063a 6809 |h | Jump_Zero 0x644 063b e60b | | Load 0x3,0xb ; Debug Table 0x1a.0x22 = 0x63b,0x10 063c e605 | | Load 0x3,0x5 063d 00eb | | Load_Encached Diana_Cache 063e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 063f e005 | | Load 0x0,0x5 0640 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0641 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0642 8421 | ! | Call 0x2,0x21 0643 7828 |x( | Jump 0x66c 0644 e607 | | Load 0x3,0x7 ; Debug Table 0x1a.0x23 = 0x644,0x11 0645 e024 | $ | Load 0x0,0x24 0646 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0647 680a |h | Jump_Zero 0x652 0648 e607 | | Load 0x3,0x7 ; Debug Table 0x1a.0x24 = 0x648,0x12 0649 8422 | " | Call 0x2,0x22 064a e605 | | Load 0x3,0x5 064b 00eb | | Load_Encached Diana_Cache 064c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 064d e005 | | Load 0x0,0x5 064e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 064f 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0650 8421 | ! | Call 0x2,0x21 0651 781a |x | Jump 0x66c 0652 e60e | | Load 0x3,0xe ; Debug Table 0x1a.0x25 = 0x652,0x13 0653 7003 |p | Jump_Nonzero 0x657 0654 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x26 = 0x654,0x14 0655 e60d | | Load 0x3,0xd 0656 841f | | Call 0x2,0x1f 0657 e609 | | Load 0x3,0x9 ; Debug Table 0x1a.0x27 = 0x657,0x15 0658 6813 |h | Jump_Zero 0x66c 0659 e60d | | Load 0x3,0xd 065a e7ff | | Load 0x3,-0x1 065b e009 | | Load 0x0,0x9 065c 1820 | | Execute Package,Field_Execute,Field_Number 0x20 065d 021e | | Execute Heap_Access,Maximum 065e 680d |h | Jump_Zero 0x66c 065f e60d | | Load 0x3,0xd ; Debug Table 0x1a.0x28 = 0x65f,0x16 0660 e009 | | Load 0x0,0x9 0661 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0662 6804 |h | Jump_Zero 0x667 0663 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0x29 = 0x663,0x17 0664 e60d | | Load 0x3,0xd 0665 8423 | # | Call 0x2,0x23 0666 7805 |x | Jump 0x66c 0667 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0x2a = 0x667,0x18 0668 e60d | | Load 0x3,0xd 0669 e009 | | Load 0x0,0x9 066a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 066b 8423 | # | Call 0x2,0x23 066c 00c8 | | Action Pop_Auxiliary_Range 066d 3fa6 |? | Loop_Increasing 0x614 066e 00ce | | Action Pop_Auxiliary 066f e7fe | | Load 0x3,-0x2 ; Debug Table 0x1a.0x2b = 0x66f,0x19 0670 6809 |h | Jump_Zero 0x67a 0671 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x2c = 0x671,0x1a 0672 e41c | | Load 0x2,0x1c 0673 4801 |H | Short_Literal 0x1 0674 e602 | | Load 0x3,0x2 0675 0217 | | Execute Heap_Access,All_Reference 0676 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 0677 0217 | | Execute Heap_Access,All_Reference 0678 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0679 841e | | Call 0x2,0x1e 067a e7fe | | Load 0x3,-0x2 ; Debug Table 0x1a.0x2d = 0x67a,0x1b 067b 7005 |p | Jump_Nonzero 0x681 067c 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x2e = 0x67c,0x1c 067d e41c | | Load 0x2,0x1c 067e 4800 |H | Short_Literal 0x0 067f e025 | % | Load 0x0,0x25 0680 841e | | Call 0x2,0x1e 0681 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0682 0000 0000 | | .BLANK 0000[0x6] 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 068b | | .CONST 0x068b ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0001 | | .CONST 0x0001 ; Number of locals 068b BODY_0688: 068b INIT_0688: 068b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x068b,0x0fb2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0bee ; Debug Table 0x1b.0x0 = 0x68b,0x1 068c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 068d 8212 | | Call 0x1,0x12 068e 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x1 = 0x68e,0x2 068f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0690 8211 | | Call 0x1,0x11 0691 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x2 = 0x691,0x3 0692 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0693 8211 | | Call 0x1,0x11 0694 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0695 0000 0000 | | .XXX[0x3] 0697 0000 | | 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0001 | | .CONST 0x0001 ; Number of locals 069b BODY_0698: 069b INIT_0698: 069b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c = .DEBUG 0x069b,0x0fba,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c17 ; Debug Table 0x1c.0x0 = 0x69b,0x1 069c 021d | | Execute Heap_Access,Is_Null 069d 0f00 | | Execute_Immediate Equal,0x0 069e 820f | | Call 0x1,0xf 069f 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0x1 = 0x69f,0x2 06a0 6816 |h | Jump_Zero 0x6b7 06a1 00cf | | Action Mark_Auxiliary ; Debug Table 0x1c.0x2 = 0x6a1,0x3 06a2 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x3 = 0x6a2,0xfbff 06a3 0217 | | Execute Heap_Access,All_Reference 06a4 0007 | | Action Break_Optional 06a5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x4 = 0x6a5,0x401 06a6 01db | | Execute Vector,Length 06a7 0248 | H | Execute Discrete,Check_In_Integer 06a8 8211 | | Call 0x1,0x11 06a9 00cf | | Action Mark_Auxiliary 06aa 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x5 = 0x6aa,0x402 06ab 01d9 | | Execute Vector,Reverse_Bounds 06ac 0263 | c | Execute Discrete,Above_Bound 06ad 7006 |p | Jump_Nonzero 0x6b4 06ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x6 = 0x6ae,0x403 06af e603 | | Load 0x3,0x3 06b0 01d5 | | Execute Vector,Field_Reference 06b1 8424 | $ | Call 0x2,0x24 06b2 00c8 | | Action Pop_Auxiliary_Range 06b3 3ffa |? | Loop_Increasing 0x6ae 06b4 00ce | | Action Pop_Auxiliary 06b5 00d1 | | Pop_Control Pop_Count_1 06b6 00ce | | Action Pop_Auxiliary 06b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06be | | .CONST 0x06be ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0002 | | .CONST 0x0002 ; Number of locals 06bb INIT_06b8: 06bb 00da | | Load_Top At_Offset_2 ; Debug Table 0x1d = .DEBUG 0x06bb,0x0fca,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c56 ; Debug Table 0x1d.0x0 = 0x6bb,0xffff 06bc 0217 | | Execute Heap_Access,All_Reference 06bd 0007 | | Action Break_Optional 06be BODY_06b8: 06be 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1 = 0x6be,0x1 06bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06c0 8425 | % | Call 0x2,0x25 06c1 4800 |H | Short_Literal 0x0 ; Debug Table 0x1d.0x2 = 0x6c1,0x2 06c2 e41c | | Load 0x2,0x1c 06c3 4800 |H | Short_Literal 0x0 06c4 00db | | Load_Top At_Offset_3 06c5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06c6 841e | | Call 0x2,0x1e 06c7 4800 |H | Short_Literal 0x0 ; Debug Table 0x1d.0x3 = 0x6c7,0x3 06c8 00d9 | | Load_Top At_Offset_1 06c9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 06ca 8415 | | Call 0x2,0x15 06cb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06cc 0000 0000 | | .BLANK 0000[0x4] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06d5 | | .CONST 0x06d5 ; Address of begin 06d1 0004 | | .CONST 0x0004 ; Address of exception handler 06d2 0002 | | .CONST 0x0002 ; Number of locals 06d3 INIT_06d0: 06d3 e003 | | Load 0x0,0x3 ; Debug Table 0x1e = .DEBUG 0x06d3,0x0fd4,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d1c ; Debug Table 0x1e.0x0 = 0x6d3,0xffff 06d4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06d5 BODY_06d0: 06d5 4800 |H | Short_Literal 0x0 ; Debug Table 0x1e.0x1 = 0x6d5,0x1 06d6 e7ff | | Load 0x3,-0x1 06d7 841f | | Call 0x2,0x1f 06d8 4800 |H | Short_Literal 0x0 ; Debug Table 0x1e.0x2 = 0x6d8,0x2 06d9 e41c | | Load 0x2,0x1c 06da 4800 |H | Short_Literal 0x0 06db e025 | % | Load 0x0,0x25 06dc 841e | | Call 0x2,0x1e 06dd 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x3 = 0x6dd,0x3 06de 0217 | | Execute Heap_Access,All_Reference 06df 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 06e0 8411 | | Call 0x2,0x11 06e1 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x4 = 0x6e1,0x4 06e2 8412 | | Call 0x2,0x12 06e3 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x5 = 0x6e3,0x5 06e4 8417 | | Call 0x2,0x17 06e5 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x6 = 0x6e5,0x6 06e6 e009 | | Load 0x0,0x9 06e7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 06e8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 06e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x7 = 0x6e9,0x7 06ea 6804 |h | Jump_Zero 0x6ef 06eb 00d8 | | Load_Top At_Offset_0 06ec e7ff | | Load 0x3,-0x1 06ed 021f | | Execute Heap_Access,Equal 06ee 6803 |h | Jump_Zero 0x6f2 06ef 4800 |H | Short_Literal 0x0 ; Debug Table 0x1e.0x8 = 0x6ef,0x8 06f0 820f | | Call 0x1,0xf 06f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06f2 4801 |H | Short_Literal 0x1 ; Debug Table 0x1e.0x9 = 0x6f2,0x9 06f3 820f | | Call 0x1,0xf 06f4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0xa = 0x6f4,0xa 06f5 8417 | | Call 0x2,0x17 06f6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06f7 0000 | | .XXX[0x1] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fd | | .CONST 0x06fd ; Address of begin 06f9 0004 | | .CONST 0x0004 ; Address of exception handler 06fa 0002 | | .CONST 0x0002 ; Number of locals 06fb INIT_06f8: 06fb 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x1f = .DEBUG 0x06fb,0x0fec,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d74 ; Debug Table 0x1f.0x0 = 0x6fb,0xffff 06fc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 06fd BODY_06f8: 06fd e217 | | Load 0x1,0x17 ; Debug Table 0x1f.0x1 = 0x6fd,0x1 06fe 8211 | | Call 0x1,0x11 06ff e217 | | Load 0x1,0x17 ; Debug Table 0x1f.0x2 = 0x6ff,0x2 0700 4802 |H | Short_Literal 0x2 0701 e00f | | Load 0x0,0xf 0702 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0703 e010 | | Load 0x0,0x10 0704 025b | [ | Execute Discrete,Check_In_Type 0705 8011 | | Call 0x0,0x11 0706 027b | { | Execute Discrete,Greater_Equal 0707 6804 |h | Jump_Zero 0x70c 0708 00db | | Load_Top At_Offset_3 ; Debug Table 0x1f.0x3 = 0x708,0x3 0709 e409 | | Load 0x2,0x9 070a 8026 | & | Call 0x0,0x26 070b 8212 | | Call 0x1,0x12 070c e027 | ' | Load 0x0,0x27 ; Debug Table 0x1f.0x4 = 0x70c,0x4 070d 180e | | Execute Package,Field_Execute,Field_Number 0xe 070e 8212 | | Call 0x1,0x12 070f 00cf | | Action Mark_Auxiliary 0710 780b |x | Jump 0x71c 0711 4801 |H | Short_Literal 0x1 ; Debug Table 0x1f.0x5 = 0x711,0x6 0712 820f | | Call 0x1,0xf 0713 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1f.0x6 = 0x713,0x7 0714 e407 | | Load 0x2,0x7 0715 e405 | | Load 0x2,0x5 0716 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0717 8427 | ' | Call 0x2,0x27 0718 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1f.0x7 = 0x718,0x8 0719 0a01 | | Execute_Immediate Plus,0x1 071a 005a | Z | Store_Top Discrete,At_Offset_2 071b 00c9 | | Action Pop_Auxiliary_Loop 071c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1f.0x8 = 0x71c,0x5 071d e408 | | Load 0x2,0x8 071e 027a | z | Execute Discrete,Less_Equal 071f 77f1 |w | Jump_Nonzero 0x711 0720 00ce | | Action Pop_Auxiliary 0721 4800 |H | Short_Literal 0x0 ; Debug Table 0x1f.0x9 = 0x721,0x9 0722 820f | | Call 0x1,0xf 0723 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0724 0000 0000 | | .BLANK 0000[0x4] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 0738 | 8 | .CONST 0x0738 ; Address of begin 0729 075f | _ | .CONST 0x075f ; Address of exception handler 072a 0004 | | .CONST 0x0004 ; Number of locals 072b INIT_0728: 072b e003 | | Load 0x0,0x3 ; Debug Table 0x20 = .DEBUG 0x072b,0x1002,0x1001,0x0000,0x0058,0xc985,0x0000,0x0dce ; Debug Table 0x20.0x0 = 0x72b,0xffff 072c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 072d e002 | | Load 0x0,0x2 ; Debug Table 0x20.0x1 = 0x72d,0xfffe 072e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 072f 02c7 | | Declare_Variable Any 0730 e027 | ' | Load 0x0,0x27 0731 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0732 e7ff | | Load 0x3,-0x1 0733 e002 | | Load 0x0,0x2 0734 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0735 c603 | | Store 0x3,0x3 0736 029f 09d3 | | Declare_Subprogram INIT_09d0,For_Call ; Debug Table 0x20.0x2 = 0x736,0xfffd 0738 BODY_0728: 0738 4801 |H | Short_Literal 0x1 ; Debug Table 0x20.0x3 = 0x738,0x1 0739 a5fe | | Store_Unchecked 0x2,-0x2 073a e001 | | Load 0x0,0x1 ; Debug Table 0x20.0x4 = 0x73a,0x2 073b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 073c c5fd | | Store 0x2,-0x3 073d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x20.0x5 = 0x73d,0x3 073e 840e | | Call 0x2,0xe 073f 00cf | | Action Mark_Auxiliary 0740 0007 | | Action Break_Optional ; Debug Table 0x20.0x6 = 0x740,0x4 0741 e009 | | Load 0x0,0x9 ; Debug Table 0x20.0x7 = 0x741,0x5 0742 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0743 8216 | | Call 0x1,0x16 0744 e003 | | Load 0x0,0x3 0745 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0746 0216 | | Execute Heap_Access,Convert 0747 c602 | | Store 0x3,0x2 0748 00db | | Load_Top At_Offset_3 ; Debug Table 0x20.0x8 = 0x748,0x6 0749 6805 |h | Jump_Zero 0x74f 074a 4801 |H | Short_Literal 0x1 ; Debug Table 0x20.0x9 = 0x74a,0x7 074b e602 | | Load 0x3,0x2 074c 840d | | Call 0x2,0xd 074d 00c9 | | Action Pop_Auxiliary_Loop 074e 7ff2 | | Jump 0x741 074f 00ce | | Action Pop_Auxiliary 0750 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x20.0xa = 0x750,0x8 0751 8428 | ( | Call 0x2,0x28 0752 e028 | ( | Load 0x0,0x28 ; Debug Table 0x20.0xb = 0x752,0x9 0753 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0754 6802 |h | Jump_Zero 0x757 0755 8604 | | Call 0x3,0x4 ; Debug Table 0x20.0xc = 0x755,0xa 0756 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0757 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x20.0xd = 0x757,0xb 0758 4801 |H | Short_Literal 0x1 0759 4800 |H | Short_Literal 0x0 075a e7ff | | Load 0x3,-0x1 075b e002 | | Load 0x0,0x2 075c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 075d c603 | | Store 0x3,0x3 075e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 075f TRAP_0728: 075f 62b4 |b | Indirect_Literal Discrete,0xa14,{0x00000000, 0x57338501} 0760 010f | | Execute Exception,Equal 0761 6802 |h | Jump_Zero 0x764 0762 8604 | | Call 0x3,0x4 ; Debug Table 0x20.0xe = 0x762,0xc 0763 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0764 0092 0a26 | &| Action Push_String_Extended,0xa26 ; "in Save" ; Debug Table 0x20.0xf = 0x764,0xd 0766 e028 | ( | Load 0x0,0x28 0767 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0768 8604 | | Call 0x3,0x4 ; Debug Table 0x20.0x10 = 0x768,0xe 0769 4502 |E | Exit_Suprogram New_Top_Offset 0x2 076a 0000 0000 | | .BLANK 0000[0x6] 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 0773 | s | .CONST 0x0773 ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0001 | | .CONST 0x0001 ; Number of locals 0773 BODY_0770: 0773 INIT_0770: 0773 e606 | | Load 0x3,0x6 ; Debug Table 0x21 = .DEBUG 0x0773,0x1026,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x006a ; Debug Table 0x21.0x0 = 0x773,0x1 0774 680e |h | Jump_Zero 0x783 0775 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x21.0x1 = 0x775,0x2 0777 00db | | Load_Top At_Offset_3 0778 01cc | | Execute Vector,Catenate 0779 0092 0a27 | '| Action Push_String_Extended,0xa27 ; ": " 077b 01cc | | Execute Vector,Catenate 077c e606 | | Load 0x3,0x6 077d e019 | | Load 0x0,0x19 077e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 077f 025e | ^ | Execute Discrete,Convert 0780 1c01 | | Execute_Immediate Run_Utility,0x1 0781 01cc | | Execute Vector,Catenate 0782 8021 | ! | Call 0x0,0x21 0783 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0784 0000 0000 | | .BLANK 0000[0x4] 0788 ; -------------------------------------------------------------------------------------- 0788 ; SUBPROGRAM 0788 ; -------------------------------------------------------------------------------------- 0788 078b | | .CONST 0x078b ; Address of begin 0789 0004 | | .CONST 0x0004 ; Address of exception handler 078a 0001 | | .CONST 0x0001 ; Number of locals 078b BODY_0788: 078b INIT_0788: 078b e019 | | Load 0x0,0x19 ; Debug Table 0x22 = .DEBUG 0x078b,0x102c,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x0098 ; Debug Table 0x22.0x0 = 0x78b,0x1 078c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 078d e018 | | Load 0x0,0x18 078e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 078f e604 | | Load 0x3,0x4 0790 e9ff | | Load 0x4,-0x1 0791 e018 | | Load 0x0,0x18 0792 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0793 c604 | | Store 0x3,0x4 0794 c9fe | | Store 0x4,-0x2 0795 c606 | | Store 0x3,0x6 0796 0092 0a28 | (| Action Push_String_Extended,0xa28 ; "reading instruction from code segment" ; Debug Table 0x22.0x1 = 0x796,0x2 0798 860b | | Call 0x3,0xb 0799 4502 |E | Exit_Suprogram New_Top_Offset 0x2 079a 0000 0000 | | .BLANK 0000[0x6] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07b3 | | .CONST 0x07b3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0008 | | .CONST 0x0008 ; Number of locals 07a3 INIT_07a0: 07a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x23 = .DEBUG 0x07a3,0x1032,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x00b9 ; Debug Table 0x23.0x0 = 0x7a3,0xffff 07a4 e018 | | Load 0x0,0x18 07a5 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07a6 03f1 | | Declare_Variable Discrete,With_Value 07a7 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x1 = 0x7a7,0xfffe 07a8 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07a9 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x2 = 0x7a9,0xfffd 07aa 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07ab e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x3 = 0x7ab,0xfffc 07ac 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07ad e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x4 = 0x7ad,0xfffb 07ae 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07af e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x5 = 0x7af,0xfffa 07b0 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07b1 e006 | | Load 0x0,0x6 ; Debug Table 0x23.0x6 = 0x7b1,0xfff9 07b2 1b16 | | Execute Package,Field_Read,Field_Number 0x16 07b3 BODY_07a0: 07b3 00cf | | Action Mark_Auxiliary 07b4 0007 | | Action Break_Optional ; Debug Table 0x23.0x7 = 0x7b4,0x1 07b5 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x8 = 0x7b5,0x2 07b6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07b7 e802 | | Load 0x4,0x2 07b8 860c | | Call 0x3,0xc 07b9 e01d | | Load 0x0,0x1d 07ba 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07bb 025e | ^ | Execute Discrete,Convert 07bc c803 | | Store 0x4,0x3 07bd e803 | | Load 0x4,0x3 ; Debug Table 0x23.0x9 = 0x7bd,0x3 07be 689a |h | Jump_Zero 0x859 07bf e802 | | Load 0x4,0x2 ; Debug Table 0x23.0xa = 0x7bf,0x4 07c0 0a01 | | Execute_Immediate Plus,0x1 07c1 c802 | | Store 0x4,0x2 07c2 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0xb = 0x7c2,0x5 07c3 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07c4 e803 | | Load 0x4,0x3 07c5 860c | | Call 0x3,0xc 07c6 c804 | | Store 0x4,0x4 07c7 e804 | | Load 0x4,0x4 ; Debug Table 0x23.0xc = 0x7c7,0x6 07c8 0ba2 | | Execute_Immediate Case_Compare,0xa2 07c9 700d |p | Jump_Nonzero 0x7d7 07ca 00d8 | | Load_Top At_Offset_0 07cb 6244 |bD | Indirect_Literal Discrete,0xa10,{0x00000000, 0x00006000} 07cc 623f |b? | Indirect_Literal Discrete,0xa0c,{0x00000000, 0x000067ff} 07cd 0262 | b | Execute Discrete,In_Range 07ce 7015 |p | Jump_Nonzero 0x7e4 07cf 0092 0a29 | )| Action Push_String_Extended,0xa29 ; "Unexpected literal instruction in elab code segment:" ; Debug Table 0x23.0xd = 0x7cf,0x9 07d1 e804 | | Load 0x4,0x4 07d2 00e0 | | Load_Encached Standard_Cache 07d3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07d4 01cc | | Execute Vector,Catenate 07d5 8021 | ! | Call 0x0,0x21 07d6 7819 |x | Jump 0x7f0 07d7 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0xe = 0x7d7,0x7 07d8 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07d9 e803 | | Load 0x4,0x3 07da 0a01 | | Execute_Immediate Plus,0x1 07db e01d | | Load 0x0,0x1d 07dc 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07dd 025b | [ | Execute Discrete,Check_In_Type 07de 860c | | Call 0x3,0xc 07df e01d | | Load 0x0,0x1d 07e0 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07e1 025e | ^ | Execute Discrete,Convert 07e2 c805 | | Store 0x4,0x5 07e3 780c |x | Jump 0x7f0 07e4 e803 | | Load 0x4,0x3 ; Debug Table 0x23.0xf = 0x7e4,0x8 07e5 0a01 | | Execute_Immediate Plus,0x1 07e6 0248 | H | Execute Discrete,Check_In_Integer 07e7 e804 | | Load 0x4,0x4 07e8 621f |b | Indirect_Literal Discrete,0xa08,{0xffffffff, 0xffffa000} 07e9 0273 | s | Execute Discrete,Plus 07ea 0248 | H | Execute Discrete,Check_In_Integer 07eb e01d | | Load 0x0,0x1d 07ec 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07ed 025b | [ | Execute Discrete,Check_In_Type 07ee 0273 | s | Execute Discrete,Plus 07ef c805 | | Store 0x4,0x5 07f0 00d1 | | Pop_Control Pop_Count_1 07f1 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x10 = 0x7f1,0xa 07f2 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07f3 e805 | | Load 0x4,0x5 07f4 860c | | Call 0x3,0xc 07f5 c806 | | Store 0x4,0x6 07f6 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x11 = 0x7f6,0xb 07f7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 07f8 e805 | | Load 0x4,0x5 07f9 0a01 | | Execute_Immediate Plus,0x1 07fa e01d | | Load 0x0,0x1d 07fb 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07fc 025b | [ | Execute Discrete,Check_In_Type 07fd 860c | | Call 0x3,0xc 07fe 005b | [ | Store_Top Discrete,At_Offset_3 07ff 00db | | Load_Top At_Offset_3 ; Debug Table 0x23.0x12 = 0x7ff,0xc 0800 0910 | | Execute_Immediate Binary_Scale,0x10 0801 0248 | H | Execute Discrete,Check_In_Integer 0802 00db | | Load_Top At_Offset_3 0803 0273 | s | Execute Discrete,Plus 0804 e006 | | Load 0x0,0x6 0805 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0806 025b | [ | Execute Discrete,Check_In_Type 0807 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0808 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x13 = 0x808,0xd 0809 1b10 | | Execute Package,Field_Read,Field_Number 0x10 080a e805 | | Load 0x4,0x5 080b 0a02 | | Execute_Immediate Plus,0x2 080c e01d | | Load 0x0,0x1d 080d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 080e 025b | [ | Execute Discrete,Check_In_Type 080f 860c | | Call 0x3,0xc 0810 c806 | | Store 0x4,0x6 0811 00db | | Load_Top At_Offset_3 ; Debug Table 0x23.0x14 = 0x811,0xe 0812 6802 |h | Jump_Zero 0x815 0813 4887 |H | Short_Literal 0x87 0814 0257 | W | Execute Discrete,Raise 0815 e018 | | Load 0x0,0x18 ; Debug Table 0x23.0x15 = 0x815,0xf 0816 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0817 e805 | | Load 0x4,0x5 0818 0a03 | | Execute_Immediate Plus,0x3 0819 e01d | | Load 0x0,0x1d 081a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 081b 025b | [ | Execute Discrete,Check_In_Type 081c 860c | | Call 0x3,0xc 081d 005b | [ | Store_Top Discrete,At_Offset_3 081e 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x16 = 0x81e,0x10 081f 0fb0 | | Execute_Immediate Equal,-0x50 0820 7002 |p | Jump_Nonzero 0x823 0821 4887 |H | Short_Literal 0x87 0822 0257 | W | Execute Discrete,Raise 0823 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x23.0x17 = 0x823,0x11 0824 8419 | | Call 0x2,0x19 0825 6831 |h1 | Jump_Zero 0x857 0826 e7fd | | Load 0x3,-0x3 ; Debug Table 0x23.0x18 = 0x826,0x12 0827 e41c | | Load 0x2,0x1c 0828 022e | . | Execute Access,Not_Equal 0829 6811 |h | Jump_Zero 0x83b 082a e7fe | | Load 0x3,-0x2 ; Debug Table 0x23.0x19 = 0x82a,0x13 082b 7002 |p | Jump_Nonzero 0x82e 082c 4887 |H | Short_Literal 0x87 082d 0257 | W | Execute Discrete,Raise 082e e7fc | | Load 0x3,-0x4 ; Debug Table 0x23.0x1a = 0x82e,0x14 082f 6802 |h | Jump_Zero 0x832 0830 4887 |H | Short_Literal 0x87 0831 0257 | W | Execute Discrete,Raise 0832 4800 |H | Short_Literal 0x0 ; Debug Table 0x23.0x1b = 0x832,0x15 0833 e7fd | | Load 0x3,-0x3 0834 4801 |H | Short_Literal 0x1 0835 e808 | | Load 0x4,0x8 0836 e7fd | | Load 0x3,-0x3 0837 e41b | | Load 0x2,0x1b 0838 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0839 841d | | Call 0x2,0x1d 083a 781c |x | Jump 0x857 083b e7fc | | Load 0x3,-0x4 ; Debug Table 0x23.0x1c = 0x83b,0x16 083c 6802 |h | Jump_Zero 0x83f 083d 61c6 |a | Indirect_Literal Discrete,0xa04,{0x00000000, 0x58c98501} ; Debug Table 0x23.0x1d = 0x83d,0x17 083e 0257 | W | Execute Discrete,Raise 083f 0092 0a2a | *| Action Push_String_Extended,0xa2a ; "Error saving code segment" ; Debug Table 0x23.0x1e = 0x83f,0x18 0841 e602 | | Load 0x3,0x2 0842 00e0 | | Load_Encached Standard_Cache 0843 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0844 01cc | | Execute Vector,Catenate 0845 0092 0a2b | +| Action Push_String_Extended,0xa2b ; " (" 0847 01cc | | Execute Vector,Catenate 0848 e603 | | Load 0x3,0x3 0849 e01b | | Load 0x0,0x1b 084a 181b | | Execute Package,Field_Execute,Field_Number 0x1b 084b 01cc | | Execute Vector,Catenate 084c 0092 0a2c | ,| Action Push_String_Extended,0xa2c ; "): prerequisite code segment" 084e 01cc | | Execute Vector,Catenate 084f 00da | | Load_Top At_Offset_2 0850 00e0 | | Load_Encached Standard_Cache 0851 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0852 01cc | | Execute Vector,Catenate 0853 0092 0a2d | -| Action Push_String_Extended,0xa2d ; " has not already been saved" 0855 01cc | | Execute Vector,Catenate 0856 8021 | ! | Call 0x0,0x21 0857 00c9 | | Action Pop_Auxiliary_Loop 0858 7f5c | \ | Jump 0x7b5 0859 4502 |E | Exit_Suprogram New_Top_Offset 0x2 085a 0000 0000 | | .BLANK 0000[0x6] 0860 ; -------------------------------------------------------------------------------------- 0860 ; SUBPROGRAM 0860 ; -------------------------------------------------------------------------------------- 0860 0863 | c | .CONST 0x0863 ; Address of begin 0861 0004 | | .CONST 0x0004 ; Address of exception handler 0862 0001 | | .CONST 0x0001 ; Number of locals 0863 BODY_0860: 0863 INIT_0860: 0863 e605 | | Load 0x3,0x5 ; Debug Table 0x24 = .DEBUG 0x0863,0x1072,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x02f3 ; Debug Table 0x24.0x0 = 0x863,0x1 0864 09f8 | | Execute_Immediate Binary_Scale,-0x8 0865 e006 | | Load 0x0,0x6 0866 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0867 025b | [ | Execute Discrete,Check_In_Type 0868 e610 | | Load 0x3,0x10 0869 e60f | | Load 0x3,0xf 086a 01d6 | | Execute Vector,Field_Write 086b e605 | | Load 0x3,0x5 ; Debug Table 0x24.0x1 = 0x86b,0x2 086c 48ff |H | Short_Literal 0xff 086d 0279 | y | Execute Discrete,And 086e e006 | | Load 0x0,0x6 086f 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0870 025b | [ | Execute Discrete,Check_In_Type 0871 e610 | | Load 0x3,0x10 0872 0a01 | | Execute_Immediate Plus,0x1 0873 0248 | H | Execute Discrete,Check_In_Integer 0874 e60f | | Load 0x3,0xf 0875 01d6 | | Execute Vector,Field_Write 0876 e610 | | Load 0x3,0x10 ; Debug Table 0x24.0x2 = 0x876,0x3 0877 0a02 | | Execute_Immediate Plus,0x2 0878 c610 | | Store 0x3,0x10 0879 4501 |E | Exit_Suprogram New_Top_Offset 0x1 087a 0000 0000 | | .BLANK 0000[0x6] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 089e | | .CONST 0x089e ; Address of begin 0881 0905 | | .CONST 0x0905 ; Address of exception handler 0882 0006 | | .CONST 0x0006 ; Number of locals 0883 INIT_0880: 0883 e005 | | Load 0x0,0x5 ; Debug Table 0x25 = .DEBUG 0x0883,0x107a,0x1004,0x0000,0x0058,0xc985,0x0000,0x0760 ; Debug Table 0x25.0x0 = 0x883,0xffff 0884 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0885 e005 | | Load 0x0,0x5 ; Debug Table 0x25.0x1 = 0x885,0xfffe 0886 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0887 02c7 | | Declare_Variable Any 0888 00d8 | | Load_Top At_Offset_0 0889 1c00 | | Execute_Immediate Run_Utility,0x0 088a e020 | | Load 0x0,0x20 ; Debug Table 0x25.0x2 = 0x88a,0xfffd 088b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 088c 02c7 | | Declare_Variable Any 088d 00d8 | | Load_Top At_Offset_0 088e 1c00 | | Execute_Immediate Run_Utility,0x0 088f e020 | | Load 0x0,0x20 ; Debug Table 0x25.0x3 = 0x88f,0xfffc 0890 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0891 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0892 02c7 | | Declare_Variable Any 0893 00d8 | | Load_Top At_Offset_0 0894 1c00 | | Execute_Immediate Run_Utility,0x0 0895 e002 | | Load 0x0,0x2 ; Debug Table 0x25.0x4 = 0x895,0xfffb 0896 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0897 02c7 | | Declare_Variable Any 0898 e027 | ' | Load 0x0,0x27 0899 1810 | | Execute Package,Field_Execute,Field_Number 0x10 089a e5ff | | Load 0x2,-0x1 089b e002 | | Load 0x0,0x2 089c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 089d c806 | | Store 0x4,0x6 089e BODY_0880: 089e 4800 |H | Short_Literal 0x0 ; Debug Table 0x25.0x5 = 0x89e,0x1 089f 4800 |H | Short_Literal 0x0 08a0 4801 |H | Short_Literal 0x1 08a1 e001 | | Load 0x0,0x1 08a2 181b | | Execute Package,Field_Execute,Field_Number 0x1b 08a3 e806 | | Load 0x4,0x6 08a4 e029 | ) | Load 0x0,0x29 08a5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08a6 e02a | * | Load 0x0,0x2a 08a7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08a8 e020 | | Load 0x0,0x20 08a9 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 08aa 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08ab c805 | | Store 0x4,0x5 08ac e005 | | Load 0x0,0x5 ; Debug Table 0x25.0x6 = 0x8ac,0x2 08ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08ae e803 | | Load 0x4,0x3 08af 0120 | | Execute Any,Is_Value 08b0 6803 |h | Jump_Zero 0x8b4 08b1 e005 | | Load 0x0,0x5 08b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08b3 7801 |x | Jump 0x8b5 08b4 e803 | | Load 0x4,0x3 08b5 614a |aJ | Indirect_Literal Discrete,0xa00,{0x00000000, 0x00004000} 08b6 00db | | Load_Top At_Offset_3 08b7 e7fe | | Load 0x3,-0x2 08b8 e005 | | Load 0x0,0x5 08b9 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 08ba 181b | | Execute Package,Field_Execute,Field_Number 0x1b 08bb c803 | | Store 0x4,0x3 08bc c802 | | Store 0x4,0x2 08bd e802 | | Load 0x4,0x2 ; Debug Table 0x25.0x7 = 0x8bd,0x3 08be 6811 |h | Jump_Zero 0x8d0 08bf 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x25.0x8 = 0x8bf,0x4 08c1 e802 | | Load 0x4,0x2 08c2 e005 | | Load 0x0,0x5 08c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08c4 025e | ^ | Execute Discrete,Convert 08c5 1c01 | | Execute_Immediate Run_Utility,0x1 08c6 01cc | | Execute Vector,Catenate 08c7 0092 0a2e | .| Action Push_String_Extended,0xa2e ; " getting directory object for program library " 08c9 01cc | | Execute Vector,Catenate 08ca e7fe | | Load 0x3,-0x2 08cb e005 | | Load 0x0,0x5 08cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08cd 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 08ce 01cc | | Execute Vector,Catenate 08cf 8021 | ! | Call 0x0,0x21 08d0 00da | | Load_Top At_Offset_2 ; Debug Table 0x25.0x9 = 0x8d0,0x5 08d1 0120 | | Execute Any,Is_Value 08d2 6803 |h | Jump_Zero 0x8d6 08d3 e020 | | Load 0x0,0x20 08d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08d5 7801 |x | Jump 0x8d7 08d6 00da | | Load_Top At_Offset_2 08d7 4801 |H | Short_Literal 0x1 08d8 e803 | | Load 0x4,0x3 08d9 e805 | | Load 0x4,0x5 08da e020 | | Load 0x0,0x20 08db 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a 08dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08dd c804 | | Store 0x4,0x4 08de 00da | | Load_Top At_Offset_2 ; Debug Table 0x25.0xa = 0x8de,0x6 08df e020 | | Load 0x0,0x20 08e0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08e1 012f | / | Execute Any,Equal 08e2 680d |h | Jump_Zero 0x8f0 08e3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x25.0xb = 0x8e3,0x7 08e4 e020 | | Load 0x0,0x20 08e5 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 08e6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 08e7 e028 | ( | Load 0x0,0x28 08e8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 08e9 e028 | ( | Load 0x0,0x28 ; Debug Table 0x25.0xc = 0x8e9,0x8 08ea 181c | | Execute Package,Field_Execute,Field_Number 0x1c 08eb 7002 |p | Jump_Nonzero 0x8ee 08ec 4887 |H | Short_Literal 0x87 08ed 0257 | W | Execute Discrete,Raise 08ee 6125 |a% | Indirect_Literal Discrete,0xa14,{0x00000000, 0x57338501} ; Debug Table 0x25.0xd = 0x8ee,0x9 08ef 0257 | W | Execute Discrete,Raise 08f0 e7ff | | Load 0x3,-0x1 ; Debug Table 0x25.0xe = 0x8f0,0xa 08f1 00db | | Load_Top At_Offset_3 08f2 e020 | | Load 0x0,0x20 08f3 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a 08f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08f5 c602 | | Store 0x3,0x2 08f6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x25.0xf = 0x8f6,0xb 08f7 4801 |H | Short_Literal 0x1 08f8 4800 |H | Short_Literal 0x0 08f9 e5ff | | Load 0x2,-0x1 08fa e002 | | Load 0x0,0x2 08fb 1819 | | Execute Package,Field_Execute,Field_Number 0x19 08fc c806 | | Store 0x4,0x6 08fd e602 | | Load 0x3,0x2 ; Debug Table 0x25.0x10 = 0x8fd,0xc 08fe e020 | | Load 0x0,0x20 08ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0900 012f | / | Execute Any,Equal 0901 6802 |h | Jump_Zero 0x904 0902 00cc | | Action Pop_Block ; Debug Table 0x25.0x11 = 0x902,0xd 0903 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0904 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0905 TRAP_0880: 0905 0007 | | Action Break_Optional 0906 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x25.0x12 = 0x906,0xe 0907 4801 |H | Short_Literal 0x1 0908 4800 |H | Short_Literal 0x0 0909 e5ff | | Load 0x2,-0x1 090a e002 | | Load 0x0,0x2 090b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 090c c806 | | Store 0x4,0x6 090d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x25.0x13 = 0x90d,0xf 090e 0101 | | Execute Exception,Reraise 090f 0000 | | .XXX[0x1] 0910 ; -------------------------------------------------------------------------------------- 0910 ; SUBPROGRAM 0910 ; -------------------------------------------------------------------------------------- 0910 091a | | .CONST 0x091a ; Address of begin 0911 0004 | | .CONST 0x0004 ; Address of exception handler 0912 0003 | | .CONST 0x0003 ; Number of locals 0913 INIT_0910: 0913 e019 | | Load 0x0,0x19 ; Debug Table 0x26 = .DEBUG 0x0913,0x10a4,0x1002,0x0000,0x0058,0xc985,0x0000,0x0762 ; Debug Table 0x26.0x0 = 0x913,0xffff 0914 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0915 e018 | | Load 0x0,0x18 ; Debug Table 0x26.0x1 = 0x915,0xfffe 0916 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0917 02c7 | | Declare_Variable Any 0918 00d8 | | Load_Top At_Offset_0 0919 1c00 | | Execute_Immediate Run_Utility,0x0 091a BODY_0910: 091a 00be | | Action Activate_Tasks 091b e019 | | Load 0x0,0x19 ; Debug Table 0x26.0x2 = 0x91b,0x1 091c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 091d 00d9 | | Load_Top At_Offset_1 091e 0120 | | Execute Any,Is_Value 091f 6803 |h | Jump_Zero 0x923 0920 e018 | | Load 0x0,0x18 0921 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0922 7801 |x | Jump 0x924 0923 00d9 | | Load_Top At_Offset_1 0924 e5ff | | Load 0x2,-0x1 0925 4800 |H | Short_Literal 0x0 0926 e018 | | Load 0x0,0x18 0927 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0928 e01b | | Load 0x0,0x1b 0929 1811 | | Execute Package,Field_Execute,Field_Number 0x11 092a 4801 |H | Short_Literal 0x1 092b e9ff | | Load 0x4,-0x1 092c e018 | | Load 0x0,0x18 092d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 092e c803 | | Store 0x4,0x3 092f 005a | Z | Store_Top Discrete,At_Offset_2 0930 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x26.0x3 = 0x930,0x2 0931 6811 |h | Jump_Zero 0x943 0932 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Bad status " ; Debug Table 0x26.0x4 = 0x932,0x3 0934 00da | | Load_Top At_Offset_2 0935 e019 | | Load 0x0,0x19 0936 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0937 025e | ^ | Execute Discrete,Convert 0938 1c01 | | Execute_Immediate Run_Utility,0x1 0939 01cc | | Execute Vector,Catenate 093a 0092 0a2f | /| Action Push_String_Extended,0xa2f ; " opening code segment " 093c 01cc | | Execute Vector,Catenate 093d e9ff | | Load 0x4,-0x1 093e e005 | | Load 0x0,0x5 093f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0940 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0941 01cc | | Execute Vector,Catenate 0942 8021 | ! | Call 0x0,0x21 0943 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0x5 = 0x943,0x4 0944 e018 | | Load 0x0,0x18 0945 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0946 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0947 0000 | | .XXX[0x1] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 094d | M | .CONST 0x094d ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0003 | | .CONST 0x0003 ; Number of locals 094b INIT_0948: 094b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x27 = .DEBUG 0x094b,0x10b2,0x1001,0x0000,0x0058,0xc985,0x0000,0x07c8 ; Debug Table 0x27.0x0 = 0x94b,0xffff 094c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x27.0x1 = 0x94c,0xfffe 094d BODY_0948: 094d 00cf | | Action Mark_Auxiliary 094e 0007 | | Action Break_Optional ; Debug Table 0x27.0x2 = 0x94e,0x1 094f 4800 |H | Short_Literal 0x0 ; Debug Table 0x27.0x3 = 0x94f,0x2 0950 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0951 4800 |H | Short_Literal 0x0 ; Debug Table 0x27.0x4 = 0x951,0x3 0952 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0953 00cf | | Action Mark_Auxiliary ; Debug Table 0x27.0x5 = 0x953,0x4 0954 e020 | | Load 0x0,0x20 ; Debug Table 0x27.0x6 = 0x954,0xfbff 0955 1b52 | R | Execute Package,Field_Read,Field_Number 0x52 0956 02c7 | | Declare_Variable Any 0957 e9ff | | Load 0x4,-0x1 0958 c806 | | Store 0x4,0x6 0959 e018 | | Load 0x0,0x18 ; Debug Table 0x27.0x7 = 0x959,0xfbfe 095a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 095b 02ff | | Declare_Variable Variant_Record 095c 00d8 | | Load_Top At_Offset_0 095d 1c00 | | Execute_Immediate Run_Utility,0x0 095e 029f 09e3 | | Declare_Subprogram INIT_09e0,For_Call 0960 00cf | | Action Mark_Auxiliary 0961 780b |x | Jump 0x96d 0962 00db | | Load_Top At_Offset_3 ; Debug Table 0x27.0x8 = 0x962,0x402 0963 e020 | | Load 0x0,0x20 0964 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 0965 00db | | Load_Top At_Offset_3 0966 016d | m | Execute Variant_Record,Structure_Write 0967 8808 | | Call 0x4,0x8 ; Debug Table 0x27.0x9 = 0x967,0x403 0968 00db | | Load_Top At_Offset_3 ; Debug Table 0x27.0xa = 0x968,0x404 0969 e020 | | Load 0x0,0x20 096a 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 096b c806 | | Store 0x4,0x6 096c 00c9 | | Action Pop_Auxiliary_Loop 096d 00db | | Load_Top At_Offset_3 ; Debug Table 0x27.0xb = 0x96d,0x401 096e e020 | | Load 0x0,0x20 096f 1b53 | S | Execute Package,Field_Read,Field_Number 0x53 0970 012f | / | Execute Any,Equal 0971 6ff0 |o | Jump_Zero 0x962 0972 00ce | | Action Pop_Auxiliary 0973 00d3 | | Pop_Control Pop_Count_3 0974 00ce | | Action Pop_Auxiliary 0975 00da | | Load_Top At_Offset_2 ; Debug Table 0x27.0xc = 0x975,0x5 0976 6806 |h | Jump_Zero 0x97d 0977 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x27.0xd = 0x977,0x6 0978 7002 |p | Jump_Nonzero 0x97b 0979 4887 |H | Short_Literal 0x87 097a 0257 | W | Execute Discrete,Raise 097b 00c9 | | Action Pop_Auxiliary_Loop 097c 7fd2 | | Jump 0x94f 097d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 097e 0000 0000 | | .XXX[0x2] 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0988 | | .CONST 0x0988 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0002 | | .CONST 0x0002 ; Number of locals 0983 INIT_0980: 0983 e020 | | Load 0x0,0x20 ; Debug Table 0x28 = .DEBUG 0x0983,0x10d0,0x1001,0x0000,0x0058,0xc985,0x0000,0x084a ; Debug Table 0x28.0x0 = 0x983,0xffff 0984 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0985 02c7 | | Declare_Variable Any 0986 00d8 | | Load_Top At_Offset_0 0987 1c00 | | Execute_Immediate Run_Utility,0x0 0988 BODY_0980: 0988 e9fe | | Load 0x4,-0x2 ; Debug Table 0x28.0x1 = 0x988,0x1 0989 680f |h | Jump_Zero 0x999 098a e9fd | | Load 0x4,-0x3 ; Debug Table 0x28.0x2 = 0x98a,0x2 098b 6802 |h | Jump_Zero 0x98e 098c 4887 |H | Short_Literal 0x87 098d 0257 | W | Execute Discrete,Raise 098e 00db | | Load_Top At_Offset_3 ; Debug Table 0x28.0x3 = 0x98e,0x3 098f e020 | | Load 0x0,0x20 0990 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0991 012f | / | Execute Any,Equal 0992 7005 |p | Jump_Nonzero 0x998 0993 00db | | Load_Top At_Offset_3 0994 e020 | | Load 0x0,0x20 0995 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 0996 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0997 6801 |h | Jump_Zero 0x999 0998 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x28.0x4 = 0x998,0x4 0999 00db | | Load_Top At_Offset_3 ; Debug Table 0x28.0x5 = 0x999,0x5 099a e020 | | Load 0x0,0x20 099b 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 099c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 099d 8606 | | Call 0x3,0x6 099e 00db | | Load_Top At_Offset_3 ; Debug Table 0x28.0x6 = 0x99e,0x6 099f e020 | | Load 0x0,0x20 09a0 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 09a1 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 09a2 8606 | | Call 0x3,0x6 09a3 00db | | Load_Top At_Offset_3 ; Debug Table 0x28.0x7 = 0x9a3,0x7 09a4 e020 | | Load 0x0,0x20 09a5 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 09a6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 09a7 8606 | | Call 0x3,0x6 09a8 e9fe | | Load 0x4,-0x2 ; Debug Table 0x28.0x8 = 0x9a8,0x8 09a9 e9fd | | Load 0x4,-0x3 09aa 0278 | x | Execute Discrete,Or 09ab 6819 |h | Jump_Zero 0x9c5 09ac 00db | | Load_Top At_Offset_3 ; Debug Table 0x28.0x9 = 0x9ac,0x9 09ad e020 | | Load 0x0,0x20 09ae 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 09af 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09b0 c802 | | Store 0x4,0x2 09b1 00cf | | Action Mark_Auxiliary 09b2 780b |x | Jump 0x9be 09b3 4801 |H | Short_Literal 0x1 ; Debug Table 0x28.0xa = 0x9b3,0xb 09b4 4800 |H | Short_Literal 0x0 09b5 00db | | Load_Top At_Offset_3 09b6 e020 | | Load 0x0,0x20 09b7 181f | | Execute Package,Field_Execute,Field_Number 0x1f 09b8 8607 | | Call 0x3,0x7 09b9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x28.0xb = 0x9b9,0xc 09ba e020 | | Load 0x0,0x20 09bb 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 09bc c802 | | Store 0x4,0x2 09bd 00c9 | | Action Pop_Auxiliary_Loop 09be 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x28.0xc = 0x9be,0xa 09bf e020 | | Load 0x0,0x20 09c0 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 09c1 012f | / | Execute Any,Equal 09c2 6ff0 |o | Jump_Zero 0x9b3 09c3 00ce | | Action Pop_Auxiliary 09c4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 09c5 4800 |H | Short_Literal 0x0 ; Debug Table 0x28.0xd = 0x9c5,0xd 09c6 4801 |H | Short_Literal 0x1 09c7 e9ff | | Load 0x4,-0x1 09c8 e020 | | Load 0x0,0x20 09c9 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 09ca 180f | | Execute Package,Field_Execute,Field_Number 0xf 09cb 8607 | | Call 0x3,0x7 09cc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 09cd 0000 0000 | | .XXX[0x3] 09cf 0000 | | 09d0 ; -------------------------------------------------------------------------------------- 09d0 ; SUBPROGRAM 09d0 ; -------------------------------------------------------------------------------------- 09d0 09d3 | | .CONST 0x09d3 ; Address of begin 09d1 0004 | | .CONST 0x0004 ; Address of exception handler 09d2 0001 | | .CONST 0x0001 ; Number of locals 09d3 BODY_09d0: 09d3 INIT_09d0: 09d3 4800 |H | Short_Literal 0x0 ; Debug Table 0x29 = .DEBUG 0x09d3,0x10ee,0x1001,0x0000,0x0058,0xc985,0x0000,0x0deb ; Debug Table 0x29.0x0 = 0x9d3,0x1 09d4 a5fe | | Store_Unchecked 0x2,-0x2 09d5 e028 | ( | Load 0x0,0x28 ; Debug Table 0x29.0x1 = 0x9d5,0x2 09d6 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 09d7 c5fd | | Store 0x2,-0x3 09d8 e603 | | Load 0x3,0x3 ; Debug Table 0x29.0x2 = 0x9d8,0x3 09d9 4801 |H | Short_Literal 0x1 09da 4800 |H | Short_Literal 0x0 09db e7ff | | Load 0x3,-0x1 09dc e002 | | Load 0x0,0x2 09dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19 09de c603 | | Store 0x3,0x3 09df 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09e0 ; -------------------------------------------------------------------------------------- 09e0 ; SUBPROGRAM 09e0 ; -------------------------------------------------------------------------------------- 09e0 09e3 | | .CONST 0x09e3 ; Address of begin 09e1 09f6 | | .CONST 0x09f6 ; Address of exception handler 09e2 0001 | | .CONST 0x0001 ; Number of locals 09e3 BODY_09e0: 09e3 INIT_09e0: 09e3 4801 |H | Short_Literal 0x1 ; Debug Table 0x2a = .DEBUG 0x09e3,0x10f6,0x1004,0x0000,0x0058,0xc985,0x0000,0x082d ; Debug Table 0x2a.0x0 = 0x9e3,0x1 09e4 e41c | | Load 0x2,0x1c 09e5 4801 |H | Short_Literal 0x1 09e6 e003 | | Load 0x0,0x3 09e7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 09e8 0322 | " | Declare_Variable Record 09e9 00d8 | | Load_Top At_Offset_0 09ea 1c01 | | Execute_Immediate Run_Utility,0x1 09eb e807 | | Load 0x4,0x7 09ec 8605 | | Call 0x3,0x5 09ed 00d9 | | Load_Top At_Offset_1 09ee 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 09ef e807 | | Load 0x4,0x7 09f0 00d9 | | Load_Top At_Offset_1 09f1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 09f2 841e | | Call 0x2,0x1e 09f3 4801 |H | Short_Literal 0x1 ; Debug Table 0x2a.0x1 = 0x9f3,0x2 09f4 a803 | | Store_Unchecked 0x4,0x3 09f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09f6 TRAP_09e0: 09f6 600d |` | Indirect_Literal Discrete,0xa04,{0x00000000, 0x58c98501} 09f7 010f | | Execute Exception,Equal 09f8 6803 |h | Jump_Zero 0x9fc 09f9 4801 |H | Short_Literal 0x1 ; Debug Table 0x2a.0x2 = 0x9f9,0x3 09fa a802 | | Store_Unchecked 0x4,0x2 09fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09fc 0100 | | Execute Exception,Raise 09fd 0000 0000 | | .XXX[0x3] 09ff 0000 | | 0a00 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0a04 0000 0000 | | .LITERAL {0x00000000, 0x58c98501} 0a08 ffff ffff | | .LITERAL {0xffffffff, 0xffffa000} 0a0c 0000 0000 | | .LITERAL {0x00000000, 0x000067ff} 0a10 0000 0000 | | .LITERAL {0x00000000, 0x00006000} 0a14 0000 0000 | | .LITERAL {0x00000000, 0x57338501} 0a18 ; -------------------------------------------------------------------------------------- 0a18 ; STRING TABLE 0a18 ; -------------------------------------------------------------------------------------- 0a18 0032 | 2 | .STRTAB 0x0032->0x0a31 ; "Bad status " 0a19 003b | ; | .STRTAB 0x003b->0x0a36 ; " getting directory object for archive of unit" 0a1a 0066 | f | .STRTAB 0x0066->0x0a4d ; " getting enclosing world for unit" 0a1b 0085 | | .STRTAB 0x0085->0x0a5d ; "Units being saved are not all in one world" 0a1c 00ad | | .STRTAB 0x00ad->0x0a72 ; "Unit to be saved is a body, subunit, or command unit" 0a1d 00df | | .STRTAB 0x00df->0x0a8c ; "Version" 0a1e 00e4 | | .STRTAB 0x00e4->0x0a90 ; " is not supported" 0a1f 00f3 | | .STRTAB 0x00f3->0x0a98 ; "Unit to be saved (or unit referenced by a saved unit) was not coded with a Delta1-compatible code generator" 0a20 015c | \ | .STRTAB 0x015c->0x0ace ; "opening code segment to read" 0a21 0176 | v | .STRTAB 0x0176->0x0adc ; " getting directory object for ada unit " 0a22 019b | | .STRTAB 0x019b->0x0aef ; " getting enclosing world for ada unit " 0a23 01bf | | .STRTAB 0x01bf->0x0b02 ; "*PROGRAM_LIBRARY" 0a24 01cd | | .STRTAB 0x01cd->0x0b0a ; " getting program library for world " 0a25 01ee | | .STRTAB 0x01ee->0x0b1c ; " getting version of program_library " 0a26 0210 | | .STRTAB 0x0210->0x0b2e ; "in Save" 0a27 0215 | | .STRTAB 0x0215->0x0b31 ; ": " 0a28 0215 | | .STRTAB 0x0215->0x0b32 ; "reading instruction from code segment" 0a29 0238 | 8 | .STRTAB 0x0238->0x0b45 ; "Unexpected literal instruction in elab code segment:" 0a2a 026a | j | .STRTAB 0x026a->0x0b5f ; "Error saving code segment" 0a2b 0281 | | .STRTAB 0x0281->0x0b6b ; " (" 0a2c 0281 | | .STRTAB 0x0281->0x0b6c ; "): prerequisite code segment" 0a2d 029b | | .STRTAB 0x029b->0x0b7a ; " has not already been saved" 0a2e 02b4 | | .STRTAB 0x02b4->0x0b88 ; " getting directory object for program library " 0a2f 02e0 | | .STRTAB 0x02e0->0x0b9f ; " opening code segment " 0a30 02f4 | | .STREND 0x02f4->0x0baa 0a31 4261 6420 |Bad | .STRTAB_STRINGS 0baa 0000 0000 | | .BLANK 0000[0x6] 0bb0 ; -------------------------------------------------------------------------------------- 0bb0 ; Debug Table 0bb0 ; -------------------------------------------------------------------------------------- 0bb0 0003 002b | +| .CONST 0x0003,0x002b 0bb2 000b 0d0a | | .DEBUG 0x000b,0x0d0a,0x4000,0x0000,0x0057,0x3ff5,0x0000,0x03d0 0bba 0010 0d10 | | .DEBUG 0x0010,0x0d10,0x4000,0x0000,0x0058,0xc8e5,0x0000,0x000c 0bc2 001b 0d16 | | .DEBUG 0x001b,0x0d16,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0427 0bca 0033 0d1a | 3 | .DEBUG 0x0033,0x0d1a,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0435 0bd2 00cb 0d7a | z| .DEBUG 0x00cb,0x0d7a,0x1002,0x0000,0x0058,0xc985,0x0000,0x0026 0bda 00db 0d7e | ~| .DEBUG 0x00db,0x0d7e,0x1002,0x0000,0x0058,0xc985,0x0000,0x0048 0be2 00e3 0d82 | | .DEBUG 0x00e3,0x0d82,0x1001,0x0000,0x0058,0xc985,0x0000,0x00ce 0bea 0163 0da4 | c | .DEBUG 0x0163,0x0da4,0x1001,0x0000,0x0058,0xc985,0x0000,0x01a1 0bf2 01bb 0dc8 | | .DEBUG 0x01bb,0x0dc8,0x1001,0x0000,0x0058,0xc985,0x0000,0x0249 0bfa 01eb 0dd6 | | .DEBUG 0x01eb,0x0dd6,0x1001,0x0000,0x0058,0xc985,0x0000,0x028d 0c02 01fb 0dda | | .DEBUG 0x01fb,0x0dda,0x1001,0x0000,0x0058,0xc985,0x0000,0x02aa 0c0a 020b 0dde | | .DEBUG 0x020b,0x0dde,0x1001,0x0000,0x0058,0xc985,0x0000,0x02c7 0c12 021b 0de8 | | .DEBUG 0x021b,0x0de8,0x1001,0x0000,0x0058,0xc985,0x0000,0x02f3 0c1a 0233 0df2 | 3 | .DEBUG 0x0233,0x0df2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0324 0c22 028b 0e18 | | .DEBUG 0x028b,0x0e18,0x1001,0x0000,0x0058,0xc985,0x0000,0x03cc 0c2a 02a3 0e22 | "| .DEBUG 0x02a3,0x0e22,0x1001,0x0000,0x0058,0xc985,0x0000,0x03f4 0c32 02bb 0e30 | 0| .DEBUG 0x02bb,0x0e30,0x1001,0x0000,0x0058,0xc985,0x0000,0x042f 0c3a 02d3 0e3e | >| .DEBUG 0x02d3,0x0e3e,0x1001,0x0000,0x0058,0xc985,0x0000,0x046a 0c42 034b 0e6e | K n| .DEBUG 0x034b,0x0e6e,0x1001,0x0000,0x0058,0xc985,0x0000,0x0474 0c4a 0363 0e7c | c || .DEBUG 0x0363,0x0e7c,0x1002,0x0000,0x0058,0xc985,0x0000,0x04af 0c52 0373 0e80 | s | .DEBUG 0x0373,0x0e80,0x1002,0x0000,0x0058,0xc985,0x0000,0x04d3 0c5a 0383 0e84 | | .DEBUG 0x0383,0x0e84,0x1001,0x0000,0x0058,0xc985,0x0000,0x0510 0c62 0433 0ede | 3 | .DEBUG 0x0433,0x0ede,0x1001,0x0000,0x0058,0xc985,0x0000,0x0542 0c6a 0473 0ef8 | s | .DEBUG 0x0473,0x0ef8,0x1001,0x0000,0x0058,0xc985,0x0000,0x05c9 0c72 04db 0f1c | | .DEBUG 0x04db,0x0f1c,0x1001,0x0000,0x0058,0xc985,0x0000,0x066c 0c7a 04f3 0f2c | ,| .DEBUG 0x04f3,0x0f2c,0x1002,0x0000,0x0058,0xc985,0x0000,0x08f7 0c82 05a3 0f52 | R| .DEBUG 0x05a3,0x0f52,0x1001,0x0000,0x0058,0xc985,0x0000,0x0a20 0c8a 068b 0fb2 | | .DEBUG 0x068b,0x0fb2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0bee 0c92 069b 0fba | | .DEBUG 0x069b,0x0fba,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c17 0c9a 06bb 0fca | | .DEBUG 0x06bb,0x0fca,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c56 0ca2 06d3 0fd4 | | .DEBUG 0x06d3,0x0fd4,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d1c 0caa 06fb 0fec | | .DEBUG 0x06fb,0x0fec,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d74 0cb2 072b 1002 | + | .DEBUG 0x072b,0x1002,0x1001,0x0000,0x0058,0xc985,0x0000,0x0dce 0cba 0773 1026 | s &| .DEBUG 0x0773,0x1026,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x006a 0cc2 078b 102c | ,| .DEBUG 0x078b,0x102c,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x0098 0cca 07a3 1032 | 2| .DEBUG 0x07a3,0x1032,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x00b9 0cd2 0863 1072 | c r| .DEBUG 0x0863,0x1072,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x02f3 0cda 0883 107a | z| .DEBUG 0x0883,0x107a,0x1004,0x0000,0x0058,0xc985,0x0000,0x0760 0ce2 0913 10a4 | | .DEBUG 0x0913,0x10a4,0x1002,0x0000,0x0058,0xc985,0x0000,0x0762 0cea 094b 10b2 | K | .DEBUG 0x094b,0x10b2,0x1001,0x0000,0x0058,0xc985,0x0000,0x07c8 0cf2 0983 10d0 | | .DEBUG 0x0983,0x10d0,0x1001,0x0000,0x0058,0xc985,0x0000,0x084a 0cfa 09d3 10ee | | .DEBUG 0x09d3,0x10ee,0x1001,0x0000,0x0058,0xc985,0x0000,0x0deb 0d02 09e3 10f6 | | .DEBUG 0x09e3,0x10f6,0x1004,0x0000,0x0058,0xc985,0x0000,0x082d 0d0a ; -------------------------------------------------------------------------------------- 0d0a ; Debug3 Subtable 0x0 0d0a ; -------------------------------------------------------------------------------------- 0d0a 0002 0000 | | .DBG3TAB 0x0002,0x0000 0d0c 000b ffff | | .CONST 0x000b,0xffff 0d0e 000d fffe | | .CONST 0x000d,0xfffe 0d10 ; -------------------------------------------------------------------------------------- 0d10 ; Debug3 Subtable 0x1 0d10 ; -------------------------------------------------------------------------------------- 0d10 0002 0000 | | .DBG3TAB 0x0002,0x0000 0d12 0010 ffff | | .CONST 0x0010,0xffff 0d14 0012 fffe | | .CONST 0x0012,0xfffe 0d16 ; -------------------------------------------------------------------------------------- 0d16 ; Debug3 Subtable 0x2 0d16 ; -------------------------------------------------------------------------------------- 0d16 0000 0001 | | .DBG3TAB 0x0000,0x0001 0d18 001b 0001 | | .CONST 0x001b,0x0001 0d1a ; -------------------------------------------------------------------------------------- 0d1a ; Debug3 Subtable 0x3 0d1a ; -------------------------------------------------------------------------------------- 0d1a 002e 0001 | . | .DBG3TAB 0x002e,0x0001 0d1c 0033 ffff | 3 | .CONST 0x0033,0xffff 0d1e 0035 fffe | 5 | .CONST 0x0035,0xfffe 0d20 0042 fffd | B | .CONST 0x0042,0xfffd 0d22 0043 fffc | C | .CONST 0x0043,0xfffc 0d24 0045 fffb | E | .CONST 0x0045,0xfffb 0d26 0052 fffa | R | .CONST 0x0052,0xfffa 0d28 0053 fff9 | S | .CONST 0x0053,0xfff9 0d2a 0055 fff8 | U | .CONST 0x0055,0xfff8 0d2c 0057 fff7 | W | .CONST 0x0057,0xfff7 0d2e 0059 fff6 | Y | .CONST 0x0059,0xfff6 0d30 005f fff5 | _ | .CONST 0x005f,0xfff5 0d32 0067 fff4 | g | .CONST 0x0067,0xfff4 0d34 0069 fff3 | i | .CONST 0x0069,0xfff3 0d36 006d fff2 | m | .CONST 0x006d,0xfff2 0d38 0071 fff1 | q | .CONST 0x0071,0xfff1 0d3a 0073 fff0 | s | .CONST 0x0073,0xfff0 0d3c 0075 ffef | u | .CONST 0x0075,0xffef 0d3e 0077 ffee | w | .CONST 0x0077,0xffee 0d40 0079 ffed | y | .CONST 0x0079,0xffed 0d42 007b ffec | { | .CONST 0x007b,0xffec 0d44 007d ffeb | } | .CONST 0x007d,0xffeb 0d46 007f ffea | | .CONST 0x007f,0xffea 0d48 0081 ffe9 | | .CONST 0x0081,0xffe9 0d4a 0083 ffe8 | | .CONST 0x0083,0xffe8 0d4c 0085 ffe7 | | .CONST 0x0085,0xffe7 0d4e 0087 ffe6 | | .CONST 0x0087,0xffe6 0d50 0089 ffe5 | | .CONST 0x0089,0xffe5 0d52 008b ffe4 | | .CONST 0x008b,0xffe4 0d54 008d ffe3 | | .CONST 0x008d,0xffe3 0d56 008f ffe2 | | .CONST 0x008f,0xffe2 0d58 009c ffe1 | | .CONST 0x009c,0xffe1 0d5a 009e ffe0 | | .CONST 0x009e,0xffe0 0d5c 009f ffdf | | .CONST 0x009f,0xffdf 0d5e 00a1 ffde | | .CONST 0x00a1,0xffde 0d60 00a4 ffdd | | .CONST 0x00a4,0xffdd 0d62 00a6 ffdc | | .CONST 0x00a6,0xffdc 0d64 00a8 ffdb | | .CONST 0x00a8,0xffdb 0d66 00aa ffda | | .CONST 0x00aa,0xffda 0d68 00ac ffd9 | | .CONST 0x00ac,0xffd9 0d6a 00ae ffd8 | | .CONST 0x00ae,0xffd8 0d6c 00b0 ffd7 | | .CONST 0x00b0,0xffd7 0d6e 00b2 ffd6 | | .CONST 0x00b2,0xffd6 0d70 00b4 ffd5 | | .CONST 0x00b4,0xffd5 0d72 00b8 ffd4 | | .CONST 0x00b8,0xffd4 0d74 00ba ffd3 | | .CONST 0x00ba,0xffd3 0d76 00bc ffd2 | | .CONST 0x00bc,0xffd2 0d78 00be 0001 | | .CONST 0x00be,0x0001 0d7a ; -------------------------------------------------------------------------------------- 0d7a ; Debug3 Subtable 0x4 0d7a ; -------------------------------------------------------------------------------------- 0d7a 0000 0001 | | .DBG3TAB 0x0000,0x0001 0d7c 00cb 0001 | | .CONST 0x00cb,0x0001 0d7e ; -------------------------------------------------------------------------------------- 0d7e ; Debug3 Subtable 0x5 0d7e ; -------------------------------------------------------------------------------------- 0d7e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0d80 00db 0001 | | .CONST 0x00db,0x0001 0d82 ; -------------------------------------------------------------------------------------- 0d82 ; Debug3 Subtable 0x6 0d82 ; -------------------------------------------------------------------------------------- 0d82 0003 000d | | .DBG3TAB 0x0003,0x000d 0d84 00e3 ffff | | .CONST 0x00e3,0xffff 0d86 00e9 fffe | | .CONST 0x00e9,0xfffe 0d88 00eb fffd | | .CONST 0x00eb,0xfffd 0d8a 00f5 0001 | | .CONST 0x00f5,0x0001 0d8c 00f9 0002 | | .CONST 0x00f9,0x0002 0d8e 010e 0003 | | .CONST 0x010e,0x0003 0d90 0110 0004 | | .CONST 0x0110,0x0004 0d92 011d 0005 | | .CONST 0x011d,0x0005 0d94 0123 0006 | # | .CONST 0x0123,0x0006 0d96 0133 0007 | 3 | .CONST 0x0133,0x0007 0d98 0135 0008 | 5 | .CONST 0x0135,0x0008 0d9a 0142 0009 | B | .CONST 0x0142,0x0009 0d9c 0146 000a | F | .CONST 0x0146,0x000a 0d9e 014b 000b | K | .CONST 0x014b,0x000b 0da0 0152 000c | R | .CONST 0x0152,0x000c 0da2 0159 000d | Y | .CONST 0x0159,0x000d 0da4 ; -------------------------------------------------------------------------------------- 0da4 ; Debug3 Subtable 0x7 0da4 ; -------------------------------------------------------------------------------------- 0da4 0002 000f | | .DBG3TAB 0x0002,0x000f 0da6 0163 ffff | c | .CONST 0x0163,0xffff 0da8 0167 fffe | g | .CONST 0x0167,0xfffe 0daa 0169 0001 | i | .CONST 0x0169,0x0001 0dac 016f 0002 | o | .CONST 0x016f,0x0002 0dae 0172 0003 | r | .CONST 0x0172,0x0003 0db0 0179 0004 | y | .CONST 0x0179,0x0004 0db2 017d 0005 | } | .CONST 0x017d,0x0005 0db4 0182 0006 | | .CONST 0x0182,0x0006 0db6 0185 0007 | | .CONST 0x0185,0x0007 0db8 0187 0008 | | .CONST 0x0187,0x0008 0dba 018d 0009 | | .CONST 0x018d,0x0009 0dbc 0199 000a | | .CONST 0x0199,0x000a 0dbe 019d 000b | | .CONST 0x019d,0x000b 0dc0 019f 000c | | .CONST 0x019f,0x000c 0dc2 01a1 000d | | .CONST 0x01a1,0x000d 0dc4 01a4 000e | | .CONST 0x01a4,0x000e 0dc6 01ad 000f | | .CONST 0x01ad,0x000f 0dc8 ; -------------------------------------------------------------------------------------- 0dc8 ; Debug3 Subtable 0x8 0dc8 ; -------------------------------------------------------------------------------------- 0dc8 0000 0006 | | .DBG3TAB 0x0000,0x0006 0dca 01bb 0001 | | .CONST 0x01bb,0x0001 0dcc 01c6 0002 | | .CONST 0x01c6,0x0002 0dce 01d0 0003 | | .CONST 0x01d0,0x0003 0dd0 01d2 0004 | | .CONST 0x01d2,0x0004 0dd2 01d8 0005 | | .CONST 0x01d8,0x0005 0dd4 01de 0006 | | .CONST 0x01de,0x0006 0dd6 ; -------------------------------------------------------------------------------------- 0dd6 ; Debug3 Subtable 0x9 0dd6 ; -------------------------------------------------------------------------------------- 0dd6 0000 0001 | | .DBG3TAB 0x0000,0x0001 0dd8 01eb 0001 | | .CONST 0x01eb,0x0001 0dda ; -------------------------------------------------------------------------------------- 0dda ; Debug3 Subtable 0xa 0dda ; -------------------------------------------------------------------------------------- 0dda 0000 0001 | | .DBG3TAB 0x0000,0x0001 0ddc 01fb 0001 | | .CONST 0x01fb,0x0001 0dde ; -------------------------------------------------------------------------------------- 0dde ; Debug3 Subtable 0xb 0dde ; -------------------------------------------------------------------------------------- 0dde 0000 0004 | | .DBG3TAB 0x0000,0x0004 0de0 020b 0001 | | .CONST 0x020b,0x0001 0de2 020d 0002 | | .CONST 0x020d,0x0002 0de4 020f 0003 | | .CONST 0x020f,0x0003 0de6 0215 0004 | | .CONST 0x0215,0x0004 0de8 ; -------------------------------------------------------------------------------------- 0de8 ; Debug3 Subtable 0xc 0de8 ; -------------------------------------------------------------------------------------- 0de8 0001 0003 | | .DBG3TAB 0x0001,0x0003 0dea 021b ffff | | .CONST 0x021b,0xffff 0dec 0220 0001 | | .CONST 0x0220,0x0001 0dee 0223 0002 | # | .CONST 0x0223,0x0002 0df0 0228 0003 | ( | .CONST 0x0228,0x0003 0df2 ; -------------------------------------------------------------------------------------- 0df2 ; Debug3 Subtable 0xd 0df2 ; -------------------------------------------------------------------------------------- 0df2 0002 0010 | | .DBG3TAB 0x0002,0x0010 0df4 0233 ffff | 3 | .CONST 0x0233,0xffff 0df6 0234 fffe | 4 | .CONST 0x0234,0xfffe 0df8 0237 0001 | 7 | .CONST 0x0237,0x0001 0dfa 0242 0002 | B | .CONST 0x0242,0x0002 0dfc 0246 0003 | F | .CONST 0x0246,0x0003 0dfe 0248 0004 | H | .CONST 0x0248,0x0004 0e00 024a 0005 | J | .CONST 0x024a,0x0005 0e02 024c 0006 | L | .CONST 0x024c,0x0006 0e04 024f 0007 | O | .CONST 0x024f,0x0007 0e06 025d 0008 | ] | .CONST 0x025d,0x0008 0e08 0260 0009 | ` | .CONST 0x0260,0x0009 0e0a 0262 000a | b | .CONST 0x0262,0x000a 0e0c 0263 000b | c | .CONST 0x0263,0x000b 0e0e 0265 000c | e | .CONST 0x0265,0x000c 0e10 026b 000d | k | .CONST 0x026b,0x000d 0e12 0276 000e | v | .CONST 0x0276,0x000e 0e14 027b 000f | { | .CONST 0x027b,0x000f 0e16 027f 0010 | | .CONST 0x027f,0x0010 0e18 ; -------------------------------------------------------------------------------------- 0e18 ; Debug3 Subtable 0xe 0e18 ; -------------------------------------------------------------------------------------- 0e18 0001 0003 | | .DBG3TAB 0x0001,0x0003 0e1a 028b ffff | | .CONST 0x028b,0xffff 0e1c 028e 0001 | | .CONST 0x028e,0x0001 0e1e 0291 0002 | | .CONST 0x0291,0x0002 0e20 0294 0003 | | .CONST 0x0294,0x0003 0e22 ; -------------------------------------------------------------------------------------- 0e22 ; Debug3 Subtable 0xf 0e22 ; -------------------------------------------------------------------------------------- 0e22 0000 0006 | | .DBG3TAB 0x0000,0x0006 0e24 02a3 0001 | | .CONST 0x02a3,0x0001 0e26 02a5 0002 | | .CONST 0x02a5,0x0002 0e28 02aa 0003 | | .CONST 0x02aa,0x0003 0e2a 02ac 0004 | | .CONST 0x02ac,0x0004 0e2c 02b0 0005 | | .CONST 0x02b0,0x0005 0e2e 02b2 0006 | | .CONST 0x02b2,0x0006 0e30 ; -------------------------------------------------------------------------------------- 0e30 ; Debug3 Subtable 0x10 0e30 ; -------------------------------------------------------------------------------------- 0e30 0000 0006 | | .DBG3TAB 0x0000,0x0006 0e32 02bb 0001 | | .CONST 0x02bb,0x0001 0e34 02bd 0002 | | .CONST 0x02bd,0x0002 0e36 02c2 0003 | | .CONST 0x02c2,0x0003 0e38 02c4 0004 | | .CONST 0x02c4,0x0004 0e3a 02c8 0005 | | .CONST 0x02c8,0x0005 0e3c 02ca 0006 | | .CONST 0x02ca,0x0006 0e3e ; -------------------------------------------------------------------------------------- 0e3e ; Debug3 Subtable 0x11 0e3e ; -------------------------------------------------------------------------------------- 0e3e 0001 0016 | | .DBG3TAB 0x0001,0x0016 0e40 02d3 ffff | | .CONST 0x02d3,0xffff 0e42 02d8 0001 | | .CONST 0x02d8,0x0001 0e44 02dd 0002 | | .CONST 0x02dd,0x0002 0e46 02e1 0003 | | .CONST 0x02e1,0x0003 0e48 02e5 0004 | | .CONST 0x02e5,0x0004 0e4a 02e9 0005 | | .CONST 0x02e9,0x0005 0e4c 02f0 0006 | | .CONST 0x02f0,0x0006 0e4e 02f5 0007 | | .CONST 0x02f5,0x0007 0e50 02fa 0008 | | .CONST 0x02fa,0x0008 0e52 02ff 0009 | | .CONST 0x02ff,0x0009 0e54 0303 000a | | .CONST 0x0303,0x000a 0e56 0307 000b | | .CONST 0x0307,0x000b 0e58 030b 000c | | .CONST 0x030b,0x000c 0e5a 030f 000d | | .CONST 0x030f,0x000d 0e5c 0313 000e | | .CONST 0x0313,0x000e 0e5e 0317 000f | | .CONST 0x0317,0x000f 0e60 031a 0010 | | .CONST 0x031a,0x0010 0e62 031e 0011 | | .CONST 0x031e,0x0011 0e64 0322 0012 | " | .CONST 0x0322,0x0012 0e66 0326 0013 | & | .CONST 0x0326,0x0013 0e68 032a 0014 | * | .CONST 0x032a,0x0014 0e6a 032e 0015 | . | .CONST 0x032e,0x0015 0e6c 0332 0016 | 2 | .CONST 0x0332,0x0016 0e6e ; -------------------------------------------------------------------------------------- 0e6e ; Debug3 Subtable 0x12 0e6e ; -------------------------------------------------------------------------------------- 0e6e 0000 0006 | | .DBG3TAB 0x0000,0x0006 0e70 034b 0001 | K | .CONST 0x034b,0x0001 0e72 034d 0002 | M | .CONST 0x034d,0x0002 0e74 0352 0003 | R | .CONST 0x0352,0x0003 0e76 0354 0004 | T | .CONST 0x0354,0x0004 0e78 0358 0005 | X | .CONST 0x0358,0x0005 0e7a 035a 0006 | Z | .CONST 0x035a,0x0006 0e7c ; -------------------------------------------------------------------------------------- 0e7c ; Debug3 Subtable 0x13 0e7c ; -------------------------------------------------------------------------------------- 0e7c 0000 0001 | | .DBG3TAB 0x0000,0x0001 0e7e 0363 0001 | c | .CONST 0x0363,0x0001 0e80 ; -------------------------------------------------------------------------------------- 0e80 ; Debug3 Subtable 0x14 0e80 ; -------------------------------------------------------------------------------------- 0e80 0000 0001 | | .DBG3TAB 0x0000,0x0001 0e82 0373 0001 | s | .CONST 0x0373,0x0001 0e84 ; -------------------------------------------------------------------------------------- 0e84 ; Debug3 Subtable 0x15 0e84 ; -------------------------------------------------------------------------------------- 0e84 0010 001c | | .DBG3TAB 0x0010,0x001c 0e86 0383 ffff | | .CONST 0x0383,0xffff 0e88 0384 fffe | | .CONST 0x0384,0xfffe 0e8a 0389 fffd | | .CONST 0x0389,0xfffd 0e8c 038e fffc | | .CONST 0x038e,0xfffc 0e8e 0393 fffb | | .CONST 0x0393,0xfffb 0e90 0395 fffa | | .CONST 0x0395,0xfffa 0e92 0397 fff9 | | .CONST 0x0397,0xfff9 0e94 0398 fff8 | | .CONST 0x0398,0xfff8 0e96 039a fff7 | | .CONST 0x039a,0xfff7 0e98 039b fff6 | | .CONST 0x039b,0xfff6 0e9a 039c fff5 | | .CONST 0x039c,0xfff5 0e9c 039e fff4 | | .CONST 0x039e,0xfff4 0e9e 03a0 fff3 | | .CONST 0x03a0,0xfff3 0ea0 03a3 0001 | | .CONST 0x03a3,0x0001 0ea2 03a6 0002 | | .CONST 0x03a6,0x0002 0ea4 03a8 0003 | | .CONST 0x03a8,0x0003 0ea6 03aa 0004 | | .CONST 0x03aa,0x0004 0ea8 03ab 0005 | | .CONST 0x03ab,0x0005 0eaa 03c3 0006 | | .CONST 0x03c3,0x0006 0eac 03c6 0007 | | .CONST 0x03c6,0x0007 0eae 03cb 0008 | | .CONST 0x03cb,0x0008 0eb0 03cd 0009 | | .CONST 0x03cd,0x0009 0eb2 03cf 000a | | .CONST 0x03cf,0x000a 0eb4 03d1 000b | | .CONST 0x03d1,0x000b 0eb6 03d6 000c | | .CONST 0x03d6,0x000c 0eb8 03db 000d | | .CONST 0x03db,0x000d 0eba 03de 000e | | .CONST 0x03de,0x000e 0ebc 03e7 000f | | .CONST 0x03e7,0x000f 0ebe 03e9 0010 | | .CONST 0x03e9,0x0010 0ec0 03ed 0011 | | .CONST 0x03ed,0x0011 0ec2 03f5 0012 | | .CONST 0x03f5,0x0012 0ec4 0400 0013 | | .CONST 0x0400,0x0013 0ec6 0406 0014 | | .CONST 0x0406,0x0014 0ec8 0407 fbff | | .CONST 0x0407,0xfbff 0eca 040f fbfe | | .CONST 0x040f,0xfbfe 0ecc 0411 fbfd | | .CONST 0x0411,0xfbfd 0ece 0414 0401 | | .CONST 0x0414,0x0401 0ed0 0418 0402 | | .CONST 0x0418,0x0402 0ed2 041d 0403 | | .CONST 0x041d,0x0403 0ed4 0421 0404 | ! | .CONST 0x0421,0x0404 0ed6 0423 0405 | # | .CONST 0x0423,0x0405 0ed8 0425 0406 | % | .CONST 0x0425,0x0406 0eda 0428 0407 | ( | .CONST 0x0428,0x0407 0edc 0429 0408 | ) | .CONST 0x0429,0x0408 0ede ; -------------------------------------------------------------------------------------- 0ede ; Debug3 Subtable 0x16 0ede ; -------------------------------------------------------------------------------------- 0ede 0003 0009 | | .DBG3TAB 0x0003,0x0009 0ee0 0433 ffff | 3 | .CONST 0x0433,0xffff 0ee2 043e fffe | > | .CONST 0x043e,0xfffe 0ee4 0440 fffd | @ | .CONST 0x0440,0xfffd 0ee6 0442 0001 | B | .CONST 0x0442,0x0001 0ee8 0447 0002 | G | .CONST 0x0447,0x0002 0eea 0449 0003 | I | .CONST 0x0449,0x0003 0eec 044d 0004 | M | .CONST 0x044d,0x0004 0eee 0453 0005 | S | .CONST 0x0453,0x0005 0ef0 0456 0006 | V | .CONST 0x0456,0x0006 0ef2 045c 0008 | \ | .CONST 0x045c,0x0008 0ef4 0461 0009 | a | .CONST 0x0461,0x0009 0ef6 0466 0007 | f | .CONST 0x0466,0x0007 0ef8 ; -------------------------------------------------------------------------------------- 0ef8 ; Debug3 Subtable 0x17 0ef8 ; -------------------------------------------------------------------------------------- 0ef8 0007 000a | | .DBG3TAB 0x0007,0x000a 0efa 0473 ffff | s | .CONST 0x0473,0xffff 0efc 0474 fffe | t | .CONST 0x0474,0xfffe 0efe 0480 fffd | | .CONST 0x0480,0xfffd 0f00 0483 fffc | | .CONST 0x0483,0xfffc 0f02 0487 fffb | | .CONST 0x0487,0xfffb 0f04 0489 fffa | | .CONST 0x0489,0xfffa 0f06 0496 fff9 | | .CONST 0x0496,0xfff9 0f08 0498 0001 | | .CONST 0x0498,0x0001 0f0a 04a4 0002 | | .CONST 0x04a4,0x0002 0f0c 04ac 0004 | | .CONST 0x04ac,0x0004 0f0e 04b2 0005 | | .CONST 0x04b2,0x0005 0f10 04b7 0006 | | .CONST 0x04b7,0x0006 0f12 04bb 0007 | | .CONST 0x04bb,0x0007 0f14 04bd 0008 | | .CONST 0x04bd,0x0008 0f16 04c6 0003 | | .CONST 0x04c6,0x0003 0f18 04cc 0009 | | .CONST 0x04cc,0x0009 0f1a 04d0 000a | | .CONST 0x04d0,0x000a 0f1c ; -------------------------------------------------------------------------------------- 0f1c ; Debug3 Subtable 0x18 0f1c ; -------------------------------------------------------------------------------------- 0f1c 0004 0003 | | .DBG3TAB 0x0004,0x0003 0f1e 04db ffff | | .CONST 0x04db,0xffff 0f20 04e2 0001 | | .CONST 0x04e2,0x0001 0f22 04e3 0002 | | .CONST 0x04e3,0x0002 0f24 04e4 fbff | | .CONST 0x04e4,0xfbff 0f26 04e6 fbfe | | .CONST 0x04e6,0xfbfe 0f28 04e8 fbfd | | .CONST 0x04e8,0xfbfd 0f2a 04ea 0401 | | .CONST 0x04ea,0x0401 0f2c ; -------------------------------------------------------------------------------------- 0f2c ; Debug3 Subtable 0x19 0f2c ; -------------------------------------------------------------------------------------- 0f2c 0005 000d | | .DBG3TAB 0x0005,0x000d 0f2e 04f3 ffff | | .CONST 0x04f3,0xffff 0f30 04f9 fffe | | .CONST 0x04f9,0xfffe 0f32 04ff fffd | | .CONST 0x04ff,0xfffd 0f34 0504 fffc | | .CONST 0x0504,0xfffc 0f36 0509 fffb | | .CONST 0x0509,0xfffb 0f38 050b 0001 | | .CONST 0x050b,0x0001 0f3a 051b 0002 | | .CONST 0x051b,0x0002 0f3c 051d 0003 | | .CONST 0x051d,0x0003 0f3e 052e 0004 | . | .CONST 0x052e,0x0004 0f40 0541 0005 | A | .CONST 0x0541,0x0005 0f42 0543 0006 | C | .CONST 0x0543,0x0006 0f44 0557 0007 | W | .CONST 0x0557,0x0007 0f46 0568 0008 | h | .CONST 0x0568,0x0008 0f48 056a 0009 | j | .CONST 0x056a,0x0009 0f4a 057e 000a | ~ | .CONST 0x057e,0x000a 0f4c 058b 000b | | .CONST 0x058b,0x000b 0f4e 058d 000c | | .CONST 0x058d,0x000c 0f50 059e 000d | | .CONST 0x059e,0x000d 0f52 ; -------------------------------------------------------------------------------------- 0f52 ; Debug3 Subtable 0x1a 0f52 ; -------------------------------------------------------------------------------------- 0f52 000f 0020 | | .DBG3TAB 0x000f,0x0020 0f54 05a3 ffff | | .CONST 0x05a3,0xffff 0f56 05a8 fffe | | .CONST 0x05a8,0xfffe 0f58 05a9 fffd | | .CONST 0x05a9,0xfffd 0f5a 05ae fffc | | .CONST 0x05ae,0xfffc 0f5c 05b2 fffb | | .CONST 0x05b2,0xfffb 0f5e 05b4 fffa | | .CONST 0x05b4,0xfffa 0f60 05b5 fff9 | | .CONST 0x05b5,0xfff9 0f62 05b6 fff8 | | .CONST 0x05b6,0xfff8 0f64 05b7 fff7 | | .CONST 0x05b7,0xfff7 0f66 05b8 fff6 | | .CONST 0x05b8,0xfff6 0f68 05bd fff5 | | .CONST 0x05bd,0xfff5 0f6a 05bf fff4 | | .CONST 0x05bf,0xfff4 0f6c 05c1 fff3 | | .CONST 0x05c1,0xfff3 0f6e 05c2 fff2 | | .CONST 0x05c2,0xfff2 0f70 05c6 0001 | | .CONST 0x05c6,0x0001 0f72 05ce 0002 | | .CONST 0x05ce,0x0002 0f74 05d4 0003 | | .CONST 0x05d4,0x0003 0f76 05d7 0004 | | .CONST 0x05d7,0x0004 0f78 05dc 0005 | | .CONST 0x05dc,0x0005 0f7a 05e2 0006 | | .CONST 0x05e2,0x0006 0f7c 05e6 0007 | | .CONST 0x05e6,0x0007 0f7e 05ea 0008 | | .CONST 0x05ea,0x0008 0f80 05ec 0009 | | .CONST 0x05ec,0x0009 0f82 05ed fbff | | .CONST 0x05ed,0xfbff 0f84 05f1 0401 | | .CONST 0x05f1,0x0401 0f86 05f7 0402 | | .CONST 0x05f7,0x0402 0f88 05fd 0403 | | .CONST 0x05fd,0x0403 0f8a 0603 0404 | | .CONST 0x0603,0x0404 0f8c 060e 000a | | .CONST 0x060e,0x000a 0f8e 0614 000b | | .CONST 0x0614,0x000b 0f90 062f 000c | / | .CONST 0x062f,0x000c 0f92 0633 000d | 3 | .CONST 0x0633,0x000d 0f94 0635 000e | 5 | .CONST 0x0635,0x000e 0f96 0639 000f | 9 | .CONST 0x0639,0x000f 0f98 063b 0010 | ; | .CONST 0x063b,0x0010 0f9a 0644 0011 | D | .CONST 0x0644,0x0011 0f9c 0648 0012 | H | .CONST 0x0648,0x0012 0f9e 0652 0013 | R | .CONST 0x0652,0x0013 0fa0 0654 0014 | T | .CONST 0x0654,0x0014 0fa2 0657 0015 | W | .CONST 0x0657,0x0015 0fa4 065f 0016 | _ | .CONST 0x065f,0x0016 0fa6 0663 0017 | c | .CONST 0x0663,0x0017 0fa8 0667 0018 | g | .CONST 0x0667,0x0018 0faa 066f 0019 | o | .CONST 0x066f,0x0019 0fac 0671 001a | q | .CONST 0x0671,0x001a 0fae 067a 001b | z | .CONST 0x067a,0x001b 0fb0 067c 001c | | | .CONST 0x067c,0x001c 0fb2 ; -------------------------------------------------------------------------------------- 0fb2 ; Debug3 Subtable 0x1b 0fb2 ; -------------------------------------------------------------------------------------- 0fb2 0000 0003 | | .DBG3TAB 0x0000,0x0003 0fb4 068b 0001 | | .CONST 0x068b,0x0001 0fb6 068e 0002 | | .CONST 0x068e,0x0002 0fb8 0691 0003 | | .CONST 0x0691,0x0003 0fba ; -------------------------------------------------------------------------------------- 0fba ; Debug3 Subtable 0x1c 0fba ; -------------------------------------------------------------------------------------- 0fba 0001 0006 | | .DBG3TAB 0x0001,0x0006 0fbc 069b 0001 | | .CONST 0x069b,0x0001 0fbe 069f 0002 | | .CONST 0x069f,0x0002 0fc0 06a1 0003 | | .CONST 0x06a1,0x0003 0fc2 06a2 fbff | | .CONST 0x06a2,0xfbff 0fc4 06a5 0401 | | .CONST 0x06a5,0x0401 0fc6 06aa 0402 | | .CONST 0x06aa,0x0402 0fc8 06ae 0403 | | .CONST 0x06ae,0x0403 0fca ; -------------------------------------------------------------------------------------- 0fca ; Debug3 Subtable 0x1d 0fca ; -------------------------------------------------------------------------------------- 0fca 0001 0003 | | .DBG3TAB 0x0001,0x0003 0fcc 06bb ffff | | .CONST 0x06bb,0xffff 0fce 06be 0001 | | .CONST 0x06be,0x0001 0fd0 06c1 0002 | | .CONST 0x06c1,0x0002 0fd2 06c7 0003 | | .CONST 0x06c7,0x0003 0fd4 ; -------------------------------------------------------------------------------------- 0fd4 ; Debug3 Subtable 0x1e 0fd4 ; -------------------------------------------------------------------------------------- 0fd4 0001 000a | | .DBG3TAB 0x0001,0x000a 0fd6 06d3 ffff | | .CONST 0x06d3,0xffff 0fd8 06d5 0001 | | .CONST 0x06d5,0x0001 0fda 06d8 0002 | | .CONST 0x06d8,0x0002 0fdc 06dd 0003 | | .CONST 0x06dd,0x0003 0fde 06e1 0004 | | .CONST 0x06e1,0x0004 0fe0 06e3 0005 | | .CONST 0x06e3,0x0005 0fe2 06e5 0006 | | .CONST 0x06e5,0x0006 0fe4 06e9 0007 | | .CONST 0x06e9,0x0007 0fe6 06ef 0008 | | .CONST 0x06ef,0x0008 0fe8 06f2 0009 | | .CONST 0x06f2,0x0009 0fea 06f4 000a | | .CONST 0x06f4,0x000a 0fec ; -------------------------------------------------------------------------------------- 0fec ; Debug3 Subtable 0x1f 0fec ; -------------------------------------------------------------------------------------- 0fec 0001 0009 | | .DBG3TAB 0x0001,0x0009 0fee 06fb ffff | | .CONST 0x06fb,0xffff 0ff0 06fd 0001 | | .CONST 0x06fd,0x0001 0ff2 06ff 0002 | | .CONST 0x06ff,0x0002 0ff4 0708 0003 | | .CONST 0x0708,0x0003 0ff6 070c 0004 | | .CONST 0x070c,0x0004 0ff8 0711 0006 | | .CONST 0x0711,0x0006 0ffa 0713 0007 | | .CONST 0x0713,0x0007 0ffc 0718 0008 | | .CONST 0x0718,0x0008 0ffe 071c 0005 | | .CONST 0x071c,0x0005 1000 0721 0009 | ! | .CONST 0x0721,0x0009 1002 ; -------------------------------------------------------------------------------------- 1002 ; Debug3 Subtable 0x20 1002 ; -------------------------------------------------------------------------------------- 1002 0003 000e | | .DBG3TAB 0x0003,0x000e 1004 072b ffff | + | .CONST 0x072b,0xffff 1006 072d fffe | - | .CONST 0x072d,0xfffe 1008 0736 fffd | 6 | .CONST 0x0736,0xfffd 100a 0738 0001 | 8 | .CONST 0x0738,0x0001 100c 073a 0002 | : | .CONST 0x073a,0x0002 100e 073d 0003 | = | .CONST 0x073d,0x0003 1010 0740 0004 | @ | .CONST 0x0740,0x0004 1012 0741 0005 | A | .CONST 0x0741,0x0005 1014 0748 0006 | H | .CONST 0x0748,0x0006 1016 074a 0007 | J | .CONST 0x074a,0x0007 1018 0750 0008 | P | .CONST 0x0750,0x0008 101a 0752 0009 | R | .CONST 0x0752,0x0009 101c 0755 000a | U | .CONST 0x0755,0x000a 101e 0757 000b | W | .CONST 0x0757,0x000b 1020 0762 000c | b | .CONST 0x0762,0x000c 1022 0764 000d | d | .CONST 0x0764,0x000d 1024 0768 000e | h | .CONST 0x0768,0x000e 1026 ; -------------------------------------------------------------------------------------- 1026 ; Debug3 Subtable 0x21 1026 ; -------------------------------------------------------------------------------------- 1026 0000 0002 | | .DBG3TAB 0x0000,0x0002 1028 0773 0001 | s | .CONST 0x0773,0x0001 102a 0775 0002 | u | .CONST 0x0775,0x0002 102c ; -------------------------------------------------------------------------------------- 102c ; Debug3 Subtable 0x22 102c ; -------------------------------------------------------------------------------------- 102c 0000 0002 | | .DBG3TAB 0x0000,0x0002 102e 078b 0001 | | .CONST 0x078b,0x0001 1030 0796 0002 | | .CONST 0x0796,0x0002 1032 ; -------------------------------------------------------------------------------------- 1032 ; Debug3 Subtable 0x23 1032 ; -------------------------------------------------------------------------------------- 1032 0007 0018 | | .DBG3TAB 0x0007,0x0018 1034 07a3 ffff | | .CONST 0x07a3,0xffff 1036 07a7 fffe | | .CONST 0x07a7,0xfffe 1038 07a9 fffd | | .CONST 0x07a9,0xfffd 103a 07ab fffc | | .CONST 0x07ab,0xfffc 103c 07ad fffb | | .CONST 0x07ad,0xfffb 103e 07af fffa | | .CONST 0x07af,0xfffa 1040 07b1 fff9 | | .CONST 0x07b1,0xfff9 1042 07b4 0001 | | .CONST 0x07b4,0x0001 1044 07b5 0002 | | .CONST 0x07b5,0x0002 1046 07bd 0003 | | .CONST 0x07bd,0x0003 1048 07bf 0004 | | .CONST 0x07bf,0x0004 104a 07c2 0005 | | .CONST 0x07c2,0x0005 104c 07c7 0006 | | .CONST 0x07c7,0x0006 104e 07cf 0009 | | .CONST 0x07cf,0x0009 1050 07d7 0007 | | .CONST 0x07d7,0x0007 1052 07e4 0008 | | .CONST 0x07e4,0x0008 1054 07f1 000a | | .CONST 0x07f1,0x000a 1056 07f6 000b | | .CONST 0x07f6,0x000b 1058 07ff 000c | | .CONST 0x07ff,0x000c 105a 0808 000d | | .CONST 0x0808,0x000d 105c 0811 000e | | .CONST 0x0811,0x000e 105e 0815 000f | | .CONST 0x0815,0x000f 1060 081e 0010 | | .CONST 0x081e,0x0010 1062 0823 0011 | # | .CONST 0x0823,0x0011 1064 0826 0012 | & | .CONST 0x0826,0x0012 1066 082a 0013 | * | .CONST 0x082a,0x0013 1068 082e 0014 | . | .CONST 0x082e,0x0014 106a 0832 0015 | 2 | .CONST 0x0832,0x0015 106c 083b 0016 | ; | .CONST 0x083b,0x0016 106e 083d 0017 | = | .CONST 0x083d,0x0017 1070 083f 0018 | ? | .CONST 0x083f,0x0018 1072 ; -------------------------------------------------------------------------------------- 1072 ; Debug3 Subtable 0x24 1072 ; -------------------------------------------------------------------------------------- 1072 0000 0003 | | .DBG3TAB 0x0000,0x0003 1074 0863 0001 | c | .CONST 0x0863,0x0001 1076 086b 0002 | k | .CONST 0x086b,0x0002 1078 0876 0003 | v | .CONST 0x0876,0x0003 107a ; -------------------------------------------------------------------------------------- 107a ; Debug3 Subtable 0x25 107a ; -------------------------------------------------------------------------------------- 107a 0005 000f | | .DBG3TAB 0x0005,0x000f 107c 0883 ffff | | .CONST 0x0883,0xffff 107e 0885 fffe | | .CONST 0x0885,0xfffe 1080 088a fffd | | .CONST 0x088a,0xfffd 1082 088f fffc | | .CONST 0x088f,0xfffc 1084 0895 fffb | | .CONST 0x0895,0xfffb 1086 089e 0001 | | .CONST 0x089e,0x0001 1088 08ac 0002 | | .CONST 0x08ac,0x0002 108a 08bd 0003 | | .CONST 0x08bd,0x0003 108c 08bf 0004 | | .CONST 0x08bf,0x0004 108e 08d0 0005 | | .CONST 0x08d0,0x0005 1090 08de 0006 | | .CONST 0x08de,0x0006 1092 08e3 0007 | | .CONST 0x08e3,0x0007 1094 08e9 0008 | | .CONST 0x08e9,0x0008 1096 08ee 0009 | | .CONST 0x08ee,0x0009 1098 08f0 000a | | .CONST 0x08f0,0x000a 109a 08f6 000b | | .CONST 0x08f6,0x000b 109c 08fd 000c | | .CONST 0x08fd,0x000c 109e 0902 000d | | .CONST 0x0902,0x000d 10a0 0906 000e | | .CONST 0x0906,0x000e 10a2 090d 000f | | .CONST 0x090d,0x000f 10a4 ; -------------------------------------------------------------------------------------- 10a4 ; Debug3 Subtable 0x26 10a4 ; -------------------------------------------------------------------------------------- 10a4 0002 0004 | | .DBG3TAB 0x0002,0x0004 10a6 0913 ffff | | .CONST 0x0913,0xffff 10a8 0915 fffe | | .CONST 0x0915,0xfffe 10aa 091b 0001 | | .CONST 0x091b,0x0001 10ac 0930 0002 | 0 | .CONST 0x0930,0x0002 10ae 0932 0003 | 2 | .CONST 0x0932,0x0003 10b0 0943 0004 | C | .CONST 0x0943,0x0004 10b2 ; -------------------------------------------------------------------------------------- 10b2 ; Debug3 Subtable 0x27 10b2 ; -------------------------------------------------------------------------------------- 10b2 0004 000a | | .DBG3TAB 0x0004,0x000a 10b4 094b ffff | K | .CONST 0x094b,0xffff 10b6 094c fffe | L | .CONST 0x094c,0xfffe 10b8 094e 0001 | N | .CONST 0x094e,0x0001 10ba 094f 0002 | O | .CONST 0x094f,0x0002 10bc 0951 0003 | Q | .CONST 0x0951,0x0003 10be 0953 0004 | S | .CONST 0x0953,0x0004 10c0 0954 fbff | T | .CONST 0x0954,0xfbff 10c2 0959 fbfe | Y | .CONST 0x0959,0xfbfe 10c4 0962 0402 | b | .CONST 0x0962,0x0402 10c6 0967 0403 | g | .CONST 0x0967,0x0403 10c8 0968 0404 | h | .CONST 0x0968,0x0404 10ca 096d 0401 | m | .CONST 0x096d,0x0401 10cc 0975 0005 | u | .CONST 0x0975,0x0005 10ce 0977 0006 | w | .CONST 0x0977,0x0006 10d0 ; -------------------------------------------------------------------------------------- 10d0 ; Debug3 Subtable 0x28 10d0 ; -------------------------------------------------------------------------------------- 10d0 0001 000d | | .DBG3TAB 0x0001,0x000d 10d2 0983 ffff | | .CONST 0x0983,0xffff 10d4 0988 0001 | | .CONST 0x0988,0x0001 10d6 098a 0002 | | .CONST 0x098a,0x0002 10d8 098e 0003 | | .CONST 0x098e,0x0003 10da 0998 0004 | | .CONST 0x0998,0x0004 10dc 0999 0005 | | .CONST 0x0999,0x0005 10de 099e 0006 | | .CONST 0x099e,0x0006 10e0 09a3 0007 | | .CONST 0x09a3,0x0007 10e2 09a8 0008 | | .CONST 0x09a8,0x0008 10e4 09ac 0009 | | .CONST 0x09ac,0x0009 10e6 09b3 000b | | .CONST 0x09b3,0x000b 10e8 09b9 000c | | .CONST 0x09b9,0x000c 10ea 09be 000a | | .CONST 0x09be,0x000a 10ec 09c5 000d | | .CONST 0x09c5,0x000d 10ee ; -------------------------------------------------------------------------------------- 10ee ; Debug3 Subtable 0x29 10ee ; -------------------------------------------------------------------------------------- 10ee 0000 0003 | | .DBG3TAB 0x0000,0x0003 10f0 09d3 0001 | | .CONST 0x09d3,0x0001 10f2 09d5 0002 | | .CONST 0x09d5,0x0002 10f4 09d8 0003 | | .CONST 0x09d8,0x0003 10f6 ; -------------------------------------------------------------------------------------- 10f6 ; Debug3 Subtable 0x2a 10f6 ; -------------------------------------------------------------------------------------- 10f6 0000 0003 | | .DBG3TAB 0x0000,0x0003 10f8 09e3 0001 | | .CONST 0x09e3,0x0001 10fa 09f3 0002 | | .CONST 0x09f3,0x0002 10fc 09f9 0003 | | .CONST 0x09f9,0x0003 10fe 0000 0000 | | .BLANK 0000[0x102]