|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 02c8 | | .CONST 0x02c8 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0044 | D | .CONST 0x0044 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0352,0x0000,0x0000,0x004c,0x50d6,0x0000,0x029c
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x25,0xfff2
0027 00bf | | Action Accept_Activation
0028 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1 = .DEBUG 0x0028,0x0370,0x0000,0x0000,0x004e,0x7d45,0x0000,0x0006
; Debug Table 0x1.0x0 = 0x28,0xffff
0029 00c7 | | Action Elaborate_Subprogram
002a 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x1 = 0x2a,0xfffe
002b 00c7 | | Action Elaborate_Subprogram
002c 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x2 = 0x2c,0xfffd
002d 00c7 | | Action Elaborate_Subprogram
002e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x3 = 0x2e,0xfffc
002f 00c7 | | Action Elaborate_Subprogram
0030 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x4 = 0x30,0xfffb
0031 00c7 | | Action Elaborate_Subprogram
0032 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x5 = 0x32,0xfffa
0033 00c7 | | Action Elaborate_Subprogram
0034 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x34,0xfff9
0035 00c7 | | Action Elaborate_Subprogram
0036 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x7 = 0x36,0xfff8
0037 00c7 | | Action Elaborate_Subprogram
0038 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x8 = 0x38,0xfff7
0039 00c7 | | Action Elaborate_Subprogram
003a 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x9 = 0x3a,0xfff6
003b 00c7 | | Action Elaborate_Subprogram
003c 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xa = 0x3c,0xfff5
003d 00c7 | | Action Elaborate_Subprogram
003e 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xb = 0x3e,0xfff4
003f 00c7 | | Action Elaborate_Subprogram
0040 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xc = 0x40,0xfff3
0041 00c7 | | Action Elaborate_Subprogram
0042 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0xd = 0x42,0xfff2
0043 00c7 | | Action Elaborate_Subprogram
0044 BODY_0008:
0044 00bc | | Action Signal_Activated
0045 00bb | | Action Signal_Completion
0046 0000 0000 | | .XXX[0x2]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004f | O | .CONST 0x004f ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0002 | | .CONST 0x0002 ; Number of locals
004b INIT_0048:
004b e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x004b,0x038e,0x0002,0x0000,0x004c,0x50d6,0x0000,0x029d
; Debug Table 0x2.0x0 = 0x4b,0xffff
004c 00db | | Load_Top At_Offset_3
004d 8002 | | Call 0x0,0x2
004e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
004f BODY_0048:
004f 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x4f,0x1
0050 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0051 6808 |h | Jump_Zero 0x5a
0052 00db | | Load_Top At_Offset_3
0053 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0054 0217 | | Execute Heap_Access,All_Reference
0055 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0056 e5ff | | Load 0x2,-0x1
0057 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0058 027f | | Execute Discrete,Equal
0059 7801 |x | Jump 0x5b
005a 4801 |H | Short_Literal 0x1
005b 7002 |p | Jump_Nonzero 0x5e
005c 4887 |H | Short_Literal 0x87
005d 0257 | W | Execute Discrete,Raise
005e 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x2 = 0x5e,0x2
005f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0060 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0061 0000 0000 | | .BLANK 0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0081 | | .CONST 0x0081 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x006b,0x0396,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02a6
; Debug Table 0x3.0x0 = 0x6b,0xffff
006c e003 | | Load 0x0,0x3
006d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
006e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006f 1c08 | | Execute_Immediate Run_Utility,0x8
0070 00d8 | | Load_Top At_Offset_0
0071 1c00 | | Execute_Immediate Run_Utility,0x0
0072 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x1 = 0x72,0xfffe
0073 e5ff | | Load 0x2,-0x1
0074 e5ff | | Load 0x2,-0x1
0075 e004 | | Load 0x0,0x4
0076 01d5 | | Execute Vector,Field_Reference
0077 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0078 e5ff | | Load 0x2,-0x1
0079 e004 | | Load 0x0,0x4
007a 01d5 | | Execute Vector,Field_Reference
007b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
007c 4800 |H | Short_Literal 0x0
007d e005 | | Load 0x0,0x5
007e 1c08 | | Execute_Immediate Run_Utility,0x8
007f 00d8 | | Load_Top At_Offset_0
0080 1c00 | | Execute_Immediate Run_Utility,0x0
0081 BODY_0068:
0081 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x2 = 0x81,0x1
0082 7004 |p | Jump_Nonzero 0x87
0083 e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x3 = 0x83,0x2
0084 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0085 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0086 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0087 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x4 = 0x87,0x3
0088 00d9 | | Load_Top At_Offset_1
0089 e006 | | Load 0x0,0x6
008a e007 | | Load 0x0,0x7
008b a008 | | Store_Unchecked 0x0,0x8
008c e009 | | Load 0x0,0x9
008d 180f | | Execute Package,Field_Execute,Field_Number 0xf
008e 00da | | Load_Top At_Offset_2
008f 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0090 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x5 = 0x90,0x4
0091 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0092 0000 0000 | | .BLANK 0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009e | | .CONST 0x009e ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0003 | | .CONST 0x0003 ; Number of locals
009b INIT_0098:
009b e001 | | Load 0x0,0x1 ; Debug Table 0x4 = .DEBUG 0x009b,0x03a4,0x0001,0x0000,0x004c,0x50d6,0x0000,0x02b5
; Debug Table 0x4.0x0 = 0x9b,0xffff
009c 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call
009e BODY_0098:
009e e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x1 = 0x9e,0x1
009f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00a0 684d |hM | Jump_Zero 0xee
00a1 e5fe | | Load 0x2,-0x2
00a2 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
00a3 684a |hJ | Jump_Zero 0xee
00a4 e5fe | | Load 0x2,-0x2
00a5 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
00a6 0217 | | Execute Heap_Access,All_Reference
00a7 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
00a8 6217 |b | Indirect_Literal Discrete,0x2c0,{0x00000000, 0x19999991}
00a9 027f | | Execute Discrete,Equal
00aa 6843 |hC | Jump_Zero 0xee
00ab e5fe | | Load 0x2,-0x2
00ac 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ad e5fe | | Load 0x2,-0x2
00ae 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
00af 0217 | | Execute Heap_Access,All_Reference
00b0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00b1 027f | | Execute Discrete,Equal
00b2 683b |h; | Jump_Zero 0xee
00b3 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x2 = 0xb3,0x2
00b4 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
00b5 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00b6 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x3 = 0xb6,0x3
00b7 00da | | Load_Top At_Offset_2
00b8 0217 | | Execute Heap_Access,All_Reference
00b9 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
00ba e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x4 = 0xba,0x4
00bb 6803 |h | Jump_Zero 0xbf
00bc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x5 = 0xbc,0x5
00bd 800a | | Call 0x0,0xa
00be 7828 |x( | Jump 0xe7
00bf 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x6 = 0xbf,0x6
00c0 0217 | | Execute Heap_Access,All_Reference
00c1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c2 e00b | | Load 0x0,0xb
00c3 01d7 | | Execute Vector,Field_Read
00c4 6822 |h" | Jump_Zero 0xe7
00c5 00cf | | Action Mark_Auxiliary ; Debug Table 0x4.0x7 = 0xc5,0x7
00c6 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x8 = 0xc6,0xfbff
00c7 0007 | | Action Break_Optional
00c8 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x9 = 0xc8,0xfbfe
00c9 0007 | | Action Break_Optional
00ca 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xa = 0xca,0x401
00cb e402 | | Load 0x2,0x2
00cc 0217 | | Execute Heap_Access,All_Reference
00cd 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
00ce 01d7 | | Execute Vector,Field_Read
00cf 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00d0 00cf | | Action Mark_Auxiliary
00d1 7810 |x | Jump 0xe2
00d2 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xb = 0xd2,0x403
00d3 00db | | Load_Top At_Offset_3
00d4 0217 | | Execute Heap_Access,All_Reference
00d5 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
00d6 01d7 | | Execute Vector,Field_Read
00d7 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00d8 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xc = 0xd8,0x404
00d9 e00c | | Load 0x0,0xc
00da e00d | | Load 0x0,0xd
00db a00e | | Store_Unchecked 0x0,0xe
00dc e009 | | Load 0x0,0x9
00dd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00de 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00df 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xd = 0xdf,0x405
00e0 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00e1 00c9 | | Action Pop_Auxiliary_Loop
00e2 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xe = 0xe2,0x402
00e3 77ee |w | Jump_Nonzero 0xd2
00e4 00ce | | Action Pop_Auxiliary
00e5 00d2 | | Pop_Control Pop_Count_2
00e6 00ce | | Action Pop_Auxiliary
00e7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xf = 0xe7,0x8
00e8 e00c | | Load 0x0,0xc
00e9 e00d | | Load 0x0,0xd
00ea a00e | | Store_Unchecked 0x0,0xe
00eb e009 | | Load 0x0,0x9
00ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00ed 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00ee 8403 | | Call 0x2,0x3 ; Debug Table 0x4.0x10 = 0xee,0x9
00ef 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f7 | | .CONST 0x00f7 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0002 | | .CONST 0x0002 ; Number of locals
00f3 INIT_00f0:
00f3 e001 | | Load 0x0,0x1 ; Debug Table 0x5 = .DEBUG 0x00f3,0x03c8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02c1
; Debug Table 0x5.0x0 = 0xf3,0xffff
00f4 00db | | Load_Top At_Offset_3
00f5 8002 | | Call 0x0,0x2
00f6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00f7 BODY_00f0:
00f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0xf7,0x1
00f8 7004 |p | Jump_Nonzero 0xfd
00f9 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x2 = 0xf9,0x2
00fa 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00fb 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
00fc 0257 | W | Execute Discrete,Raise
00fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0xfd,0x3
00fe e00f | | Load 0x0,0xf
00ff e010 | | Load 0x0,0x10
0100 a011 | | Store_Unchecked 0x0,0x11
0101 e009 | | Load 0x0,0x9
0102 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0103 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0104 0000 0000 | | .BLANK 0000[0x4]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0113 | | .CONST 0x0113 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0003 | | .CONST 0x0003 ; Number of locals
010b INIT_0108:
010b e001 | | Load 0x0,0x1 ; Debug Table 0x6 = .DEBUG 0x010b,0x03d2,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02cc
; Debug Table 0x6.0x0 = 0x10b,0xffff
010c 00db | | Load_Top At_Offset_3
010d 8002 | | Call 0x0,0x2
010e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
010f e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x1 = 0x10f,0xfffe
0110 e5fe | | Load 0x2,-0x2
0111 8002 | | Call 0x0,0x2
0112 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0113 BODY_0108:
0113 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x2 = 0x113,0x1
0114 00d9 | | Load_Top At_Offset_1
0115 00db | | Load_Top At_Offset_3
0116 8012 | | Call 0x0,0x12
0117 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0132 | 2 | .CONST 0x0132 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0003 | | .CONST 0x0003 ; Number of locals
011b INIT_0118:
011b e001 | | Load 0x0,0x1 ; Debug Table 0x7 = .DEBUG 0x011b,0x03da,0x0001,0x0000,0x004c,0x50d6,0x0000,0x02de
; Debug Table 0x7.0x0 = 0x11b,0xffff
011c 00db | | Load_Top At_Offset_3
011d 8002 | | Call 0x0,0x2
011e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
011f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0x11f,0xfffe
0120 0217 | | Execute Heap_Access,All_Reference
0121 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0122 00d9 | | Load_Top At_Offset_1
0123 0217 | | Execute Heap_Access,All_Reference
0124 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0125 00da | | Load_Top At_Offset_2
0126 0217 | | Execute Heap_Access,All_Reference
0127 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0128 00db | | Load_Top At_Offset_3
0129 0217 | | Execute Heap_Access,All_Reference
012a 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
012b e402 | | Load 0x2,0x2
012c 0217 | | Execute Heap_Access,All_Reference
012d 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
012e e005 | | Load 0x0,0x5
012f 1c08 | | Execute_Immediate Run_Utility,0x8
0130 00d8 | | Load_Top At_Offset_0
0131 1c00 | | Execute_Immediate Run_Utility,0x0
0132 BODY_0118:
0132 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x2 = 0x132,0x1
0133 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0134 6807 |h | Jump_Zero 0x13c
0135 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x3 = 0x135,0x2
0136 6802 |h | Jump_Zero 0x139
0137 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x4 = 0x137,0x3
0138 800a | | Call 0x0,0xa
0139 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x5 = 0x139,0x4
013a 00da | | Load_Top At_Offset_2
013b 0218 | | Execute Heap_Access,All_Write
013c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
013d 0000 0000 | | .XXX[0x3]
013f 0000 | |
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 014f | O | .CONST 0x014f ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0003 | | .CONST 0x0003 ; Number of locals
0143 INIT_0140:
0143 e001 | | Load 0x0,0x1 ; Debug Table 0x8 = .DEBUG 0x0143,0x03e8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02eb
; Debug Table 0x8.0x0 = 0x143,0xffff
0144 00db | | Load_Top At_Offset_3
0145 8002 | | Call 0x0,0x2
0146 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0147 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x147,0xfffe
0148 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0149 e003 | | Load 0x0,0x3
014a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
014b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014c 1c08 | | Execute_Immediate Run_Utility,0x8
014d 00d8 | | Load_Top At_Offset_0
014e 1c00 | | Execute_Immediate Run_Utility,0x0
014f BODY_0140:
014f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x2 = 0x14f,0x1
0150 7003 |p | Jump_Nonzero 0x154
0151 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x3 = 0x151,0x2
0152 02fd | | Declare_Variable Variant_Record,Duplicate
0153 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0154 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x4 = 0x154,0x3
0155 e5fe | | Load 0x2,-0x2
0156 8013 | | Call 0x0,0x13
0157 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0158 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x5 = 0x158,0x4
0159 00d9 | | Load_Top At_Offset_1
015a 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
015b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x6 = 0x15b,0x5
015c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
015d 0000 0000 | | .XXX[0x3]
015f 0000 | |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0167 | g | .CONST 0x0167 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0002 | | .CONST 0x0002 ; Number of locals
0163 INIT_0160:
0163 e001 | | Load 0x0,0x1 ; Debug Table 0x9 = .DEBUG 0x0163,0x03f8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02fa
; Debug Table 0x9.0x0 = 0x163,0xffff
0164 00db | | Load_Top At_Offset_3
0165 8002 | | Call 0x0,0x2
0166 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0167 BODY_0160:
0167 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x1 = 0x167,0x1
0168 7002 |p | Jump_Nonzero 0x16b
0169 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x2 = 0x169,0x2
016a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
016b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x3 = 0x16b,0x3
016c 0217 | | Execute Heap_Access,All_Reference
016d 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
016e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
016f 0000 | | .XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0177 | w | .CONST 0x0177 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0002 | | .CONST 0x0002 ; Number of locals
0173 INIT_0170:
0173 e001 | | Load 0x0,0x1 ; Debug Table 0xa = .DEBUG 0x0173,0x0402,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0303
; Debug Table 0xa.0x0 = 0x173,0xffff
0174 00db | | Load_Top At_Offset_3
0175 8002 | | Call 0x0,0x2
0176 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0177 BODY_0170:
0177 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x1 = 0x177,0x1
0178 6807 |h | Jump_Zero 0x180
0179 e5fe | | Load 0x2,-0x2
017a 00d9 | | Load_Top At_Offset_1
017b 0217 | | Execute Heap_Access,All_Reference
017c 2707 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x7
017d 01da | | Execute Vector,Bounds
017e 0261 | a | Execute Discrete,Not_In_Range
017f 6804 |h | Jump_Zero 0x184
0180 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0x2 = 0x180,0x2
0181 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0182 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0183 0257 | W | Execute Discrete,Raise
0184 e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x3 = 0x184,0x3
0185 00d9 | | Load_Top At_Offset_1
0186 0217 | | Execute Heap_Access,All_Reference
0187 2707 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x7
0188 01d7 | | Execute Vector,Field_Read
0189 8014 | | Call 0x0,0x14
018a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 019b | | .CONST 0x019b ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0003 | | .CONST 0x0003 ; Number of locals
0193 INIT_0190:
0193 e001 | | Load 0x0,0x1 ; Debug Table 0xb = .DEBUG 0x0193,0x040c,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0310
; Debug Table 0xb.0x0 = 0x193,0xffff
0194 00db | | Load_Top At_Offset_3
0195 8002 | | Call 0x0,0x2
0196 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0197 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x1 = 0x197,0xfffe
0198 e5fd | | Load 0x2,-0x3
0199 8002 | | Call 0x0,0x2
019a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
019b BODY_0190:
019b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x2 = 0x19b,0x1
019c 6812 |h | Jump_Zero 0x1af
019d e5fe | | Load 0x2,-0x2
019e 00da | | Load_Top At_Offset_2
019f 0217 | | Execute Heap_Access,All_Reference
01a0 2707 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x7
01a1 01da | | Execute Vector,Bounds
01a2 0261 | a | Execute Discrete,Not_In_Range
01a3 700b |p | Jump_Nonzero 0x1af
01a4 00d8 | | Load_Top At_Offset_0
01a5 6807 |h | Jump_Zero 0x1ad
01a6 00d8 | | Load_Top At_Offset_0
01a7 0217 | | Execute Heap_Access,All_Reference
01a8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01a9 e015 | | Load 0x0,0x15
01aa 01d7 | | Execute Vector,Field_Read
01ab 0f00 | | Execute_Immediate Equal,0x0
01ac 7801 |x | Jump 0x1ae
01ad 4800 |H | Short_Literal 0x0
01ae 6804 |h | Jump_Zero 0x1b3
01af e003 | | Load 0x0,0x3 ; Debug Table 0xb.0x3 = 0x1af,0x2
01b0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01b1 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01b2 0257 | W | Execute Discrete,Raise
01b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x1b3,0x3
01b4 e5fe | | Load 0x2,-0x2
01b5 00db | | Load_Top At_Offset_3
01b6 0217 | | Execute Heap_Access,All_Reference
01b7 2707 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x7
01b8 01d6 | | Execute Vector,Field_Write
01b9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01ba 0000 0000 | | .BLANK 0000[0x6]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c7 | | .CONST 0x01c7 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0002 | | .CONST 0x0002 ; Number of locals
01c3 INIT_01c0:
01c3 e001 | | Load 0x0,0x1 ; Debug Table 0xc = .DEBUG 0x01c3,0x0418,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0325
; Debug Table 0xc.0x0 = 0x1c3,0xffff
01c4 00db | | Load_Top At_Offset_3
01c5 8002 | | Call 0x0,0x2
01c6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01c7 BODY_01c0:
01c7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x1 = 0x1c7,0x1
01c8 6806 |h | Jump_Zero 0x1cf
01c9 00d8 | | Load_Top At_Offset_0
01ca 0217 | | Execute Heap_Access,All_Reference
01cb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01cc e016 | | Load 0x0,0x16
01cd 01d7 | | Execute Vector,Field_Read
01ce 7004 |p | Jump_Nonzero 0x1d3
01cf e003 | | Load 0x0,0x3 ; Debug Table 0xc.0x2 = 0x1cf,0x2
01d0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01d1 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01d2 0257 | W | Execute Discrete,Raise
01d3 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x3 = 0x1d3,0x3
01d4 00d9 | | Load_Top At_Offset_1
01d5 0217 | | Execute Heap_Access,All_Reference
01d6 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
01d7 01d7 | | Execute Vector,Field_Read
01d8 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x4 = 0x1d9,0x4
01da 7002 |p | Jump_Nonzero 0x1dd
01db 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xc.0x5 = 0x1db,0x5
01dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01dd 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x6 = 0x1dd,0x6
01de 00d9 | | Load_Top At_Offset_1
01df 0217 | | Execute Heap_Access,All_Reference
01e0 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
01e1 00da | | Load_Top At_Offset_2
01e2 0217 | | Execute Heap_Access,All_Reference
01e3 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
01e4 01cf | | Execute Vector,Slice_Read
01e5 0335 | 5 | Declare_Variable Array,Duplicate
01e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e7 0000 | | .XXX[0x1]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01ef | | .CONST 0x01ef ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0002 | | .CONST 0x0002 ; Number of locals
01eb INIT_01e8:
01eb e001 | | Load 0x0,0x1 ; Debug Table 0xd = .DEBUG 0x01eb,0x0428,0x0001,0x0000,0x004c,0x50d6,0x0000,0x032e
; Debug Table 0xd.0x0 = 0x1eb,0xffff
01ec 00db | | Load_Top At_Offset_3
01ed 8002 | | Call 0x0,0x2
01ee 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01ef BODY_01e8:
01ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1 = 0x1ef,0x1
01f0 6806 |h | Jump_Zero 0x1f7
01f1 00d8 | | Load_Top At_Offset_0
01f2 0217 | | Execute Heap_Access,All_Reference
01f3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01f4 e016 | | Load 0x0,0x16
01f5 01d7 | | Execute Vector,Field_Read
01f6 7004 |p | Jump_Nonzero 0x1fb
01f7 e003 | | Load 0x0,0x3 ; Debug Table 0xd.0x2 = 0x1f7,0x2
01f8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01f9 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01fa 0257 | W | Execute Discrete,Raise
01fb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x3 = 0x1fb,0x3
01fc 0217 | | Execute Heap_Access,All_Reference
01fd 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01fe 0f01 | | Execute_Immediate Equal,0x1
01ff 6813 |h | Jump_Zero 0x213
0200 00cf | | Action Mark_Auxiliary
0201 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x4 = 0x201,0x4
0202 01d9 | | Execute Vector,Reverse_Bounds
0203 0263 | c | Execute Discrete,Above_Bound
0204 700c |p | Jump_Nonzero 0x211
0205 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x5 = 0x205,0x5
0206 e5fe | | Load 0x2,-0x2
0207 01d7 | | Execute Vector,Field_Read
0208 e017 | | Load 0x0,0x17
0209 01d7 | | Execute Vector,Field_Read
020a 6804 |h | Jump_Zero 0x20f
020b e003 | | Load 0x0,0x3 ; Debug Table 0xd.0x6 = 0x20b,0x6
020c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
020d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
020e 0257 | W | Execute Discrete,Raise
020f 00c8 | | Action Pop_Auxiliary_Range
0210 3ff4 |? | Loop_Increasing 0x205
0211 00ce | | Action Pop_Auxiliary
0212 781f |x | Jump 0x232
0213 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x7 = 0x213,0x7
0214 0217 | | Execute Heap_Access,All_Reference
0215 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0216 0f07 | | Execute_Immediate Equal,0x7
0217 681a |h | Jump_Zero 0x232
0218 00cf | | Action Mark_Auxiliary
0219 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x8 = 0x219,0x8
021a 01dc | | Execute Vector,Last
021b e5fe | | Load 0x2,-0x2
021c 01dd | | Execute Vector,First
021d 0263 | c | Execute Discrete,Above_Bound
021e 7012 |p | Jump_Nonzero 0x231
021f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x9 = 0x21f,0x9
0220 e5fe | | Load 0x2,-0x2
0221 01d7 | | Execute Vector,Field_Read
0222 0f0d | | Execute_Immediate Equal,0xd
0223 680b |h | Jump_Zero 0x22f
0224 00d8 | | Load_Top At_Offset_0
0225 0a01 | | Execute_Immediate Plus,0x1
0226 0248 | H | Execute Discrete,Check_In_Integer
0227 e5fe | | Load 0x2,-0x2
0228 01d7 | | Execute Vector,Field_Read
0229 0f0a | | Execute_Immediate Equal,0xa
022a 6804 |h | Jump_Zero 0x22f
022b e003 | | Load 0x0,0x3 ; Debug Table 0xd.0xa = 0x22b,0xa
022c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
022d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
022e 0257 | W | Execute Discrete,Raise
022f 00c8 | | Action Pop_Auxiliary_Range
0230 3fee |? | Loop_Increasing 0x21f
0231 00ce | | Action Pop_Auxiliary
0232 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0xb = 0x232,0xb
0233 680c |h | Jump_Zero 0x240
0234 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xc = 0x234,0xc
0235 0219 | | Execute Heap_Access,All_Read
0236 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
0237 4801 |H | Short_Literal 0x1
0238 00d9 | | Load_Top At_Offset_1
0239 01d7 | | Execute Vector,Field_Read
023a 4801 |H | Short_Literal 0x1
023b 8018 | | Call 0x0,0x18
023c 4801 |H | Short_Literal 0x1
023d 00da | | Load_Top At_Offset_2
023e 01d6 | | Execute Vector,Field_Write
023f 00d1 | | Pop_Control Pop_Count_1
0240 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xd = 0x240,0xd
0241 e00f | | Load 0x0,0xf
0242 e010 | | Load 0x0,0x10
0243 a011 | | Store_Unchecked 0x0,0x11
0244 e009 | | Load 0x0,0x9
0245 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0246 e5fe | | Load 0x2,-0x2
0247 8019 | | Call 0x0,0x19
0248 4801 |H | Short_Literal 0x1
0249 00da | | Load_Top At_Offset_2
024a 0217 | | Execute Heap_Access,All_Reference
024b 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
024c 01d6 | | Execute Vector,Field_Write
024d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
024e 0000 0000 | | .XXX[0x2]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0257 | W | .CONST 0x0257 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0002 | | .CONST 0x0002 ; Number of locals
0253 INIT_0250:
0253 e001 | | Load 0x0,0x1 ; Debug Table 0xe = .DEBUG 0x0253,0x0446,0x0002,0x0000,0x004c,0x50d6,0x0000,0x033f
; Debug Table 0xe.0x0 = 0x253,0xffff
0254 00db | | Load_Top At_Offset_3
0255 8002 | | Call 0x0,0x2
0256 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0257 BODY_0250:
0257 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1 = 0x257,0x1
0258 6806 |h | Jump_Zero 0x25f
0259 00d8 | | Load_Top At_Offset_0
025a 0217 | | Execute Heap_Access,All_Reference
025b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
025c e01a | | Load 0x0,0x1a
025d 01d7 | | Execute Vector,Field_Read
025e 7004 |p | Jump_Nonzero 0x263
025f e003 | | Load 0x0,0x3 ; Debug Table 0xe.0x2 = 0x25f,0x2
0260 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0261 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0262 0257 | W | Execute Discrete,Raise
0263 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x3 = 0x263,0x3
0264 00d9 | | Load_Top At_Offset_1
0265 0217 | | Execute Heap_Access,All_Reference
0266 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
0267 01d7 | | Execute Vector,Field_Read
0268 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0269 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x4 = 0x269,0x4
026a 7006 |p | Jump_Nonzero 0x271
026b 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x5 = 0x26b,0x5
026c 4800 |H | Short_Literal 0x0
026d e01b | | Load 0x0,0x1b
026e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
026f 0334 | 4 | Declare_Variable Array,With_Constraint
0270 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0271 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x6 = 0x271,0x6
0272 00d9 | | Load_Top At_Offset_1
0273 0217 | | Execute Heap_Access,All_Reference
0274 2e16 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x16
0275 00da | | Load_Top At_Offset_2
0276 0217 | | Execute Heap_Access,All_Reference
0277 2717 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x17
0278 01cf | | Execute Vector,Slice_Read
0279 0335 | 5 | Declare_Variable Array,Duplicate
027a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
027b 0000 0000 | | .BLANK 0000[0x5]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0287 | | .CONST 0x0287 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0002 | | .CONST 0x0002 ; Number of locals
0283 INIT_0280:
0283 e001 | | Load 0x0,0x1 ; Debug Table 0xf = .DEBUG 0x0283,0x0456,0x0001,0x0000,0x004c,0x50d6,0x0000,0x034a
; Debug Table 0xf.0x0 = 0x283,0xffff
0284 00db | | Load_Top At_Offset_3
0285 8002 | | Call 0x0,0x2
0286 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0287 BODY_0280:
0287 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x1 = 0x287,0x1
0288 6806 |h | Jump_Zero 0x28f
0289 00d8 | | Load_Top At_Offset_0
028a 0217 | | Execute Heap_Access,All_Reference
028b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
028c e01a | | Load 0x0,0x1a
028d 01d7 | | Execute Vector,Field_Read
028e 7004 |p | Jump_Nonzero 0x293
028f e003 | | Load 0x0,0x3 ; Debug Table 0xf.0x2 = 0x28f,0x2
0290 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0291 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0292 0257 | W | Execute Discrete,Raise
0293 e5fd | | Load 0x2,-0x3 ; Debug Table 0xf.0x3 = 0x293,0x3
0294 680c |h | Jump_Zero 0x2a1
0295 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x4 = 0x295,0x4
0296 0219 | | Execute Heap_Access,All_Read
0297 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
0298 4801 |H | Short_Literal 0x1
0299 00d9 | | Load_Top At_Offset_1
029a 01d7 | | Execute Vector,Field_Read
029b 4801 |H | Short_Literal 0x1
029c 8018 | | Call 0x0,0x18
029d 4801 |H | Short_Literal 0x1
029e 00da | | Load_Top At_Offset_2
029f 01d6 | | Execute Vector,Field_Write
02a0 00d1 | | Pop_Control Pop_Count_1
02a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x5 = 0x2a1,0x5
02a2 e00f | | Load 0x0,0xf
02a3 e010 | | Load 0x0,0x10
02a4 a011 | | Store_Unchecked 0x0,0x11
02a5 e009 | | Load 0x0,0x9
02a6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02a7 e5fe | | Load 0x2,-0x2
02a8 801c | | Call 0x0,0x1c
02a9 4801 |H | Short_Literal 0x1
02aa 00da | | Load_Top At_Offset_2
02ab 0217 | | Execute Heap_Access,All_Reference
02ac 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
02ad 01d6 | | Execute Vector,Field_Write
02ae 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02af 0000 | | .XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 02b9 | | .CONST 0x02b9 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 e003 | | Load 0x0,0x3 ; Debug Table 0x10 = .DEBUG 0x02b3,0x0464,0x0004,0x0000,0x004e,0x7d45,0x0000,0x0136
; Debug Table 0x10.0x0 = 0x2b3,0x1
02b4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02b5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02b6 e5fe | | Load 0x2,-0x2
02b7 016d | m | Execute Variant_Record,Structure_Write
02b8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02b9 TRAP_02b0:
02b9 010e | | Execute Exception,Is_Constraint_Error
02ba 6804 |h | Jump_Zero 0x2bf
02bb e01d | | Load 0x0,0x1d ; Debug Table 0x10.0x1 = 0x2bb,0x2
02bc e5fe | | Load 0x2,-0x2
02bd 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
02be 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02bf 0100 | | Execute Exception,Raise
02c0 0000 0000 | | .LITERAL {0x00000000, 0x19999991}
02c4 0000 0000 | | .BLANK 0000[0x4]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; Debug Table
02c8 ; --------------------------------------------------------------------------------------
02c8 0003 0011 | | .CONST 0x0003,0x0011
02ca 000b 0352 | R| .DEBUG 0x000b,0x0352,0x0000,0x0000,0x004c,0x50d6,0x0000,0x029c
02d2 0028 0370 | ( p| .DEBUG 0x0028,0x0370,0x0000,0x0000,0x004e,0x7d45,0x0000,0x0006
02da 004b 038e | K | .DEBUG 0x004b,0x038e,0x0002,0x0000,0x004c,0x50d6,0x0000,0x029d
02e2 006b 0396 | k | .DEBUG 0x006b,0x0396,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02a6
02ea 009b 03a4 | | .DEBUG 0x009b,0x03a4,0x0001,0x0000,0x004c,0x50d6,0x0000,0x02b5
02f2 00f3 03c8 | | .DEBUG 0x00f3,0x03c8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02c1
02fa 010b 03d2 | | .DEBUG 0x010b,0x03d2,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02cc
0302 011b 03da | | .DEBUG 0x011b,0x03da,0x0001,0x0000,0x004c,0x50d6,0x0000,0x02de
030a 0143 03e8 | C | .DEBUG 0x0143,0x03e8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02eb
0312 0163 03f8 | c | .DEBUG 0x0163,0x03f8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x02fa
031a 0173 0402 | s | .DEBUG 0x0173,0x0402,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0303
0322 0193 040c | | .DEBUG 0x0193,0x040c,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0310
032a 01c3 0418 | | .DEBUG 0x01c3,0x0418,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0325
0332 01eb 0428 | (| .DEBUG 0x01eb,0x0428,0x0001,0x0000,0x004c,0x50d6,0x0000,0x032e
033a 0253 0446 | S F| .DEBUG 0x0253,0x0446,0x0002,0x0000,0x004c,0x50d6,0x0000,0x033f
0342 0283 0456 | V| .DEBUG 0x0283,0x0456,0x0001,0x0000,0x004c,0x50d6,0x0000,0x034a
034a 02b3 0464 | d| .DEBUG 0x02b3,0x0464,0x0004,0x0000,0x004e,0x7d45,0x0000,0x0136
0352 ; --------------------------------------------------------------------------------------
0352 ; Debug3 Subtable 0x0
0352 ; --------------------------------------------------------------------------------------
0352 000e 0000 | | .DBG3TAB 0x000e,0x0000
0354 000b ffff | | .CONST 0x000b,0xffff
0356 000d fffe | | .CONST 0x000d,0xfffe
0358 000f fffd | | .CONST 0x000f,0xfffd
035a 0011 fffc | | .CONST 0x0011,0xfffc
035c 0013 fffb | | .CONST 0x0013,0xfffb
035e 0015 fffa | | .CONST 0x0015,0xfffa
0360 0017 fff9 | | .CONST 0x0017,0xfff9
0362 0019 fff8 | | .CONST 0x0019,0xfff8
0364 001b fff7 | | .CONST 0x001b,0xfff7
0366 001d fff6 | | .CONST 0x001d,0xfff6
0368 001f fff5 | | .CONST 0x001f,0xfff5
036a 0021 fff4 | ! | .CONST 0x0021,0xfff4
036c 0023 fff3 | # | .CONST 0x0023,0xfff3
036e 0025 fff2 | % | .CONST 0x0025,0xfff2
0370 ; --------------------------------------------------------------------------------------
0370 ; Debug3 Subtable 0x1
0370 ; --------------------------------------------------------------------------------------
0370 000e 0000 | | .DBG3TAB 0x000e,0x0000
0372 0028 ffff | ( | .CONST 0x0028,0xffff
0374 002a fffe | * | .CONST 0x002a,0xfffe
0376 002c fffd | , | .CONST 0x002c,0xfffd
0378 002e fffc | . | .CONST 0x002e,0xfffc
037a 0030 fffb | 0 | .CONST 0x0030,0xfffb
037c 0032 fffa | 2 | .CONST 0x0032,0xfffa
037e 0034 fff9 | 4 | .CONST 0x0034,0xfff9
0380 0036 fff8 | 6 | .CONST 0x0036,0xfff8
0382 0038 fff7 | 8 | .CONST 0x0038,0xfff7
0384 003a fff6 | : | .CONST 0x003a,0xfff6
0386 003c fff5 | < | .CONST 0x003c,0xfff5
0388 003e fff4 | > | .CONST 0x003e,0xfff4
038a 0040 fff3 | @ | .CONST 0x0040,0xfff3
038c 0042 fff2 | B | .CONST 0x0042,0xfff2
038e ; --------------------------------------------------------------------------------------
038e ; Debug3 Subtable 0x2
038e ; --------------------------------------------------------------------------------------
038e 0001 0002 | | .DBG3TAB 0x0001,0x0002
0390 004b ffff | K | .CONST 0x004b,0xffff
0392 004f 0001 | O | .CONST 0x004f,0x0001
0394 005e 0002 | ^ | .CONST 0x005e,0x0002
0396 ; --------------------------------------------------------------------------------------
0396 ; Debug3 Subtable 0x3
0396 ; --------------------------------------------------------------------------------------
0396 0002 0004 | | .DBG3TAB 0x0002,0x0004
0398 006b ffff | k | .CONST 0x006b,0xffff
039a 0072 fffe | r | .CONST 0x0072,0xfffe
039c 0081 0001 | | .CONST 0x0081,0x0001
039e 0083 0002 | | .CONST 0x0083,0x0002
03a0 0087 0003 | | .CONST 0x0087,0x0003
03a2 0090 0004 | | .CONST 0x0090,0x0004
03a4 ; --------------------------------------------------------------------------------------
03a4 ; Debug3 Subtable 0x4
03a4 ; --------------------------------------------------------------------------------------
03a4 0003 000e | | .DBG3TAB 0x0003,0x000e
03a6 009b ffff | | .CONST 0x009b,0xffff
03a8 009e 0001 | | .CONST 0x009e,0x0001
03aa 00b3 0002 | | .CONST 0x00b3,0x0002
03ac 00b6 0003 | | .CONST 0x00b6,0x0003
03ae 00ba 0004 | | .CONST 0x00ba,0x0004
03b0 00bc 0005 | | .CONST 0x00bc,0x0005
03b2 00bf 0006 | | .CONST 0x00bf,0x0006
03b4 00c5 0007 | | .CONST 0x00c5,0x0007
03b6 00c6 fbff | | .CONST 0x00c6,0xfbff
03b8 00c8 fbfe | | .CONST 0x00c8,0xfbfe
03ba 00ca 0401 | | .CONST 0x00ca,0x0401
03bc 00d2 0403 | | .CONST 0x00d2,0x0403
03be 00d8 0404 | | .CONST 0x00d8,0x0404
03c0 00df 0405 | | .CONST 0x00df,0x0405
03c2 00e2 0402 | | .CONST 0x00e2,0x0402
03c4 00e7 0008 | | .CONST 0x00e7,0x0008
03c6 00ee 0009 | | .CONST 0x00ee,0x0009
03c8 ; --------------------------------------------------------------------------------------
03c8 ; Debug3 Subtable 0x5
03c8 ; --------------------------------------------------------------------------------------
03c8 0001 0003 | | .DBG3TAB 0x0001,0x0003
03ca 00f3 ffff | | .CONST 0x00f3,0xffff
03cc 00f7 0001 | | .CONST 0x00f7,0x0001
03ce 00f9 0002 | | .CONST 0x00f9,0x0002
03d0 00fd 0003 | | .CONST 0x00fd,0x0003
03d2 ; --------------------------------------------------------------------------------------
03d2 ; Debug3 Subtable 0x6
03d2 ; --------------------------------------------------------------------------------------
03d2 0002 0001 | | .DBG3TAB 0x0002,0x0001
03d4 010b ffff | | .CONST 0x010b,0xffff
03d6 010f fffe | | .CONST 0x010f,0xfffe
03d8 0113 0001 | | .CONST 0x0113,0x0001
03da ; --------------------------------------------------------------------------------------
03da ; Debug3 Subtable 0x7
03da ; --------------------------------------------------------------------------------------
03da 0002 0004 | | .DBG3TAB 0x0002,0x0004
03dc 011b ffff | | .CONST 0x011b,0xffff
03de 011f fffe | | .CONST 0x011f,0xfffe
03e0 0132 0001 | 2 | .CONST 0x0132,0x0001
03e2 0135 0002 | 5 | .CONST 0x0135,0x0002
03e4 0137 0003 | 7 | .CONST 0x0137,0x0003
03e6 0139 0004 | 9 | .CONST 0x0139,0x0004
03e8 ; --------------------------------------------------------------------------------------
03e8 ; Debug3 Subtable 0x8
03e8 ; --------------------------------------------------------------------------------------
03e8 0002 0005 | | .DBG3TAB 0x0002,0x0005
03ea 0143 ffff | C | .CONST 0x0143,0xffff
03ec 0147 fffe | G | .CONST 0x0147,0xfffe
03ee 014f 0001 | O | .CONST 0x014f,0x0001
03f0 0151 0002 | Q | .CONST 0x0151,0x0002
03f2 0154 0003 | T | .CONST 0x0154,0x0003
03f4 0158 0004 | X | .CONST 0x0158,0x0004
03f6 015b 0005 | [ | .CONST 0x015b,0x0005
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug3 Subtable 0x9
03f8 ; --------------------------------------------------------------------------------------
03f8 0001 0003 | | .DBG3TAB 0x0001,0x0003
03fa 0163 ffff | c | .CONST 0x0163,0xffff
03fc 0167 0001 | g | .CONST 0x0167,0x0001
03fe 0169 0002 | i | .CONST 0x0169,0x0002
0400 016b 0003 | k | .CONST 0x016b,0x0003
0402 ; --------------------------------------------------------------------------------------
0402 ; Debug3 Subtable 0xa
0402 ; --------------------------------------------------------------------------------------
0402 0001 0003 | | .DBG3TAB 0x0001,0x0003
0404 0173 ffff | s | .CONST 0x0173,0xffff
0406 0177 0001 | w | .CONST 0x0177,0x0001
0408 0180 0002 | | .CONST 0x0180,0x0002
040a 0184 0003 | | .CONST 0x0184,0x0003
040c ; --------------------------------------------------------------------------------------
040c ; Debug3 Subtable 0xb
040c ; --------------------------------------------------------------------------------------
040c 0002 0003 | | .DBG3TAB 0x0002,0x0003
040e 0193 ffff | | .CONST 0x0193,0xffff
0410 0197 fffe | | .CONST 0x0197,0xfffe
0412 019b 0001 | | .CONST 0x019b,0x0001
0414 01af 0002 | | .CONST 0x01af,0x0002
0416 01b3 0003 | | .CONST 0x01b3,0x0003
0418 ; --------------------------------------------------------------------------------------
0418 ; Debug3 Subtable 0xc
0418 ; --------------------------------------------------------------------------------------
0418 0001 0006 | | .DBG3TAB 0x0001,0x0006
041a 01c3 ffff | | .CONST 0x01c3,0xffff
041c 01c7 0001 | | .CONST 0x01c7,0x0001
041e 01cf 0002 | | .CONST 0x01cf,0x0002
0420 01d3 0003 | | .CONST 0x01d3,0x0003
0422 01d9 0004 | | .CONST 0x01d9,0x0004
0424 01db 0005 | | .CONST 0x01db,0x0005
0426 01dd 0006 | | .CONST 0x01dd,0x0006
0428 ; --------------------------------------------------------------------------------------
0428 ; Debug3 Subtable 0xd
0428 ; --------------------------------------------------------------------------------------
0428 0001 000d | | .DBG3TAB 0x0001,0x000d
042a 01eb ffff | | .CONST 0x01eb,0xffff
042c 01ef 0001 | | .CONST 0x01ef,0x0001
042e 01f7 0002 | | .CONST 0x01f7,0x0002
0430 01fb 0003 | | .CONST 0x01fb,0x0003
0432 0201 0004 | | .CONST 0x0201,0x0004
0434 0205 0005 | | .CONST 0x0205,0x0005
0436 020b 0006 | | .CONST 0x020b,0x0006
0438 0213 0007 | | .CONST 0x0213,0x0007
043a 0219 0008 | | .CONST 0x0219,0x0008
043c 021f 0009 | | .CONST 0x021f,0x0009
043e 022b 000a | + | .CONST 0x022b,0x000a
0440 0232 000b | 2 | .CONST 0x0232,0x000b
0442 0234 000c | 4 | .CONST 0x0234,0x000c
0444 0240 000d | @ | .CONST 0x0240,0x000d
0446 ; --------------------------------------------------------------------------------------
0446 ; Debug3 Subtable 0xe
0446 ; --------------------------------------------------------------------------------------
0446 0001 0006 | | .DBG3TAB 0x0001,0x0006
0448 0253 ffff | S | .CONST 0x0253,0xffff
044a 0257 0001 | W | .CONST 0x0257,0x0001
044c 025f 0002 | _ | .CONST 0x025f,0x0002
044e 0263 0003 | c | .CONST 0x0263,0x0003
0450 0269 0004 | i | .CONST 0x0269,0x0004
0452 026b 0005 | k | .CONST 0x026b,0x0005
0454 0271 0006 | q | .CONST 0x0271,0x0006
0456 ; --------------------------------------------------------------------------------------
0456 ; Debug3 Subtable 0xf
0456 ; --------------------------------------------------------------------------------------
0456 0001 0005 | | .DBG3TAB 0x0001,0x0005
0458 0283 ffff | | .CONST 0x0283,0xffff
045a 0287 0001 | | .CONST 0x0287,0x0001
045c 028f 0002 | | .CONST 0x028f,0x0002
045e 0293 0003 | | .CONST 0x0293,0x0003
0460 0295 0004 | | .CONST 0x0295,0x0004
0462 02a1 0005 | | .CONST 0x02a1,0x0005
0464 ; --------------------------------------------------------------------------------------
0464 ; Debug3 Subtable 0x10
0464 ; --------------------------------------------------------------------------------------
0464 0000 0002 | | .DBG3TAB 0x0000,0x0002
0466 02b3 0001 | | .CONST 0x02b3,0x0001
0468 02bb 0002 | | .CONST 0x02bb,0x0002
046a 0000 0000 | | .BLANK 0000[0x196]