|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 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 For_Outer_Call,Visible,Unelaborated,INIT_0018 ; Debug Table 0x0 = .DEBUG 0x000b,0x0d0a,0x4000,0x0000,0x0057,0x3ff5,0x0000,0x03d0
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0033 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0030 ; 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_Subprogram 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 For_Call,Unelaborated,INIT_00c8 ; 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 For_Call,Unelaborated,INIT_00d8 ; 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 For_Call,INIT_00e0 ; Debug Table 0x3.0xe = 0x71,0xfff1
0073 029f 0163 | c| Declare_Subprogram For_Call,INIT_0160 ; Debug Table 0x3.0xf = 0x73,0xfff0
0075 029f 01bb | | Declare_Subprogram For_Call,INIT_01b8 ; Debug Table 0x3.0x10 = 0x75,0xffef
0077 029f 01eb | | Declare_Subprogram For_Call,INIT_01e8 ; Debug Table 0x3.0x11 = 0x77,0xffee
0079 029f 01fb | | Declare_Subprogram For_Call,INIT_01f8 ; Debug Table 0x3.0x12 = 0x79,0xffed
007b 029f 020b | | Declare_Subprogram For_Call,INIT_0208 ; Debug Table 0x3.0x13 = 0x7b,0xffec
007d 029f 021b | | Declare_Subprogram For_Call,INIT_0218 ; Debug Table 0x3.0x14 = 0x7d,0xffeb
007f 029f 0233 | 3| Declare_Subprogram For_Call,INIT_0230 ; Debug Table 0x3.0x15 = 0x7f,0xffea
0081 029f 028b | | Declare_Subprogram For_Call,INIT_0288 ; Debug Table 0x3.0x16 = 0x81,0xffe9
0083 029f 02a3 | | Declare_Subprogram For_Call,INIT_02a0 ; Debug Table 0x3.0x17 = 0x83,0xffe8
0085 029f 02bb | | Declare_Subprogram For_Call,INIT_02b8 ; Debug Table 0x3.0x18 = 0x85,0xffe7
0087 029e 02d3 | | Declare_Subprogram For_Call,Unelaborated,INIT_02d0 ; Debug Table 0x3.0x19 = 0x87,0xffe6
0089 029f 034b | K| Declare_Subprogram For_Call,INIT_0348 ; Debug Table 0x3.0x1a = 0x89,0xffe5
008b 029f 0363 | c| Declare_Subprogram For_Call,INIT_0360 ; Debug Table 0x3.0x1b = 0x8b,0xffe4
008d 029f 0373 | s| Declare_Subprogram For_Call,INIT_0370 ; 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 For_Call,INIT_0380 ; 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 For_Call,INIT_0430 ; Debug Table 0x3.0x22 = 0xa4,0xffdd
00a6 029f 0473 | s| Declare_Subprogram For_Call,INIT_0470 ; Debug Table 0x3.0x23 = 0xa6,0xffdc
00a8 029f 04db | | Declare_Subprogram For_Call,INIT_04d8 ; Debug Table 0x3.0x24 = 0xa8,0xffdb
00aa 029f 04f3 | | Declare_Subprogram For_Call,INIT_04f0 ; Debug Table 0x3.0x25 = 0xaa,0xffda
00ac 029f 05a3 | | Declare_Subprogram For_Call,INIT_05a0 ; Debug Table 0x3.0x26 = 0xac,0xffd9
00ae 029f 068b | | Declare_Subprogram For_Call,INIT_0688 ; Debug Table 0x3.0x27 = 0xae,0xffd8
00b0 029f 069b | | Declare_Subprogram For_Call,INIT_0698 ; Debug Table 0x3.0x28 = 0xb0,0xffd7
00b2 029f 06bb | | Declare_Subprogram For_Call,INIT_06b8 ; 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 For_Call,INIT_06d0 ; Debug Table 0x3.0x2b = 0xb8,0xffd4
00ba 029f 06fb | | Declare_Subprogram For_Call,INIT_06f8 ; Debug Table 0x3.0x2c = 0xba,0xffd3
00bc 029f 072b | +| Declare_Subprogram For_Call,INIT_0728 ; 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_Subprogram 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_Result,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_Result,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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 0x2
0215 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x3 = 0x215,0x4
0216 820f | | Call 0x1,0xf
0217 4502 |E | Exit_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Result,0x1
036b 4800 |H | Short_Literal 0x0
036c 4401 |D | Exit_Subprogram With_Result,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_Result,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 For_Call,INIT_0770 ; Debug Table 0x15.0xa = 0x39c,0xfff5
039e 029f 078b | | Declare_Subprogram For_Call,INIT_0788 ; Debug Table 0x15.0xb = 0x39e,0xfff4
03a0 029f 07a3 | | Declare_Subprogram For_Call,INIT_07a0 ; 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_Subprogram 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 For_Call,INIT_0860 ; 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_Subprogram 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_Subprogram 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_Subprogram 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 For_Call,INIT_0880
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 For_Call,INIT_0910 ; Debug Table 0x18.0x3 = 0x4e4,0xfbff
04e6 029f 094b | K| Declare_Subprogram For_Call,INIT_0948 ; Debug Table 0x18.0x4 = 0x4e6,0xfbfe
04e8 029f 0983 | | Declare_Subprogram For_Call,INIT_0980 ; 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_Subprogram 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_Result,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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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 For_Call,INIT_09d0 ; 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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,0xb0
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_Subprogram 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_Subprogram 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_Subprogram 0x3
0904 4501 |E | Exit_Subprogram 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_Result,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_Unchecked 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 For_Call,INIT_09e0
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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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 "
; "Bad status "
; "Bad status "
; "Bad status "
; "Bad status "
; "Bad status "
; "Bad status "
; "Bad status "
; "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]