|
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: 10240 (0x2800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0ea8 | | .CONST 0x0ea8 ; 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 0009 | | .CONST 0x0009 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004d | M | .CONST 0x004d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 029a 0053 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0050 ; Debug Table 0x0 = .DEBUG 0x000b,0x0fca,0x0000,0x0000,0x005a,0x9085,0x0000,0x0512
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168 ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 01e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e0 ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 00bf | | Action Accept_Activation
0012 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0012,0x0fd2,0x0000,0x0000,0x005a,0x9095,0x0000,0x0026
; Debug Table 0x1.0x0 = 0x12,0xffff
0013 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x13,0xfffe
0014 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x14,0xfffd
0015 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x15,0xfffc
0016 4802 |H | Short_Literal 0x2 ; Debug Table 0x1.0x4 = 0x16,0xfffb
0017 032a | * | Declare_Type Record,Incomplete
0018 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x5 = 0x18,0xfffa
0019 02a0 | | Declare_Subprogram Null_Subprogram
001a 03ad | | Declare_Type Heap_Access,Defined
001b 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x1b,0xfff9
001c e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x7 = 0x1c,0xfff8
001d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
001e 00d9 | | Load_Top At_Offset_1
001f 029f 0263 | c| Declare_Subprogram For_Call,INIT_0260
0021 e210 | | Load 0x1,0x10
0022 0326 | & | Complete_Type Record,By_Defining
0023 029d 027b | {| Declare_Subprogram For_Outer_Call,INIT_0278 ; Debug Table 0x1.0x8 = 0x23,0xfff7
0025 029b 02db | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_02d8 ; Debug Table 0x1.0x9 = 0x25,0xfff6
0027 029b 0313 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0310 ; Debug Table 0x1.0xa = 0x27,0xfff5
0029 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xb = 0x29,0xfff4
002a 00c7 | | Action Elaborate_Subprogram
002b 029d 033b | ;| Declare_Subprogram For_Outer_Call,INIT_0338 ; Debug Table 0x1.0xc = 0x2b,0xfff3
002d 029d 0393 | | Declare_Subprogram For_Outer_Call,INIT_0390 ; Debug Table 0x1.0xd = 0x2d,0xfff2
002f 029d 03d3 | | Declare_Subprogram For_Outer_Call,INIT_03d0 ; Debug Table 0x1.0xe = 0x2f,0xfff1
0031 029d 049b | | Declare_Subprogram For_Outer_Call,INIT_0498 ; Debug Table 0x1.0xf = 0x31,0xfff0
0033 029d 04cb | | Declare_Subprogram For_Outer_Call,INIT_04c8 ; Debug Table 0x1.0x10 = 0x33,0xffef
0035 029d 0503 | | Declare_Subprogram For_Outer_Call,INIT_0500 ; Debug Table 0x1.0x11 = 0x35,0xffee
0037 029d 05bb | | Declare_Subprogram For_Outer_Call,INIT_05b8 ; Debug Table 0x1.0x12 = 0x37,0xffed
0039 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x13 = 0x39,0xffec
003a 00c7 | | Action Elaborate_Subprogram
003b 029d 0623 | #| Declare_Subprogram For_Outer_Call,INIT_0620 ; Debug Table 0x1.0x14 = 0x3b,0xffeb
003d 029d 0643 | C| Declare_Subprogram For_Outer_Call,INIT_0640 ; Debug Table 0x1.0x15 = 0x3d,0xffea
003f 029d 0663 | c| Declare_Subprogram For_Outer_Call,INIT_0660 ; Debug Table 0x1.0x16 = 0x3f,0xffe9
0041 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x17 = 0x41,0xffe8
0042 00c7 | | Action Elaborate_Subprogram
0043 029d 0693 | | Declare_Subprogram For_Outer_Call,INIT_0690 ; Debug Table 0x1.0x18 = 0x43,0xffe7
0045 029d 06fb | | Declare_Subprogram For_Outer_Call,INIT_06f8 ; Debug Table 0x1.0x19 = 0x45,0xffe6
0047 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x1a = 0x47,0xffe5
0048 00c7 | | Action Elaborate_Subprogram
0049 029d 08bb | | Declare_Subprogram For_Outer_Call,INIT_08b8 ; Debug Table 0x1.0x1b = 0x49,0xffe4
004b 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x1c = 0x4b,0xffe3
004c 00c7 | | Action Elaborate_Subprogram
004d BODY_0008:
004d 00bc | | Action Signal_Activated
004e 00bb | | Action Signal_Completion
004f 0000 | | .XXX[0x1]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0070 | p | .CONST 0x0070 ; Address of begin
0051 0130 | 0 | .CONST 0x0130 ; Address of exception handler
0052 0010 | | .CONST 0x0010 ; Number of locals
0053 INIT_0050:
0053 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2 = .DEBUG 0x0053,0x100e,0x0001,0x0000,0x005a,0x9085,0x0000,0x0513
; Debug Table 0x2.0x0 = 0x53,0xffff
0054 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x1 = 0x54,0xfffe
0055 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0056 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x2 = 0x56,0xfffd
0057 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x3 = 0x57,0xfffc
0058 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x2.0x4 = 0x58,0xfffb
0059 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
005a 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x2.0x5 = 0x5a,0xfffa
005b 00c6 | | Action Check_Subprogram_Elaborated
005c 4806 |H | Short_Literal 0x6
005d 4802 |H | Short_Literal 0x2
005e 0099 | | Action Reference_Dynamic
005f e5fd | | Load 0x2,-0x3
0060 62ab |b | Indirect_Literal Discrete,0x30c,{0x00000000, 0x005a9095}
0061 62a6 |b | Indirect_Literal Discrete,0x308,{0x00000000, 0x000005e8}
0062 480b |H | Short_Literal 0xb
0063 0007 | | Action Break_Optional
0064 029f 0963 | c| Declare_Subprogram For_Call,INIT_0960 ; Debug Table 0x2.0x6 = 0x64,0xfff9
0066 e003 | | Load 0x0,0x3
0067 190e | | Execute Package,Field_Reference,Field_Number 0xe
0068 00c6 | | Action Check_Subprogram_Elaborated
0069 480c |H | Short_Literal 0xc
006a 4802 |H | Short_Literal 0x2
006b 0099 | | Action Reference_Dynamic
006c 629f |b | Indirect_Literal Discrete,0x30c,{0x00000000, 0x005a9095}
006d 6296 |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x000005f1}
006e 4810 |H | Short_Literal 0x10
006f 0007 | | Action Break_Optional
0070 BODY_0050:
0070 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x7 = 0x70,0x1
0071 480d |H | Short_Literal 0xd
0072 e004 | | Load 0x0,0x4
0073 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0074 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x8 = 0x74,0x2
0075 00e1 | | Load_Encached Boolean_Cache
0076 e5fe | | Load 0x2,-0x2
0077 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0078 e5ff | | Load 0x2,-0x1
0079 e5fd | | Load 0x2,-0x3
007a 8215 | | Call 0x1,0x15
007b c404 | | Store 0x2,0x4
007c c402 | | Store 0x2,0x2
007d e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x9 = 0x7d,0x3
007e 7005 |p | Jump_Nonzero 0x84
007f 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0xa = 0x7f,0x4
0080 e5fd | | Load 0x2,-0x3
0081 e5fe | | Load 0x2,-0x2
0082 8005 | | Call 0x0,0x5
0083 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x2.0xb = 0x83,0x5
0084 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0xc = 0x84,0x6
0085 6813 |h | Jump_Zero 0x99
0086 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0xd = 0x86,0x7
0087 e5ff | | Load 0x2,-0x1
0088 e5fd | | Load 0x2,-0x3
0089 821b | | Call 0x1,0x1b
008a c402 | | Store 0x2,0x2
008b e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xe = 0x8b,0x8
008c 700c |p | Jump_Nonzero 0x99
008d 0092 0c50 | P| Action Push_String_Extended,0xc50 ; "Can't restore code for "
; Debug Table 0x2.0xf = 0x8d,0x9
008f e5ff | | Load 0x2,-0x1
0090 01cc | | Execute Vector,Catenate
0091 e5fd | | Load 0x2,-0x3
0092 8006 | | Call 0x0,0x6
0093 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x10 = 0x93,0xa
0094 e5fd | | Load 0x2,-0x3
0095 e5fe | | Load 0x2,-0x2
0096 8005 | | Call 0x0,0x5
0097 6268 |bh | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0x2.0x11 = 0x97,0xb
0098 0257 | W | Execute Discrete,Raise
0099 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x12 = 0x99,0xc
009a 0217 | | Execute Heap_Access,All_Reference
009b 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
009c 4603 |F | Jump_Case 0x3
009d 780b |x | Jump 0xa9 ; case 0x0
009e 7802 |x | Jump 0xa1 ; case 0x1
009f 7816 |x | Jump 0xb6 ; case 0x2
00a0 7815 |x | Jump 0xb6 ; case 0x3
00a1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x13 = 0xa1,0xd
00a2 e5fe | | Load 0x2,-0x2
00a3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00a4 e5fd | | Load 0x2,-0x3
00a5 0217 | | Execute Heap_Access,All_Reference
00a6 2433 |$3 | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x33
00a7 8007 | | Call 0x0,0x7
00a8 780d |x | Jump 0xb6
00a9 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x14 = 0xa9,0xe
00aa 0219 | | Execute Heap_Access,All_Read
00ab 00d8 | | Load_Top At_Offset_0
00ac 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
00ad e5fd | | Load 0x2,-0x3
00ae 0217 | | Execute Heap_Access,All_Reference
00af 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
00b0 4800 |H | Short_Literal 0x0
00b1 e008 | | Load 0x0,0x8
00b2 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00b3 00d9 | | Load_Top At_Offset_1
00b4 284e |(N | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4e
00b5 00d1 | | Pop_Control Pop_Count_1
00b6 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x15 = 0xb6,0x10
00b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b8 00e1 | | Load_Encached Boolean_Cache
00b9 e5fd | | Load 0x2,-0x3
00ba 0217 | | Execute Heap_Access,All_Reference
00bb 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
00bc e5fd | | Load 0x2,-0x3
00bd 0217 | | Execute Heap_Access,All_Reference
00be 2c15 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x15
00bf e404 | | Load 0x2,0x4
00c0 e5ff | | Load 0x2,-0x1
00c1 480d |H | Short_Literal 0xd
00c2 4802 |H | Short_Literal 0x2
00c3 0099 | | Action Reference_Dynamic
00c4 480e |H | Short_Literal 0xe
00c5 4802 |H | Short_Literal 0x2
00c6 0099 | | Action Reference_Dynamic
00c7 e003 | | Load 0x0,0x3
00c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c9 c402 | | Store 0x2,0x2
00ca c403 | | Store 0x2,0x3
00cb e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x16 = 0xcb,0x11
00cc 7028 |p( | Jump_Nonzero 0xf5
00cd 0092 0c51 | Q| Action Push_String_Extended,0xc51 ; "Error while restoring code "
; Debug Table 0x2.0x17 = 0xcd,0x12
00cf e5ff | | Load 0x2,-0x1
00d0 01cc | | Execute Vector,Catenate
00d1 e5fd | | Load 0x2,-0x3
00d2 8006 | | Call 0x0,0x6
00d3 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x18 = 0xd3,0x13
00d4 0219 | | Execute Heap_Access,All_Read
00d5 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
00d6 00d8 | | Load_Top At_Offset_0
00d7 e403 | | Load 0x2,0x3
00d8 e009 | | Load 0x0,0x9
00d9 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
00da 00d2 | | Pop_Control Pop_Count_2
00db e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x19 = 0xdb,0x14
00dc 0219 | | Execute Heap_Access,All_Read
00dd e5fd | | Load 0x2,-0x3
00de 0219 | | Execute Heap_Access,All_Read
00df 2c33 |,3 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x33
00e0 00d9 | | Load_Top At_Offset_1
00e1 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
00e2 00d9 | | Load_Top At_Offset_1
00e3 e5fd | | Load 0x2,-0x3
00e4 0217 | | Execute Heap_Access,All_Reference
00e5 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
00e6 e5fe | | Load 0x2,-0x2
00e7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00e8 0275 | u | Execute Discrete,Unary_Minus
00e9 0248 | H | Execute Discrete,Check_In_Integer
00ea e406 | | Load 0x2,0x6
00eb 0272 | r | Execute Discrete,Minus
00ec 0248 | H | Execute Discrete,Check_In_Integer
00ed e008 | | Load 0x0,0x8
00ee 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
00ef 00d1 | | Pop_Control Pop_Count_1
00f0 00da | | Load_Top At_Offset_2
00f1 284e |(N | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4e
00f2 00d2 | | Pop_Control Pop_Count_2
00f3 620c |b | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0x2.0x1a = 0xf3,0x15
00f4 0257 | W | Execute Discrete,Raise
00f5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1b = 0xf5,0x16
00f6 0217 | | Execute Heap_Access,All_Reference
00f7 2c0b |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xb
00f8 49f4 |I | Short_Literal 0x1f4
00f9 027c | | | Execute Discrete,Less
00fa 6808 |h | Jump_Zero 0x103
00fb e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1c = 0xfb,0x17
00fc e404 | | Load 0x2,0x4
00fd e5fe | | Load 0x2,-0x2
00fe e5ff | | Load 0x2,-0x1
00ff 8217 | | Call 0x1,0x17
0100 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x1d = 0x100,0x18
0101 a405 | | Store_Unchecked 0x2,0x5
0102 7802 |x | Jump 0x105
0103 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x1e = 0x103,0x19
0104 a405 | | Store_Unchecked 0x2,0x5
0105 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1f = 0x105,0x1a
0106 0217 | | Execute Heap_Access,All_Reference
0107 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
0108 0f03 | | Execute_Immediate Equal,0x3
0109 680c |h | Jump_Zero 0x116
010a e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x20 = 0x10a,0x1b
010b 6805 |h | Jump_Zero 0x111
010c e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x21 = 0x10c,0x1c
010d e5fe | | Load 0x2,-0x2
010e e5ff | | Load 0x2,-0x1
010f 8216 | | Call 0x1,0x16
0110 4504 |E | Exit_Subprogram 0x4
0111 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x22 = 0x111,0x1d
0112 e5fe | | Load 0x2,-0x2
0113 e5ff | | Load 0x2,-0x1
0114 8212 | | Call 0x1,0x12
0115 4504 |E | Exit_Subprogram 0x4
0116 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x23 = 0x116,0x1e
0117 700c |p | Jump_Nonzero 0x124
0118 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x24 = 0x118,0x1f
0119 e5fe | | Load 0x2,-0x2
011a e5ff | | Load 0x2,-0x1
011b 8212 | | Call 0x1,0x12
011c e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x25 = 0x11c,0x20
011d 7005 |p | Jump_Nonzero 0x123
011e 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x2.0x26 = 0x11e,0x21
011f e5fd | | Load 0x2,-0x3
0120 e5fe | | Load 0x2,-0x2
0121 e5ff | | Load 0x2,-0x1
0122 800a | | Call 0x0,0xa
0123 4504 |E | Exit_Subprogram 0x4
0124 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x27 = 0x124,0x22
0125 e5fe | | Load 0x2,-0x2
0126 e5ff | | Load 0x2,-0x1
0127 8216 | | Call 0x1,0x16
0128 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x28 = 0x128,0x23
0129 7005 |p | Jump_Nonzero 0x12f
012a 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x2.0x29 = 0x12a,0x24
012b e5fd | | Load 0x2,-0x3
012c e5fe | | Load 0x2,-0x2
012d e5ff | | Load 0x2,-0x1
012e 800a | | Call 0x0,0xa
012f 4504 |E | Exit_Subprogram 0x4
0130 TRAP_0050:
0130 61cf |a | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505}
0131 010f | | Execute Exception,Equal
0132 700c |p | Jump_Nonzero 0x13f
0133 e00b | | Load 0x0,0xb
0134 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0135 010f | | Execute Exception,Equal
0136 7008 |p | Jump_Nonzero 0x13f
0137 e008 | | Load 0x0,0x8
0138 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0139 010f | | Execute Exception,Equal
013a 7004 |p | Jump_Nonzero 0x13f
013b e008 | | Load 0x0,0x8
013c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
013d 010f | | Execute Exception,Equal
013e 6802 |h | Jump_Zero 0x141
013f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x2a = 0x13f,0x25
0140 0101 | | Execute Exception,Reraise
0141 0092 0c52 | R| Action Push_String_Extended,0xc52 ; "Exception "
; Debug Table 0x2.0x2b = 0x141,0x26
0143 e00c | | Load 0x0,0xc
0144 180d | | Execute Package,Field_Execute,Field_Number 0xd
0145 01cc | | Execute Vector,Catenate
0146 0092 0c53 | S| Action Push_String_Extended,0xc53 ; " while restoring code to "
0148 01cc | | Execute Vector,Catenate
0149 e5ff | | Load 0x2,-0x1
014a 01cc | | Execute Vector,Catenate
014b e5fd | | Load 0x2,-0x3
014c 8006 | | Call 0x0,0x6
014d e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2c = 0x14d,0x27
014e 0219 | | Execute Heap_Access,All_Read
014f e5fd | | Load 0x2,-0x3
0150 0219 | | Execute Heap_Access,All_Read
0151 2c33 |,3 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x33
0152 00d9 | | Load_Top At_Offset_1
0153 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
0154 00d9 | | Load_Top At_Offset_1
0155 e5fd | | Load 0x2,-0x3
0156 0217 | | Execute Heap_Access,All_Reference
0157 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
0158 e5fe | | Load 0x2,-0x2
0159 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
015a 0275 | u | Execute Discrete,Unary_Minus
015b 0248 | H | Execute Discrete,Check_In_Integer
015c e406 | | Load 0x2,0x6
015d 0272 | r | Execute Discrete,Minus
015e 0248 | H | Execute Discrete,Check_In_Integer
015f e008 | | Load 0x0,0x8
0160 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0161 00d1 | | Pop_Control Pop_Count_1
0162 00da | | Load_Top At_Offset_2
0163 284e |(N | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4e
0164 00d2 | | Pop_Control Pop_Count_2
0165 619a |a | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0x2.0x2d = 0x165,0x28
0166 0257 | W | Execute Discrete,Raise
0167 0000 | | .XXX[0x1]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0178 | x | .CONST 0x0178 ; Address of begin
0169 01b9 | | .CONST 0x01b9 ; Address of exception handler
016a 0005 | | .CONST 0x0005 ; Number of locals
016b INIT_0168:
016b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3 = .DEBUG 0x016b,0x106c,0x0001,0x0000,0x005a,0x9085,0x0000,0x0523
; Debug Table 0x3.0x0 = 0x16b,0xffff
016c e00d | | Load 0x0,0xd ; Debug Table 0x3.0x1 = 0x16c,0xfffe
016d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
016e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016f e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x2 = 0x16f,0xfffd
0170 e00d | | Load 0x0,0xd
0171 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0172 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0173 e00d | | Load 0x0,0xd ; Debug Table 0x3.0x3 = 0x173,0xfffc
0174 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0175 02c7 | | Declare_Variable Any
0176 00d8 | | Load_Top At_Offset_0
0177 1c00 | | Execute_Immediate Run_Utility,0x0
0178 BODY_0168:
0178 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x4 = 0x178,0x1
0179 480d |H | Short_Literal 0xd
017a e004 | | Load 0x0,0x4
017b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
017c e00d | | Load 0x0,0xd ; Debug Table 0x3.0x5 = 0x17c,0x2
017d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
017e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
017f 00d9 | | Load_Top At_Offset_1
0180 0120 | | Execute Any,Is_Value
0181 6803 |h | Jump_Zero 0x185
0182 e00d | | Load 0x0,0xd
0183 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0184 7801 |x | Jump 0x186
0185 00d9 | | Load_Top At_Offset_1
0186 6175 |au | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
0187 e00e | | Load 0x0,0xe
0188 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0189 e00f | | Load 0x0,0xf
018a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
018b e00d | | Load 0x0,0xd
018c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
018d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
018e e404 | | Load 0x2,0x4
018f 0092 0c54 | T| Action Push_String_Extended,0xc54 ; "$"
0191 01cc | | Execute Vector,Catenate
0192 e00d | | Load 0x0,0xd
0193 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0194 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0195 c405 | | Store 0x2,0x5
0196 005b | [ | Store_Top Discrete,At_Offset_3
0197 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x6 = 0x197,0x3
0198 680b |h | Jump_Zero 0x1a4
0199 0092 0c55 | U| Action Push_String_Extended,0xc55 ; "Can't get enclosing world for "
; Debug Table 0x3.0x7 = 0x199,0x4
019b e5ff | | Load 0x2,-0x1
019c 01cc | | Execute Vector,Catenate
019d e5fd | | Load 0x2,-0x3
019e 8006 | | Call 0x0,0x6
019f 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x8 = 0x19f,0x5
01a0 e5fd | | Load 0x2,-0x3
01a1 e5fe | | Load 0x2,-0x2
01a2 8005 | | Call 0x0,0x5
01a3 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x3.0x9 = 0x1a3,0x6
01a4 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0xa = 0x1a4,0x7
01a5 e5fd | | Load 0x2,-0x3
01a6 e5fe | | Load 0x2,-0x2
01a7 00db | | Load_Top At_Offset_3
01a8 e5ff | | Load 0x2,-0x1
01a9 8220 | | Call 0x1,0x20
01aa c402 | | Store 0x2,0x2
01ab 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xb = 0x1ab,0x8
01ac 680a |h | Jump_Zero 0x1b7
01ad e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0xc = 0x1ad,0x9
01ae e5fe | | Load 0x2,-0x2
01af e5ff | | Load 0x2,-0x1
01b0 8212 | | Call 0x1,0x12
01b1 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x3.0xd = 0x1b1,0xa
01b2 e5fd | | Load 0x2,-0x3
01b3 e5fe | | Load 0x2,-0x2
01b4 e5ff | | Load 0x2,-0x1
01b5 800a | | Call 0x0,0xa
01b6 4504 |E | Exit_Subprogram 0x4
01b7 6140 |a@ | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x5a908502} ; Debug Table 0x3.0xe = 0x1b7,0xb
01b8 0257 | W | Execute Discrete,Raise
01b9 TRAP_0168:
01b9 6146 |aF | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505}
01ba 010f | | Execute Exception,Equal
01bb 700f |p | Jump_Nonzero 0x1cb
01bc e00b | | Load 0x0,0xb
01bd 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
01be 010f | | Execute Exception,Equal
01bf 700b |p | Jump_Nonzero 0x1cb
01c0 e008 | | Load 0x0,0x8
01c1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c2 010f | | Execute Exception,Equal
01c3 7007 |p | Jump_Nonzero 0x1cb
01c4 e008 | | Load 0x0,0x8
01c5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01c6 010f | | Execute Exception,Equal
01c7 7003 |p | Jump_Nonzero 0x1cb
01c8 612f |a/ | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x5a908502}
01c9 010f | | Execute Exception,Equal
01ca 6802 |h | Jump_Zero 0x1cd
01cb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xf = 0x1cb,0xc
01cc 0101 | | Execute Exception,Reraise
01cd 0092 0c52 | R| Action Push_String_Extended,0xc52 ; "Exception "
; Debug Table 0x3.0x10 = 0x1cd,0xd
01cf e00c | | Load 0x0,0xc
01d0 180d | | Execute Package,Field_Execute,Field_Number 0xd
01d1 01cc | | Execute Vector,Catenate
01d2 0092 0c56 | V| Action Push_String_Extended,0xc56 ; " while restoring program_library "
01d4 01cc | | Execute Vector,Catenate
01d5 e5ff | | Load 0x2,-0x1
01d6 01cc | | Execute Vector,Catenate
01d7 e5fd | | Load 0x2,-0x3
01d8 8006 | | Call 0x0,0x6
01d9 6126 |a& | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0x3.0x11 = 0x1d9,0xe
01da 0257 | W | Execute Discrete,Raise
01db 0000 0000 | | .BLANK 0000[0x5]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01ec | | .CONST 0x01ec ; Address of begin
01e1 0237 | 7 | .CONST 0x0237 ; Address of exception handler
01e2 0004 | | .CONST 0x0004 ; Number of locals
01e3 INIT_01e0:
01e3 e00d | | Load 0x0,0xd ; Debug Table 0x4 = .DEBUG 0x01e3,0x1092,0x0001,0x0000,0x005a,0x9085,0x0000,0x0533
; Debug Table 0x4.0x0 = 0x1e3,0xffff
01e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01e5 02c7 | | Declare_Variable Any
01e6 00d8 | | Load_Top At_Offset_0
01e7 1c00 | | Execute_Immediate Run_Utility,0x0
01e8 e00d | | Load 0x0,0xd ; Debug Table 0x4.0x1 = 0x1e8,0xfffe
01e9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01ea 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x2 = 0x1eb,0xfffd
01ec BODY_01e0:
01ec e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x3 = 0x1ec,0x1
01ed 480d |H | Short_Literal 0xd
01ee e004 | | Load 0x0,0x4
01ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f0 e00d | | Load 0x0,0xd ; Debug Table 0x4.0x4 = 0x1f0,0x2
01f1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01f3 00db | | Load_Top At_Offset_3
01f4 0120 | | Execute Any,Is_Value
01f5 6803 |h | Jump_Zero 0x1f9
01f6 e00d | | Load 0x0,0xd
01f7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01f8 7801 |x | Jump 0x1fa
01f9 00db | | Load_Top At_Offset_3
01fa 6101 |a | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
01fb e00e | | Load 0x0,0xe
01fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01fd e00f | | Load 0x0,0xf
01fe 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01ff e00d | | Load 0x0,0xd
0200 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0201 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0202 e5ff | | Load 0x2,-0x1
0203 e00d | | Load 0x0,0xd
0204 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0205 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0206 c402 | | Store 0x2,0x2
0207 005a | Z | Store_Top Discrete,At_Offset_2
0208 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x5 = 0x208,0x3
0209 6806 |h | Jump_Zero 0x210
020a 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x6 = 0x20a,0x4
020b e5fd | | Load 0x2,-0x3
020c e5fe | | Load 0x2,-0x2
020d 8005 | | Call 0x0,0x5
020e 60e9 |` | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x5a908502} ; Debug Table 0x4.0x7 = 0x20e,0x5
020f 0257 | W | Execute Discrete,Raise
0210 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x8 = 0x210,0x6
0211 e5fd | | Load 0x2,-0x3
0212 e5fe | | Load 0x2,-0x2
0213 e402 | | Load 0x2,0x2
0214 e5ff | | Load 0x2,-0x1
0215 8221 | ! | Call 0x1,0x21
0216 0059 | Y | Store_Top Discrete,At_Offset_1
0217 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x9 = 0x217,0x7
0218 7013 |p | Jump_Nonzero 0x22c
0219 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xa = 0x219,0x8
021a e5fe | | Load 0x2,-0x2
021b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
021c e5fe | | Load 0x2,-0x2
021d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021e e009 | | Load 0x0,0x9
021f 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0220 0092 0c57 | W| Action Push_String_Extended,0xc57 ; " "
0222 01cc | | Execute Vector,Catenate
0223 e5ff | | Load 0x2,-0x1
0224 01cc | | Execute Vector,Catenate
0225 0092 0c58 | X| Action Push_String_Extended,0xc58 ; " could not be restored"
0227 01cc | | Execute Vector,Catenate
0228 e5fd | | Load 0x2,-0x3
0229 8006 | | Call 0x0,0x6
022a 60d5 |` | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0x4.0xb = 0x22a,0x9
022b 0257 | W | Execute Discrete,Raise
022c e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0xc = 0x22c,0xa
022d 0217 | | Execute Heap_Access,All_Reference
022e 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
022f 0e03 | | Execute_Immediate Not_Equal,0x3
0230 6805 |h | Jump_Zero 0x236
0231 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0xd = 0x231,0xb
0232 e5fd | | Load 0x2,-0x3
0233 e5fe | | Load 0x2,-0x2
0234 e5ff | | Load 0x2,-0x1
0235 800a | | Call 0x0,0xa
0236 4504 |E | Exit_Subprogram 0x4
0237 TRAP_01e0:
0237 60c8 |` | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505}
0238 010f | | Execute Exception,Equal
0239 700f |p | Jump_Nonzero 0x249
023a e00b | | Load 0x0,0xb
023b 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
023c 010f | | Execute Exception,Equal
023d 700b |p | Jump_Nonzero 0x249
023e e008 | | Load 0x0,0x8
023f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0240 010f | | Execute Exception,Equal
0241 7007 |p | Jump_Nonzero 0x249
0242 e008 | | Load 0x0,0x8
0243 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0244 010f | | Execute Exception,Equal
0245 7003 |p | Jump_Nonzero 0x249
0246 60b1 |` | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x5a908502}
0247 010f | | Execute Exception,Equal
0248 6802 |h | Jump_Zero 0x24b
0249 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xe = 0x249,0xc
024a 0101 | | Execute Exception,Reraise
024b 0092 0c52 | R| Action Push_String_Extended,0xc52 ; "Exception "
; Debug Table 0x4.0xf = 0x24b,0xd
024d e00c | | Load 0x0,0xc
024e 180d | | Execute Package,Field_Execute,Field_Number 0xd
024f 01cc | | Execute Vector,Catenate
0250 0092 0c59 | Y| Action Push_String_Extended,0xc59 ; " while restoring code for load_proc "
0252 01cc | | Execute Vector,Catenate
0253 e5ff | | Load 0x2,-0x1
0254 01cc | | Execute Vector,Catenate
0255 e5fd | | Load 0x2,-0x3
0256 8006 | | Call 0x0,0x6
0257 60a8 |` | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0x4.0x10 = 0x257,0xe
0258 0257 | W | Execute Discrete,Raise
0259 0000 0000 | | .BLANK 0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 4608 |F | Jump_Case 0x8 ; Debug Table 0x5 = .DEBUG 0x0263,0x10b6,0x0005,0x0000,0x005a,0x9095,0x0000,0x0043
0264 7808 |x | Jump 0x26d ; case 0x0
0265 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0266 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
0267 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0268 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0269 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
026a 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
026b 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
026c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
026d 00da | | Load_Top At_Offset_2
026e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
026f 0125 | % | Execute Any,Set_Constraint
0270 00da | | Load_Top At_Offset_2
0271 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0272 1c00 | | Execute_Immediate Run_Utility,0x0
0273 4302 |C | Exit_Subprogram From_Utility,0x2
0274 0000 0000 | | .BLANK 0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0285 | | .CONST 0x0285 ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0004 | | .CONST 0x0004 ; Number of locals
027b INIT_0278:
027b e00d | | Load 0x0,0xd ; Debug Table 0x6 = .DEBUG 0x027b,0x10b8,0x0001,0x0000,0x005a,0x9095,0x0000,0x0053
; Debug Table 0x6.0x0 = 0x27b,0xffff
027c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
027d 02c7 | | Declare_Variable Any
027e 00d8 | | Load_Top At_Offset_0
027f 1c00 | | Execute_Immediate Run_Utility,0x0
0280 e00d | | Load 0x0,0xd ; Debug Table 0x6.0x1 = 0x280,0xfffe
0281 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0282 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0283 e010 | | Load 0x0,0x10 ; Debug Table 0x6.0x2 = 0x283,0xfffd
0284 0007 | | Action Break_Optional
0285 BODY_0278:
0285 e00d | | Load 0x0,0xd ; Debug Table 0x6.0x3 = 0x285,0x1
0286 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0287 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0288 00db | | Load_Top At_Offset_3
0289 0120 | | Execute Any,Is_Value
028a 6803 |h | Jump_Zero 0x28e
028b e00d | | Load 0x0,0xd
028c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
028d 7801 |x | Jump 0x28f
028e 00db | | Load_Top At_Offset_3
028f 606c |`l | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
0290 e00e | | Load 0x0,0xe
0291 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0292 e00f | | Load 0x0,0xf
0293 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0294 e00d | | Load 0x0,0xd
0295 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0296 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0297 e5ff | | Load 0x2,-0x1
0298 e00d | | Load 0x0,0xd
0299 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
029a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
029b c402 | | Store 0x2,0x2
029c 005a | Z | Store_Top Discrete,At_Offset_2
029d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x4 = 0x29d,0x2
029e 6801 |h | Jump_Zero 0x2a0
029f 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x6.0x5 = 0x29f,0x3
02a0 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x6 = 0x2a0,0x4
02a1 e5fe | | Load 0x2,-0x2
02a2 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
02a3 e402 | | Load 0x2,0x2
02a4 8011 | | Call 0x0,0x11
02a5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x7 = 0x2a5,0x5
02a6 e5fe | | Load 0x2,-0x2
02a7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
02a8 e402 | | Load 0x2,0x2
02a9 8012 | | Call 0x0,0x12
02aa e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x8 = 0x2aa,0x6
02ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02ac 4800 |H | Short_Literal 0x0
02ad 4800 |H | Short_Literal 0x0
02ae e013 | | Load 0x0,0x13
02af 1c08 | | Execute_Immediate Run_Utility,0x8
02b0 e010 | | Load 0x0,0x10
02b1 e5fd | | Load 0x2,-0x3
02b2 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
02b3 00d8 | | Load_Top At_Offset_0
02b4 0217 | | Execute Heap_Access,All_Reference
02b5 1c00 | | Execute_Immediate Run_Utility,0x0
02b6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
02b7 0007 | | Action Break_Optional ; Debug Table 0x6.0x9 = 0x2b7,0x7
02b8 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0xa = 0x2b8,0x8
02b9 00d9 | | Load_Top At_Offset_1
02ba 0217 | | Execute Heap_Access,All_Reference
02bb 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
02bc e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0xb = 0x2bc,0x9
02bd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
02be 00d9 | | Load_Top At_Offset_1
02bf 0217 | | Execute Heap_Access,All_Reference
02c0 2808 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x8
02c1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0xc = 0x2c1,0xa
02c2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02c3 00d9 | | Load_Top At_Offset_1
02c4 0217 | | Execute Heap_Access,All_Reference
02c5 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
02c6 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0xd = 0x2c6,0xb
02c7 0217 | | Execute Heap_Access,All_Reference
02c8 2c45 |,E | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x45
02c9 00d9 | | Load_Top At_Offset_1
02ca 0217 | | Execute Heap_Access,All_Reference
02cb 280a |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xa
02cc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0xe = 0x2cc,0xc
02cd e5fd | | Load 0x2,-0x3
02ce 0217 | | Execute Heap_Access,All_Reference
02cf 2845 |(E | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x45
02d0 4504 |E | Exit_Subprogram 0x4
02d1 0000 0000 | | .BLANK 0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02df | | .CONST 0x02df ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0003 | | .CONST 0x0003 ; Number of locals
02db INIT_02d8:
02db 029f 0973 | s| Declare_Subprogram For_Call,INIT_0970 ; Debug Table 0x7 = .DEBUG 0x02db,0x10d8,0x2802,0x0002,0x005a,0x9095,0x0000,0x00cf
02dd 029f 098b | | Declare_Subprogram For_Call,INIT_0988
02df BODY_02d8:
02df e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x0 = 0x2df,0x1
02e0 0217 | | Execute Heap_Access,All_Reference
02e1 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
02e2 4603 |F | Jump_Case 0x3
02e3 780e |x | Jump 0x2f2 ; case 0x0
02e4 7804 |x | Jump 0x2e9 ; case 0x1
02e5 7801 |x | Jump 0x2e7 ; case 0x2
02e6 7802 |x | Jump 0x2e9 ; case 0x3
02e7 8402 | | Call 0x2,0x2 ; Debug Table 0x7.0x1 = 0x2e7,0x2
02e8 780a |x | Jump 0x2f3
02e9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x2 = 0x2e9,0x3
02ea 00e3 | | Load_Encached Natural_Cache
02eb 025b | [ | Execute Discrete,Check_In_Type
02ec e5fe | | Load 0x2,-0x2
02ed 0217 | | Execute Heap_Access,All_Reference
02ee 2433 |$3 | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x33
02ef e008 | | Load 0x0,0x8
02f0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02f1 4404 |D | Exit_Subprogram With_Result,0x4
02f2 8403 | | Call 0x2,0x3 ; Debug Table 0x7.0x3 = 0x2f2,0x4
02f3 4831 |H1 | Short_Literal 0x31
02f4 0257 | W | Execute Discrete,Raise
02f5 0000 0000 | | .XXX[0x3]
02f7 0000 | |
02f8 0000 0000 | | .LITERAL {0x00000000, 0x5a908502}
02fc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0300 0000 0000 | | .LITERAL {0x00000000, 0x5a908505}
0304 0000 0000 | | .LITERAL {0x00000000, 0x000005f1}
0308 0000 0000 | | .LITERAL {0x00000000, 0x000005e8}
030c 0000 0000 | | .LITERAL {0x00000000, 0x005a9095}
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0320 | | .CONST 0x0320 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0008 | | .CONST 0x0008 ; Number of locals
0313 INIT_0310:
0313 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x8 = .DEBUG 0x0313,0x10e2,0x2802,0x0002,0x005a,0x9095,0x0000,0x00e3
; Debug Table 0x8.0x0 = 0x313,0xffff
0314 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0315 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x8.0x1 = 0x315,0xfffe
0316 00c6 | | Action Check_Subprogram_Elaborated
0317 4ffe |O | Short_Literal 0x7fe
0318 4802 |H | Short_Literal 0x2
0319 0099 | | Action Reference_Dynamic
031a e5fd | | Load 0x2,-0x3
031b 67f0 |g | Indirect_Literal Discrete,0x30c,{0x00000000, 0x005a9095}
031c 6297 |b | Indirect_Literal Discrete,0x5b4,{0x00000000, 0x000008a3}
031d 4807 |H | Short_Literal 0x7
031e 029f 09ab | | Declare_Subprogram For_Call,INIT_09a8
0320 BODY_0310:
0320 8408 | | Call 0x2,0x8 ; Debug Table 0x8.0x2 = 0x320,0x1
0321 e402 | | Load 0x2,0x2 ; Debug Table 0x8.0x3 = 0x321,0x2
0322 7006 |p | Jump_Nonzero 0x329
0323 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x4 = 0x323,0x3
0324 4800 |H | Short_Literal 0x0
0325 e014 | | Load 0x0,0x14
0326 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0327 0334 | 4 | Declare_Variable Array,With_Constraint
0328 4403 |D | Exit_Subprogram With_Result,0x3
0329 e402 | | Load 0x2,0x2 ; Debug Table 0x8.0x5 = 0x329,0x4
032a 4803 |H | Short_Literal 0x3
032b 4802 |H | Short_Literal 0x2
032c 0099 | | Action Reference_Dynamic
032d e404 | | Load 0x2,0x4
032e 4805 |H | Short_Literal 0x5
032f 4802 |H | Short_Literal 0x2
0330 0099 | | Action Reference_Dynamic
0331 8213 | | Call 0x1,0x13
0332 4403 |D | Exit_Subprogram With_Result,0x3
0333 0000 0000 | | .BLANK 0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0343 | C | .CONST 0x0343 ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0003 | | .CONST 0x0003 ; Number of locals
033b INIT_0338:
033b e00d | | Load 0x0,0xd ; Debug Table 0x9 = .DEBUG 0x033b,0x10f0,0x0001,0x0000,0x005a,0x9095,0x0000,0x015c
; Debug Table 0x9.0x0 = 0x33b,0xffff
033c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
033d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033e e00d | | Load 0x0,0xd ; Debug Table 0x9.0x1 = 0x33e,0xfffe
033f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0340 02c7 | | Declare_Variable Any
0341 00d8 | | Load_Top At_Offset_0
0342 1c00 | | Execute_Immediate Run_Utility,0x0
0343 BODY_0338:
0343 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x2 = 0x343,0x1
0344 a5fb | | Store_Unchecked 0x2,-0x5
0345 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x3 = 0x345,0x2
0346 0b3f | ? | Execute_Immediate Case_Compare,0x3f
0347 703b |p; | Jump_Nonzero 0x383
0348 0b3e | > | Execute_Immediate Case_Compare,0x3e
0349 703c |p< | Jump_Nonzero 0x386
034a e00d | | Load 0x0,0xd ; Debug Table 0x9.0x4 = 0x34a,0x5
034b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
034d 00da | | Load_Top At_Offset_2
034e 0120 | | Execute Any,Is_Value
034f 6803 |h | Jump_Zero 0x353
0350 e00d | | Load 0x0,0xd
0351 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0352 7801 |x | Jump 0x354
0353 00da | | Load_Top At_Offset_2
0354 67a7 |g | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
0355 e00e | | Load 0x0,0xe
0356 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0357 e00f | | Load 0x0,0xf
0358 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0359 e00d | | Load 0x0,0xd
035a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
035b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
035c e5fe | | Load 0x2,-0x2
035d e00d | | Load 0x0,0xd
035e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
035f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0360 c403 | | Store 0x2,0x3
0361 005b | [ | Store_Top Discrete,At_Offset_3
0362 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x5 = 0x362,0x6
0363 7007 |p | Jump_Nonzero 0x36b
0364 00d9 | | Load_Top At_Offset_1
0365 e00d | | Load 0x0,0xd
0366 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0367 e015 | | Load 0x0,0x15
0368 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0369 012f | / | Execute Any,Equal
036a 6803 |h | Jump_Zero 0x36e
036b 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x6 = 0x36b,0x7
036c a5fc | | Store_Unchecked 0x2,-0x4
036d 4504 |E | Exit_Subprogram 0x4
036e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x7 = 0x36e,0x8
036f e00d | | Load 0x0,0xd
0370 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0371 e015 | | Load 0x0,0x15
0372 180d | | Execute Package,Field_Execute,Field_Number 0xd
0373 012f | / | Execute Any,Equal
0374 6803 |h | Jump_Zero 0x378
0375 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x8 = 0x375,0x9
0376 a5fc | | Store_Unchecked 0x2,-0x4
0377 4504 |E | Exit_Subprogram 0x4
0378 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x9 = 0x378,0xa
0379 a5fc | | Store_Unchecked 0x2,-0x4
037a 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xa = 0x37a,0xb
037b a5fb | | Store_Unchecked 0x2,-0x5
037c e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0xb = 0x37c,0xc
037d 0092 0c5a | Z| Action Push_String_Extended,0xc5a ; " is of the wrong class for code to be restored to it"
037f 01cc | | Execute Vector,Catenate
0380 e5ff | | Load 0x2,-0x1
0381 8006 | | Call 0x0,0x6
0382 4504 |E | Exit_Subprogram 0x4
0383 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0xc = 0x383,0x3
0384 a5fc | | Store_Unchecked 0x2,-0x4
0385 4504 |E | Exit_Subprogram 0x4
0386 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xd = 0x386,0x4
0387 a5fc | | Store_Unchecked 0x2,-0x4
0388 4504 |E | Exit_Subprogram 0x4
0389 0000 0000 | | .BLANK 0000[0x7]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 03a0 | | .CONST 0x03a0 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0004 | | .CONST 0x0004 ; Number of locals
0393 INIT_0390:
0393 e00d | | Load 0x0,0xd ; Debug Table 0xa = .DEBUG 0x0393,0x110e,0x0001,0x0000,0x005a,0x9095,0x0000,0x01eb
; Debug Table 0xa.0x0 = 0x393,0xffff
0394 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0395 02c7 | | Declare_Variable Any
0396 00d8 | | Load_Top At_Offset_0
0397 1c00 | | Execute_Immediate Run_Utility,0x0
0398 e00d | | Load 0x0,0xd ; Debug Table 0xa.0x1 = 0x398,0xfffe
0399 1b0f | | Execute Package,Field_Read,Field_Number 0xf
039a 02c7 | | Declare_Variable Any
039b 00d8 | | Load_Top At_Offset_0
039c 1c00 | | Execute_Immediate Run_Utility,0x0
039d e00d | | Load 0x0,0xd ; Debug Table 0xa.0x2 = 0x39d,0xfffd
039e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
039f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a0 BODY_0390:
03a0 e00d | | Load 0x0,0xd ; Debug Table 0xa.0x3 = 0x3a0,0x1
03a1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03a2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a3 00db | | Load_Top At_Offset_3
03a4 0120 | | Execute Any,Is_Value
03a5 6803 |h | Jump_Zero 0x3a9
03a6 e00d | | Load 0x0,0xd
03a7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a8 7801 |x | Jump 0x3aa
03a9 00db | | Load_Top At_Offset_3
03aa 6751 |gQ | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
03ab e00e | | Load 0x0,0xe
03ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ad e00f | | Load 0x0,0xf
03ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03af e00d | | Load 0x0,0xd
03b0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03b1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03b2 e5ff | | Load 0x2,-0x1
03b3 e00d | | Load 0x0,0xd
03b4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03b5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03b6 c402 | | Store 0x2,0x2
03b7 0059 | Y | Store_Top Discrete,At_Offset_1
03b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x4 = 0x3b8,0x2
03b9 700e |p | Jump_Nonzero 0x3c8
03ba 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x5 = 0x3ba,0x3
03bb e009 | | Load 0x0,0x9
03bc 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
03bd c403 | | Store 0x2,0x3
03be 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x6 = 0x3be,0x4
03bf e00d | | Load 0x0,0xd
03c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03c1 7006 |p | Jump_Nonzero 0x3c8
03c2 e5fd | | Load 0x2,-0x3 ; Debug Table 0xa.0x7 = 0x3c2,0x5
03c3 4800 |H | Short_Literal 0x0
03c4 e5fe | | Load 0x2,-0x2
03c5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
03c6 e403 | | Load 0x2,0x3
03c7 8016 | | Call 0x0,0x16
03c8 4504 |E | Exit_Subprogram 0x4
03c9 0000 0000 | | .BLANK 0000[0x7]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03e9 | | .CONST 0x03e9 ; Address of begin
03d1 047c | | | .CONST 0x047c ; Address of exception handler
03d2 0006 | | .CONST 0x0006 ; Number of locals
03d3 INIT_03d0:
03d3 e00d | | Load 0x0,0xd ; Debug Table 0xb = .DEBUG 0x03d3,0x1120,0x0001,0x0000,0x005a,0x9095,0x0000,0x0245
; Debug Table 0xb.0x0 = 0x3d3,0xffff
03d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d5 02c7 | | Declare_Variable Any
03d6 00d8 | | Load_Top At_Offset_0
03d7 1c00 | | Execute_Immediate Run_Utility,0x0
03d8 e00d | | Load 0x0,0xd ; Debug Table 0xb.0x1 = 0x3d8,0xfffe
03d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03da 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03db 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb.0x2 = 0x3db,0xfffd
03dc e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x3 = 0x3dc,0xfffc
03dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03de e00e | | Load 0x0,0xe ; Debug Table 0xb.0x4 = 0x3de,0xfffb
03df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03e0 02c7 | | Declare_Variable Any
03e1 e017 | | Load 0x0,0x17
03e2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03e3 e5fc | | Load 0x2,-0x4
03e4 0217 | | Execute Heap_Access,All_Reference
03e5 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
03e6 e00e | | Load 0x0,0xe
03e7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03e8 c406 | | Store 0x2,0x6
03e9 BODY_03d0:
03e9 e5fd | | Load 0x2,-0x3 ; Debug Table 0xb.0x5 = 0x3e9,0x1
03ea 6829 |h) | Jump_Zero 0x414
03eb e00d | | Load 0x0,0xd ; Debug Table 0xb.0x6 = 0x3eb,0x2
03ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03ee e402 | | Load 0x2,0x2
03ef 0120 | | Execute Any,Is_Value
03f0 6803 |h | Jump_Zero 0x3f4
03f1 e00d | | Load 0x0,0xd
03f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03f3 7801 |x | Jump 0x3f5
03f4 e402 | | Load 0x2,0x2
03f5 6706 |g | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
03f6 e00e | | Load 0x0,0xe
03f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f8 e00f | | Load 0x0,0xf
03f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03fa e00d | | Load 0x0,0xd
03fb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03fc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03fd e5ff | | Load 0x2,-0x1
03fe e00d | | Load 0x0,0xd
03ff 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0400 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0401 c402 | | Store 0x2,0x2
0402 c403 | | Store 0x2,0x3
0403 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x7 = 0x403,0x3
0404 6801 |h | Jump_Zero 0x406
0405 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0xb.0x8 = 0x405,0x4
0406 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x9 = 0x406,0x5
0407 00e1 | | Load_Encached Boolean_Cache
0408 4800 |H | Short_Literal 0x0
0409 00db | | Load_Top At_Offset_3
040a e5fc | | Load 0x2,-0x4
040b 0217 | | Execute Heap_Access,All_Reference
040c 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
040d e402 | | Load 0x2,0x2
040e e018 | | Load 0x0,0x18
040f 1b72 | r | Execute Package,Field_Read,Field_Number 0x72
0410 180f | | Execute Package,Field_Execute,Field_Number 0xf
0411 c404 | | Store 0x2,0x4
0412 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0413 783e |x> | Jump 0x452
0414 e00d | | Load 0x0,0xd ; Debug Table 0xb.0xa = 0x414,0x6
0415 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0416 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0417 e402 | | Load 0x2,0x2
0418 0120 | | Execute Any,Is_Value
0419 6803 |h | Jump_Zero 0x41d
041a e00d | | Load 0x0,0xd
041b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
041c 7801 |x | Jump 0x41e
041d e402 | | Load 0x2,0x2
041e 66dd |f | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
041f e00e | | Load 0x0,0xe
0420 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0421 e00f | | Load 0x0,0xf
0422 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0423 e00d | | Load 0x0,0xd
0424 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0425 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0426 e5ff | | Load 0x2,-0x1
0427 e00d | | Load 0x0,0xd
0428 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0429 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
042a 0092 0c54 | T| Action Push_String_Extended,0xc54 ; "$"
042c 01cc | | Execute Vector,Catenate
042d e00d | | Load 0x0,0xd
042e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
042f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0430 c402 | | Store 0x2,0x2
0431 c403 | | Store 0x2,0x3
0432 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0xb = 0x432,0x7
0433 6811 |h | Jump_Zero 0x445
0434 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xc = 0x434,0x8
0435 4801 |H | Short_Literal 0x1
0436 4800 |H | Short_Literal 0x0
0437 e5fc | | Load 0x2,-0x4
0438 0217 | | Execute Heap_Access,All_Reference
0439 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
043a e00e | | Load 0x0,0xe
043b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
043c c406 | | Store 0x2,0x6
043d 0092 0c55 | U| Action Push_String_Extended,0xc55 ; "Can't get enclosing world for "
; Debug Table 0xb.0xd = 0x43d,0x9
043f e5ff | | Load 0x2,-0x1
0440 01cc | | Execute Vector,Catenate
0441 e5fc | | Load 0x2,-0x4
0442 8006 | | Call 0x0,0x6
0443 66bc |f | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0xb.0xe = 0x443,0xa
0444 0257 | W | Execute Discrete,Raise
0445 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0xf = 0x445,0xb
0446 00e1 | | Load_Encached Boolean_Cache
0447 4800 |H | Short_Literal 0x0
0448 00db | | Load_Top At_Offset_3
0449 e5fc | | Load 0x2,-0x4
044a 0217 | | Execute Heap_Access,All_Reference
044b 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
044c e402 | | Load 0x2,0x2
044d e018 | | Load 0x0,0x18
044e 1b72 | r | Execute Package,Field_Read,Field_Number 0x72
044f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0450 c404 | | Store 0x2,0x4
0451 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0452 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x10 = 0x452,0xc
0453 4801 |H | Short_Literal 0x1
0454 e404 | | Load 0x2,0x4
0455 e5fc | | Load 0x2,-0x4
0456 0217 | | Execute Heap_Access,All_Reference
0457 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0458 e00e | | Load 0x0,0xe
0459 1819 | | Execute Package,Field_Execute,Field_Number 0x19
045a c406 | | Store 0x2,0x6
045b 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x11 = 0x45b,0xd
045c 700f |p | Jump_Nonzero 0x46c
045d 0092 0c5b | [| Action Push_String_Extended,0xc5b ; "Error while converting code of "
; Debug Table 0xb.0x12 = 0x45d,0xe
045f e5ff | | Load 0x2,-0x1
0460 01cc | | Execute Vector,Catenate
0461 e5fc | | Load 0x2,-0x4
0462 8006 | | Call 0x0,0x6
0463 e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0x13 = 0x463,0xf
0464 0219 | | Execute Heap_Access,All_Read
0465 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
0466 00d8 | | Load_Top At_Offset_0
0467 00db | | Load_Top At_Offset_3
0468 e009 | | Load 0x0,0x9
0469 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
046a 00d2 | | Pop_Control Pop_Count_2
046b 4505 |E | Exit_Subprogram 0x5
046c e5fd | | Load 0x2,-0x3 ; Debug Table 0xb.0x14 = 0x46c,0x10
046d 6807 |h | Jump_Zero 0x475
046e 0092 0c5c | \| Action Push_String_Extended,0xc5c ; " from pre-delta2 format"
; Debug Table 0xb.0x15 = 0x46e,0x11
0470 e5fc | | Load 0x2,-0x4
0471 e5fe | | Load 0x2,-0x2
0472 e5ff | | Load 0x2,-0x1
0473 800a | | Call 0x0,0xa
0474 4505 |E | Exit_Subprogram 0x5
0475 0092 0c5d | ]| Action Push_String_Extended,0xc5d ; " as a program library"
; Debug Table 0xb.0x16 = 0x475,0x12
0477 e5fc | | Load 0x2,-0x4
0478 e5fe | | Load 0x2,-0x2
0479 e5ff | | Load 0x2,-0x1
047a 800a | | Call 0x0,0xa
047b 4505 |E | Exit_Subprogram 0x5
047c TRAP_03d0:
047c 6683 |f | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505}
047d 010f | | Execute Exception,Equal
047e 6802 |h | Jump_Zero 0x481
047f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x17 = 0x47f,0x13
0480 0101 | | Execute Exception,Reraise
0481 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x18 = 0x481,0x14
0482 4801 |H | Short_Literal 0x1
0483 4800 |H | Short_Literal 0x0
0484 e5fc | | Load 0x2,-0x4
0485 0217 | | Execute Heap_Access,All_Reference
0486 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0487 e00e | | Load 0x0,0xe
0488 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0489 c406 | | Store 0x2,0x6
048a 0092 0c52 | R| Action Push_String_Extended,0xc52 ; "Exception "
; Debug Table 0xb.0x19 = 0x48a,0x15
048c e00c | | Load 0x0,0xc
048d 180d | | Execute Package,Field_Execute,Field_Number 0xd
048e 01cc | | Execute Vector,Catenate
048f 0092 0c5e | ^| Action Push_String_Extended,0xc5e ; " while converting code for "
0491 01cc | | Execute Vector,Catenate
0492 e5ff | | Load 0x2,-0x1
0493 01cc | | Execute Vector,Catenate
0494 e5fc | | Load 0x2,-0x4
0495 8006 | | Call 0x0,0x6
0496 6669 |fi | Indirect_Literal Discrete,0x300,{0x00000000, 0x5a908505} ; Debug Table 0xb.0x1a = 0x496,0x16
0497 0257 | W | Execute Discrete,Raise
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 04a4 | | .CONST 0x04a4 ; Address of begin
0499 0004 | | .CONST 0x0004 ; Address of exception handler
049a 0004 | | .CONST 0x0004 ; Number of locals
049b INIT_0498:
049b e00d | | Load 0x0,0xd ; Debug Table 0xc = .DEBUG 0x049b,0x1158,0x0002,0x0000,0x005a,0x9095,0x0000,0x0353
; Debug Table 0xc.0x0 = 0x49b,0xffff
049c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049d e00d | | Load 0x0,0xd ; Debug Table 0xc.0x1 = 0x49d,0xfffe
049e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
049f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
04a0 02c7 | | Declare_Variable Any
04a1 00d8 | | Load_Top At_Offset_0
04a2 1c00 | | Execute_Immediate Run_Utility,0x0
04a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x2 = 0x4a3,0xfffd
04a4 BODY_0498:
04a4 e00d | | Load 0x0,0xd ; Debug Table 0xc.0x3 = 0x4a4,0x1
04a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a6 00da | | Load_Top At_Offset_2
04a7 0120 | | Execute Any,Is_Value
04a8 6804 |h | Jump_Zero 0x4ad
04a9 e00d | | Load 0x0,0xd
04aa 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04ab 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
04ac 7801 |x | Jump 0x4ae
04ad 00da | | Load_Top At_Offset_2
04ae e00d | | Load 0x0,0xd
04af 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04b0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
04b1 664a |fJ | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
04b2 4801 |H | Short_Literal 0x1
04b3 4800 |H | Short_Literal 0x0
04b4 4800 |H | Short_Literal 0x0
04b5 e5fe | | Load 0x2,-0x2
04b6 4800 |H | Short_Literal 0x0
04b7 e5ff | | Load 0x2,-0x1
04b8 e00d | | Load 0x0,0xd
04b9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04ba 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04bb e00d | | Load 0x0,0xd
04bc 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04bd 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04be 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04bf c403 | | Store 0x2,0x3
04c0 005b | [ | Store_Top Discrete,At_Offset_3
04c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x4 = 0x4c1,0x2
04c2 4402 |D | Exit_Subprogram With_Result,0x2
04c3 0000 0000 | | .BLANK 0000[0x5]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04d7 | | .CONST 0x04d7 ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0003 | | .CONST 0x0003 ; Number of locals
04cb INIT_04c8:
04cb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd = .DEBUG 0x04cb,0x1164,0x0001,0x0000,0x005a,0x9095,0x0000,0x0393
; Debug Table 0xd.0x0 = 0x4cb,0xffff
04cc e5fd | | Load 0x2,-0x3
04cd e5fe | | Load 0x2,-0x2
04ce 8218 | | Call 0x1,0x18
04cf 0031 | 1 | Store_Top Heap_Access,At_Offset_1
04d0 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x1 = 0x4d0,0xfffe
04d1 0217 | | Execute Heap_Access,All_Reference
04d2 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
04d3 e5fd | | Load 0x2,-0x3
04d4 00da | | Load_Top At_Offset_2
04d5 e003 | | Load 0x0,0x3
04d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04d7 BODY_04c8:
04d7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x2 = 0x4d7,0x1
04d8 01db | | Execute Vector,Length
04d9 0c01 | | Execute_Immediate Greater_Equal,0x1
04da 6821 |h! | Jump_Zero 0x4fc
04db 00cf | | Action Mark_Auxiliary
04dc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x3 = 0x4dc,0x2
04dd 01d9 | | Execute Vector,Reverse_Bounds
04de 0263 | c | Execute Discrete,Above_Bound
04df 7018 |p | Jump_Nonzero 0x4f8
04e0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x4 = 0x4e0,0x3
04e1 e403 | | Load 0x2,0x3
04e2 01d7 | | Execute Vector,Field_Read
04e3 e00d | | Load 0x0,0xd
04e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04e5 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
04e6 0092 0c5f | _| Action Push_String_Extended,0xc5f ; " includes "
04e8 01cc | | Execute Vector,Catenate
04e9 e5fe | | Load 0x2,-0x2
04ea e00d | | Load 0x0,0xd
04eb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ec 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
04ed 01cc | | Execute Vector,Catenate
04ee 0092 0c60 | `| Action Push_String_Extended,0xc60 ; " in its closure and must be demoted before"
04f0 01cc | | Execute Vector,Catenate
04f1 0092 0c61 | a| Action Push_String_Extended,0xc61 ; " code is restored to the latter"
04f3 01cc | | Execute Vector,Catenate
04f4 e5ff | | Load 0x2,-0x1
04f5 8019 | | Call 0x0,0x19
04f6 00c8 | | Action Pop_Auxiliary_Range
04f7 3fe8 |? | Loop_Increasing 0x4e0
04f8 00ce | | Action Pop_Auxiliary
04f9 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x5 = 0x4f9,0x4
04fa a5fc | | Store_Unchecked 0x2,-0x4
04fb 4504 |E | Exit_Subprogram 0x4
04fc 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x6 = 0x4fc,0x5
04fd a5fc | | Store_Unchecked 0x2,-0x4
04fe 4504 |E | Exit_Subprogram 0x4
04ff 0000 | | .XXX[0x1]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 050f | | .CONST 0x050f ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0007 | | .CONST 0x0007 ; Number of locals
0503 INIT_0500:
0503 e002 | | Load 0x0,0x2 ; Debug Table 0xe = .DEBUG 0x0503,0x1174,0x0001,0x0000,0x005a,0x9095,0x0000,0x0407
; Debug Table 0xe.0x0 = 0x503,0xffff
0504 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0505 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x1 = 0x505,0xfffe
0506 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0507 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0508 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xe.0x2 = 0x508,0xfffd
0509 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x3 = 0x509,0xfffc
050a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x4 = 0x50b,0xfffb
050c e00d | | Load 0x0,0xd ; Debug Table 0xe.0x5 = 0x50c,0xfffa
050d 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
050e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050f BODY_0500:
050f e00d | | Load 0x0,0xd ; Debug Table 0xe.0x6 = 0x50f,0x1
0510 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0511 e00d | | Load 0x0,0xd
0512 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0513 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0514 65e7 |e | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
0515 e5fe | | Load 0x2,-0x2
0516 4800 |H | Short_Literal 0x0
0517 e5ff | | Load 0x2,-0x1
0518 e00d | | Load 0x0,0xd
0519 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
051a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
051b e00d | | Load 0x0,0xd
051c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
051d 180f | | Execute Package,Field_Execute,Field_Number 0xf
051e 005a | Z | Store_Top Discrete,At_Offset_2
051f 005b | [ | Store_Top Discrete,At_Offset_3
0520 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x7 = 0x520,0x2
0521 6818 |h | Jump_Zero 0x53a
0522 0092 0c62 | b| Action Push_String_Extended,0xc62 ; "Can't get the unit_state of "
; Debug Table 0xe.0x8 = 0x522,0x3
0524 e5ff | | Load 0x2,-0x1
0525 e00d | | Load 0x0,0xd
0526 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0527 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0528 01cc | | Execute Vector,Catenate
0529 0092 0c63 | c| Action Push_String_Extended,0xc63 ; " ("
052b 01cc | | Execute Vector,Catenate
052c 00db | | Load_Top At_Offset_3
052d e00d | | Load 0x0,0xd
052e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052f 025e | ^ | Execute Discrete,Convert
0530 1c01 | | Execute_Immediate Run_Utility,0x1
0531 01cc | | Execute Vector,Catenate
0532 0092 0c64 | d| Action Push_String_Extended,0xc64 ; ")"
0534 01cc | | Execute Vector,Catenate
0535 e5fd | | Load 0x2,-0x3
0536 8019 | | Call 0x0,0x19
0537 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x9 = 0x537,0x4
0538 a5fc | | Store_Unchecked 0x2,-0x4
0539 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0xe.0xa = 0x539,0x5
053a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xb = 0x53a,0x6
053b 4604 |F | Jump_Case 0x4
053c 780e |x | Jump 0x54b ; case 0x0
053d 780d |x | Jump 0x54b ; case 0x1
053e 780c |x | Jump 0x54b ; case 0x2
053f 7801 |x | Jump 0x541 ; case 0x3
0540 7803 |x | Jump 0x544 ; case 0x4
0541 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0xc = 0x541,0x7
0542 a5fc | | Store_Unchecked 0x2,-0x4
0543 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0xe.0xd = 0x543,0x8
0544 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0xe = 0x544,0x9
0545 e5fe | | Load 0x2,-0x2
0546 e5ff | | Load 0x2,-0x1
0547 e5fd | | Load 0x2,-0x3
0548 8219 | | Call 0x1,0x19
0549 c5fc | | Store 0x2,-0x4
054a 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0xe.0xf = 0x54a,0xa
054b e00d | | Load 0x0,0xd ; Debug Table 0xe.0x10 = 0x54b,0xc
054c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
054d e00d | | Load 0x0,0xd
054e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
054f 65ac |e | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
0550 e5fe | | Load 0x2,-0x2
0551 4800 |H | Short_Literal 0x0
0552 e5ff | | Load 0x2,-0x1
0553 e00d | | Load 0x0,0xd
0554 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0555 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0556 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0557 005b | [ | Store_Top Discrete,At_Offset_3
0558 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x11 = 0x558,0xd
0559 6818 |h | Jump_Zero 0x572
055a 0092 0c65 | e| Action Push_String_Extended,0xc65 ; "Can't get declaration for "
; Debug Table 0xe.0x12 = 0x55a,0xe
055c e5ff | | Load 0x2,-0x1
055d e00d | | Load 0x0,0xd
055e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
055f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0560 01cc | | Execute Vector,Catenate
0561 0092 0c63 | c| Action Push_String_Extended,0xc63 ; " ("
0563 01cc | | Execute Vector,Catenate
0564 00db | | Load_Top At_Offset_3
0565 e00d | | Load 0x0,0xd
0566 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0567 025e | ^ | Execute Discrete,Convert
0568 1c01 | | Execute_Immediate Run_Utility,0x1
0569 01cc | | Execute Vector,Catenate
056a 0092 0c64 | d| Action Push_String_Extended,0xc64 ; ")"
056c 01cc | | Execute Vector,Catenate
056d e5fd | | Load 0x2,-0x3
056e 8019 | | Call 0x0,0x19
056f 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x13 = 0x56f,0xf
0570 a5fc | | Store_Unchecked 0x2,-0x4
0571 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0xe.0x14 = 0x571,0x10
0572 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x15 = 0x572,0x11
0573 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0574 00f1 | | Load_Encached Diana_Temp_Seq
0575 e00d | | Load 0x0,0xd
0576 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0577 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0578 e002 | | Load 0x0,0x2
0579 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057a e406 | | Load 0x2,0x6
057b 6580 |e | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00004000}
057c e5fe | | Load 0x2,-0x2
057d 4800 |H | Short_Literal 0x0
057e e00d | | Load 0x0,0xd
057f 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0580 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0581 e00d | | Load 0x0,0xd
0582 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0583 4803 |H | Short_Literal 0x3
0584 e00d | | Load 0x0,0xd
0585 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0586 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0587 c406 | | Store 0x2,0x6
0588 c402 | | Store 0x2,0x2
0589 c403 | | Store 0x2,0x3
058a c404 | | Store 0x2,0x4
058b 005b | [ | Store_Top Discrete,At_Offset_3
058c 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x16 = 0x58c,0x12
058d 6820 |h | Jump_Zero 0x5ae
058e 0092 0c66 | f| Action Push_String_Extended,0xc66 ; "Can't promote loaded_main spec "
; Debug Table 0xe.0x17 = 0x58e,0x13
0590 e5ff | | Load 0x2,-0x1
0591 e00d | | Load 0x0,0xd
0592 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0593 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0594 01cc | | Execute Vector,Catenate
0595 0092 0c67 | g| Action Push_String_Extended,0xc67 ; " to installed ("
0597 01cc | | Execute Vector,Catenate
0598 00db | | Load_Top At_Offset_3
0599 e00d | | Load 0x0,0xd
059a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
059b 025e | ^ | Execute Discrete,Convert
059c 1c01 | | Execute_Immediate Run_Utility,0x1
059d 01cc | | Execute Vector,Catenate
059e 0092 0c64 | d| Action Push_String_Extended,0xc64 ; ")"
05a0 01cc | | Execute Vector,Catenate
05a1 e5fd | | Load 0x2,-0x3
05a2 8019 | | Call 0x0,0x19
05a3 e5fd | | Load 0x2,-0x3 ; Debug Table 0xe.0x18 = 0x5a3,0x14
05a4 0219 | | Execute Heap_Access,All_Read
05a5 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
05a6 00d8 | | Load_Top At_Offset_0
05a7 e402 | | Load 0x2,0x2
05a8 e009 | | Load 0x0,0x9
05a9 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
05aa 00d2 | | Pop_Control Pop_Count_2
05ab 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x19 = 0x5ab,0x15
05ac a5fc | | Store_Unchecked 0x2,-0x4
05ad 4504 |E | Exit_Subprogram 0x4
05ae 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x1a = 0x5ae,0x16
05af a5fc | | Store_Unchecked 0x2,-0x4
05b0 4504 |E | Exit_Subprogram 0x4
05b1 0000 0000 | | .XXX[0x3]
05b3 0000 | |
05b4 0000 0000 | | .LITERAL {0x00000000, 0x000008a3}
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05c9 | | .CONST 0x05c9 ; Address of begin
05b9 0613 | | .CONST 0x0613 ; Address of exception handler
05ba 0005 | | .CONST 0x0005 ; Number of locals
05bb INIT_05b8:
05bb e00d | | Load 0x0,0xd ; Debug Table 0xf = .DEBUG 0x05bb,0x11ac,0x0001,0x0000,0x005a,0x9095,0x0000,0x0531
; Debug Table 0xf.0x0 = 0x5bb,0xffff
05bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05bd 02c7 | | Declare_Variable Any
05be 00d8 | | Load_Top At_Offset_0
05bf 1c00 | | Execute_Immediate Run_Utility,0x0
05c0 e00d | | Load 0x0,0xd ; Debug Table 0xf.0x1 = 0x5c0,0xfffe
05c1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05c3 e00e | | Load 0x0,0xe ; Debug Table 0xf.0x2 = 0x5c3,0xfffd
05c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c5 02c7 | | Declare_Variable Any
05c6 00d8 | | Load_Top At_Offset_0
05c7 1c00 | | Execute_Immediate Run_Utility,0x0
05c8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x3 = 0x5c8,0xfffc
05c9 BODY_05b8:
05c9 e00d | | Load 0x0,0xd ; Debug Table 0xf.0x4 = 0x5c9,0x1
05ca 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05cb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05cc e402 | | Load 0x2,0x2
05cd 0120 | | Execute Any,Is_Value
05ce 6803 |h | Jump_Zero 0x5d2
05cf e00d | | Load 0x0,0xd
05d0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d1 7801 |x | Jump 0x5d3
05d2 e402 | | Load 0x2,0x2
05d3 62e0 |b | Indirect_Literal Discrete,0x8b4,{0x00000000, 0x00004000}
05d4 e00e | | Load 0x0,0xe
05d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05d6 e00f | | Load 0x0,0xf
05d7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05d8 e00d | | Load 0x0,0xd
05d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05da 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05db e5fe | | Load 0x2,-0x2
05dc e00d | | Load 0x0,0xd
05dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05de 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05df c402 | | Store 0x2,0x2
05e0 005b | [ | Store_Top Discrete,At_Offset_3
05e1 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x5 = 0x5e1,0x2
05e2 6816 |h | Jump_Zero 0x5f9
05e3 0092 0c68 | h| Action Push_String_Extended,0xc68 ; "Can't find load_proc spec "
; Debug Table 0xf.0x6 = 0x5e3,0x3
05e5 e5fe | | Load 0x2,-0x2
05e6 01cc | | Execute Vector,Catenate
05e7 0092 0c63 | c| Action Push_String_Extended,0xc63 ; " ("
05e9 01cc | | Execute Vector,Catenate
05ea 00db | | Load_Top At_Offset_3
05eb e00d | | Load 0x0,0xd
05ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05ee 025e | ^ | Execute Discrete,Convert
05ef 1c01 | | Execute_Immediate Run_Utility,0x1
05f0 01cc | | Execute Vector,Catenate
05f1 0092 0c64 | d| Action Push_String_Extended,0xc64 ; ")"
05f3 01cc | | Execute Vector,Catenate
05f4 e5ff | | Load 0x2,-0x1
05f5 8006 | | Call 0x0,0x6
05f6 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0x7 = 0x5f6,0x4
05f7 a5fd | | Store_Unchecked 0x2,-0x3
05f8 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0xf.0x8 = 0x5f8,0x5
05f9 e017 | | Load 0x0,0x17 ; Debug Table 0xf.0x9 = 0x5f9,0x6
05fa 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05fb e5ff | | Load 0x2,-0x1
05fc 0217 | | Execute Heap_Access,All_Reference
05fd 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
05fe e00e | | Load 0x0,0xe
05ff 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0600 c404 | | Store 0x2,0x4
0601 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0xa = 0x601,0x7
0602 e5ff | | Load 0x2,-0x1
0603 00db | | Load_Top At_Offset_3
0604 e402 | | Load 0x2,0x2
0605 821a | | Call 0x1,0x1a
0606 0059 | Y | Store_Top Discrete,At_Offset_1
0607 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0xb = 0x607,0x8
0608 4801 |H | Short_Literal 0x1
0609 00da | | Load_Top At_Offset_2
060a e5ff | | Load 0x2,-0x1
060b 0217 | | Execute Heap_Access,All_Reference
060c 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
060d e00e | | Load 0x0,0xe
060e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
060f c404 | | Store 0x2,0x4
0610 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0xc = 0x610,0x9
0611 a5fd | | Store_Unchecked 0x2,-0x3
0612 4503 |E | Exit_Subprogram 0x3
0613 TRAP_05b8:
0613 0007 | | Action Break_Optional
0614 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0xd = 0x614,0xa
0615 4801 |H | Short_Literal 0x1
0616 4800 |H | Short_Literal 0x0
0617 e5ff | | Load 0x2,-0x1
0618 0217 | | Execute Heap_Access,All_Reference
0619 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
061a e00e | | Load 0x0,0xe
061b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
061c c404 | | Store 0x2,0x4
061d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0xe = 0x61d,0xb
061e 0101 | | Execute Exception,Reraise
061f 0000 | | .XXX[0x1]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 062a | * | .CONST 0x062a ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0003 | | .CONST 0x0003 ; Number of locals
0623 INIT_0620:
0623 e01a | | Load 0x0,0x1a ; Debug Table 0x10 = .DEBUG 0x0623,0x11cc,0x0002,0x0000,0x005a,0x9095,0x0000,0x075e
; Debug Table 0x10.0x0 = 0x623,0xffff
0624 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0625 0322 | " | Declare_Variable Record
0626 00d8 | | Load_Top At_Offset_0
0627 1c00 | | Execute_Immediate Run_Utility,0x0
0628 e01b | | Load 0x0,0x1b ; Debug Table 0x10.0x1 = 0x628,0xfffe
0629 1b0d | | Execute Package,Field_Read,Field_Number 0xd
062a BODY_0620:
062a e01b | | Load 0x0,0x1b ; Debug Table 0x10.0x2 = 0x62a,0x1
062b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
062c 00da | | Load_Top At_Offset_2
062d e5fe | | Load 0x2,-0x2
062e 6281 |b | Indirect_Literal Discrete,0x8b0,{0x00000000, 0x00028000}
062f e5ff | | Load 0x2,-0x1
0630 e00d | | Load 0x0,0xd
0631 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0632 180d | | Execute Package,Field_Execute,Field_Number 0xd
0633 e01a | | Load 0x0,0x1a
0634 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0635 00d1 | | Pop_Control Pop_Count_1
0636 0059 | Y | Store_Top Discrete,At_Offset_1
0637 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x3 = 0x637,0x2
0638 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0639 4402 |D | Exit_Subprogram With_Result,0x2
063a 0000 0000 | | .BLANK 0000[0x6]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643 | C | .CONST 0x0643 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0001 | | .CONST 0x0001 ; Number of locals
0643 BODY_0640:
0643 INIT_0640:
0643 e5fc | | Load 0x2,-0x4 ; Debug Table 0x11 = .DEBUG 0x0643,0x11d6,0x0001,0x0000,0x005a,0x9095,0x0000,0x0799
; Debug Table 0x11.0x0 = 0x643,0x1
0644 6816 |h | Jump_Zero 0x65b
0645 0092 0c69 | i| Action Push_String_Extended,0xc69 ; "While restoring code for "
; Debug Table 0x11.0x1 = 0x645,0x2
0647 e5fd | | Load 0x2,-0x3
0648 01cc | | Execute Vector,Catenate
0649 0092 0c6a | j| Action Push_String_Extended,0xc6a ; ", bad status "
064b 01cc | | Execute Vector,Catenate
064c e5fe | | Load 0x2,-0x2
064d 01cc | | Execute Vector,Catenate
064e 0092 0c6b | k| Action Push_String_Extended,0xc6b ; ": "
0650 01cc | | Execute Vector,Catenate
0651 e5fc | | Load 0x2,-0x4
0652 e01b | | Load 0x0,0x1b
0653 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0654 025e | ^ | Execute Discrete,Convert
0655 1c01 | | Execute_Immediate Run_Utility,0x1
0656 01cc | | Execute Vector,Catenate
0657 00db | | Load_Top At_Offset_3
0658 8019 | | Call 0x0,0x19
0659 6252 |bR | Indirect_Literal Discrete,0x8ac,{0x00000000, 0x5a909501} ; Debug Table 0x11.0x2 = 0x659,0x3
065a 0257 | W | Execute Discrete,Raise
065b 4505 |E | Exit_Subprogram 0x5
065c 0000 0000 | | .BLANK 0000[0x4]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 067b | { | .CONST 0x067b ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 000b | | .CONST 0x000b ; Number of locals
0663 INIT_0660:
0663 029f 09db | | Declare_Subprogram For_Call,INIT_09d8 ; Debug Table 0x12 = .DEBUG 0x0663,0x11de,0x0001,0x0000,0x005a,0x9095,0x0000,0x07e0
; Debug Table 0x12.0x0 = 0x663,0xffff
0665 029f 09f3 | | Declare_Subprogram For_Call,INIT_09f0 ; Debug Table 0x12.0x1 = 0x665,0xfffe
0667 029f 0a03 | | Declare_Subprogram For_Call,INIT_0a00 ; Debug Table 0x12.0x2 = 0x667,0xfffd
0669 e01c | | Load 0x0,0x1c ; Debug Table 0x12.0x3 = 0x669,0xfffc
066a 190d | | Execute Package,Field_Reference,Field_Number 0xd
066b 00c6 | | Action Check_Subprogram_Elaborated
066c e001 | | Load 0x0,0x1
066d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
066e 4804 |H | Short_Literal 0x4
066f 4802 |H | Short_Literal 0x2
0670 0099 | | Action Reference_Dynamic
0671 4802 |H | Short_Literal 0x2
0672 4802 |H | Short_Literal 0x2
0673 0099 | | Action Reference_Dynamic
0674 4803 |H | Short_Literal 0x3
0675 4802 |H | Short_Literal 0x2
0676 0099 | | Action Reference_Dynamic
0677 6230 |b0 | Indirect_Literal Discrete,0x8a8,{0x00000000, 0x005a9095}
0678 622b |b+ | Indirect_Literal Discrete,0x8a4,{0x00000000, 0x0000087a}
0679 480b |H | Short_Literal 0xb
067a 0007 | | Action Break_Optional
067b BODY_0660:
067b e5fc | | Load 0x2,-0x4 ; Debug Table 0x12.0x4 = 0x67b,0x1
067c 4801 |H | Short_Literal 0x1
067d e405 | | Load 0x2,0x5
067e 4806 |H | Short_Literal 0x6
067f 4802 |H | Short_Literal 0x2
0680 0099 | | Action Reference_Dynamic
0681 4807 |H | Short_Literal 0x7
0682 4802 |H | Short_Literal 0x2
0683 0099 | | Action Reference_Dynamic
0684 4808 |H | Short_Literal 0x8
0685 4802 |H | Short_Literal 0x2
0686 0099 | | Action Reference_Dynamic
0687 4809 |H | Short_Literal 0x9
0688 4802 |H | Short_Literal 0x2
0689 0099 | | Action Reference_Dynamic
068a e01c | | Load 0x0,0x1c
068b 180d | | Execute Package,Field_Execute,Field_Number 0xd
068c c5fc | | Store 0x2,-0x4
068d 4504 |E | Exit_Subprogram 0x4
068e 0000 0000 | | .XXX[0x2]
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 06a9 | | .CONST 0x06a9 ; Address of begin
0691 06d3 | | .CONST 0x06d3 ; Address of exception handler
0692 000c | | .CONST 0x000c ; Number of locals
0693 INIT_0690:
0693 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x13 = .DEBUG 0x0693,0x11ea,0x0001,0x0000,0x005a,0x9095,0x0000,0x0908
; Debug Table 0x13.0x0 = 0x693,0xffff
0694 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x13.0x1 = 0x694,0xfffe
0695 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0696 e211 | | Load 0x1,0x11 ; Debug Table 0x13.0x2 = 0x696,0xfffd
0697 0007 | | Action Break_Optional
0698 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x13.0x3 = 0x698,0xfffc
0699 00c6 | | Action Check_Subprogram_Elaborated
069a 4ff7 |O | Short_Literal 0x7f7
069b 4802 |H | Short_Literal 0x2
069c 0099 | | Action Reference_Dynamic
069d 620a |b | Indirect_Literal Discrete,0x8a8,{0x00000000, 0x005a9095}
069e 6201 |b | Indirect_Literal Discrete,0x8a0,{0x00000000, 0x00000953}
069f 4808 |H | Short_Literal 0x8
06a0 0007 | | Action Break_Optional
06a1 029f 0a1b | | Declare_Subprogram For_Call,INIT_0a18 ; Debug Table 0x13.0x4 = 0x6a1,0xfffb
06a3 029f 0a33 | 3| Declare_Subprogram For_Call,INIT_0a30 ; Debug Table 0x13.0x5 = 0x6a3,0xfffa
06a5 029f 0abb | | Declare_Subprogram For_Call,INIT_0ab8 ; Debug Table 0x13.0x6 = 0x6a5,0xfff9
06a7 029f 0b6b | k| Declare_Subprogram For_Call,INIT_0b68 ; Debug Table 0x13.0x7 = 0x6a7,0xfff8
06a9 BODY_0690:
06a9 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x8 = 0x6a9,0x1
06aa a5f6 | | Store_Unchecked 0x2,-0xa
06ab 00cf | | Action Mark_Auxiliary
06ac 0007 | | Action Break_Optional ; Debug Table 0x13.0x9 = 0x6ac,0x2
06ad 8409 | | Call 0x2,0x9 ; Debug Table 0x13.0xa = 0x6ad,0x3
06ae a402 | | Store_Unchecked 0x2,0x2
06af e402 | | Load 0x2,0x2 ; Debug Table 0x13.0xb = 0x6af,0x4
06b0 6813 |h | Jump_Zero 0x6c4
06b1 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0xc = 0x6b1,0x5
06b2 0a01 | | Execute_Immediate Plus,0x1
06b3 0248 | H | Execute Discrete,Check_In_Integer
06b4 a403 | | Store_Unchecked 0x2,0x3
06b5 e5fc | | Load 0x2,-0x4 ; Debug Table 0x13.0xd = 0x6b5,0x6
06b6 6806 |h | Jump_Zero 0x6bd
06b7 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0xe = 0x6b7,0x7
06b8 e01d | | Load 0x0,0x1d
06b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06ba 025b | [ | Execute Discrete,Check_In_Type
06bb 840b | | Call 0x2,0xb
06bc 7805 |x | Jump 0x6c2
06bd e402 | | Load 0x2,0x2 ; Debug Table 0x13.0xf = 0x6bd,0x8
06be e01d | | Load 0x0,0x1d
06bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06c0 025b | [ | Execute Discrete,Check_In_Type
06c1 840a | | Call 0x2,0xa
06c2 00c9 | | Action Pop_Auxiliary_Loop
06c3 7fe9 | | Jump 0x6ad
06c4 00ce | | Action Pop_Auxiliary
06c5 e5fc | | Load 0x2,-0x4 ; Debug Table 0x13.0x10 = 0x6c5,0x9
06c6 6801 |h | Jump_Zero 0x6c8
06c7 840c | | Call 0x2,0xc ; Debug Table 0x13.0x11 = 0x6c7,0xa
06c8 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0x12 = 0x6c8,0xb
06c9 00e0 | | Load_Encached Standard_Cache
06ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06cb 0092 0c6c | l| Action Push_String_Extended,0xc6c ; " code segments read for "
06cd 01cc | | Execute Vector,Catenate
06ce e5fe | | Load 0x2,-0x2
06cf 01cc | | Execute Vector,Catenate
06d0 e5ff | | Load 0x2,-0x1
06d1 801e | | Call 0x0,0x1e
06d2 4507 |E | Exit_Subprogram 0x7
06d3 TRAP_0690:
06d3 61d8 |a | Indirect_Literal Discrete,0x8ac,{0x00000000, 0x5a909501}
06d4 010f | | Execute Exception,Equal
06d5 681e |h | Jump_Zero 0x6f4
06d6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x13.0x13 = 0x6d6,0xc
06d7 0219 | | Execute Heap_Access,All_Read
06d8 e5ff | | Load 0x2,-0x1
06d9 0219 | | Execute Heap_Access,All_Read
06da 2c33 |,3 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x33
06db 00d9 | | Load_Top At_Offset_1
06dc 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
06dd 00d9 | | Load_Top At_Offset_1
06de e5ff | | Load 0x2,-0x1
06df 0217 | | Execute Heap_Access,All_Reference
06e0 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
06e1 e5fd | | Load 0x2,-0x3
06e2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06e3 0275 | u | Execute Discrete,Unary_Minus
06e4 0248 | H | Execute Discrete,Check_In_Integer
06e5 e5fd | | Load 0x2,-0x3
06e6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
06e7 0272 | r | Execute Discrete,Minus
06e8 e5f7 | | Load 0x2,-0x9
06e9 0272 | r | Execute Discrete,Minus
06ea 0248 | H | Execute Discrete,Check_In_Integer
06eb e008 | | Load 0x0,0x8
06ec 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
06ed 00d1 | | Pop_Control Pop_Count_1
06ee 00da | | Load_Top At_Offset_2
06ef 284e |(N | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4e
06f0 00d2 | | Pop_Control Pop_Count_2
06f1 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x14 = 0x6f1,0xd
06f2 a5f6 | | Store_Unchecked 0x2,-0xa
06f3 4507 |E | Exit_Subprogram 0x7
06f4 0100 | | Execute Exception,Raise
06f5 0000 0000 | | .XXX[0x3]
06f7 0000 | |
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 0741 | A | .CONST 0x0741 ; Address of begin
06f9 088d | | .CONST 0x088d ; Address of exception handler
06fa 0015 | | .CONST 0x0015 ; Number of locals
06fb INIT_06f8:
06fb e018 | | Load 0x0,0x18 ; Debug Table 0x14 = .DEBUG 0x06fb,0x1216,0x0001,0x0000,0x005a,0x9095,0x0000,0x0c24
; Debug Table 0x14.0x0 = 0x6fb,0xffff
06fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06fd 02c7 | | Declare_Variable Any
06fe 00d8 | | Load_Top At_Offset_0
06ff 1c00 | | Execute_Immediate Run_Utility,0x0
0700 e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x1 = 0x700,0xfffe
0701 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0702 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0703 02c7 | | Declare_Variable Any
0704 00d8 | | Load_Top At_Offset_0
0705 1c00 | | Execute_Immediate Run_Utility,0x0
0706 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x2 = 0x706,0xfffd
0707 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x3 = 0x707,0xfffc
0708 e01f | | Load 0x0,0x1f ; Debug Table 0x14.0x4 = 0x708,0xfffb
0709 1b12 | | Execute Package,Field_Read,Field_Number 0x12
070a 02ff | | Declare_Variable Variant_Record
070b 00d8 | | Load_Top At_Offset_0
070c 1c00 | | Execute_Immediate Run_Utility,0x0
070d e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x5 = 0x70d,0xfffa
070e 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
070f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0710 e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x6 = 0x710,0xfff9
0711 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0712 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0713 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0714 e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x7 = 0x714,0xfff8
0715 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0716 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0717 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0718 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x8 = 0x718,0xfff7
0719 1b0d | | Execute Package,Field_Read,Field_Number 0xd
071a e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x9 = 0x71a,0xfff6
071b 1b64 | d | Execute Package,Field_Read,Field_Number 0x64
071c 0322 | " | Declare_Variable Record
071d 00d8 | | Load_Top At_Offset_0
071e 1c00 | | Execute_Immediate Run_Utility,0x0
071f 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x14.0xa = 0x71f,0xfff5
0720 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0721 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0xb = 0x721,0xfff4
0722 e01b | | Load 0x0,0x1b ; Debug Table 0x14.0xc = 0x722,0xfff3
0723 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0724 e00d | | Load 0x0,0xd ; Debug Table 0x14.0xd = 0x724,0xfff2
0725 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0726 02c7 | | Declare_Variable Any
0727 00d8 | | Load_Top At_Offset_0
0728 1c00 | | Execute_Immediate Run_Utility,0x0
0729 e00e | | Load 0x0,0xe ; Debug Table 0x14.0xe = 0x729,0xfff1
072a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072b 02c7 | | Declare_Variable Any
072c e017 | | Load 0x0,0x17
072d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
072e e5fc | | Load 0x2,-0x4
072f 0217 | | Execute Heap_Access,All_Reference
0730 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0731 e00e | | Load 0x0,0xe
0732 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0733 c410 | | Store 0x2,0x10
0734 029f 0b9b | | Declare_Subprogram For_Call,INIT_0b98 ; Debug Table 0x14.0xf = 0x734,0xfff0
0736 e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x10 = 0x736,0xffef
0737 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0738 190f | | Execute Package,Field_Reference,Field_Number 0xf
0739 00c6 | | Action Check_Subprogram_Elaborated
073a 4811 |H | Short_Literal 0x11
073b 4802 |H | Short_Literal 0x2
073c 0099 | | Action Reference_Dynamic
073d 616a |aj | Indirect_Literal Discrete,0x8a8,{0x00000000, 0x005a9095}
073e 615d |a] | Indirect_Literal Discrete,0x89c,{0x00000000, 0x00000cc8}
073f 4815 |H | Short_Literal 0x15
0740 0007 | | Action Break_Optional
0741 BODY_06f8:
0741 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x11 = 0x741,0x1
0742 4800 |H | Short_Literal 0x0
0743 4801 |H | Short_Literal 0x1
0744 e002 | | Load 0x0,0x2
0745 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0746 e410 | | Load 0x2,0x10
0747 e5fc | | Load 0x2,-0x4
0748 0217 | | Execute Heap_Access,All_Reference
0749 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
074a e018 | | Load 0x0,0x18
074b 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
074c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
074d c403 | | Store 0x2,0x3
074e e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x12 = 0x74e,0x2
074f 0120 | | Execute Any,Is_Value
0750 6803 |h | Jump_Zero 0x754
0751 e018 | | Load 0x0,0x18
0752 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0753 7801 |x | Jump 0x755
0754 e402 | | Load 0x2,0x2
0755 4800 |H | Short_Literal 0x0
0756 e5fe | | Load 0x2,-0x2
0757 e403 | | Load 0x2,0x3
0758 e018 | | Load 0x0,0x18
0759 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
075a 180f | | Execute Package,Field_Execute,Field_Number 0xf
075b c402 | | Store 0x2,0x2
075c e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x13 = 0x75c,0x3
075d e018 | | Load 0x0,0x18
075e 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
075f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0760 701b |p | Jump_Nonzero 0x77c
0761 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x14 = 0x761,0x4
0762 0219 | | Execute Heap_Access,All_Read
0763 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
0764 00d8 | | Load_Top At_Offset_0
0765 e403 | | Load 0x2,0x3
0766 e018 | | Load 0x0,0x18
0767 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0768 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0769 e009 | | Load 0x0,0x9
076a 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
076b 00d2 | | Pop_Control Pop_Count_2
076c 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x15 = 0x76c,0x5
076d e5fc | | Load 0x2,-0x4
076e e5fd | | Load 0x2,-0x3
076f 8005 | | Call 0x0,0x5
0770 e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x16 = 0x770,0x6
0771 4801 |H | Short_Literal 0x1
0772 4800 |H | Short_Literal 0x0
0773 e5fc | | Load 0x2,-0x4
0774 0217 | | Execute Heap_Access,All_Reference
0775 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0776 e00e | | Load 0x0,0xe
0777 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0778 c410 | | Store 0x2,0x10
0779 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x17 = 0x779,0x7
077a a5fb | | Store_Unchecked 0x2,-0x5
077b 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x14.0x18 = 0x77b,0x8
077c e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x19 = 0x77c,0x9
077d e018 | | Load 0x0,0x18
077e 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b
077f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0780 c40f | | Store 0x2,0xf
0781 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x1a = 0x781,0xa
0782 e018 | | Load 0x0,0x18
0783 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0784 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0785 e402 | | Load 0x2,0x2
0786 e403 | | Load 0x2,0x3
0787 e018 | | Load 0x0,0x18
0788 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0789 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
078a c407 | | Store 0x2,0x7
078b c405 | | Store 0x2,0x5
078c e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x1b = 0x78c,0xb
078d 7014 |p | Jump_Nonzero 0x7a2
078e 0092 0c6d | m| Action Push_String_Extended,0xc6d ; "Can't find program_library header after create"
; Debug Table 0x14.0x1c = 0x78e,0xc
0790 e5fc | | Load 0x2,-0x4
0791 8019 | | Call 0x0,0x19
0792 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x1d = 0x792,0xd
0793 e5fc | | Load 0x2,-0x4
0794 e5fd | | Load 0x2,-0x3
0795 8005 | | Call 0x0,0x5
0796 e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x1e = 0x796,0xe
0797 4801 |H | Short_Literal 0x1
0798 4800 |H | Short_Literal 0x0
0799 e5fc | | Load 0x2,-0x4
079a 0217 | | Execute Heap_Access,All_Reference
079b 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
079c e00e | | Load 0x0,0xe
079d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
079e c410 | | Store 0x2,0x10
079f 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x1f = 0x79f,0xf
07a0 a5fb | | Store_Unchecked 0x2,-0x5
07a1 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x14.0x20 = 0x7a1,0x10
07a2 e407 | | Load 0x2,0x7 ; Debug Table 0x14.0x21 = 0x7a2,0x11
07a3 0217 | | Execute Heap_Access,All_Reference
07a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07a5 e01f | | Load 0x0,0x1f
07a6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07a7 e406 | | Load 0x2,0x6
07a8 016d | m | Execute Variant_Record,Structure_Write
07a9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x22 = 0x7a9,0x12
07aa 0217 | | Execute Heap_Access,All_Reference
07ab 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
07ac 0f01 | | Execute_Immediate Equal,0x1
07ad 6807 |h | Jump_Zero 0x7b5
07ae e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x23 = 0x7ae,0x13
07af e5fd | | Load 0x2,-0x3
07b0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07b1 e5fc | | Load 0x2,-0x4
07b2 0217 | | Execute Heap_Access,All_Reference
07b3 2433 |$3 | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x33
07b4 8007 | | Call 0x0,0x7
07b5 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x24 = 0x7b5,0x14
07b6 0219 | | Execute Heap_Access,All_Read
07b7 2c33 |,3 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x33
07b8 00d8 | | Load_Top At_Offset_0
07b9 e5fd | | Load 0x2,-0x3
07ba 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
07bb e402 | | Load 0x2,0x2
07bc e008 | | Load 0x0,0x8
07bd 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
07be 00d2 | | Pop_Control Pop_Count_2
07bf e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x25 = 0x7bf,0x15
07c0 0217 | | Execute Heap_Access,All_Reference
07c1 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
07c2 4603 |F | Jump_Case 0x3
07c3 780f |x | Jump 0x7d3 ; case 0x0
07c4 7802 |x | Jump 0x7c7 ; case 0x1
07c5 781a |x | Jump 0x7e0 ; case 0x2
07c6 7819 |x | Jump 0x7e0 ; case 0x3
07c7 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x26 = 0x7c7,0x16
07c8 e5fd | | Load 0x2,-0x3
07c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07ca e5fd | | Load 0x2,-0x3
07cb 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
07cc 0273 | s | Execute Discrete,Plus
07cd 0248 | H | Execute Discrete,Check_In_Integer
07ce e5fc | | Load 0x2,-0x4
07cf 0217 | | Execute Heap_Access,All_Reference
07d0 2433 |$3 | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x33
07d1 8007 | | Call 0x0,0x7
07d2 780d |x | Jump 0x7e0
07d3 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x27 = 0x7d3,0x17
07d4 0219 | | Execute Heap_Access,All_Read
07d5 00d8 | | Load_Top At_Offset_0
07d6 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
07d7 e5fc | | Load 0x2,-0x4
07d8 0217 | | Execute Heap_Access,All_Reference
07d9 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
07da 4800 |H | Short_Literal 0x0
07db e008 | | Load 0x0,0x8
07dc 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
07dd 00d9 | | Load_Top At_Offset_1
07de 284e |(N | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4e
07df 00d1 | | Pop_Control Pop_Count_1
07e0 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x28 = 0x7e0,0x19
07e1 e018 | | Load 0x0,0x18
07e2 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b
07e3 180f | | Execute Package,Field_Execute,Field_Number 0xf
07e4 e40b | | Load 0x2,0xb
07e5 017d | } | Execute Record,Structure_Write
07e6 e40b | | Load 0x2,0xb ; Debug Table 0x14.0x29 = 0x7e6,0x1a
07e7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
07e8 4801 |H | Short_Literal 0x1
07e9 4803 |H | Short_Literal 0x3
07ea 0262 | b | Execute Discrete,In_Range
07eb a40d | | Store_Unchecked 0x2,0xd
07ec e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x2a = 0x7ec,0x1b
07ed 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
07ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ef 1b13 | | Execute Package,Field_Read,Field_Number 0x13
07f0 e5fc | | Load 0x2,-0x4
07f1 0217 | | Execute Heap_Access,All_Reference
07f2 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
07f3 e018 | | Load 0x0,0x18
07f4 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
07f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07f7 c408 | | Store 0x2,0x8
07f8 e018 | | Load 0x0,0x18 ; Debug Table 0x14.0x2b = 0x7f8,0x1c
07f9 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
07fa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07fb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
07fc e5fc | | Load 0x2,-0x4
07fd 0217 | | Execute Heap_Access,All_Reference
07fe 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
07ff e018 | | Load 0x0,0x18
0800 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0801 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0802 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0803 c409 | | Store 0x2,0x9
0804 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x2c = 0x804,0x1d
0805 e40c | | Load 0x2,0xc
0806 e409 | | Load 0x2,0x9
0807 e408 | | Load 0x2,0x8
0808 e410 | | Load 0x2,0x10
0809 e410 | | Load 0x2,0x10
080a e40f | | Load 0x2,0xf
080b 821c | | Call 0x1,0x1c
080c e40d | | Load 0x2,0xd
080d e5fd | | Load 0x2,-0x3
080e e5ff | | Load 0x2,-0x1
080f e5fc | | Load 0x2,-0x4
0810 821f | | Call 0x1,0x1f
0811 c408 | | Store 0x2,0x8
0812 c409 | | Store 0x2,0x9
0813 c40c | | Store 0x2,0xc
0814 c404 | | Store 0x2,0x4
0815 e404 | | Load 0x2,0x4 ; Debug Table 0x14.0x2d = 0x815,0x1e
0816 700c |p | Jump_Nonzero 0x823
0817 e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x2e = 0x817,0x1f
0818 4801 |H | Short_Literal 0x1
0819 4800 |H | Short_Literal 0x0
081a e5fc | | Load 0x2,-0x4
081b 0217 | | Execute Heap_Access,All_Reference
081c 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
081d e00e | | Load 0x0,0xe
081e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
081f c410 | | Store 0x2,0x10
0820 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x2f = 0x820,0x20
0821 a5fb | | Store_Unchecked 0x2,-0x5
0822 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x14.0x30 = 0x822,0x21
0823 e406 | | Load 0x2,0x6 ; Debug Table 0x14.0x31 = 0x823,0x22
0824 e407 | | Load 0x2,0x7
0825 0217 | | Execute Heap_Access,All_Reference
0826 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0827 e01f | | Load 0x0,0x1f
0828 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0829 e01b | | Load 0x0,0x1b ; Debug Table 0x14.0x32 = 0x829,0x23
082a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
082b e410 | | Load 0x2,0x10
082c 4801 |H | Short_Literal 0x1
082d e406 | | Load 0x2,0x6
082e e01f | | Load 0x0,0x1f
082f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0830 c40e | | Store 0x2,0xe
0831 e40a | | Load 0x2,0xa ; Debug Table 0x14.0x33 = 0x831,0x24
0832 00e1 | | Load_Encached Boolean_Cache
0833 e410 | | Load 0x2,0x10
0834 e5fc | | Load 0x2,-0x4
0835 0217 | | Execute Heap_Access,All_Reference
0836 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
0837 e5fc | | Load 0x2,-0x4
0838 0217 | | Execute Heap_Access,All_Reference
0839 2c55 |,U | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x55
083a 021d | | Execute Heap_Access,Is_Null
083b 0f00 | | Execute_Immediate Equal,0x0
083c e402 | | Load 0x2,0x2
083d e409 | | Load 0x2,0x9
083e e408 | | Load 0x2,0x8
083f e403 | | Load 0x2,0x3
0840 4812 |H | Short_Literal 0x12
0841 4802 |H | Short_Literal 0x2
0842 0099 | | Action Reference_Dynamic
0843 4813 |H | Short_Literal 0x13
0844 4802 |H | Short_Literal 0x2
0845 0099 | | Action Reference_Dynamic
0846 e018 | | Load 0x0,0x18
0847 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0848 180f | | Execute Package,Field_Execute,Field_Number 0xf
0849 c404 | | Store 0x2,0x4
084a c40a | | Store 0x2,0xa
084b e404 | | Load 0x2,0x4 ; Debug Table 0x14.0x34 = 0x84b,0x25
084c 7014 |p | Jump_Nonzero 0x861
084d e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x35 = 0x84d,0x26
084e 0219 | | Execute Heap_Access,All_Read
084f 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
0850 00d8 | | Load_Top At_Offset_0
0851 e40a | | Load 0x2,0xa
0852 e009 | | Load 0x0,0x9
0853 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0854 00d2 | | Pop_Control Pop_Count_2
0855 e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x36 = 0x855,0x27
0856 4801 |H | Short_Literal 0x1
0857 4800 |H | Short_Literal 0x0
0858 e5fc | | Load 0x2,-0x4
0859 0217 | | Execute Heap_Access,All_Reference
085a 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
085b e00e | | Load 0x0,0xe
085c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
085d c410 | | Store 0x2,0x10
085e 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x37 = 0x85e,0x28
085f a5fb | | Store_Unchecked 0x2,-0x5
0860 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x14.0x38 = 0x860,0x29
0861 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x39 = 0x861,0x2a
0862 e018 | | Load 0x0,0x18
0863 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
0864 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0865 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x3a = 0x865,0x2b
0866 e018 | | Load 0x0,0x18
0867 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0868 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0869 7017 |p | Jump_Nonzero 0x881
086a e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x3b = 0x86a,0x2c
086b 0219 | | Execute Heap_Access,All_Read
086c 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
086d 00d8 | | Load_Top At_Offset_0
086e e403 | | Load 0x2,0x3
086f e018 | | Load 0x0,0x18
0870 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0871 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0872 e009 | | Load 0x0,0x9
0873 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0874 00d2 | | Pop_Control Pop_Count_2
0875 e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x3c = 0x875,0x2d
0876 4801 |H | Short_Literal 0x1
0877 4800 |H | Short_Literal 0x0
0878 e5fc | | Load 0x2,-0x4
0879 0217 | | Execute Heap_Access,All_Reference
087a 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
087b e00e | | Load 0x0,0xe
087c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
087d c410 | | Store 0x2,0x10
087e 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x3d = 0x87e,0x2e
087f a5fb | | Store_Unchecked 0x2,-0x5
0880 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x14.0x3e = 0x880,0x2f
0881 e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x3f = 0x881,0x30
0882 4801 |H | Short_Literal 0x1
0883 4801 |H | Short_Literal 0x1
0884 e5fc | | Load 0x2,-0x4
0885 0217 | | Execute Heap_Access,All_Reference
0886 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0887 e00e | | Load 0x0,0xe
0888 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0889 c410 | | Store 0x2,0x10
088a 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x40 = 0x88a,0x31
088b a5fb | | Store_Unchecked 0x2,-0x5
088c 4505 |E | Exit_Subprogram 0x5
088d TRAP_06f8:
088d 0007 | | Action Break_Optional
088e e410 | | Load 0x2,0x10 ; Debug Table 0x14.0x41 = 0x88e,0x32
088f 4801 |H | Short_Literal 0x1
0890 4800 |H | Short_Literal 0x0
0891 e5fc | | Load 0x2,-0x4
0892 0217 | | Execute Heap_Access,All_Reference
0893 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0894 e00e | | Load 0x0,0xe
0895 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0896 c410 | | Store 0x2,0x10
0897 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x42 = 0x897,0x33
0898 0101 | | Execute Exception,Reraise
0899 0000 0000 | | .XXX[0x3]
089b 0000 | |
089c 0000 0000 | | .LITERAL {0x00000000, 0x00000cc8}
08a0 0000 0000 | | .LITERAL {0x00000000, 0x00000953}
08a4 0000 0000 | | .LITERAL {0x00000000, 0x0000087a}
08a8 0000 0000 | | .LITERAL {0x00000000, 0x005a9095}
08ac 0000 0000 | | .LITERAL {0x00000000, 0x5a909501}
08b0 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
08b4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
08b8 ; --------------------------------------------------------------------------------------
08b8 ; SUBPROGRAM
08b8 ; --------------------------------------------------------------------------------------
08b8 08d9 | | .CONST 0x08d9 ; Address of begin
08b9 094f | O | .CONST 0x094f ; Address of exception handler
08ba 000d | | .CONST 0x000d ; Number of locals
08bb INIT_08b8:
08bb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x15 = .DEBUG 0x08bb,0x129e,0x0001,0x0000,0x005a,0x9095,0x0000,0x0f50
; Debug Table 0x15.0x0 = 0x8bb,0xffff
08bc e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x1 = 0x8bc,0xfffe
08bd 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
08be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08bf 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08c0 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0x2 = 0x8c0,0xfffd
08c1 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
08c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08c3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08c4 e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x3 = 0x8c4,0xfffc
08c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c6 e00d | | Load 0x0,0xd ; Debug Table 0x15.0x4 = 0x8c6,0xfffb
08c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c8 e00e | | Load 0x0,0xe ; Debug Table 0x15.0x5 = 0x8c8,0xfffa
08c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ca 02c7 | | Declare_Variable Any
08cb 00d8 | | Load_Top At_Offset_0
08cc 1c00 | | Execute_Immediate Run_Utility,0x0
08cd 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x15.0x6 = 0x8cd,0xfff9
08ce 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
08cf 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x15.0x7 = 0x8cf,0xfff8
08d0 00c6 | | Action Check_Subprogram_Elaborated
08d1 4808 |H | Short_Literal 0x8
08d2 4802 |H | Short_Literal 0x2
08d3 0099 | | Action Reference_Dynamic
08d4 67d3 |g | Indirect_Literal Discrete,0x8a8,{0x00000000, 0x005a9095}
08d5 628e |b | Indirect_Literal Discrete,0xb64,{0x00000000, 0x00000f9f}
08d6 480c |H | Short_Literal 0xc
08d7 029f 0ba3 | | Declare_Subprogram For_Call,INIT_0ba0
08d9 BODY_08b8:
08d9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x15.0x8 = 0x8d9,0x1
08da 0217 | | Execute Heap_Access,All_Reference
08db 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7
08dc 4603 |F | Jump_Case 0x3
08dd 780b |x | Jump 0x8e9 ; case 0x0
08de 7802 |x | Jump 0x8e1 ; case 0x1
08df 7816 |x | Jump 0x8f6 ; case 0x2
08e0 7815 |x | Jump 0x8f6 ; case 0x3
08e1 e5fc | | Load 0x2,-0x4 ; Debug Table 0x15.0x9 = 0x8e1,0x2
08e2 e5fd | | Load 0x2,-0x3
08e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08e4 e5fc | | Load 0x2,-0x4
08e5 0217 | | Execute Heap_Access,All_Reference
08e6 2433 |$3 | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x33
08e7 8007 | | Call 0x0,0x7
08e8 780d |x | Jump 0x8f6
08e9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x15.0xa = 0x8e9,0x3
08ea 0219 | | Execute Heap_Access,All_Read
08eb 00d8 | | Load_Top At_Offset_0
08ec 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
08ed e5fc | | Load 0x2,-0x4
08ee 0217 | | Execute Heap_Access,All_Reference
08ef 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
08f0 4800 |H | Short_Literal 0x0
08f1 e008 | | Load 0x0,0x8
08f2 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
08f3 00d9 | | Load_Top At_Offset_1
08f4 284e |(N | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4e
08f5 00d1 | | Pop_Control Pop_Count_1
08f6 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0xb = 0x8f6,0x5
08f7 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
08f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08f9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08fa e5fc | | Load 0x2,-0x4
08fb 0217 | | Execute Heap_Access,All_Reference
08fc 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
08fd e018 | | Load 0x0,0x18
08fe 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
08ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0900 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0901 c403 | | Store 0x2,0x3
0902 e018 | | Load 0x0,0x18 ; Debug Table 0x15.0xc = 0x902,0x6
0903 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0904 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0905 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0906 e5fc | | Load 0x2,-0x4
0907 0217 | | Execute Heap_Access,All_Reference
0908 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
0909 e018 | | Load 0x0,0x18
090a 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
090b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
090c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
090d c404 | | Store 0x2,0x4
090e e017 | | Load 0x0,0x17 ; Debug Table 0x15.0xd = 0x90e,0x7
090f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0910 e5fc | | Load 0x2,-0x4
0911 0217 | | Execute Heap_Access,All_Reference
0912 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0913 e00e | | Load 0x0,0xe
0914 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0915 c407 | | Store 0x2,0x7
0916 840d | | Call 0x2,0xd ; Debug Table 0x15.0xe = 0x916,0x8
0917 e00d | | Load 0x0,0xd ; Debug Table 0x15.0xf = 0x917,0x9
0918 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0919 679a |g | Indirect_Literal Discrete,0x8b4,{0x00000000, 0x00004000}
091a e407 | | Load 0x2,0x7
091b 4804 |H | Short_Literal 0x4
091c e5fe | | Load 0x2,-0x2
091d e020 | | Load 0x0,0x20
091e 180f | | Execute Package,Field_Execute,Field_Number 0xf
091f c406 | | Store 0x2,0x6
0920 e406 | | Load 0x2,0x6 ; Debug Table 0x15.0x10 = 0x920,0xa
0921 6821 |h! | Jump_Zero 0x943
0922 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x11 = 0x922,0xb
0923 a5fb | | Store_Unchecked 0x2,-0x5
0924 e407 | | Load 0x2,0x7 ; Debug Table 0x15.0x12 = 0x924,0xc
0925 4801 |H | Short_Literal 0x1
0926 4800 |H | Short_Literal 0x0
0927 e5fc | | Load 0x2,-0x4
0928 0217 | | Execute Heap_Access,All_Reference
0929 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
092a e00e | | Load 0x0,0xe
092b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
092c c407 | | Store 0x2,0x7
092d 0092 0c6e | n| Action Push_String_Extended,0xc6e ; "Can't set the unit_state of "
; Debug Table 0x15.0x13 = 0x92d,0xd
092f e5fe | | Load 0x2,-0x2
0930 e00d | | Load 0x0,0xd
0931 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0932 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0933 01cc | | Execute Vector,Catenate
0934 0092 0c6f | o| Action Push_String_Extended,0xc6f ; " to coded ("
0936 01cc | | Execute Vector,Catenate
0937 e406 | | Load 0x2,0x6
0938 e00d | | Load 0x0,0xd
0939 1b0d | | Execute Package,Field_Read,Field_Number 0xd
093a 025e | ^ | Execute Discrete,Convert
093b 1c01 | | Execute_Immediate Run_Utility,0x1
093c 01cc | | Execute Vector,Catenate
093d 0092 0c64 | d| Action Push_String_Extended,0xc64 ; ")"
093f 01cc | | Execute Vector,Catenate
0940 e5fc | | Load 0x2,-0x4
0941 8019 | | Call 0x0,0x19
0942 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x15.0x14 = 0x942,0xe
0943 e407 | | Load 0x2,0x7 ; Debug Table 0x15.0x15 = 0x943,0xf
0944 4801 |H | Short_Literal 0x1
0945 4801 |H | Short_Literal 0x1
0946 e5fc | | Load 0x2,-0x4
0947 0217 | | Execute Heap_Access,All_Reference
0948 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0949 e00e | | Load 0x0,0xe
094a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
094b c407 | | Store 0x2,0x7
094c 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x16 = 0x94c,0x10
094d a5fb | | Store_Unchecked 0x2,-0x5
094e 4505 |E | Exit_Subprogram 0x5
094f TRAP_08b8:
094f 0007 | | Action Break_Optional
0950 e407 | | Load 0x2,0x7 ; Debug Table 0x15.0x17 = 0x950,0x11
0951 4801 |H | Short_Literal 0x1
0952 4800 |H | Short_Literal 0x0
0953 e5fc | | Load 0x2,-0x4
0954 0217 | | Execute Heap_Access,All_Reference
0955 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0956 e00e | | Load 0x0,0xe
0957 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0958 c407 | | Store 0x2,0x7
0959 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x18 = 0x959,0x12
095a 0101 | | Execute Exception,Reraise
095b 0000 0000 | | .BLANK 0000[0x5]
0960 ; --------------------------------------------------------------------------------------
0960 ; SUBPROGRAM
0960 ; --------------------------------------------------------------------------------------
0960 0963 | c | .CONST 0x0963 ; Address of begin
0961 0004 | | .CONST 0x0004 ; Address of exception handler
0962 0001 | | .CONST 0x0001 ; Number of locals
0963 BODY_0960:
0963 INIT_0960:
0963 00da | | Load_Top At_Offset_2 ; Debug Table 0x16 = .DEBUG 0x0963,0x12d2,0x0007,0x0000,0x005a,0x9095,0x0000,0x05e8
0964 4807 |H | Short_Literal 0x7
0965 4802 |H | Short_Literal 0x2
0966 0099 | | Action Reference_Dynamic
0967 e408 | | Load 0x2,0x8
0968 4809 |H | Short_Literal 0x9
0969 4802 |H | Short_Literal 0x2
096a 0099 | | Action Reference_Dynamic
096b 8213 | | Call 0x1,0x13
096c 4401 |D | Exit_Subprogram With_Result,0x1
096d 0000 0000 | | .XXX[0x3]
096f 0000 | |
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 097b | { | .CONST 0x097b ; Address of begin
0971 0004 | | .CONST 0x0004 ; Address of exception handler
0972 0002 | | .CONST 0x0002 ; Number of locals
0973 INIT_0970:
0973 e5fc | | Load 0x2,-0x4 ; Debug Table 0x17 = .DEBUG 0x0973,0x12d4,0x0804,0x0002,0x005a,0x9095,0x0000,0x0121
; Debug Table 0x17.0x0 = 0x973,0xffff
0974 00e3 | | Load_Encached Natural_Cache
0975 025b | [ | Execute Discrete,Check_In_Type
0976 e5fe | | Load 0x2,-0x2
0977 0217 | | Execute Heap_Access,All_Reference
0978 2433 |$3 | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x33
0979 e008 | | Load 0x0,0x8
097a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
097b BODY_0970:
097b e5fd | | Load 0x2,-0x3 ; Debug Table 0x17.0x1 = 0x97b,0x1
097c 00d9 | | Load_Top At_Offset_1
097d 01db | | Execute Vector,Length
097e 0273 | s | Execute Discrete,Plus
097f 0248 | H | Execute Discrete,Check_In_Integer
0980 a5fd | | Store_Unchecked 0x2,-0x3
0981 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x981,0x2
0982 00cb | | Action Pop_Block_With_Result
0983 4404 |D | Exit_Subprogram With_Result,0x4
0984 0000 0000 | | .BLANK 0000[0x4]
0988 ; --------------------------------------------------------------------------------------
0988 ; SUBPROGRAM
0988 ; --------------------------------------------------------------------------------------
0988 0990 | | .CONST 0x0990 ; Address of begin
0989 0004 | | .CONST 0x0004 ; Address of exception handler
098a 0002 | | .CONST 0x0002 ; Number of locals
098b INIT_0988:
098b 4801 |H | Short_Literal 0x1 ; Debug Table 0x18 = .DEBUG 0x098b,0x12dc,0x0804,0x0002,0x005a,0x9095,0x0000,0x0153
; Debug Table 0x18.0x0 = 0x98b,0xffff
098c e5fc | | Load 0x2,-0x4
098d e014 | | Load 0x0,0x14
098e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
098f 0334 | 4 | Declare_Variable Array,With_Constraint
0990 BODY_0988:
0990 e5fe | | Load 0x2,-0x2 ; Debug Table 0x18.0x1 = 0x990,0x1
0991 0219 | | Execute Heap_Access,All_Read
0992 2c4e |,N | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4e
0993 0219 | | Execute Heap_Access,All_Read
0994 e5fe | | Load 0x2,-0x2
0995 0219 | | Execute Heap_Access,All_Read
0996 2c33 |,3 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x33
0997 e5fd | | Load 0x2,-0x3
0998 00da | | Load_Top At_Offset_2
0999 e602 | | Load 0x3,0x2
099a 00db | | Load_Top At_Offset_3
099b e008 | | Load 0x0,0x8
099c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
099d 00d3 | | Pop_Control Pop_Count_3
099e c5fd | | Store 0x2,-0x3
099f 00d2 | | Pop_Control Pop_Count_2
09a0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x2 = 0x9a0,0x2
09a1 00cb | | Action Pop_Block_With_Result
09a2 4404 |D | Exit_Subprogram With_Result,0x4
09a3 0000 0000 | | .BLANK 0000[0x5]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09bd | | .CONST 0x09bd ; Address of begin
09a9 0004 | | .CONST 0x0004 ; Address of exception handler
09aa 0003 | | .CONST 0x0003 ; Number of locals
09ab INIT_09a8:
09ab 4801 |H | Short_Literal 0x1 ; Debug Table 0x19 = .DEBUG 0x09ab,0x12e4,0x0804,0x0002,0x005a,0x9095,0x0000,0x08ec
; Debug Table 0x19.0x0 = 0x9ab,0xffff
09ac 4804 |H | Short_Literal 0x4
09ad e014 | | Load 0x0,0x14
09ae 1b12 | | Execute Package,Field_Read,Field_Number 0x12
09af 0334 | 4 | Declare_Variable Array,With_Constraint
09b0 4804 |H | Short_Literal 0x4
09b1 4803 |H | Short_Literal 0x3
09b2 4802 |H | Short_Literal 0x2
09b3 0099 | | Action Reference_Dynamic
09b4 e404 | | Load 0x2,0x4
09b5 4805 |H | Short_Literal 0x5
09b6 4802 |H | Short_Literal 0x2
09b7 0099 | | Action Reference_Dynamic
09b8 8213 | | Call 0x1,0x13
09b9 00d9 | | Load_Top At_Offset_1
09ba 01d4 | | Execute Vector,Structure_Write
09bb 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x19.0x1 = 0x9bb,0xfffe
09bc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
09bd BODY_09a8:
09bd 00cf | | Action Mark_Auxiliary
09be 0007 | | Action Break_Optional ; Debug Table 0x19.0x2 = 0x9be,0x1
09bf e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x3 = 0x9bf,0x2
09c0 00da | | Load_Top At_Offset_2
09c1 e602 | | Load 0x3,0x2
09c2 01d7 | | Execute Vector,Field_Read
09c3 0273 | s | Execute Discrete,Plus
09c4 0248 | H | Execute Discrete,Check_In_Integer
09c5 a402 | | Store_Unchecked 0x2,0x2
09c6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x4 = 0x9c6,0x3
09c7 0a01 | | Execute_Immediate Plus,0x1
09c8 0248 | H | Execute Discrete,Check_In_Integer
09c9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
09ca 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x5 = 0x9ca,0x4
09cb 0f05 | | Execute_Immediate Equal,0x5
09cc 7006 |p | Jump_Nonzero 0x9d3
09cd e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x6 = 0x9cd,0x5
09ce 0908 | | Execute_Immediate Binary_Scale,0x8
09cf 0248 | H | Execute Discrete,Check_In_Integer
09d0 a402 | | Store_Unchecked 0x2,0x2
09d1 00c9 | | Action Pop_Auxiliary_Loop
09d2 7fec | | Jump 0x9bf
09d3 4501 |E | Exit_Subprogram 0x1
09d4 0000 0000 | | .BLANK 0000[0x4]
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09dd | | .CONST 0x09dd ; Address of begin
09d9 0004 | | .CONST 0x0004 ; Address of exception handler
09da 0002 | | .CONST 0x0002 ; Number of locals
09db INIT_09d8:
09db e01b | | Load 0x0,0x1b ; Debug Table 0x1a = .DEBUG 0x09db,0x12f4,0x0001,0x0000,0x005a,0x9095,0x0000,0x07fb
; Debug Table 0x1a.0x0 = 0x9db,0xffff
09dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09dd BODY_09d8:
09dd e01b | | Load 0x0,0x1b ; Debug Table 0x1a.0x1 = 0x9dd,0x1
09de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09df e7fd | | Load 0x3,-0x3
09e0 e7fe | | Load 0x3,-0x2
09e1 e7ff | | Load 0x3,-0x1
09e2 e001 | | Load 0x0,0x1
09e3 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
09e4 c7fd | | Store 0x3,-0x3
09e5 0059 | Y | Store_Top Discrete,At_Offset_1
09e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x2 = 0x9e6,0x2
09e7 e5fe | | Load 0x2,-0x2
09e8 0092 0c70 | p| Action Push_String_Extended,0xc70 ; "while patching instruction"
09ea e5ff | | Load 0x2,-0x1
09eb 821d | | Call 0x1,0x1d
09ec 4503 |E | Exit_Subprogram 0x3
09ed 0000 0000 | | .XXX[0x3]
09ef 0000 | |
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f3 | | .CONST 0x09f3 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0001 | | .CONST 0x0001 ; Number of locals
09f3 BODY_09f0:
09f3 INIT_09f0:
09f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x09f3,0x12fc,0x0002,0x0000,0x005a,0x9095,0x0000,0x082c
; Debug Table 0x1b.0x0 = 0x9f3,0x1
09f4 e5fd | | Load 0x2,-0x3
09f5 e018 | | Load 0x0,0x18
09f6 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
09f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09f8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09f9 4401 |D | Exit_Subprogram With_Result,0x1
09fa 0000 0000 | | .BLANK 0000[0x6]
0a00 ; --------------------------------------------------------------------------------------
0a00 ; SUBPROGRAM
0a00 ; --------------------------------------------------------------------------------------
0a00 0a05 | | .CONST 0x0a05 ; Address of begin
0a01 0004 | | .CONST 0x0004 ; Address of exception handler
0a02 0002 | | .CONST 0x0002 ; Number of locals
0a03 INIT_0a00:
0a03 e01b | | Load 0x0,0x1b ; Debug Table 0x1c = .DEBUG 0x0a03,0x1300,0x0001,0x0000,0x005a,0x9095,0x0000,0x0849
; Debug Table 0x1c.0x0 = 0xa03,0xffff
0a04 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a05 BODY_0a00:
0a05 e01b | | Load 0x0,0x1b ; Debug Table 0x1c.0x1 = 0xa05,0x1
0a06 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a07 e001 | | Load 0x0,0x1
0a08 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a09 e7fe | | Load 0x3,-0x2
0a0a e7ff | | Load 0x3,-0x1
0a0b e001 | | Load 0x0,0x1
0a0c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0a0d c7fe | | Store 0x3,-0x2
0a0e c7fd | | Store 0x3,-0x3
0a0f 0059 | Y | Store_Top Discrete,At_Offset_1
0a10 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x2 = 0xa10,0x2
0a11 e5fe | | Load 0x2,-0x2
0a12 0092 0c71 | q| Action Push_String_Extended,0xc71 ; "while reading instruction to patch segment"
0a14 e5ff | | Load 0x2,-0x1
0a15 821d | | Call 0x1,0x1d
0a16 4502 |E | Exit_Subprogram 0x2
0a17 0000 | | .XXX[0x1]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a25 | % | .CONST 0x0a25 ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0002 | | .CONST 0x0002 ; Number of locals
0a1b INIT_0a18:
0a1b e5ff | | Load 0x2,-0x1 ; Debug Table 0x1d = .DEBUG 0x0a1b,0x1308,0x0002,0x0000,0x005a,0x9095,0x0000,0x095b
; Debug Table 0x1d.0x0 = 0xa1b,0xffff
0a1c 4805 |H | Short_Literal 0x5
0a1d 4802 |H | Short_Literal 0x2
0a1e 0099 | | Action Reference_Dynamic
0a1f 4806 |H | Short_Literal 0x6
0a20 4802 |H | Short_Literal 0x2
0a21 0099 | | Action Reference_Dynamic
0a22 8214 | | Call 0x1,0x14
0a23 e021 | ! | Load 0x0,0x21
0a24 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a25 BODY_0a18:
0a25 0092 0c72 | r| Action Push_String_Extended,0xc72 ; "16#"
; Debug Table 0x1d.0x1 = 0xa25,0x1
0a27 00d9 | | Load_Top At_Offset_1
0a28 01cc | | Execute Vector,Catenate
0a29 0092 0c73 | s| Action Push_String_Extended,0xc73 ; "#"
0a2b 01cc | | Execute Vector,Catenate
0a2c 00e2 | | Load_Encached Integer_Cache
0a2d 00e0 | | Load_Encached Standard_Cache
0a2e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a2f 00ca | | Action Exit_Nullary_Function
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a52 | R | .CONST 0x0a52 ; Address of begin
0a31 0004 | | .CONST 0x0004 ; Address of exception handler
0a32 0007 | | .CONST 0x0007 ; Number of locals
0a33 INIT_0a30:
0a33 e01b | | Load 0x0,0x1b ; Debug Table 0x1e = .DEBUG 0x0a33,0x130e,0x0001,0x0000,0x005a,0x9095,0x0000,0x0980
; Debug Table 0x1e.0x0 = 0xa33,0xffff
0a34 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a35 e022 | " | Load 0x0,0x22 ; Debug Table 0x1e.0x1 = 0xa35,0xfffe
0a36 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a37 02c7 | | Declare_Variable Any
0a38 00d8 | | Load_Top At_Offset_0
0a39 1c00 | | Execute_Immediate Run_Utility,0x0
0a3a e022 | " | Load 0x0,0x22 ; Debug Table 0x1e.0x2 = 0xa3a,0xfffd
0a3b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a3c 02ff | | Declare_Variable Variant_Record
0a3d 00d8 | | Load_Top At_Offset_0
0a3e 1c00 | | Execute_Immediate Run_Utility,0x0
0a3f e022 | " | Load 0x0,0x22 ; Debug Table 0x1e.0x3 = 0xa3f,0xfffc
0a40 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a41 02ff | | Declare_Variable Variant_Record
0a42 00d8 | | Load_Top At_Offset_0
0a43 1c00 | | Execute_Immediate Run_Utility,0x0
0a44 e022 | " | Load 0x0,0x22 ; Debug Table 0x1e.0x4 = 0xa44,0xfffb
0a45 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a46 02c7 | | Declare_Variable Any
0a47 e022 | " | Load 0x0,0x22
0a48 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a49 c606 | | Store 0x3,0x6
0a4a e5ff | | Load 0x2,-0x1 ; Debug Table 0x1e.0x5 = 0xa4a,0xfffa
0a4b 4805 |H | Short_Literal 0x5
0a4c 4802 |H | Short_Literal 0x2
0a4d 0099 | | Action Reference_Dynamic
0a4e 4806 |H | Short_Literal 0x6
0a4f 4802 |H | Short_Literal 0x2
0a50 0099 | | Action Reference_Dynamic
0a51 8214 | | Call 0x1,0x14
0a52 BODY_0a30:
0a52 00be | | Action Activate_Tasks
0a53 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e.0x6 = 0xa53,0x1
0a54 4800 |H | Short_Literal 0x0
0a55 e7ff | | Load 0x3,-0x1
0a56 e01d | | Load 0x0,0x1d
0a57 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a58 00d1 | | Pop_Control Pop_Count_1
0a59 e01b | | Load 0x0,0x1b ; Debug Table 0x1e.0x7 = 0xa59,0x2
0a5a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a5b e604 | | Load 0x3,0x4
0a5c e5fa | | Load 0x2,-0x6
0a5d 4800 |H | Short_Literal 0x0
0a5e 4800 |H | Short_Literal 0x0
0a5f e022 | " | Load 0x0,0x22
0a60 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a61 4800 |H | Short_Literal 0x0
0a62 4800 |H | Short_Literal 0x0
0a63 e01d | | Load 0x0,0x1d
0a64 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a65 4800 |H | Short_Literal 0x0
0a66 e5fb | | Load 0x2,-0x5
0a67 e022 | " | Load 0x0,0x22
0a68 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0a69 00d1 | | Pop_Control Pop_Count_1
0a6a c602 | | Store 0x3,0x2
0a6b e602 | | Load 0x3,0x2 ; Debug Table 0x1e.0x8 = 0xa6b,0x3
0a6c e5fe | | Load 0x2,-0x2
0a6d 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "creating version for target code segment"
0a6f e5ff | | Load 0x2,-0x1
0a70 821d | | Call 0x1,0x1d
0a71 e01b | | Load 0x0,0x1b ; Debug Table 0x1e.0x9 = 0xa71,0x4
0a72 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a73 e5fa | | Load 0x2,-0x6
0a74 4800 |H | Short_Literal 0x0
0a75 e023 | # | Load 0x0,0x23
0a76 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0a77 e604 | | Load 0x3,0x4
0a78 e022 | " | Load 0x0,0x22
0a79 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0a7a c602 | | Store 0x3,0x2
0a7b e602 | | Load 0x3,0x2 ; Debug Table 0x1e.0xa = 0xa7b,0x5
0a7c e5fe | | Load 0x2,-0x2
0a7d 0092 0c75 | u| Action Push_String_Extended,0xc75 ; "setting acl for target code segment"
0a7f e5ff | | Load 0x2,-0x1
0a80 821d | | Call 0x1,0x1d
0a81 e01b | | Load 0x0,0x1b ; Debug Table 0x1e.0xb = 0xa81,0x6
0a82 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a83 e603 | | Load 0x3,0x3
0a84 0120 | | Execute Any,Is_Value
0a85 6803 |h | Jump_Zero 0xa89
0a86 e022 | " | Load 0x0,0x22
0a87 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a88 7801 |x | Jump 0xa8a
0a89 e603 | | Load 0x3,0x3
0a8a e5fa | | Load 0x2,-0x6
0a8b 4800 |H | Short_Literal 0x0
0a8c 4802 |H | Short_Literal 0x2
0a8d e604 | | Load 0x3,0x4
0a8e e022 | " | Load 0x0,0x22
0a8f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0a90 c603 | | Store 0x3,0x3
0a91 c602 | | Store 0x3,0x2
0a92 e602 | | Load 0x3,0x2 ; Debug Table 0x1e.0xc = 0xa92,0x7
0a93 e5fe | | Load 0x2,-0x2
0a94 0092 0c76 | v| Action Push_String_Extended,0xc76 ; "opening version of target code segment"
0a96 e5ff | | Load 0x2,-0x1
0a97 821d | | Call 0x1,0x1d
0a98 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1e.0xd = 0xa98,0x8
0a99 00d9 | | Load_Top At_Offset_1
0a9a e603 | | Load 0x3,0x3
0a9b e022 | " | Load 0x0,0x22
0a9c 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
0a9d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a9e c606 | | Store 0x3,0x6
0a9f e01b | | Load 0x0,0x1b ; Debug Table 0x1e.0xe = 0xa9f,0x9
0aa0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aa1 e603 | | Load 0x3,0x3
0aa2 4800 |H | Short_Literal 0x0
0aa3 e022 | " | Load 0x0,0x22
0aa4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0aa5 c603 | | Store 0x3,0x3
0aa6 c602 | | Store 0x3,0x2
0aa7 e602 | | Load 0x3,0x2 ; Debug Table 0x1e.0xf = 0xaa7,0xa
0aa8 e5fe | | Load 0x2,-0x2
0aa9 0092 0c77 | w| Action Push_String_Extended,0xc77 ; "closing version of target code segment"
0aab e5ff | | Load 0x2,-0x1
0aac 821d | | Call 0x1,0x1d
0aad 4800 |H | Short_Literal 0x0 ; Debug Table 0x1e.0x10 = 0xaad,0xb
0aae e604 | | Load 0x3,0x4
0aaf e605 | | Load 0x3,0x5
0ab0 e5f9 | | Load 0x2,-0x7
0ab1 e018 | | Load 0x0,0x18
0ab2 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0ab3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ab4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ab5 4502 |E | Exit_Subprogram 0x2
0ab6 0000 0000 | | .XXX[0x2]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0ad6 | | .CONST 0x0ad6 ; Address of begin
0ab9 0004 | | .CONST 0x0004 ; Address of exception handler
0aba 0009 | | .CONST 0x0009 ; Number of locals
0abb INIT_0ab8:
0abb 8409 | | Call 0x2,0x9 ; Debug Table 0x1f = .DEBUG 0x0abb,0x1332,0x0001,0x0000,0x005a,0x9095,0x0000,0x0a2f
; Debug Table 0x1f.0x0 = 0xabb,0xffff
0abc 00e2 | | Load_Encached Integer_Cache
0abd 03f1 | | Declare_Variable Discrete,With_Value
0abe 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1f.0x1 = 0xabe,0xfffe
0abf e014 | | Load 0x0,0x14
0ac0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0ac1 025b | [ | Execute Discrete,Check_In_Type
0ac2 e014 | | Load 0x0,0x14
0ac3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0ac4 03f1 | | Declare_Variable Discrete,With_Value
0ac5 e014 | | Load 0x0,0x14 ; Debug Table 0x1f.0x2 = 0xac5,0xfffd
0ac6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0ac7 e001 | | Load 0x0,0x1 ; Debug Table 0x1f.0x3 = 0xac7,0xfffc
0ac8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ac9 02ff | | Declare_Variable Variant_Record
0aca 00d8 | | Load_Top At_Offset_0
0acb 1c00 | | Execute_Immediate Run_Utility,0x0
0acc e001 | | Load 0x0,0x1 ; Debug Table 0x1f.0x4 = 0xacc,0xfffb
0acd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ace 02ff | | Declare_Variable Variant_Record
0acf 00d8 | | Load_Top At_Offset_0
0ad0 1c00 | | Execute_Immediate Run_Utility,0x0
0ad1 e01b | | Load 0x0,0x1b ; Debug Table 0x1f.0x5 = 0xad1,0xfffa
0ad2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ad3 e211 | | Load 0x1,0x11 ; Debug Table 0x1f.0x6 = 0xad3,0xfff9
0ad4 029f 0c0b | | Declare_Subprogram For_Call,INIT_0c08
0ad6 BODY_0ab8:
0ad6 e605 | | Load 0x3,0x5 ; Debug Table 0x1f.0x7 = 0xad6,0x1
0ad7 4800 |H | Short_Literal 0x0
0ad8 e7ff | | Load 0x3,-0x1
0ad9 e01d | | Load 0x0,0x1d
0ada 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0adb 00d1 | | Pop_Control Pop_Count_1
0adc e211 | | Load 0x1,0x11 ; Debug Table 0x1f.0x8 = 0xadc,0x2
0add e5ff | | Load 0x2,-0x1
0ade 0217 | | Execute Heap_Access,All_Reference
0adf 2c09 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
0ae0 039c | | Declare_Variable Heap_Access,By_Allocation
0ae1 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0ae2 0007 | | Action Break_Optional ; Debug Table 0x1f.0x9 = 0xae2,0x3
0ae3 e404 | | Load 0x2,0x4 ; Debug Table 0x1f.0xa = 0xae3,0x4
0ae4 00da | | Load_Top At_Offset_2
0ae5 0217 | | Execute Heap_Access,All_Reference
0ae6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0ae7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1f.0xb = 0xae7,0x5
0ae8 a404 | | Store_Unchecked 0x2,0x4
0ae9 e01b | | Load 0x0,0x1b ; Debug Table 0x1f.0xc = 0xae9,0x6
0aea 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0aeb e606 | | Load 0x3,0x6
0aec e5fa | | Load 0x2,-0x6
0aed 4800 |H | Short_Literal 0x0
0aee 4800 |H | Short_Literal 0x0
0aef 4800 |H | Short_Literal 0x0
0af0 e01d | | Load 0x0,0x1d
0af1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0af2 4800 |H | Short_Literal 0x0
0af3 e5fb | | Load 0x2,-0x5
0af4 e001 | | Load 0x0,0x1
0af5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0af6 00d1 | | Pop_Control Pop_Count_1
0af7 005b | [ | Store_Top Discrete,At_Offset_3
0af8 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f.0xd = 0xaf8,0x7
0af9 e5fe | | Load 0x2,-0x2
0afa 0092 0c78 | x| Action Push_String_Extended,0xc78 ; "creating new code segment"
0afc e5ff | | Load 0x2,-0x1
0afd 821d | | Call 0x1,0x1d
0afe e404 | | Load 0x2,0x4 ; Debug Table 0x1f.0xe = 0xafe,0x8
0aff 0219 | | Execute Heap_Access,All_Read
0b00 e01b | | Load 0x0,0x1b
0b01 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b02 00d9 | | Load_Top At_Offset_1
0b03 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b04 0120 | | Execute Any,Is_Value
0b05 6803 |h | Jump_Zero 0xb09
0b06 e001 | | Load 0x0,0x1
0b07 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0b08 7802 |x | Jump 0xb0b
0b09 00d9 | | Load_Top At_Offset_1
0b0a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b0b e5fa | | Load 0x2,-0x6
0b0c 4800 |H | Short_Literal 0x0
0b0d e001 | | Load 0x0,0x1
0b0e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b0f e01d | | Load 0x0,0x1d
0b10 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b11 4802 |H | Short_Literal 0x2
0b12 e606 | | Load 0x3,0x6
0b13 e001 | | Load 0x0,0x1
0b14 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0b15 00da | | Load_Top At_Offset_2
0b16 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b17 c607 | | Store 0x3,0x7
0b18 00d1 | | Pop_Control Pop_Count_1
0b19 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f.0xf = 0xb19,0x9
0b1a e5fe | | Load 0x2,-0x2
0b1b 0092 0c79 | y| Action Push_String_Extended,0xc79 ; "opening new code segment"
0b1d e5ff | | Load 0x2,-0x1
0b1e 821d | | Call 0x1,0x1d
0b1f e404 | | Load 0x2,0x4 ; Debug Table 0x1f.0x10 = 0xb1f,0xa
0b20 0217 | | Execute Heap_Access,All_Reference
0b21 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b22 e001 | | Load 0x0,0x1
0b23 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0b24 a604 | | Store_Unchecked 0x3,0x4
0b25 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1f.0x11 = 0xb25,0xb
0b26 0217 | | Execute Heap_Access,All_Reference
0b27 2c10 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x10
0b28 6828 |h( | Jump_Zero 0xb51
0b29 0092 0c7a | z| Action Push_String_Extended,0xc7a ; "creating new cs"
; Debug Table 0x1f.0x12 = 0xb29,0xc
0b2b e606 | | Load 0x3,0x6
0b2c e01d | | Load 0x0,0x1d
0b2d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b2e 00e0 | | Load_Encached Standard_Cache
0b2f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b30 01cc | | Execute Vector,Catenate
0b31 0092 0c7b | {| Action Push_String_Extended,0xc7b ; ", old ="
0b33 01cc | | Execute Vector,Catenate
0b34 e7ff | | Load 0x3,-0x1
0b35 00e0 | | Load_Encached Standard_Cache
0b36 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b37 01cc | | Execute Vector,Catenate
0b38 0092 0c7c | || Action Push_String_Extended,0xc7c ; "; name = 16#"
0b3a 01cc | | Execute Vector,Catenate
0b3b 4820 |H | Short_Literal 0x20
0b3c 4800 |H | Short_Literal 0x0
0b3d 4810 |H | Short_Literal 0x10
0b3e e604 | | Load 0x3,0x4
0b3f e024 | $ | Load 0x0,0x24
0b40 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0b41 01cc | | Execute Vector,Catenate
0b42 0092 0c7d | }| Action Push_String_Extended,0xc7d ; "#, old = 16#"
0b44 01cc | | Execute Vector,Catenate
0b45 4820 |H | Short_Literal 0x20
0b46 4800 |H | Short_Literal 0x0
0b47 4810 |H | Short_Literal 0x10
0b48 e603 | | Load 0x3,0x3
0b49 e024 | $ | Load 0x0,0x24
0b4a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0b4b 01cc | | Execute Vector,Catenate
0b4c 0092 0c73 | s| Action Push_String_Extended,0xc73 ; "#"
0b4e 01cc | | Execute Vector,Catenate
0b4f e5ff | | Load 0x2,-0x1
0b50 8025 | % | Call 0x0,0x25
0b51 8609 | | Call 0x3,0x9 ; Debug Table 0x1f.0x13 = 0xb51,0xd
0b52 4800 |H | Short_Literal 0x0 ; Debug Table 0x1f.0x14 = 0xb52,0xe
0b53 e606 | | Load 0x3,0x6
0b54 e605 | | Load 0x3,0x5
0b55 e5f9 | | Load 0x2,-0x7
0b56 e018 | | Load 0x0,0x18
0b57 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0b58 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b59 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b5a 4800 |H | Short_Literal 0x0 ; Debug Table 0x1f.0x15 = 0xb5a,0xf
0b5b e604 | | Load 0x3,0x4
0b5c e603 | | Load 0x3,0x3
0b5d e5f8 | | Load 0x2,-0x8
0b5e e018 | | Load 0x0,0x18
0b5f 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0b60 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b61 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b62 4502 |E | Exit_Subprogram 0x2
0b63 0000 | | .XXX[0x1]
0b64 0000 0000 | | .LITERAL {0x00000000, 0x00000f9f}
0b68 ; --------------------------------------------------------------------------------------
0b68 ; SUBPROGRAM
0b68 ; --------------------------------------------------------------------------------------
0b68 0b6d | m | .CONST 0x0b6d ; Address of begin
0b69 0004 | | .CONST 0x0004 ; Address of exception handler
0b6a 0002 | | .CONST 0x0002 ; Number of locals
0b6b INIT_0b68:
0b6b e01b | | Load 0x0,0x1b ; Debug Table 0x20 = .DEBUG 0x0b6b,0x1360,0x0001,0x0000,0x005a,0x9095,0x0000,0x0b7d
; Debug Table 0x20.0x0 = 0xb6b,0xffff
0b6c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b6d BODY_0b68:
0b6d 00cf | | Action Mark_Auxiliary
0b6e 7822 |x" | Jump 0xb91
0b6f e404 | | Load 0x2,0x4 ; Debug Table 0x20.0x1 = 0xb6f,0x2
0b70 0219 | | Execute Heap_Access,All_Read
0b71 00d8 | | Load_Top At_Offset_0
0b72 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b73 e5f8 | | Load 0x2,-0x8
0b74 e5fe | | Load 0x2,-0x2
0b75 e5ff | | Load 0x2,-0x1
0b76 821e | | Call 0x1,0x1e
0b77 00d9 | | Load_Top At_Offset_1
0b78 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b79 00d1 | | Pop_Control Pop_Count_1
0b7a e404 | | Load 0x2,0x4 ; Debug Table 0x20.0x2 = 0xb7a,0x3
0b7b 0219 | | Execute Heap_Access,All_Read
0b7c e01b | | Load 0x0,0x1b
0b7d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b7e 00d9 | | Load_Top At_Offset_1
0b7f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b80 e001 | | Load 0x0,0x1
0b81 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0b82 00da | | Load_Top At_Offset_2
0b83 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b84 005b | [ | Store_Top Discrete,At_Offset_3
0b85 00d1 | | Pop_Control Pop_Count_1
0b86 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x20.0x3 = 0xb86,0x4
0b87 e5fe | | Load 0x2,-0x2
0b88 0092 0c7e | ~| Action Push_String_Extended,0xc7e ; "closing new code segment"
0b8a e5ff | | Load 0x2,-0x1
0b8b 821d | | Call 0x1,0x1d
0b8c e404 | | Load 0x2,0x4 ; Debug Table 0x20.0x4 = 0xb8c,0x5
0b8d 0217 | | Execute Heap_Access,All_Reference
0b8e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b8f a404 | | Store_Unchecked 0x2,0x4
0b90 00c9 | | Action Pop_Auxiliary_Loop
0b91 e404 | | Load 0x2,0x4 ; Debug Table 0x20.0x5 = 0xb91,0x1
0b92 77dc |w | Jump_Nonzero 0xb6f
0b93 4501 |E | Exit_Subprogram 0x1
0b94 0000 0000 | | .BLANK 0000[0x4]
0b98 ; --------------------------------------------------------------------------------------
0b98 ; SUBPROGRAM
0b98 ; --------------------------------------------------------------------------------------
0b98 0b9b | | .CONST 0x0b9b ; Address of begin
0b99 0004 | | .CONST 0x0004 ; Address of exception handler
0b9a 0001 | | .CONST 0x0001 ; Number of locals
0b9b BODY_0b98:
0b9b INIT_0b98:
0b9b e5fc | | Load 0x2,-0x4 ; Debug Table 0x21 = .DEBUG 0x0b9b,0x136e,0x0002,0x0000,0x005a,0x9095,0x0000,0x0cb3
; Debug Table 0x21.0x0 = 0xb9b,0x1
0b9c 00db | | Load_Top At_Offset_3
0b9d 8026 | & | Call 0x0,0x26
0b9e 4401 |D | Exit_Subprogram With_Result,0x1
0b9f 0000 | | .XXX[0x1]
0ba0 ; --------------------------------------------------------------------------------------
0ba0 ; SUBPROGRAM
0ba0 ; --------------------------------------------------------------------------------------
0ba0 0bab | | .CONST 0x0bab ; Address of begin
0ba1 0004 | | .CONST 0x0004 ; Address of exception handler
0ba2 0002 | | .CONST 0x0002 ; Number of locals
0ba3 INIT_0ba0:
0ba3 e5fc | | Load 0x2,-0x4 ; Debug Table 0x22 = .DEBUG 0x0ba3,0x1372,0x0004,0x0000,0x005a,0x9095,0x0000,0x1073
; Debug Table 0x22.0x0 = 0xba3,0xffff
0ba4 4809 |H | Short_Literal 0x9
0ba5 4802 |H | Short_Literal 0x2
0ba6 0099 | | Action Reference_Dynamic
0ba7 480a |H | Short_Literal 0xa
0ba8 4802 |H | Short_Literal 0x2
0ba9 0099 | | Action Reference_Dynamic
0baa 8214 | | Call 0x1,0x14
0bab BODY_0ba0:
0bab 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x22.0x1 = 0xbab,0x1
0bac e408 | | Load 0x2,0x8
0bad e404 | | Load 0x2,0x4
0bae e403 | | Load 0x2,0x3
0baf e407 | | Load 0x2,0x7
0bb0 e407 | | Load 0x2,0x7
0bb1 e5fe | | Load 0x2,-0x2
0bb2 821c | | Call 0x1,0x1c
0bb3 4801 |H | Short_Literal 0x1
0bb4 e5fd | | Load 0x2,-0x3
0bb5 e5ff | | Load 0x2,-0x1
0bb6 e5fc | | Load 0x2,-0x4
0bb7 821f | | Call 0x1,0x1f
0bb8 c403 | | Store 0x2,0x3
0bb9 c404 | | Store 0x2,0x4
0bba c408 | | Store 0x2,0x8
0bbb c402 | | Store 0x2,0x2
0bbc e402 | | Load 0x2,0x2 ; Debug Table 0x22.0x2 = 0xbbc,0x2
0bbd 700d |p | Jump_Nonzero 0xbcb
0bbe 4800 |H | Short_Literal 0x0 ; Debug Table 0x22.0x3 = 0xbbe,0x3
0bbf a5fb | | Store_Unchecked 0x2,-0x5
0bc0 e407 | | Load 0x2,0x7 ; Debug Table 0x22.0x4 = 0xbc0,0x4
0bc1 4801 |H | Short_Literal 0x1
0bc2 4800 |H | Short_Literal 0x0
0bc3 e5fc | | Load 0x2,-0x4
0bc4 0217 | | Execute Heap_Access,All_Reference
0bc5 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0bc6 e00e | | Load 0x0,0xe
0bc7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bc8 c407 | | Store 0x2,0x7
0bc9 00cc | | Action Pop_Block ; Debug Table 0x22.0x5 = 0xbc9,0x5
0bca 4505 |E | Exit_Subprogram 0x5
0bcb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x22.0x6 = 0xbcb,0x6
0bcc e5fc | | Load 0x2,-0x4
0bcd e407 | | Load 0x2,0x7
0bce e5fe | | Load 0x2,-0x2
0bcf 821a | | Call 0x1,0x1a
0bd0 c402 | | Store 0x2,0x2
0bd1 e402 | | Load 0x2,0x2 ; Debug Table 0x22.0x7 = 0xbd1,0x7
0bd2 700d |p | Jump_Nonzero 0xbe0
0bd3 4800 |H | Short_Literal 0x0 ; Debug Table 0x22.0x8 = 0xbd3,0x8
0bd4 a5fb | | Store_Unchecked 0x2,-0x5
0bd5 e407 | | Load 0x2,0x7 ; Debug Table 0x22.0x9 = 0xbd5,0x9
0bd6 4801 |H | Short_Literal 0x1
0bd7 4800 |H | Short_Literal 0x0
0bd8 e5fc | | Load 0x2,-0x4
0bd9 0217 | | Execute Heap_Access,All_Reference
0bda 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0bdb e00e | | Load 0x0,0xe
0bdc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bdd c407 | | Store 0x2,0x7
0bde 00cc | | Action Pop_Block ; Debug Table 0x22.0xa = 0xbde,0xa
0bdf 4505 |E | Exit_Subprogram 0x5
0be0 e405 | | Load 0x2,0x5 ; Debug Table 0x22.0xb = 0xbe0,0xb
0be1 00e1 | | Load_Encached Boolean_Cache
0be2 e407 | | Load 0x2,0x7
0be3 e404 | | Load 0x2,0x4
0be4 e403 | | Load 0x2,0x3
0be5 e602 | | Load 0x3,0x2
0be6 e5fe | | Load 0x2,-0x2
0be7 e018 | | Load 0x0,0x18
0be8 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0be9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0bea c402 | | Store 0x2,0x2
0beb c405 | | Store 0x2,0x5
0bec e402 | | Load 0x2,0x2 ; Debug Table 0x22.0xc = 0xbec,0xc
0bed 7015 |p | Jump_Nonzero 0xc03
0bee 4800 |H | Short_Literal 0x0 ; Debug Table 0x22.0xd = 0xbee,0xd
0bef a5fb | | Store_Unchecked 0x2,-0x5
0bf0 e407 | | Load 0x2,0x7 ; Debug Table 0x22.0xe = 0xbf0,0xe
0bf1 4801 |H | Short_Literal 0x1
0bf2 4800 |H | Short_Literal 0x0
0bf3 e5fc | | Load 0x2,-0x4
0bf4 0217 | | Execute Heap_Access,All_Reference
0bf5 2c0e |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xe
0bf6 e00e | | Load 0x0,0xe
0bf7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bf8 c407 | | Store 0x2,0x7
0bf9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x22.0xf = 0xbf9,0xf
0bfa 0219 | | Execute Heap_Access,All_Read
0bfb 2c32 |,2 | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x32
0bfc 00d8 | | Load_Top At_Offset_0
0bfd e405 | | Load 0x2,0x5
0bfe e009 | | Load 0x0,0x9
0bff 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0c00 00d2 | | Pop_Control Pop_Count_2
0c01 00cc | | Action Pop_Block ; Debug Table 0x22.0x10 = 0xc01,0x10
0c02 4505 |E | Exit_Subprogram 0x5
0c03 4501 |E | Exit_Subprogram 0x1
0c04 0000 0000 | | .BLANK 0000[0x4]
0c08 ; --------------------------------------------------------------------------------------
0c08 ; SUBPROGRAM
0c08 ; --------------------------------------------------------------------------------------
0c08 0c2c | , | .CONST 0x0c2c ; Address of begin
0c09 0004 | | .CONST 0x0004 ; Address of exception handler
0c0a 0009 | | .CONST 0x0009 ; Number of locals
0c0b INIT_0c08:
0c0b e5ff | | Load 0x2,-0x1 ; Debug Table 0x23 = .DEBUG 0x0c0b,0x1396,0x0004,0x0000,0x005a,0x9095,0x0000,0x0b56
; Debug Table 0x23.0x0 = 0xc0b,0xffff
0c0c 4805 |H | Short_Literal 0x5
0c0d 4802 |H | Short_Literal 0x2
0c0e 0099 | | Action Reference_Dynamic
0c0f 4806 |H | Short_Literal 0x6
0c10 4802 |H | Short_Literal 0x2
0c11 0099 | | Action Reference_Dynamic
0c12 8214 | | Call 0x1,0x14
0c13 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x1 = 0xc13,0xfffe
0c14 01db | | Execute Vector,Length
0c15 4801 |H | Short_Literal 0x1
0c16 0279 | y | Execute Discrete,And
0c17 6802 |h | Jump_Zero 0xc1a
0c18 4887 |H | Short_Literal 0x87
0c19 0257 | W | Execute Discrete,Raise
0c1a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x2 = 0xc1a,0xfffd
0c1b 01da | | Execute Vector,Bounds
0c1c e014 | | Load 0x0,0x14
0c1d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0c1e 035b | [ | Declare_Type Array,Constrained
0c1f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x3 = 0xc1f,0xfffc
0c20 02a0 | | Declare_Subprogram Null_Subprogram
0c21 03ad | | Declare_Type Heap_Access,Defined
0c22 0007 | | Action Break_Optional ; Debug Table 0x23.0x4 = 0xc22,0xfffb
0c23 e001 | | Load 0x0,0x1 ; Debug Table 0x23.0x5 = 0xc23,0xfffa
0c24 192f | / | Execute Package,Field_Reference,Field_Number 0x2f
0c25 00c6 | | Action Check_Subprogram_Elaborated
0c26 00d9 | | Load_Top At_Offset_1
0c27 00d9 | | Load_Top At_Offset_1
0c28 6023 |`# | Indirect_Literal Discrete,0xc4c,{0x00000000, 0x005a9095}
0c29 601e |` | Indirect_Literal Discrete,0xc48,{0x00000000, 0x00000b39}
0c2a 4809 |H | Short_Literal 0x9
0c2b 0007 | | Action Break_Optional
0c2c BODY_0c08:
0c2c e404 | | Load 0x2,0x4 ; Debug Table 0x23.0x6 = 0xc2c,0x1
0c2d 0219 | | Execute Heap_Access,All_Read
0c2e e01b | | Load 0x0,0x1b
0c2f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c30 00d9 | | Load_Top At_Offset_1
0c31 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c32 e802 | | Load 0x4,0x2
0c33 e803 | | Load 0x4,0x3
0c34 01c3 | | Execute Vector,Check_In_Type
0c35 e805 | | Load 0x4,0x5
0c36 e806 | | Load 0x4,0x6
0c37 4807 |H | Short_Literal 0x7
0c38 4804 |H | Short_Literal 0x4
0c39 0099 | | Action Reference_Dynamic
0c3a e001 | | Load 0x0,0x1
0c3b 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0c3c 00da | | Load_Top At_Offset_2
0c3d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0c3e c607 | | Store 0x3,0x7
0c3f 00d1 | | Pop_Control Pop_Count_1
0c40 e607 | | Load 0x3,0x7 ; Debug Table 0x23.0x7 = 0xc40,0x2
0c41 e5fe | | Load 0x2,-0x2
0c42 0092 0c7f | | Action Push_String_Extended,0xc7f ; "writing into new code segment"
0c44 e5ff | | Load 0x2,-0x1
0c45 821d | | Call 0x1,0x1d
0c46 4501 |E | Exit_Subprogram 0x1
0c47 0000 | | .XXX[0x1]
0c48 0000 0000 | | .LITERAL {0x00000000, 0x00000b39}
0c4c 0000 0000 | | .LITERAL {0x00000000, 0x005a9095}
0c50 ; --------------------------------------------------------------------------------------
0c50 ; STRING TABLE
0c50 ; --------------------------------------------------------------------------------------
0c50 0062 | b | .STRTAB 0x0062->0x0c81 ; "Can't restore code for "
0c51 0077 | w | .STRTAB 0x0077->0x0c8c ; "Error while restoring code "
0c52 0090 | | .STRTAB 0x0090->0x0c9a ; "Exception "
; "Exception "
; "Exception "
; "Exception "
0c53 0098 | | .STRTAB 0x0098->0x0c9f ; " while restoring code to "
0c54 00af | | .STRTAB 0x00af->0x0cab ; "$"
; "$"
0c55 00ae | | .STRTAB 0x00ae->0x0cac ; "Can't get enclosing world for "
; "Can't get enclosing world for "
0c56 00ca | | .STRTAB 0x00ca->0x0cbb ; " while restoring program_library "
0c57 00e9 | | .STRTAB 0x00e9->0x0ccb ; " "
0c58 00e8 | | .STRTAB 0x00e8->0x0ccc ; " could not be restored"
0c59 00fc | | .STRTAB 0x00fc->0x0cd7 ; " while restoring code for load_proc "
0c5a 011e | | .STRTAB 0x011e->0x0ce9 ; " is of the wrong class for code to be restored to it"
0c5b 0150 | P | .STRTAB 0x0150->0x0d03 ; "Error while converting code of "
0c5c 016d | m | .STRTAB 0x016d->0x0d12 ; " from pre-delta2 format"
0c5d 0182 | | .STRTAB 0x0182->0x0d1e ; " as a program library"
0c5e 0195 | | .STRTAB 0x0195->0x0d28 ; " while converting code for "
0c5f 01ae | | .STRTAB 0x01ae->0x0d36 ; " includes "
0c60 01b6 | | .STRTAB 0x01b6->0x0d3b ; " in its closure and must be demoted before"
0c61 01de | | .STRTAB 0x01de->0x0d50 ; " code is restored to the latter"
0c62 01fb | | .STRTAB 0x01fb->0x0d5f ; "Can't get the unit_state of "
0c63 0215 | | .STRTAB 0x0215->0x0d6d ; " ("
; " ("
; " ("
0c64 0215 | | .STRTAB 0x0215->0x0d6e ; ")"
; ")"
; ")"
; ")"
; ")"
0c65 0214 | | .STRTAB 0x0214->0x0d6f ; "Can't get declaration for "
0c66 022c | , | .STRTAB 0x022c->0x0d7c ; "Can't promote loaded_main spec "
0c67 0249 | I | .STRTAB 0x0249->0x0d8b ; " to installed ("
0c68 0256 | V | .STRTAB 0x0256->0x0d93 ; "Can't find load_proc spec "
0c69 026e | n | .STRTAB 0x026e->0x0da0 ; "While restoring code for "
0c6a 0285 | | .STRTAB 0x0285->0x0dac ; ", bad status "
0c6b 0290 | | .STRTAB 0x0290->0x0db3 ; ": "
0c6c 0290 | | .STRTAB 0x0290->0x0db4 ; " code segments read for "
0c6d 02a6 | | .STRTAB 0x02a6->0x0dc0 ; "Can't find program_library header after create"
0c6e 02d2 | | .STRTAB 0x02d2->0x0dd7 ; "Can't set the unit_state of "
0c6f 02ec | | .STRTAB 0x02ec->0x0de5 ; " to coded ("
0c70 02f5 | | .STRTAB 0x02f5->0x0dea ; "while patching instruction"
0c71 030d | | .STRTAB 0x030d->0x0df7 ; "while reading instruction to patch segment"
0c72 0335 | 5 | .STRTAB 0x0335->0x0e0c ; "16#"
0c73 0336 | 6 | .STRTAB 0x0336->0x0e0e ; "#"
; "#"
0c74 0335 | 5 | .STRTAB 0x0335->0x0e0e ; "creating version for target code segment"
0c75 035b | [ | .STRTAB 0x035b->0x0e22 ; "setting acl for target code segment"
0c76 037c | | | .STRTAB 0x037c->0x0e34 ; "opening version of target code segment"
0c77 03a0 | | .STRTAB 0x03a0->0x0e47 ; "closing version of target code segment"
0c78 03c4 | | .STRTAB 0x03c4->0x0e5a ; "creating new code segment"
0c79 03db | | .STRTAB 0x03db->0x0e66 ; "opening new code segment"
0c7a 03f1 | | .STRTAB 0x03f1->0x0e72 ; "creating new cs"
0c7b 03fe | | .STRTAB 0x03fe->0x0e7a ; ", old ="
0c7c 0403 | | .STRTAB 0x0403->0x0e7d ; "; name = 16#"
0c7d 040d | | .STRTAB 0x040d->0x0e83 ; "#, old = 16#"
0c7e 0417 | | .STRTAB 0x0417->0x0e89 ; "closing new code segment"
0c7f 042d | - | .STRTAB 0x042d->0x0e95 ; "writing into new code segment"
0c80 0448 | H | .STREND 0x0448->0x0ea4
0c81 4361 6e27 |Can'| .STRTAB_STRINGS
0ea4 0000 0000 | | .BLANK 0000[0x4]
0ea8 ; --------------------------------------------------------------------------------------
0ea8 ; Debug Table
0ea8 ; --------------------------------------------------------------------------------------
0ea8 0003 0024 | $| .CONST 0x0003,0x0024
0eaa 000b 0fca | | .DEBUG 0x000b,0x0fca,0x0000,0x0000,0x005a,0x9085,0x0000,0x0512
0eb2 0012 0fd2 | | .DEBUG 0x0012,0x0fd2,0x0000,0x0000,0x005a,0x9095,0x0000,0x0026
0eba 0053 100e | S | .DEBUG 0x0053,0x100e,0x0001,0x0000,0x005a,0x9085,0x0000,0x0513
0ec2 016b 106c | k l| .DEBUG 0x016b,0x106c,0x0001,0x0000,0x005a,0x9085,0x0000,0x0523
0eca 01e3 1092 | | .DEBUG 0x01e3,0x1092,0x0001,0x0000,0x005a,0x9085,0x0000,0x0533
0ed2 0263 10b6 | c | .DEBUG 0x0263,0x10b6,0x0005,0x0000,0x005a,0x9095,0x0000,0x0043
0eda 027b 10b8 | { | .DEBUG 0x027b,0x10b8,0x0001,0x0000,0x005a,0x9095,0x0000,0x0053
0ee2 02db 10d8 | | .DEBUG 0x02db,0x10d8,0x2802,0x0002,0x005a,0x9095,0x0000,0x00cf
0eea 0313 10e2 | | .DEBUG 0x0313,0x10e2,0x2802,0x0002,0x005a,0x9095,0x0000,0x00e3
0ef2 033b 10f0 | ; | .DEBUG 0x033b,0x10f0,0x0001,0x0000,0x005a,0x9095,0x0000,0x015c
0efa 0393 110e | | .DEBUG 0x0393,0x110e,0x0001,0x0000,0x005a,0x9095,0x0000,0x01eb
0f02 03d3 1120 | | .DEBUG 0x03d3,0x1120,0x0001,0x0000,0x005a,0x9095,0x0000,0x0245
0f0a 049b 1158 | X| .DEBUG 0x049b,0x1158,0x0002,0x0000,0x005a,0x9095,0x0000,0x0353
0f12 04cb 1164 | d| .DEBUG 0x04cb,0x1164,0x0001,0x0000,0x005a,0x9095,0x0000,0x0393
0f1a 0503 1174 | t| .DEBUG 0x0503,0x1174,0x0001,0x0000,0x005a,0x9095,0x0000,0x0407
0f22 05bb 11ac | | .DEBUG 0x05bb,0x11ac,0x0001,0x0000,0x005a,0x9095,0x0000,0x0531
0f2a 0623 11cc | # | .DEBUG 0x0623,0x11cc,0x0002,0x0000,0x005a,0x9095,0x0000,0x075e
0f32 0643 11d6 | C | .DEBUG 0x0643,0x11d6,0x0001,0x0000,0x005a,0x9095,0x0000,0x0799
0f3a 0663 11de | c | .DEBUG 0x0663,0x11de,0x0001,0x0000,0x005a,0x9095,0x0000,0x07e0
0f42 0693 11ea | | .DEBUG 0x0693,0x11ea,0x0001,0x0000,0x005a,0x9095,0x0000,0x0908
0f4a 06fb 1216 | | .DEBUG 0x06fb,0x1216,0x0001,0x0000,0x005a,0x9095,0x0000,0x0c24
0f52 08bb 129e | | .DEBUG 0x08bb,0x129e,0x0001,0x0000,0x005a,0x9095,0x0000,0x0f50
0f5a 0963 12d2 | c | .DEBUG 0x0963,0x12d2,0x0007,0x0000,0x005a,0x9095,0x0000,0x05e8
0f62 0973 12d4 | s | .DEBUG 0x0973,0x12d4,0x0804,0x0002,0x005a,0x9095,0x0000,0x0121
0f6a 098b 12dc | | .DEBUG 0x098b,0x12dc,0x0804,0x0002,0x005a,0x9095,0x0000,0x0153
0f72 09ab 12e4 | | .DEBUG 0x09ab,0x12e4,0x0804,0x0002,0x005a,0x9095,0x0000,0x08ec
0f7a 09db 12f4 | | .DEBUG 0x09db,0x12f4,0x0001,0x0000,0x005a,0x9095,0x0000,0x07fb
0f82 09f3 12fc | | .DEBUG 0x09f3,0x12fc,0x0002,0x0000,0x005a,0x9095,0x0000,0x082c
0f8a 0a03 1300 | | .DEBUG 0x0a03,0x1300,0x0001,0x0000,0x005a,0x9095,0x0000,0x0849
0f92 0a1b 1308 | | .DEBUG 0x0a1b,0x1308,0x0002,0x0000,0x005a,0x9095,0x0000,0x095b
0f9a 0a33 130e | 3 | .DEBUG 0x0a33,0x130e,0x0001,0x0000,0x005a,0x9095,0x0000,0x0980
0fa2 0abb 1332 | 2| .DEBUG 0x0abb,0x1332,0x0001,0x0000,0x005a,0x9095,0x0000,0x0a2f
0faa 0b6b 1360 | k `| .DEBUG 0x0b6b,0x1360,0x0001,0x0000,0x005a,0x9095,0x0000,0x0b7d
0fb2 0b9b 136e | n| .DEBUG 0x0b9b,0x136e,0x0002,0x0000,0x005a,0x9095,0x0000,0x0cb3
0fba 0ba3 1372 | r| .DEBUG 0x0ba3,0x1372,0x0004,0x0000,0x005a,0x9095,0x0000,0x1073
0fc2 0c0b 1396 | | .DEBUG 0x0c0b,0x1396,0x0004,0x0000,0x005a,0x9095,0x0000,0x0b56
0fca ; --------------------------------------------------------------------------------------
0fca ; Debug3 Subtable 0x0
0fca ; --------------------------------------------------------------------------------------
0fca 0003 0000 | | .DBG3TAB 0x0003,0x0000
0fcc 000b ffff | | .CONST 0x000b,0xffff
0fce 000d fffe | | .CONST 0x000d,0xfffe
0fd0 000f fffd | | .CONST 0x000f,0xfffd
0fd2 ; --------------------------------------------------------------------------------------
0fd2 ; Debug3 Subtable 0x1
0fd2 ; --------------------------------------------------------------------------------------
0fd2 001d 0000 | | .DBG3TAB 0x001d,0x0000
0fd4 0012 ffff | | .CONST 0x0012,0xffff
0fd6 0013 fffe | | .CONST 0x0013,0xfffe
0fd8 0014 fffd | | .CONST 0x0014,0xfffd
0fda 0015 fffc | | .CONST 0x0015,0xfffc
0fdc 0016 fffb | | .CONST 0x0016,0xfffb
0fde 0018 fffa | | .CONST 0x0018,0xfffa
0fe0 001b fff9 | | .CONST 0x001b,0xfff9
0fe2 001c fff8 | | .CONST 0x001c,0xfff8
0fe4 0023 fff7 | # | .CONST 0x0023,0xfff7
0fe6 0025 fff6 | % | .CONST 0x0025,0xfff6
0fe8 0027 fff5 | ' | .CONST 0x0027,0xfff5
0fea 0029 fff4 | ) | .CONST 0x0029,0xfff4
0fec 002b fff3 | + | .CONST 0x002b,0xfff3
0fee 002d fff2 | - | .CONST 0x002d,0xfff2
0ff0 002f fff1 | / | .CONST 0x002f,0xfff1
0ff2 0031 fff0 | 1 | .CONST 0x0031,0xfff0
0ff4 0033 ffef | 3 | .CONST 0x0033,0xffef
0ff6 0035 ffee | 5 | .CONST 0x0035,0xffee
0ff8 0037 ffed | 7 | .CONST 0x0037,0xffed
0ffa 0039 ffec | 9 | .CONST 0x0039,0xffec
0ffc 003b ffeb | ; | .CONST 0x003b,0xffeb
0ffe 003d ffea | = | .CONST 0x003d,0xffea
1000 003f ffe9 | ? | .CONST 0x003f,0xffe9
1002 0041 ffe8 | A | .CONST 0x0041,0xffe8
1004 0043 ffe7 | C | .CONST 0x0043,0xffe7
1006 0045 ffe6 | E | .CONST 0x0045,0xffe6
1008 0047 ffe5 | G | .CONST 0x0047,0xffe5
100a 0049 ffe4 | I | .CONST 0x0049,0xffe4
100c 004b ffe3 | K | .CONST 0x004b,0xffe3
100e ; --------------------------------------------------------------------------------------
100e ; Debug3 Subtable 0x2
100e ; --------------------------------------------------------------------------------------
100e 0007 0027 | '| .DBG3TAB 0x0007,0x0027
1010 0053 ffff | S | .CONST 0x0053,0xffff
1012 0054 fffe | T | .CONST 0x0054,0xfffe
1014 0056 fffd | V | .CONST 0x0056,0xfffd
1016 0057 fffc | W | .CONST 0x0057,0xfffc
1018 0058 fffb | X | .CONST 0x0058,0xfffb
101a 005a fffa | Z | .CONST 0x005a,0xfffa
101c 0064 fff9 | d | .CONST 0x0064,0xfff9
101e 0070 0001 | p | .CONST 0x0070,0x0001
1020 0074 0002 | t | .CONST 0x0074,0x0002
1022 007d 0003 | } | .CONST 0x007d,0x0003
1024 007f 0004 | | .CONST 0x007f,0x0004
1026 0083 0005 | | .CONST 0x0083,0x0005
1028 0084 0006 | | .CONST 0x0084,0x0006
102a 0086 0007 | | .CONST 0x0086,0x0007
102c 008b 0008 | | .CONST 0x008b,0x0008
102e 008d 0009 | | .CONST 0x008d,0x0009
1030 0093 000a | | .CONST 0x0093,0x000a
1032 0097 000b | | .CONST 0x0097,0x000b
1034 0099 000c | | .CONST 0x0099,0x000c
1036 00a1 000d | | .CONST 0x00a1,0x000d
1038 00a9 000e | | .CONST 0x00a9,0x000e
103a 00b6 0010 | | .CONST 0x00b6,0x0010
103c 00cb 0011 | | .CONST 0x00cb,0x0011
103e 00cd 0012 | | .CONST 0x00cd,0x0012
1040 00d3 0013 | | .CONST 0x00d3,0x0013
1042 00db 0014 | | .CONST 0x00db,0x0014
1044 00f3 0015 | | .CONST 0x00f3,0x0015
1046 00f5 0016 | | .CONST 0x00f5,0x0016
1048 00fb 0017 | | .CONST 0x00fb,0x0017
104a 0100 0018 | | .CONST 0x0100,0x0018
104c 0103 0019 | | .CONST 0x0103,0x0019
104e 0105 001a | | .CONST 0x0105,0x001a
1050 010a 001b | | .CONST 0x010a,0x001b
1052 010c 001c | | .CONST 0x010c,0x001c
1054 0111 001d | | .CONST 0x0111,0x001d
1056 0116 001e | | .CONST 0x0116,0x001e
1058 0118 001f | | .CONST 0x0118,0x001f
105a 011c 0020 | | .CONST 0x011c,0x0020
105c 011e 0021 | !| .CONST 0x011e,0x0021
105e 0124 0022 | $ "| .CONST 0x0124,0x0022
1060 0128 0023 | ( #| .CONST 0x0128,0x0023
1062 012a 0024 | * $| .CONST 0x012a,0x0024
1064 013f 0025 | ? %| .CONST 0x013f,0x0025
1066 0141 0026 | A &| .CONST 0x0141,0x0026
1068 014d 0027 | M '| .CONST 0x014d,0x0027
106a 0165 0028 | e (| .CONST 0x0165,0x0028
106c ; --------------------------------------------------------------------------------------
106c ; Debug3 Subtable 0x3
106c ; --------------------------------------------------------------------------------------
106c 0004 000e | | .DBG3TAB 0x0004,0x000e
106e 016b ffff | k | .CONST 0x016b,0xffff
1070 016c fffe | l | .CONST 0x016c,0xfffe
1072 016f fffd | o | .CONST 0x016f,0xfffd
1074 0173 fffc | s | .CONST 0x0173,0xfffc
1076 0178 0001 | x | .CONST 0x0178,0x0001
1078 017c 0002 | | | .CONST 0x017c,0x0002
107a 0197 0003 | | .CONST 0x0197,0x0003
107c 0199 0004 | | .CONST 0x0199,0x0004
107e 019f 0005 | | .CONST 0x019f,0x0005
1080 01a3 0006 | | .CONST 0x01a3,0x0006
1082 01a4 0007 | | .CONST 0x01a4,0x0007
1084 01ab 0008 | | .CONST 0x01ab,0x0008
1086 01ad 0009 | | .CONST 0x01ad,0x0009
1088 01b1 000a | | .CONST 0x01b1,0x000a
108a 01b7 000b | | .CONST 0x01b7,0x000b
108c 01cb 000c | | .CONST 0x01cb,0x000c
108e 01cd 000d | | .CONST 0x01cd,0x000d
1090 01d9 000e | | .CONST 0x01d9,0x000e
1092 ; --------------------------------------------------------------------------------------
1092 ; Debug3 Subtable 0x4
1092 ; --------------------------------------------------------------------------------------
1092 0003 000e | | .DBG3TAB 0x0003,0x000e
1094 01e3 ffff | | .CONST 0x01e3,0xffff
1096 01e8 fffe | | .CONST 0x01e8,0xfffe
1098 01eb fffd | | .CONST 0x01eb,0xfffd
109a 01ec 0001 | | .CONST 0x01ec,0x0001
109c 01f0 0002 | | .CONST 0x01f0,0x0002
109e 0208 0003 | | .CONST 0x0208,0x0003
10a0 020a 0004 | | .CONST 0x020a,0x0004
10a2 020e 0005 | | .CONST 0x020e,0x0005
10a4 0210 0006 | | .CONST 0x0210,0x0006
10a6 0217 0007 | | .CONST 0x0217,0x0007
10a8 0219 0008 | | .CONST 0x0219,0x0008
10aa 022a 0009 | * | .CONST 0x022a,0x0009
10ac 022c 000a | , | .CONST 0x022c,0x000a
10ae 0231 000b | 1 | .CONST 0x0231,0x000b
10b0 0249 000c | I | .CONST 0x0249,0x000c
10b2 024b 000d | K | .CONST 0x024b,0x000d
10b4 0257 000e | W | .CONST 0x0257,0x000e
10b6 ; --------------------------------------------------------------------------------------
10b6 ; Debug3 Subtable 0x5
10b6 ; --------------------------------------------------------------------------------------
10b6 0000 0000 | | .DBG3TAB 0x0000,0x0000
10b8 ; --------------------------------------------------------------------------------------
10b8 ; Debug3 Subtable 0x6
10b8 ; --------------------------------------------------------------------------------------
10b8 0003 000c | | .DBG3TAB 0x0003,0x000c
10ba 027b ffff | { | .CONST 0x027b,0xffff
10bc 0280 fffe | | .CONST 0x0280,0xfffe
10be 0283 fffd | | .CONST 0x0283,0xfffd
10c0 0285 0001 | | .CONST 0x0285,0x0001
10c2 029d 0002 | | .CONST 0x029d,0x0002
10c4 029f 0003 | | .CONST 0x029f,0x0003
10c6 02a0 0004 | | .CONST 0x02a0,0x0004
10c8 02a5 0005 | | .CONST 0x02a5,0x0005
10ca 02aa 0006 | | .CONST 0x02aa,0x0006
10cc 02b7 0007 | | .CONST 0x02b7,0x0007
10ce 02b8 0008 | | .CONST 0x02b8,0x0008
10d0 02bc 0009 | | .CONST 0x02bc,0x0009
10d2 02c1 000a | | .CONST 0x02c1,0x000a
10d4 02c6 000b | | .CONST 0x02c6,0x000b
10d6 02cc 000c | | .CONST 0x02cc,0x000c
10d8 ; --------------------------------------------------------------------------------------
10d8 ; Debug3 Subtable 0x7
10d8 ; --------------------------------------------------------------------------------------
10d8 0000 0004 | | .DBG3TAB 0x0000,0x0004
10da 02df 0001 | | .CONST 0x02df,0x0001
10dc 02e7 0002 | | .CONST 0x02e7,0x0002
10de 02e9 0003 | | .CONST 0x02e9,0x0003
10e0 02f2 0004 | | .CONST 0x02f2,0x0004
10e2 ; --------------------------------------------------------------------------------------
10e2 ; Debug3 Subtable 0x8
10e2 ; --------------------------------------------------------------------------------------
10e2 0002 0004 | | .DBG3TAB 0x0002,0x0004
10e4 0313 ffff | | .CONST 0x0313,0xffff
10e6 0315 fffe | | .CONST 0x0315,0xfffe
10e8 0320 0001 | | .CONST 0x0320,0x0001
10ea 0321 0002 | ! | .CONST 0x0321,0x0002
10ec 0323 0003 | # | .CONST 0x0323,0x0003
10ee 0329 0004 | ) | .CONST 0x0329,0x0004
10f0 ; --------------------------------------------------------------------------------------
10f0 ; Debug3 Subtable 0x9
10f0 ; --------------------------------------------------------------------------------------
10f0 0002 000c | | .DBG3TAB 0x0002,0x000c
10f2 033b ffff | ; | .CONST 0x033b,0xffff
10f4 033e fffe | > | .CONST 0x033e,0xfffe
10f6 0343 0001 | C | .CONST 0x0343,0x0001
10f8 0345 0002 | E | .CONST 0x0345,0x0002
10fa 034a 0005 | J | .CONST 0x034a,0x0005
10fc 0362 0006 | b | .CONST 0x0362,0x0006
10fe 036b 0007 | k | .CONST 0x036b,0x0007
1100 036e 0008 | n | .CONST 0x036e,0x0008
1102 0375 0009 | u | .CONST 0x0375,0x0009
1104 0378 000a | x | .CONST 0x0378,0x000a
1106 037a 000b | z | .CONST 0x037a,0x000b
1108 037c 000c | | | .CONST 0x037c,0x000c
110a 0383 0003 | | .CONST 0x0383,0x0003
110c 0386 0004 | | .CONST 0x0386,0x0004
110e ; --------------------------------------------------------------------------------------
110e ; Debug3 Subtable 0xa
110e ; --------------------------------------------------------------------------------------
110e 0003 0005 | | .DBG3TAB 0x0003,0x0005
1110 0393 ffff | | .CONST 0x0393,0xffff
1112 0398 fffe | | .CONST 0x0398,0xfffe
1114 039d fffd | | .CONST 0x039d,0xfffd
1116 03a0 0001 | | .CONST 0x03a0,0x0001
1118 03b8 0002 | | .CONST 0x03b8,0x0002
111a 03ba 0003 | | .CONST 0x03ba,0x0003
111c 03be 0004 | | .CONST 0x03be,0x0004
111e 03c2 0005 | | .CONST 0x03c2,0x0005
1120 ; --------------------------------------------------------------------------------------
1120 ; Debug3 Subtable 0xb
1120 ; --------------------------------------------------------------------------------------
1120 0005 0016 | | .DBG3TAB 0x0005,0x0016
1122 03d3 ffff | | .CONST 0x03d3,0xffff
1124 03d8 fffe | | .CONST 0x03d8,0xfffe
1126 03db fffd | | .CONST 0x03db,0xfffd
1128 03dc fffc | | .CONST 0x03dc,0xfffc
112a 03de fffb | | .CONST 0x03de,0xfffb
112c 03e9 0001 | | .CONST 0x03e9,0x0001
112e 03eb 0002 | | .CONST 0x03eb,0x0002
1130 0403 0003 | | .CONST 0x0403,0x0003
1132 0405 0004 | | .CONST 0x0405,0x0004
1134 0406 0005 | | .CONST 0x0406,0x0005
1136 0414 0006 | | .CONST 0x0414,0x0006
1138 0432 0007 | 2 | .CONST 0x0432,0x0007
113a 0434 0008 | 4 | .CONST 0x0434,0x0008
113c 043d 0009 | = | .CONST 0x043d,0x0009
113e 0443 000a | C | .CONST 0x0443,0x000a
1140 0445 000b | E | .CONST 0x0445,0x000b
1142 0452 000c | R | .CONST 0x0452,0x000c
1144 045b 000d | [ | .CONST 0x045b,0x000d
1146 045d 000e | ] | .CONST 0x045d,0x000e
1148 0463 000f | c | .CONST 0x0463,0x000f
114a 046c 0010 | l | .CONST 0x046c,0x0010
114c 046e 0011 | n | .CONST 0x046e,0x0011
114e 0475 0012 | u | .CONST 0x0475,0x0012
1150 047f 0013 | | .CONST 0x047f,0x0013
1152 0481 0014 | | .CONST 0x0481,0x0014
1154 048a 0015 | | .CONST 0x048a,0x0015
1156 0496 0016 | | .CONST 0x0496,0x0016
1158 ; --------------------------------------------------------------------------------------
1158 ; Debug3 Subtable 0xc
1158 ; --------------------------------------------------------------------------------------
1158 0003 0002 | | .DBG3TAB 0x0003,0x0002
115a 049b ffff | | .CONST 0x049b,0xffff
115c 049d fffe | | .CONST 0x049d,0xfffe
115e 04a3 fffd | | .CONST 0x04a3,0xfffd
1160 04a4 0001 | | .CONST 0x04a4,0x0001
1162 04c1 0002 | | .CONST 0x04c1,0x0002
1164 ; --------------------------------------------------------------------------------------
1164 ; Debug3 Subtable 0xd
1164 ; --------------------------------------------------------------------------------------
1164 0002 0005 | | .DBG3TAB 0x0002,0x0005
1166 04cb ffff | | .CONST 0x04cb,0xffff
1168 04d0 fffe | | .CONST 0x04d0,0xfffe
116a 04d7 0001 | | .CONST 0x04d7,0x0001
116c 04dc 0002 | | .CONST 0x04dc,0x0002
116e 04e0 0003 | | .CONST 0x04e0,0x0003
1170 04f9 0004 | | .CONST 0x04f9,0x0004
1172 04fc 0005 | | .CONST 0x04fc,0x0005
1174 ; --------------------------------------------------------------------------------------
1174 ; Debug3 Subtable 0xe
1174 ; --------------------------------------------------------------------------------------
1174 0006 0015 | | .DBG3TAB 0x0006,0x0015
1176 0503 ffff | | .CONST 0x0503,0xffff
1178 0505 fffe | | .CONST 0x0505,0xfffe
117a 0508 fffd | | .CONST 0x0508,0xfffd
117c 0509 fffc | | .CONST 0x0509,0xfffc
117e 050b fffb | | .CONST 0x050b,0xfffb
1180 050c fffa | | .CONST 0x050c,0xfffa
1182 050f 0001 | | .CONST 0x050f,0x0001
1184 0520 0002 | | .CONST 0x0520,0x0002
1186 0522 0003 | " | .CONST 0x0522,0x0003
1188 0537 0004 | 7 | .CONST 0x0537,0x0004
118a 0539 0005 | 9 | .CONST 0x0539,0x0005
118c 053a 0006 | : | .CONST 0x053a,0x0006
118e 0541 0007 | A | .CONST 0x0541,0x0007
1190 0543 0008 | C | .CONST 0x0543,0x0008
1192 0544 0009 | D | .CONST 0x0544,0x0009
1194 054a 000a | J | .CONST 0x054a,0x000a
1196 054b 000c | K | .CONST 0x054b,0x000c
1198 0558 000d | X | .CONST 0x0558,0x000d
119a 055a 000e | Z | .CONST 0x055a,0x000e
119c 056f 000f | o | .CONST 0x056f,0x000f
119e 0571 0010 | q | .CONST 0x0571,0x0010
11a0 0572 0011 | r | .CONST 0x0572,0x0011
11a2 058c 0012 | | .CONST 0x058c,0x0012
11a4 058e 0013 | | .CONST 0x058e,0x0013
11a6 05a3 0014 | | .CONST 0x05a3,0x0014
11a8 05ab 0015 | | .CONST 0x05ab,0x0015
11aa 05ae 0016 | | .CONST 0x05ae,0x0016
11ac ; --------------------------------------------------------------------------------------
11ac ; Debug3 Subtable 0xf
11ac ; --------------------------------------------------------------------------------------
11ac 0004 000b | | .DBG3TAB 0x0004,0x000b
11ae 05bb ffff | | .CONST 0x05bb,0xffff
11b0 05c0 fffe | | .CONST 0x05c0,0xfffe
11b2 05c3 fffd | | .CONST 0x05c3,0xfffd
11b4 05c8 fffc | | .CONST 0x05c8,0xfffc
11b6 05c9 0001 | | .CONST 0x05c9,0x0001
11b8 05e1 0002 | | .CONST 0x05e1,0x0002
11ba 05e3 0003 | | .CONST 0x05e3,0x0003
11bc 05f6 0004 | | .CONST 0x05f6,0x0004
11be 05f8 0005 | | .CONST 0x05f8,0x0005
11c0 05f9 0006 | | .CONST 0x05f9,0x0006
11c2 0601 0007 | | .CONST 0x0601,0x0007
11c4 0607 0008 | | .CONST 0x0607,0x0008
11c6 0610 0009 | | .CONST 0x0610,0x0009
11c8 0614 000a | | .CONST 0x0614,0x000a
11ca 061d 000b | | .CONST 0x061d,0x000b
11cc ; --------------------------------------------------------------------------------------
11cc ; Debug3 Subtable 0x10
11cc ; --------------------------------------------------------------------------------------
11cc 0002 0002 | | .DBG3TAB 0x0002,0x0002
11ce 0623 ffff | # | .CONST 0x0623,0xffff
11d0 0628 fffe | ( | .CONST 0x0628,0xfffe
11d2 062a 0001 | * | .CONST 0x062a,0x0001
11d4 0637 0002 | 7 | .CONST 0x0637,0x0002
11d6 ; --------------------------------------------------------------------------------------
11d6 ; Debug3 Subtable 0x11
11d6 ; --------------------------------------------------------------------------------------
11d6 0000 0003 | | .DBG3TAB 0x0000,0x0003
11d8 0643 0001 | C | .CONST 0x0643,0x0001
11da 0645 0002 | E | .CONST 0x0645,0x0002
11dc 0659 0003 | Y | .CONST 0x0659,0x0003
11de ; --------------------------------------------------------------------------------------
11de ; Debug3 Subtable 0x12
11de ; --------------------------------------------------------------------------------------
11de 0004 0001 | | .DBG3TAB 0x0004,0x0001
11e0 0663 ffff | c | .CONST 0x0663,0xffff
11e2 0665 fffe | e | .CONST 0x0665,0xfffe
11e4 0667 fffd | g | .CONST 0x0667,0xfffd
11e6 0669 fffc | i | .CONST 0x0669,0xfffc
11e8 067b 0001 | { | .CONST 0x067b,0x0001
11ea ; --------------------------------------------------------------------------------------
11ea ; Debug3 Subtable 0x13
11ea ; --------------------------------------------------------------------------------------
11ea 0008 000d | | .DBG3TAB 0x0008,0x000d
11ec 0693 ffff | | .CONST 0x0693,0xffff
11ee 0694 fffe | | .CONST 0x0694,0xfffe
11f0 0696 fffd | | .CONST 0x0696,0xfffd
11f2 0698 fffc | | .CONST 0x0698,0xfffc
11f4 06a1 fffb | | .CONST 0x06a1,0xfffb
11f6 06a3 fffa | | .CONST 0x06a3,0xfffa
11f8 06a5 fff9 | | .CONST 0x06a5,0xfff9
11fa 06a7 fff8 | | .CONST 0x06a7,0xfff8
11fc 06a9 0001 | | .CONST 0x06a9,0x0001
11fe 06ac 0002 | | .CONST 0x06ac,0x0002
1200 06ad 0003 | | .CONST 0x06ad,0x0003
1202 06af 0004 | | .CONST 0x06af,0x0004
1204 06b1 0005 | | .CONST 0x06b1,0x0005
1206 06b5 0006 | | .CONST 0x06b5,0x0006
1208 06b7 0007 | | .CONST 0x06b7,0x0007
120a 06bd 0008 | | .CONST 0x06bd,0x0008
120c 06c5 0009 | | .CONST 0x06c5,0x0009
120e 06c7 000a | | .CONST 0x06c7,0x000a
1210 06c8 000b | | .CONST 0x06c8,0x000b
1212 06d6 000c | | .CONST 0x06d6,0x000c
1214 06f1 000d | | .CONST 0x06f1,0x000d
1216 ; --------------------------------------------------------------------------------------
1216 ; Debug3 Subtable 0x14
1216 ; --------------------------------------------------------------------------------------
1216 0011 0032 | 2| .DBG3TAB 0x0011,0x0032
1218 06fb ffff | | .CONST 0x06fb,0xffff
121a 0700 fffe | | .CONST 0x0700,0xfffe
121c 0706 fffd | | .CONST 0x0706,0xfffd
121e 0707 fffc | | .CONST 0x0707,0xfffc
1220 0708 fffb | | .CONST 0x0708,0xfffb
1222 070d fffa | | .CONST 0x070d,0xfffa
1224 0710 fff9 | | .CONST 0x0710,0xfff9
1226 0714 fff8 | | .CONST 0x0714,0xfff8
1228 0718 fff7 | | .CONST 0x0718,0xfff7
122a 071a fff6 | | .CONST 0x071a,0xfff6
122c 071f fff5 | | .CONST 0x071f,0xfff5
122e 0721 fff4 | ! | .CONST 0x0721,0xfff4
1230 0722 fff3 | " | .CONST 0x0722,0xfff3
1232 0724 fff2 | $ | .CONST 0x0724,0xfff2
1234 0729 fff1 | ) | .CONST 0x0729,0xfff1
1236 0734 fff0 | 4 | .CONST 0x0734,0xfff0
1238 0736 ffef | 6 | .CONST 0x0736,0xffef
123a 0741 0001 | A | .CONST 0x0741,0x0001
123c 074e 0002 | N | .CONST 0x074e,0x0002
123e 075c 0003 | \ | .CONST 0x075c,0x0003
1240 0761 0004 | a | .CONST 0x0761,0x0004
1242 076c 0005 | l | .CONST 0x076c,0x0005
1244 0770 0006 | p | .CONST 0x0770,0x0006
1246 0779 0007 | y | .CONST 0x0779,0x0007
1248 077b 0008 | { | .CONST 0x077b,0x0008
124a 077c 0009 | | | .CONST 0x077c,0x0009
124c 0781 000a | | .CONST 0x0781,0x000a
124e 078c 000b | | .CONST 0x078c,0x000b
1250 078e 000c | | .CONST 0x078e,0x000c
1252 0792 000d | | .CONST 0x0792,0x000d
1254 0796 000e | | .CONST 0x0796,0x000e
1256 079f 000f | | .CONST 0x079f,0x000f
1258 07a1 0010 | | .CONST 0x07a1,0x0010
125a 07a2 0011 | | .CONST 0x07a2,0x0011
125c 07a9 0012 | | .CONST 0x07a9,0x0012
125e 07ae 0013 | | .CONST 0x07ae,0x0013
1260 07b5 0014 | | .CONST 0x07b5,0x0014
1262 07bf 0015 | | .CONST 0x07bf,0x0015
1264 07c7 0016 | | .CONST 0x07c7,0x0016
1266 07d3 0017 | | .CONST 0x07d3,0x0017
1268 07e0 0019 | | .CONST 0x07e0,0x0019
126a 07e6 001a | | .CONST 0x07e6,0x001a
126c 07ec 001b | | .CONST 0x07ec,0x001b
126e 07f8 001c | | .CONST 0x07f8,0x001c
1270 0804 001d | | .CONST 0x0804,0x001d
1272 0815 001e | | .CONST 0x0815,0x001e
1274 0817 001f | | .CONST 0x0817,0x001f
1276 0820 0020 | | .CONST 0x0820,0x0020
1278 0822 0021 | " !| .CONST 0x0822,0x0021
127a 0823 0022 | # "| .CONST 0x0823,0x0022
127c 0829 0023 | ) #| .CONST 0x0829,0x0023
127e 0831 0024 | 1 $| .CONST 0x0831,0x0024
1280 084b 0025 | K %| .CONST 0x084b,0x0025
1282 084d 0026 | M &| .CONST 0x084d,0x0026
1284 0855 0027 | U '| .CONST 0x0855,0x0027
1286 085e 0028 | ^ (| .CONST 0x085e,0x0028
1288 0860 0029 | ` )| .CONST 0x0860,0x0029
128a 0861 002a | a *| .CONST 0x0861,0x002a
128c 0865 002b | e +| .CONST 0x0865,0x002b
128e 086a 002c | j ,| .CONST 0x086a,0x002c
1290 0875 002d | u -| .CONST 0x0875,0x002d
1292 087e 002e | ~ .| .CONST 0x087e,0x002e
1294 0880 002f | /| .CONST 0x0880,0x002f
1296 0881 0030 | 0| .CONST 0x0881,0x0030
1298 088a 0031 | 1| .CONST 0x088a,0x0031
129a 088e 0032 | 2| .CONST 0x088e,0x0032
129c 0897 0033 | 3| .CONST 0x0897,0x0033
129e ; --------------------------------------------------------------------------------------
129e ; Debug3 Subtable 0x15
129e ; --------------------------------------------------------------------------------------
129e 0008 0011 | | .DBG3TAB 0x0008,0x0011
12a0 08bb ffff | | .CONST 0x08bb,0xffff
12a2 08bc fffe | | .CONST 0x08bc,0xfffe
12a4 08c0 fffd | | .CONST 0x08c0,0xfffd
12a6 08c4 fffc | | .CONST 0x08c4,0xfffc
12a8 08c6 fffb | | .CONST 0x08c6,0xfffb
12aa 08c8 fffa | | .CONST 0x08c8,0xfffa
12ac 08cd fff9 | | .CONST 0x08cd,0xfff9
12ae 08cf fff8 | | .CONST 0x08cf,0xfff8
12b0 08d9 0001 | | .CONST 0x08d9,0x0001
12b2 08e1 0002 | | .CONST 0x08e1,0x0002
12b4 08e9 0003 | | .CONST 0x08e9,0x0003
12b6 08f6 0005 | | .CONST 0x08f6,0x0005
12b8 0902 0006 | | .CONST 0x0902,0x0006
12ba 090e 0007 | | .CONST 0x090e,0x0007
12bc 0916 0008 | | .CONST 0x0916,0x0008
12be 0917 0009 | | .CONST 0x0917,0x0009
12c0 0920 000a | | .CONST 0x0920,0x000a
12c2 0922 000b | " | .CONST 0x0922,0x000b
12c4 0924 000c | $ | .CONST 0x0924,0x000c
12c6 092d 000d | - | .CONST 0x092d,0x000d
12c8 0942 000e | B | .CONST 0x0942,0x000e
12ca 0943 000f | C | .CONST 0x0943,0x000f
12cc 094c 0010 | L | .CONST 0x094c,0x0010
12ce 0950 0011 | P | .CONST 0x0950,0x0011
12d0 0959 0012 | Y | .CONST 0x0959,0x0012
12d2 ; --------------------------------------------------------------------------------------
12d2 ; Debug3 Subtable 0x16
12d2 ; --------------------------------------------------------------------------------------
12d2 0000 0000 | | .DBG3TAB 0x0000,0x0000
12d4 ; --------------------------------------------------------------------------------------
12d4 ; Debug3 Subtable 0x17
12d4 ; --------------------------------------------------------------------------------------
12d4 0001 0002 | | .DBG3TAB 0x0001,0x0002
12d6 0973 ffff | s | .CONST 0x0973,0xffff
12d8 097b 0001 | { | .CONST 0x097b,0x0001
12da 0981 0002 | | .CONST 0x0981,0x0002
12dc ; --------------------------------------------------------------------------------------
12dc ; Debug3 Subtable 0x18
12dc ; --------------------------------------------------------------------------------------
12dc 0001 0002 | | .DBG3TAB 0x0001,0x0002
12de 098b ffff | | .CONST 0x098b,0xffff
12e0 0990 0001 | | .CONST 0x0990,0x0001
12e2 09a0 0002 | | .CONST 0x09a0,0x0002
12e4 ; --------------------------------------------------------------------------------------
12e4 ; Debug3 Subtable 0x19
12e4 ; --------------------------------------------------------------------------------------
12e4 0002 0005 | | .DBG3TAB 0x0002,0x0005
12e6 09ab ffff | | .CONST 0x09ab,0xffff
12e8 09bb fffe | | .CONST 0x09bb,0xfffe
12ea 09be 0001 | | .CONST 0x09be,0x0001
12ec 09bf 0002 | | .CONST 0x09bf,0x0002
12ee 09c6 0003 | | .CONST 0x09c6,0x0003
12f0 09ca 0004 | | .CONST 0x09ca,0x0004
12f2 09cd 0005 | | .CONST 0x09cd,0x0005
12f4 ; --------------------------------------------------------------------------------------
12f4 ; Debug3 Subtable 0x1a
12f4 ; --------------------------------------------------------------------------------------
12f4 0001 0002 | | .DBG3TAB 0x0001,0x0002
12f6 09db ffff | | .CONST 0x09db,0xffff
12f8 09dd 0001 | | .CONST 0x09dd,0x0001
12fa 09e6 0002 | | .CONST 0x09e6,0x0002
12fc ; --------------------------------------------------------------------------------------
12fc ; Debug3 Subtable 0x1b
12fc ; --------------------------------------------------------------------------------------
12fc 0000 0001 | | .DBG3TAB 0x0000,0x0001
12fe 09f3 0001 | | .CONST 0x09f3,0x0001
1300 ; --------------------------------------------------------------------------------------
1300 ; Debug3 Subtable 0x1c
1300 ; --------------------------------------------------------------------------------------
1300 0001 0002 | | .DBG3TAB 0x0001,0x0002
1302 0a03 ffff | | .CONST 0x0a03,0xffff
1304 0a05 0001 | | .CONST 0x0a05,0x0001
1306 0a10 0002 | | .CONST 0x0a10,0x0002
1308 ; --------------------------------------------------------------------------------------
1308 ; Debug3 Subtable 0x1d
1308 ; --------------------------------------------------------------------------------------
1308 0001 0001 | | .DBG3TAB 0x0001,0x0001
130a 0a1b ffff | | .CONST 0x0a1b,0xffff
130c 0a25 0001 | % | .CONST 0x0a25,0x0001
130e ; --------------------------------------------------------------------------------------
130e ; Debug3 Subtable 0x1e
130e ; --------------------------------------------------------------------------------------
130e 0006 000b | | .DBG3TAB 0x0006,0x000b
1310 0a33 ffff | 3 | .CONST 0x0a33,0xffff
1312 0a35 fffe | 5 | .CONST 0x0a35,0xfffe
1314 0a3a fffd | : | .CONST 0x0a3a,0xfffd
1316 0a3f fffc | ? | .CONST 0x0a3f,0xfffc
1318 0a44 fffb | D | .CONST 0x0a44,0xfffb
131a 0a4a fffa | J | .CONST 0x0a4a,0xfffa
131c 0a53 0001 | S | .CONST 0x0a53,0x0001
131e 0a59 0002 | Y | .CONST 0x0a59,0x0002
1320 0a6b 0003 | k | .CONST 0x0a6b,0x0003
1322 0a71 0004 | q | .CONST 0x0a71,0x0004
1324 0a7b 0005 | { | .CONST 0x0a7b,0x0005
1326 0a81 0006 | | .CONST 0x0a81,0x0006
1328 0a92 0007 | | .CONST 0x0a92,0x0007
132a 0a98 0008 | | .CONST 0x0a98,0x0008
132c 0a9f 0009 | | .CONST 0x0a9f,0x0009
132e 0aa7 000a | | .CONST 0x0aa7,0x000a
1330 0aad 000b | | .CONST 0x0aad,0x000b
1332 ; --------------------------------------------------------------------------------------
1332 ; Debug3 Subtable 0x1f
1332 ; --------------------------------------------------------------------------------------
1332 0007 000f | | .DBG3TAB 0x0007,0x000f
1334 0abb ffff | | .CONST 0x0abb,0xffff
1336 0abe fffe | | .CONST 0x0abe,0xfffe
1338 0ac5 fffd | | .CONST 0x0ac5,0xfffd
133a 0ac7 fffc | | .CONST 0x0ac7,0xfffc
133c 0acc fffb | | .CONST 0x0acc,0xfffb
133e 0ad1 fffa | | .CONST 0x0ad1,0xfffa
1340 0ad3 fff9 | | .CONST 0x0ad3,0xfff9
1342 0ad6 0001 | | .CONST 0x0ad6,0x0001
1344 0adc 0002 | | .CONST 0x0adc,0x0002
1346 0ae2 0003 | | .CONST 0x0ae2,0x0003
1348 0ae3 0004 | | .CONST 0x0ae3,0x0004
134a 0ae7 0005 | | .CONST 0x0ae7,0x0005
134c 0ae9 0006 | | .CONST 0x0ae9,0x0006
134e 0af8 0007 | | .CONST 0x0af8,0x0007
1350 0afe 0008 | | .CONST 0x0afe,0x0008
1352 0b19 0009 | | .CONST 0x0b19,0x0009
1354 0b1f 000a | | .CONST 0x0b1f,0x000a
1356 0b25 000b | % | .CONST 0x0b25,0x000b
1358 0b29 000c | ) | .CONST 0x0b29,0x000c
135a 0b51 000d | Q | .CONST 0x0b51,0x000d
135c 0b52 000e | R | .CONST 0x0b52,0x000e
135e 0b5a 000f | Z | .CONST 0x0b5a,0x000f
1360 ; --------------------------------------------------------------------------------------
1360 ; Debug3 Subtable 0x20
1360 ; --------------------------------------------------------------------------------------
1360 0001 0005 | | .DBG3TAB 0x0001,0x0005
1362 0b6b ffff | k | .CONST 0x0b6b,0xffff
1364 0b6f 0002 | o | .CONST 0x0b6f,0x0002
1366 0b7a 0003 | z | .CONST 0x0b7a,0x0003
1368 0b86 0004 | | .CONST 0x0b86,0x0004
136a 0b8c 0005 | | .CONST 0x0b8c,0x0005
136c 0b91 0001 | | .CONST 0x0b91,0x0001
136e ; --------------------------------------------------------------------------------------
136e ; Debug3 Subtable 0x21
136e ; --------------------------------------------------------------------------------------
136e 0000 0001 | | .DBG3TAB 0x0000,0x0001
1370 0b9b 0001 | | .CONST 0x0b9b,0x0001
1372 ; --------------------------------------------------------------------------------------
1372 ; Debug3 Subtable 0x22
1372 ; --------------------------------------------------------------------------------------
1372 0001 0010 | | .DBG3TAB 0x0001,0x0010
1374 0ba3 ffff | | .CONST 0x0ba3,0xffff
1376 0bab 0001 | | .CONST 0x0bab,0x0001
1378 0bbc 0002 | | .CONST 0x0bbc,0x0002
137a 0bbe 0003 | | .CONST 0x0bbe,0x0003
137c 0bc0 0004 | | .CONST 0x0bc0,0x0004
137e 0bc9 0005 | | .CONST 0x0bc9,0x0005
1380 0bcb 0006 | | .CONST 0x0bcb,0x0006
1382 0bd1 0007 | | .CONST 0x0bd1,0x0007
1384 0bd3 0008 | | .CONST 0x0bd3,0x0008
1386 0bd5 0009 | | .CONST 0x0bd5,0x0009
1388 0bde 000a | | .CONST 0x0bde,0x000a
138a 0be0 000b | | .CONST 0x0be0,0x000b
138c 0bec 000c | | .CONST 0x0bec,0x000c
138e 0bee 000d | | .CONST 0x0bee,0x000d
1390 0bf0 000e | | .CONST 0x0bf0,0x000e
1392 0bf9 000f | | .CONST 0x0bf9,0x000f
1394 0c01 0010 | | .CONST 0x0c01,0x0010
1396 ; --------------------------------------------------------------------------------------
1396 ; Debug3 Subtable 0x23
1396 ; --------------------------------------------------------------------------------------
1396 0006 0002 | | .DBG3TAB 0x0006,0x0002
1398 0c0b ffff | | .CONST 0x0c0b,0xffff
139a 0c13 fffe | | .CONST 0x0c13,0xfffe
139c 0c1a fffd | | .CONST 0x0c1a,0xfffd
139e 0c1f fffc | | .CONST 0x0c1f,0xfffc
13a0 0c22 fffb | " | .CONST 0x0c22,0xfffb
13a2 0c23 fffa | # | .CONST 0x0c23,0xfffa
13a4 0c2c 0001 | , | .CONST 0x0c2c,0x0001
13a6 0c40 0002 | @ | .CONST 0x0c40,0x0002
13a8 0000 0000 | | .BLANK 0000[0x58]