|
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: 2048 (0x800)
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 01a0 | | .CONST 0x01a0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0040 | @ | .CONST 0x0040 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x021a,0x0000,0x0000,0x005a,0x3c25,0x0000,0x026b
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0011 0129 | ) | Execute Any,Make_Visible
0012 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x12,0xfffc
0014 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x14,0xfffb
0016 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x16,0xfffa
0018 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x18,0xfff9
001a 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1a,0xfff8
001c 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1c,0xfff7
001e 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1e,0xfff6
0020 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x20,0xfff5
0022 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x22,0xfff4
0024 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x24,0xfff3
0026 00bf | | Action Accept_Activation
0027 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0027,0x0236,0x0000,0x0000,0x005a,0x3ed5,0x0000,0x0006
; Debug Table 0x1.0x0 = 0x27,0xffff
0028 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1 = 0x28,0xfffe
0029 00c7 | | Action Elaborate_Subprogram
002a 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x2 = 0x2a,0xfffd
002b 00c7 | | Action Elaborate_Subprogram
002c 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x3 = 0x2c,0xfffc
002d 00c7 | | Action Elaborate_Subprogram
002e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x4 = 0x2e,0xfffb
002f 00c7 | | Action Elaborate_Subprogram
0030 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x5 = 0x30,0xfffa
0031 00c7 | | Action Elaborate_Subprogram
0032 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x6 = 0x32,0xfff9
0033 00c7 | | Action Elaborate_Subprogram
0034 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x7 = 0x34,0xfff8
0035 00c7 | | Action Elaborate_Subprogram
0036 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x8 = 0x36,0xfff7
0037 00c7 | | Action Elaborate_Subprogram
0038 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x9 = 0x38,0xfff6
0039 00c7 | | Action Elaborate_Subprogram
003a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xa = 0x3a,0xfff5
003b 00c7 | | Action Elaborate_Subprogram
003c 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xb = 0x3c,0xfff4
003d 00c7 | | Action Elaborate_Subprogram
003e 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xc = 0x3e,0xfff3
003f 00c7 | | Action Elaborate_Subprogram
0040 BODY_0008:
0040 00bc | | Action Signal_Activated
0041 00bb | | Action Signal_Completion
0042 0000 0000 | | .BLANK 0000[0x6]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004f | O | .CONST 0x004f ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0003 | | .CONST 0x0003 ; Number of locals
004b INIT_0048:
004b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2 = .DEBUG 0x004b,0x0252,0x0002,0x0000,0x005a,0x3c25,0x0000,0x026c
; Debug Table 0x2.0x0 = 0x4b,0xffff
004c 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x4c,0xfffe
004d 0217 | | Execute Heap_Access,All_Reference
004e 0007 | | Action Break_Optional
004f BODY_0048:
004f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x2 = 0x4f,0x1
0050 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0051 e002 | | Load 0x0,0x2
0052 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0053 701a |p | Jump_Nonzero 0x6e
0054 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x3 = 0x54,0x2
0055 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0056 8003 | | Call 0x0,0x3
0057 00eb | | Load_Encached Diana_Cache
0058 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0059 00eb | | Load_Encached Diana_Cache
005a 18ec | | Execute Package,Field_Execute,Field_Number 0xec
005b 0032 | 2 | Store_Top Heap_Access,At_Offset_2
005c 0007 | | Action Break_Optional ; Debug Table 0x2.0x4 = 0x5c,0x3
005d e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x5 = 0x5d,0x401
005e 0007 | | Action Break_Optional
005f 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0x6 = 0x5f,0x402
0060 0007 | | Action Break_Optional ; Debug Table 0x2.0x7 = 0x60,0x403
0061 0007 | | Action Break_Optional ; Debug Table 0x2.0x8 = 0x61,0x404
0062 0ba8 | | Execute_Immediate Case_Compare,0xa8 ; Debug Table 0x2.0x9 = 0x62,0x3
0063 7003 |p | Jump_Nonzero 0x67
0064 0b49 | I | Execute_Immediate Case_Compare,0x49
0065 7003 |p | Jump_Nonzero 0x69
0066 7806 |x | Jump 0x6d ; Debug Table 0x2.0xa = 0x66,0x6
0067 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xb = 0x67,0x4
0068 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0069 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xc = 0x69,0x5
006a 00eb | | Load_Encached Diana_Cache
006b 18ec | | Execute Package,Field_Execute,Field_Number 0xec
006c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
006d 00d1 | | Pop_Control Pop_Count_1
006e 0007 | | Action Break_Optional ; Debug Table 0x2.0xd = 0x6e,0x7
006f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0xe = 0x6f,0x801
0070 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0x2.0xf = 0x70,0x7
0071 0000 0000 | | .BLANK 0000[0x7]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x007b,0x0274,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0277
; Debug Table 0x3.0x0 = 0x7b,0x1
007c 0217 | | Execute Heap_Access,All_Reference
007d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
007e e004 | | Load 0x0,0x4
007f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0080 180e | | Execute Package,Field_Execute,Field_Number 0xe
0081 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x008b,0x0278,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0288
; Debug Table 0x4.0x0 = 0x8b,0x1
008c 8005 | | Call 0x0,0x5
008d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
008e 0000 0000 | | .XXX[0x2]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0096 | | .CONST 0x0096 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0002 | | .CONST 0x0002 ; Number of locals
0093 INIT_0090:
0093 e001 | | Load 0x0,0x1 ; Debug Table 0x5 = .DEBUG 0x0093,0x027c,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0291
; Debug Table 0x5.0x0 = 0x93,0xffff
0094 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0095 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0096 BODY_0090:
0096 8006 | | Call 0x0,0x6 ; Debug Table 0x5.0x1 = 0x96,0x1
0097 e5fe | | Load 0x2,-0x2
0098 8007 | | Call 0x0,0x7
0099 0219 | | Execute Heap_Access,All_Read
009a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
009b e001 | | Load 0x0,0x1
009c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
009d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
009e 00d9 | | Load_Top At_Offset_1
009f e5ff | | Load 0x2,-0x1
00a0 e001 | | Load 0x0,0x1
00a1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00a2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00a3 00d1 | | Pop_Control Pop_Count_1
00a4 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00a5 00d1 | | Pop_Control Pop_Count_1
00a6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0xa6,0x2
00a7 7003 |p | Jump_Nonzero 0xab
00a8 e008 | | Load 0x0,0x8 ; Debug Table 0x5.0x3 = 0xa8,0x3
00a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00aa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ab 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x4 = 0xab,0x4
00ac 0217 | | Execute Heap_Access,All_Reference
00ad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00af 0000 | | .XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 8006 | | Call 0x0,0x6 ; Debug Table 0x6 = .DEBUG 0x00b3,0x0288,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02a2
; Debug Table 0x6.0x0 = 0xb3,0x1
00b4 00db | | Load_Top At_Offset_3
00b5 8007 | | Call 0x0,0x7
00b6 0217 | | Execute Heap_Access,All_Reference
00b7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
00b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00b9 0000 0000 | | .BLANK 0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00db | | Load_Top At_Offset_3 ; Debug Table 0x7 = .DEBUG 0x00c3,0x028c,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02ad
; Debug Table 0x7.0x0 = 0xc3,0x1
00c4 00db | | Load_Top At_Offset_3
00c5 8214 | | Call 0x1,0x14
00c6 0f00 | | Execute_Immediate Equal,0x0
00c7 0f00 | | Execute_Immediate Equal,0x0
00c8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c9 0000 0000 | | .BLANK 0000[0x7]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d8 | | .CONST 0x00d8 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0003 | | .CONST 0x0003 ; Number of locals
00d3 INIT_00d0:
00d3 e009 | | Load 0x0,0x9 ; Debug Table 0x8 = .DEBUG 0x00d3,0x0290,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02bc
; Debug Table 0x8.0x0 = 0xd3,0xffff
00d4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00d5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00d6 e00a | | Load 0x0,0xa ; Debug Table 0x8.0x1 = 0xd6,0xfffe
00d7 0007 | | Action Break_Optional
00d8 BODY_00d0:
00d8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x2 = 0xd8,0x1
00d9 00da | | Load_Top At_Offset_2
00da e5ff | | Load 0x2,-0x1
00db 8006 | | Call 0x0,0x6
00dc e5fe | | Load 0x2,-0x2
00dd 8007 | | Call 0x0,0x7
00de 0217 | | Execute Heap_Access,All_Reference
00df 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00e0 e001 | | Load 0x0,0x1
00e1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00e2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00e3 005b | [ | Store_Top Discrete,At_Offset_3
00e4 0059 | Y | Store_Top Discrete,At_Offset_1
00e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x3 = 0xe5,0x2
00e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00e7 0000 | | .XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f0 | | .CONST 0x00f0 ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0003 | | .CONST 0x0003 ; Number of locals
00eb INIT_00e8:
00eb e009 | | Load 0x0,0x9 ; Debug Table 0x9 = .DEBUG 0x00eb,0x029a,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02cd
; Debug Table 0x9.0x0 = 0xeb,0xffff
00ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00ed 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00ee e00a | | Load 0x0,0xa ; Debug Table 0x9.0x1 = 0xee,0xfffe
00ef 0007 | | Action Break_Optional
00f0 BODY_00e8:
00f0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x2 = 0xf0,0x1
00f1 00da | | Load_Top At_Offset_2
00f2 e5ff | | Load 0x2,-0x1
00f3 8006 | | Call 0x0,0x6
00f4 e5fe | | Load 0x2,-0x2
00f5 8007 | | Call 0x0,0x7
00f6 0217 | | Execute Heap_Access,All_Reference
00f7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f8 e001 | | Load 0x0,0x1
00f9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00fa 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00fb 005b | [ | Store_Top Discrete,At_Offset_3
00fc 0059 | Y | Store_Top Discrete,At_Offset_1
00fd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x3 = 0xfd,0x2
00fe 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0104 | | .CONST 0x0104 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 INIT_0100:
0103 0007 | | Action Break_Optional ; Debug Table 0xa = .DEBUG 0x0103,0x02a4,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02de
; Debug Table 0xa.0x0 = 0x103,0xffff
0104 BODY_0100:
0104 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1 = 0x104,0x1
0105 e00b | | Load 0x0,0xb
0106 180f | | Execute Package,Field_Execute,Field_Number 0xf
0107 0f03 | | Execute_Immediate Equal,0x3
0108 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0109 0000 0000 | | .BLANK 0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0126 | & | .CONST 0x0126 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0007 | | .CONST 0x0007 ; Number of locals
0113 INIT_0110:
0113 0007 | | Action Break_Optional ; Debug Table 0xb = .DEBUG 0x0113,0x02aa,0x0001,0x0000,0x005a,0x3c25,0x0000,0x02e9
; Debug Table 0xb.0x0 = 0x113,0xffff
0114 e009 | | Load 0x0,0x9 ; Debug Table 0xb.0x1 = 0x114,0xfffe
0115 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0116 e00b | | Load 0x0,0xb ; Debug Table 0xb.0x2 = 0x116,0xfffd
0117 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0118 e00a | | Load 0x0,0xa ; Debug Table 0xb.0x3 = 0x118,0xfffc
0119 0007 | | Action Break_Optional
011a e20f | | Load 0x1,0xf ; Debug Table 0xb.0x4 = 0x11a,0xfffb
011b 02ff | | Declare_Variable Variant_Record
011c 00d8 | | Load_Top At_Offset_0
011d 1c00 | | Execute_Immediate Run_Utility,0x0
011e e009 | | Load 0x0,0x9 ; Debug Table 0xb.0x5 = 0x11e,0xfffa
011f 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0120 0269 | i | Execute Discrete,Last
0121 e009 | | Load 0x0,0x9
0122 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0123 03f1 | | Declare_Variable Discrete,With_Value
0124 e00a | | Load 0x0,0xa ; Debug Table 0xb.0x6 = 0x124,0xfff9
0125 0007 | | Action Break_Optional
0126 BODY_0110:
0126 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x7 = 0x126,0x1
0127 8216 | | Call 0x1,0x16
0128 7002 |p | Jump_Nonzero 0x12b
0129 4887 |H | Short_Literal 0x87
012a 0257 | W | Execute Discrete,Raise
012b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb.0x8 = 0x12b,0x2
012c e00b | | Load 0x0,0xb
012d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
012e e009 | | Load 0x0,0x9
012f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0130 e5ff | | Load 0x2,-0x1
0131 e00b | | Load 0x0,0xb
0132 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0133 c402 | | Store 0x2,0x2
0134 c403 | | Store 0x2,0x3
0135 c404 | | Store 0x2,0x4
0136 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x9 = 0x136,0x3
0137 00e1 | | Load_Encached Boolean_Cache
0138 e402 | | Load 0x2,0x2
0139 e001 | | Load 0x0,0x1
013a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
013b 005a | Z | Store_Top Discrete,At_Offset_2
013c 00d1 | | Pop_Control Pop_Count_1
013d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb.0xa = 0x13d,0x4
013e 00da | | Load_Top At_Offset_2
013f e5ff | | Load 0x2,-0x1
0140 8006 | | Call 0x0,0x6
0141 e405 | | Load 0x2,0x5
0142 8007 | | Call 0x0,0x7
0143 0217 | | Execute Heap_Access,All_Reference
0144 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0145 e001 | | Load 0x0,0x1
0146 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0147 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0148 005b | [ | Store_Top Discrete,At_Offset_3
0149 0059 | Y | Store_Top Discrete,At_Offset_1
014a 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xb = 0x14a,0x5
014b e5fd | | Load 0x2,-0x3
014c 016d | m | Execute Variant_Record,Structure_Write
014d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0xc = 0x14d,0x6
014e a5fe | | Store_Unchecked 0x2,-0x2
014f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 015b | [ | .CONST 0x015b ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0003 | | .CONST 0x0003 ; Number of locals
0153 INIT_0150:
0153 e009 | | Load 0x0,0x9 ; Debug Table 0xc = .DEBUG 0x0153,0x02c6,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02fd
; Debug Table 0xc.0x0 = 0x153,0xffff
0154 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0155 0269 | i | Execute Discrete,Last
0156 e009 | | Load 0x0,0x9
0157 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0158 03f1 | | Declare_Variable Discrete,With_Value
0159 e00a | | Load 0x0,0xa ; Debug Table 0xc.0x1 = 0x159,0xfffe
015a 0007 | | Action Break_Optional
015b BODY_0150:
015b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x2 = 0x15b,0x1
015c 00da | | Load_Top At_Offset_2
015d e5ff | | Load 0x2,-0x1
015e 8006 | | Call 0x0,0x6
015f e5fe | | Load 0x2,-0x2
0160 8007 | | Call 0x0,0x7
0161 0217 | | Execute Heap_Access,All_Reference
0162 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0163 e001 | | Load 0x0,0x1
0164 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0165 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0166 005b | [ | Store_Top Discrete,At_Offset_3
0167 0059 | Y | Store_Top Discrete,At_Offset_1
0168 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x3 = 0x168,0x2
0169 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
016a 0000 0000 | | .BLANK 0000[0x6]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0180 | | .CONST 0x0180 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0006 | | .CONST 0x0006 ; Number of locals
0173 INIT_0170:
0173 029f 0193 | | Declare_Subprogram INIT_0190,For_Call ; Debug Table 0xd = .DEBUG 0x0173,0x02d0,0x2801,0x0002,0x005a,0x3c25,0x0000,0x030e
; Debug Table 0xd.0x0 = 0x173,0xffff
0175 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x1 = 0x175,0xfffe
0176 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0177 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0178 00c6 | | Action Check_Subprogram_Elaborated
0179 4802 |H | Short_Literal 0x2
017a 4802 |H | Short_Literal 0x2
017b 0099 | | Action Reference_Dynamic
017c 601b |` | Indirect_Literal Discrete,0x198,{0x00000000, 0x005a3ed5}
017d 4a9e |J | Short_Literal 0x29e
017e 4806 |H | Short_Literal 0x6
017f 0007 | | Action Break_Optional
0180 BODY_0170:
0180 e5fc | | Load 0x2,-0x4 ; Debug Table 0xd.0x2 = 0x180,0x1
0181 e5fd | | Load 0x2,-0x3
0182 8007 | | Call 0x0,0x7
0183 0219 | | Execute Heap_Access,All_Read
0184 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0185 00d8 | | Load_Top At_Offset_0
0186 4803 |H | Short_Literal 0x3
0187 4802 |H | Short_Literal 0x2
0188 0099 | | Action Reference_Dynamic
0189 4804 |H | Short_Literal 0x4
018a 4802 |H | Short_Literal 0x2
018b 0099 | | Action Reference_Dynamic
018c e001 | | Load 0x0,0x1
018d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
018e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
018f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x0193,0x02d8,0x0801,0x0002,0x005a,0x3ed5,0x0000,0x0285
; Debug Table 0xe.0x0 = 0x193,0x1
0194 0217 | | Execute Heap_Access,All_Reference
0195 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0196 85fe | | Call 0x2,-0x2
0197 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0198 0000 0000 | | .LITERAL {0x00000000, 0x005a3ed5}
019c 0000 0000 | | .BLANK 0000[0x4]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; Debug Table
01a0 ; --------------------------------------------------------------------------------------
01a0 0003 000f | | .CONST 0x0003,0x000f
01a2 000b 021a | | .DEBUG 0x000b,0x021a,0x0000,0x0000,0x005a,0x3c25,0x0000,0x026b
01aa 0027 0236 | ' 6| .DEBUG 0x0027,0x0236,0x0000,0x0000,0x005a,0x3ed5,0x0000,0x0006
01b2 004b 0252 | K R| .DEBUG 0x004b,0x0252,0x0002,0x0000,0x005a,0x3c25,0x0000,0x026c
01ba 007b 0274 | { t| .DEBUG 0x007b,0x0274,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0277
01c2 008b 0278 | x| .DEBUG 0x008b,0x0278,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0288
01ca 0093 027c | || .DEBUG 0x0093,0x027c,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0291
01d2 00b3 0288 | | .DEBUG 0x00b3,0x0288,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02a2
01da 00c3 028c | | .DEBUG 0x00c3,0x028c,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02ad
01e2 00d3 0290 | | .DEBUG 0x00d3,0x0290,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02bc
01ea 00eb 029a | | .DEBUG 0x00eb,0x029a,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02cd
01f2 0103 02a4 | | .DEBUG 0x0103,0x02a4,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02de
01fa 0113 02aa | | .DEBUG 0x0113,0x02aa,0x0001,0x0000,0x005a,0x3c25,0x0000,0x02e9
0202 0153 02c6 | S | .DEBUG 0x0153,0x02c6,0x0002,0x0000,0x005a,0x3c25,0x0000,0x02fd
020a 0173 02d0 | s | .DEBUG 0x0173,0x02d0,0x2801,0x0002,0x005a,0x3c25,0x0000,0x030e
0212 0193 02d8 | | .DEBUG 0x0193,0x02d8,0x0801,0x0002,0x005a,0x3ed5,0x0000,0x0285
021a ; --------------------------------------------------------------------------------------
021a ; Debug3 Subtable 0x0
021a ; --------------------------------------------------------------------------------------
021a 000d 0000 | | .DBG3TAB 0x000d,0x0000
021c 000b ffff | | .CONST 0x000b,0xffff
021e 000d fffe | | .CONST 0x000d,0xfffe
0220 000f fffd | | .CONST 0x000f,0xfffd
0222 0012 fffc | | .CONST 0x0012,0xfffc
0224 0014 fffb | | .CONST 0x0014,0xfffb
0226 0016 fffa | | .CONST 0x0016,0xfffa
0228 0018 fff9 | | .CONST 0x0018,0xfff9
022a 001a fff8 | | .CONST 0x001a,0xfff8
022c 001c fff7 | | .CONST 0x001c,0xfff7
022e 001e fff6 | | .CONST 0x001e,0xfff6
0230 0020 fff5 | | .CONST 0x0020,0xfff5
0232 0022 fff4 | " | .CONST 0x0022,0xfff4
0234 0024 fff3 | $ | .CONST 0x0024,0xfff3
0236 ; --------------------------------------------------------------------------------------
0236 ; Debug3 Subtable 0x1
0236 ; --------------------------------------------------------------------------------------
0236 000d 0000 | | .DBG3TAB 0x000d,0x0000
0238 0027 ffff | ' | .CONST 0x0027,0xffff
023a 0028 fffe | ( | .CONST 0x0028,0xfffe
023c 002a fffd | * | .CONST 0x002a,0xfffd
023e 002c fffc | , | .CONST 0x002c,0xfffc
0240 002e fffb | . | .CONST 0x002e,0xfffb
0242 0030 fffa | 0 | .CONST 0x0030,0xfffa
0244 0032 fff9 | 2 | .CONST 0x0032,0xfff9
0246 0034 fff8 | 4 | .CONST 0x0034,0xfff8
0248 0036 fff7 | 6 | .CONST 0x0036,0xfff7
024a 0038 fff6 | 8 | .CONST 0x0038,0xfff6
024c 003a fff5 | : | .CONST 0x003a,0xfff5
024e 003c fff4 | < | .CONST 0x003c,0xfff4
0250 003e fff3 | > | .CONST 0x003e,0xfff3
0252 ; --------------------------------------------------------------------------------------
0252 ; Debug3 Subtable 0x2
0252 ; --------------------------------------------------------------------------------------
0252 0002 000e | | .DBG3TAB 0x0002,0x000e
0254 004b ffff | K | .CONST 0x004b,0xffff
0256 004c fffe | L | .CONST 0x004c,0xfffe
0258 004f 0001 | O | .CONST 0x004f,0x0001
025a 0054 0002 | T | .CONST 0x0054,0x0002
025c 005c 0003 | \ | .CONST 0x005c,0x0003
025e 005d 0401 | ] | .CONST 0x005d,0x0401
0260 005f 0402 | _ | .CONST 0x005f,0x0402
0262 0060 0403 | ` | .CONST 0x0060,0x0403
0264 0061 0404 | a | .CONST 0x0061,0x0404
0266 0062 0003 | b | .CONST 0x0062,0x0003
0268 0066 0006 | f | .CONST 0x0066,0x0006
026a 0067 0004 | g | .CONST 0x0067,0x0004
026c 0069 0005 | i | .CONST 0x0069,0x0005
026e 006e 0007 | n | .CONST 0x006e,0x0007
0270 006f 0801 | o | .CONST 0x006f,0x0801
0272 0070 0007 | p | .CONST 0x0070,0x0007
0274 ; --------------------------------------------------------------------------------------
0274 ; Debug3 Subtable 0x3
0274 ; --------------------------------------------------------------------------------------
0274 0000 0001 | | .DBG3TAB 0x0000,0x0001
0276 007b 0001 | { | .CONST 0x007b,0x0001
0278 ; --------------------------------------------------------------------------------------
0278 ; Debug3 Subtable 0x4
0278 ; --------------------------------------------------------------------------------------
0278 0000 0001 | | .DBG3TAB 0x0000,0x0001
027a 008b 0001 | | .CONST 0x008b,0x0001
027c ; --------------------------------------------------------------------------------------
027c ; Debug3 Subtable 0x5
027c ; --------------------------------------------------------------------------------------
027c 0001 0004 | | .DBG3TAB 0x0001,0x0004
027e 0093 ffff | | .CONST 0x0093,0xffff
0280 0096 0001 | | .CONST 0x0096,0x0001
0282 00a6 0002 | | .CONST 0x00a6,0x0002
0284 00a8 0003 | | .CONST 0x00a8,0x0003
0286 00ab 0004 | | .CONST 0x00ab,0x0004
0288 ; --------------------------------------------------------------------------------------
0288 ; Debug3 Subtable 0x6
0288 ; --------------------------------------------------------------------------------------
0288 0000 0001 | | .DBG3TAB 0x0000,0x0001
028a 00b3 0001 | | .CONST 0x00b3,0x0001
028c ; --------------------------------------------------------------------------------------
028c ; Debug3 Subtable 0x7
028c ; --------------------------------------------------------------------------------------
028c 0000 0001 | | .DBG3TAB 0x0000,0x0001
028e 00c3 0001 | | .CONST 0x00c3,0x0001
0290 ; --------------------------------------------------------------------------------------
0290 ; Debug3 Subtable 0x8
0290 ; --------------------------------------------------------------------------------------
0290 0002 0002 | | .DBG3TAB 0x0002,0x0002
0292 00d3 ffff | | .CONST 0x00d3,0xffff
0294 00d6 fffe | | .CONST 0x00d6,0xfffe
0296 00d8 0001 | | .CONST 0x00d8,0x0001
0298 00e5 0002 | | .CONST 0x00e5,0x0002
029a ; --------------------------------------------------------------------------------------
029a ; Debug3 Subtable 0x9
029a ; --------------------------------------------------------------------------------------
029a 0002 0002 | | .DBG3TAB 0x0002,0x0002
029c 00eb ffff | | .CONST 0x00eb,0xffff
029e 00ee fffe | | .CONST 0x00ee,0xfffe
02a0 00f0 0001 | | .CONST 0x00f0,0x0001
02a2 00fd 0002 | | .CONST 0x00fd,0x0002
02a4 ; --------------------------------------------------------------------------------------
02a4 ; Debug3 Subtable 0xa
02a4 ; --------------------------------------------------------------------------------------
02a4 0001 0001 | | .DBG3TAB 0x0001,0x0001
02a6 0103 ffff | | .CONST 0x0103,0xffff
02a8 0104 0001 | | .CONST 0x0104,0x0001
02aa ; --------------------------------------------------------------------------------------
02aa ; Debug3 Subtable 0xb
02aa ; --------------------------------------------------------------------------------------
02aa 0007 0006 | | .DBG3TAB 0x0007,0x0006
02ac 0113 ffff | | .CONST 0x0113,0xffff
02ae 0114 fffe | | .CONST 0x0114,0xfffe
02b0 0116 fffd | | .CONST 0x0116,0xfffd
02b2 0118 fffc | | .CONST 0x0118,0xfffc
02b4 011a fffb | | .CONST 0x011a,0xfffb
02b6 011e fffa | | .CONST 0x011e,0xfffa
02b8 0124 fff9 | $ | .CONST 0x0124,0xfff9
02ba 0126 0001 | & | .CONST 0x0126,0x0001
02bc 012b 0002 | + | .CONST 0x012b,0x0002
02be 0136 0003 | 6 | .CONST 0x0136,0x0003
02c0 013d 0004 | = | .CONST 0x013d,0x0004
02c2 014a 0005 | J | .CONST 0x014a,0x0005
02c4 014d 0006 | M | .CONST 0x014d,0x0006
02c6 ; --------------------------------------------------------------------------------------
02c6 ; Debug3 Subtable 0xc
02c6 ; --------------------------------------------------------------------------------------
02c6 0002 0002 | | .DBG3TAB 0x0002,0x0002
02c8 0153 ffff | S | .CONST 0x0153,0xffff
02ca 0159 fffe | Y | .CONST 0x0159,0xfffe
02cc 015b 0001 | [ | .CONST 0x015b,0x0001
02ce 0168 0002 | h | .CONST 0x0168,0x0002
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug3 Subtable 0xd
02d0 ; --------------------------------------------------------------------------------------
02d0 0002 0001 | | .DBG3TAB 0x0002,0x0001
02d2 0173 ffff | s | .CONST 0x0173,0xffff
02d4 0175 fffe | u | .CONST 0x0175,0xfffe
02d6 0180 0001 | | .CONST 0x0180,0x0001
02d8 ; --------------------------------------------------------------------------------------
02d8 ; Debug3 Subtable 0xe
02d8 ; --------------------------------------------------------------------------------------
02d8 0000 0001 | | .DBG3TAB 0x0000,0x0001
02da 0193 0001 | | .CONST 0x0193,0x0001
02dc 0000 0000 | | .BLANK 0000[0x124]