|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_07b4f8
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02f8 | | .CONST 0x02f8 ; 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 0064 | d | .CONST 0x0064 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x03aa,0xc000,0x0000,0x0033,0x70d4,0x0000,0x0010
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 032b | + | Declare_Type Record,Incomplete,Visible
0011 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 0007 | | Action Break_Optional ; Debug Table 0x0.0x6 = 0x17,0xfff9
0018 6167 |ag | Indirect_Literal Discrete,0x180,{0x00000000, 0x003370d4} ; Debug Table 0x0.0x7 = 0x18,0xfff8
0019 4861 |Ha | Short_Literal 0x61
001a e001 | | Load 0x0,0x1
001b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001c e001 | | Load 0x0,0x1
001d 1911 | | Execute Package,Field_Reference,Field_Number 0x11
001e e001 | | Load 0x0,0x1
001f 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0020 e001 | | Load 0x0,0x1
0021 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0022 e001 | | Load 0x0,0x1
0023 191b | | Execute Package,Field_Reference,Field_Number 0x1b
0024 e001 | | Load 0x0,0x1
0025 1918 | | Execute Package,Field_Reference,Field_Number 0x18
0026 e001 | | Load 0x0,0x1
0027 191c | | Execute Package,Field_Reference,Field_Number 0x1c
0028 e001 | | Load 0x0,0x1
0029 191d | | Execute Package,Field_Reference,Field_Number 0x1d
002a e002 | | Load 0x0,0x2
002b 0387 | | Declare_Variable Package
002c 00d8 | | Load_Top At_Offset_0
002d 020f | | Execute Module,Activate
002e 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x8 = 0x2e,0xfff7
002f 614c |aL | Indirect_Literal Discrete,0x17c,{0x00622008, 0x000018b0}
0030 02a0 | | Declare_Subprogram Null_Subprogram
0031 037a | z | Declare_Type Task,Defined,Not_Elaborated
0032 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x9 = 0x32,0xfff6
0033 02a0 | | Declare_Subprogram Null_Subprogram
0034 4818 |H | Short_Literal 0x18
0035 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0036 e003 | | Load 0x0,0x3 ; Debug Table 0x0.0xa = 0x36,0xfff5
0037 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0038 00db | | Load_Top At_Offset_3
0039 1b17 | | Execute Package,Field_Read,Field_Number 0x17
003a 00da | | Load_Top At_Offset_2
003b 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call
003d e212 | | Load 0x1,0x12
003e 0326 | & | Complete_Type Record,By_Defining
003f 00bf | | Action Accept_Activation
0040 4801 |H | Short_Literal 0x1 ; Debug Table 0x1 = .DEBUG 0x0040,0x03c2,0xc000,0x0000,0x0033,0x70f4,0x0000,0x0009
; Debug Table 0x1.0x0 = 0x40,0xffff
0041 4800 |H | Short_Literal 0x0
0042 e004 | | Load 0x0,0x4
0043 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0044 0334 | 4 | Declare_Variable Array,With_Constraint
0045 4801 |H | Short_Literal 0x1
0046 4800 |H | Short_Literal 0x0
0047 e004 | | Load 0x0,0x4
0048 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0049 0334 | 4 | Declare_Variable Array,With_Constraint
004a 00d9 | | Load_Top At_Offset_1
004b 01d4 | | Execute Vector,Structure_Write
004c 029b 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Unelaborated ; Debug Table 0x1.0x1 = 0x4c,0xfffe
004e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x2 = 0x4e,0xfffd
004f 00c7 | | Action Elaborate_Subprogram
0050 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x3 = 0x50,0xfffc
0051 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0052 00b6 | | Action Make_Scope
0053 e005 | | Load 0x0,0x5
0054 4804 |H | Short_Literal 0x4
0055 e217 | | Load 0x1,0x17
0056 020e | | Execute Module,Augment_Imports
0057 00db | | Load_Top At_Offset_3
0058 020d | | Execute Module,Elaborate
0059 0007 | | Action Break_Optional
005a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x4 = 0x5a,0xfffb
005b 00c7 | | Action Elaborate_Subprogram
005c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x5 = 0x5c,0xfffa
005d 00c7 | | Action Elaborate_Subprogram
005e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x5e,0xfff9
005f 00c7 | | Action Elaborate_Subprogram
0060 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x7 = 0x60,0xfff8
0061 00c7 | | Action Elaborate_Subprogram
0062 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x8 = 0x62,0xfff7
0063 00c7 | | Action Elaborate_Subprogram
0064 BODY_0008:
0064 00bc | | Action Signal_Activated
0065 00bb | | Action Signal_Completion
0066 0000 0000 | | .XXX[0x2]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x006b,0x03d6,0x1002,0x0000,0x0033,0x70d4,0x0000,0x001b
; Debug Table 0x2.0x0 = 0x6b,0x1
006c e003 | | Load 0x0,0x3
006d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
006e 0f02 | | Execute_Immediate Equal,0x2
006f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0073,0x03da,0x1002,0x0000,0x0033,0x70d4,0x0000,0x0024
; Debug Table 0x3.0x0 = 0x73,0x1
0074 e216 | | Load 0x1,0x16
0075 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0076 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0077 0000 | | .XXX[0x1]
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 0x4 = .DEBUG 0x007b,0x03de,0x1001,0x0000,0x0033,0x70d4,0x0000,0x0031
; Debug Table 0x4.0x0 = 0x7b,0x1
007c 8211 | | Call 0x1,0x11
007d 7002 |p | Jump_Nonzero 0x80
007e 4930 |I0 | Short_Literal 0x130 ; Debug Table 0x4.0x1 = 0x7e,0x2
007f 0257 | W | Execute Discrete,Raise
0080 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x2 = 0x80,0x3
0081 e003 | | Load 0x0,0x3
0082 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0083 e5fe | | Load 0x2,-0x2
0084 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0085 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x3 = 0x85,0x4
0086 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0087 4603 |F | Jump_Case 0x4
0088 780b |x | Jump 0x94 ; case 0x0
0089 780a |x | Jump 0x94 ; case 0x1
008a 7809 |x | Jump 0x94 ; case 0x2
008b 7800 |x | Jump 0x8c ; case 0x3
008c e218 | | Load 0x1,0x18 ; Debug Table 0x4.0x4 = 0x8c,0x5
008d 03bc | | Declare_Variable Access,By_Allocation
008e 00d8 | | Load_Top At_Offset_0
008f 00e0 | | Load_Encached Standard_Cache
0090 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0091 e5fe | | Load 0x2,-0x2
0092 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0093 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0094 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x5 = 0x94,0x6
0095 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0096 4800 |H | Short_Literal 0x0
0097 4800 |H | Short_Literal 0x0
0098 e5ff | | Load 0x2,-0x1
0099 e216 | | Load 0x1,0x16
009a 181e | | Execute Package,Field_Execute,Field_Number 0x1e
009b 00d1 | | Pop_Control Pop_Count_1
009c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
009d 0000 0000 | | .XXX[0x3]
009f 0000 | |
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a4 | | .CONST 0x00a4 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0002 | | .CONST 0x0002 ; Number of locals
00a3 INIT_00a0:
00a3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5 = .DEBUG 0x00a3,0x03ec,0x1001,0x0000,0x0033,0x70d4,0x0000,0x003d
; Debug Table 0x5.0x0 = 0xa3,0xffff
00a4 BODY_00a0:
00a4 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1 = 0xa4,0x1
00a5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00a6 4603 |F | Jump_Case 0x4
00a7 780e |x | Jump 0xb6 ; case 0x0
00a8 780d |x | Jump 0xb6 ; case 0x1
00a9 780c |x | Jump 0xb6 ; case 0x2
00aa 7800 |x | Jump 0xab ; case 0x3
00ab 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x2 = 0xab,0x2
00ac e219 | | Load 0x1,0x19
00ad 4802 |H | Short_Literal 0x2
00ae e5ff | | Load 0x2,-0x1
00af 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00b0 0229 | ) | Execute Access,All_Read
00b1 170d | | Execute Task,Entry_Call,Field_Number 0xd
00b2 0059 | Y | Store_Top Discrete,At_Offset_1
00b3 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x3 = 0xb3,0x3
00b4 a5fe | | Store_Unchecked 0x2,-0x2
00b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00b6 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x4 = 0xb6,0x4
00b7 e5ff | | Load 0x2,-0x1
00b8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00b9 e216 | | Load 0x1,0x16
00ba 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00bb 00d1 | | Pop_Control Pop_Count_1
00bc c5fe | | Store 0x2,-0x2
00bd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00be 0000 0000 | | .XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c5 | | .CONST 0x00c5 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0003 | | .CONST 0x0003 ; Number of locals
00c3 INIT_00c0:
00c3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6 = .DEBUG 0x00c3,0x03f8,0x1001,0x0000,0x0033,0x70d4,0x0000,0x0049
; Debug Table 0x6.0x0 = 0xc3,0xffff
00c4 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x1 = 0xc4,0xfffe
00c5 BODY_00c0:
00c5 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x2 = 0xc5,0x1
00c6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00c7 4603 |F | Jump_Case 0x4
00c8 7826 |x& | Jump 0xef ; case 0x0
00c9 7825 |x% | Jump 0xef ; case 0x1
00ca 7824 |x$ | Jump 0xef ; case 0x2
00cb 7800 |x | Jump 0xcc ; case 0x3
00cc 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x3 = 0xcc,0x2
00cd e5ff | | Load 0x2,-0x1
00ce 4802 |H | Short_Literal 0x2
00cf e5fe | | Load 0x2,-0x2
00d0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00d1 0229 | ) | Execute Access,All_Read
00d2 170d | | Execute Task,Entry_Call,Field_Number 0xd
00d3 005a | Z | Store_Top Discrete,At_Offset_2
00d4 7814 |x | Jump 0xe9
00d5 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x4 = 0xd5,0x4
00d6 e5ff | | Load 0x2,-0x1
00d7 01dd | | Execute Vector,First
00d8 00db | | Load_Top At_Offset_3
00d9 0273 | s | Execute Discrete,Plus
00da 0248 | H | Execute Discrete,Check_In_Integer
00db e5ff | | Load 0x2,-0x1
00dc 01dc | | Execute Vector,Last
00dd e5ff | | Load 0x2,-0x1
00de 01cf | | Execute Vector,Slice_Read
00df 4802 |H | Short_Literal 0x2
00e0 e5fe | | Load 0x2,-0x2
00e1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00e2 0229 | ) | Execute Access,All_Read
00e3 170d | | Execute Task,Entry_Call,Field_Number 0xd
00e4 0059 | Y | Store_Top Discrete,At_Offset_1
00e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x5 = 0xe5,0x5
00e6 00d9 | | Load_Top At_Offset_1
00e7 0273 | s | Execute Discrete,Plus
00e8 005a | Z | Store_Top Discrete,At_Offset_2
00e9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x6 = 0xe9,0x3
00ea e5ff | | Load 0x2,-0x1
00eb 01db | | Execute Vector,Length
00ec 027c | | | Execute Discrete,Less
00ed 77e7 |w | Jump_Nonzero 0xd5
00ee 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00ef e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x7 = 0xef,0x6
00f0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f1 e5ff | | Load 0x2,-0x1
00f2 e216 | | Load 0x1,0x16
00f3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00f4 00d1 | | Pop_Control Pop_Count_1
00f5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00f6 0000 0000 | | .XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 4608 |F | Jump_Case 0x9 ; Debug Table 0x7 = .DEBUG 0x00fb,0x040a,0x1005,0x0000,0x0033,0x70d4,0x0000,0x0092
00fc 7808 |x | Jump 0x105 ; case 0x0
00fd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
00fe 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
00ff 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0100 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0101 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
0102 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
0103 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
0104 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
0105 00da | | Load_Top At_Offset_2
0106 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0107 1c00 | | Execute_Immediate Run_Utility,0x0
0108 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0109 0000 0000 | | .BLANK 0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 016d | m | .CONST 0x016d ; Address of begin
0111 0172 | r | .CONST 0x0172 ; Address of exception handler
0112 0004 | | .CONST 0x0004 ; Number of locals
0113 INIT_0110:
0113 6064 |`d | Indirect_Literal Discrete,0x178,{0x00000000, 0x003370f4} ; Debug Table 0x8 = .DEBUG 0x0113,0x040c,0x3801,0x0002,0x0033,0x70f4,0x0000,0x001a
; Debug Table 0x8.0x0 = 0x113,0xffff
0114 483a |H: | Short_Literal 0x3a
0115 4ffc |O | Short_Literal -0x4
0116 4802 |H | Short_Literal 0x2
0117 0099 | | Action Reference_Dynamic
0118 4ffd |O | Short_Literal -0x3
0119 4802 |H | Short_Literal 0x2
011a 0099 | | Action Reference_Dynamic
011b 4818 |H | Short_Literal 0x18
011c 484f |HO | Short_Literal 0x4f
011d 4800 |H | Short_Literal 0x0
011e 4800 |H | Short_Literal 0x0
011f 48ff |H | Short_Literal 0xff
0120 4804 |H | Short_Literal 0x4
0121 e006 | | Load 0x0,0x6
0122 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0123 e006 | | Load 0x0,0x6
0124 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0125 0387 | | Declare_Variable Package
0126 00d8 | | Load_Top At_Offset_0
0127 020f | | Execute Module,Activate
0128 604f |`O | Indirect_Literal Discrete,0x178,{0x00000000, 0x003370f4} ; Debug Table 0x8.0x1 = 0x128,0xfffe
0129 484a |HJ | Short_Literal 0x4a
012a 4ffc |O | Short_Literal -0x4
012b 4802 |H | Short_Literal 0x2
012c 0099 | | Action Reference_Dynamic
012d 00db | | Load_Top At_Offset_3
012e 191c | | Execute Package,Field_Reference,Field_Number 0x1c
012f 48ff |H | Short_Literal 0xff
0130 e006 | | Load 0x0,0x6
0131 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0132 e006 | | Load 0x0,0x6
0133 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0134 0387 | | Declare_Variable Package
0135 00d8 | | Load_Top At_Offset_0
0136 020f | | Execute Module,Activate
0137 6040 |`@ | Indirect_Literal Discrete,0x178,{0x00000000, 0x003370f4} ; Debug Table 0x8.0x2 = 0x137,0xfffd
0138 485c |H\ | Short_Literal 0x5c
0139 e5fe | | Load 0x2,-0x2
013a 0335 | 5 | Declare_Variable Array,Duplicate
013b 00d0 | | Action Swap_Control
013c 00d1 | | Pop_Control Pop_Count_1
013d 4801 |H | Short_Literal 0x1
013e 4801 |H | Short_Literal 0x1
013f e403 | | Load 0x2,0x3
0140 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0141 4ffc |O | Short_Literal -0x4
0142 4802 |H | Short_Literal 0x2
0143 0099 | | Action Reference_Dynamic
0144 e403 | | Load 0x2,0x3
0145 1915 | | Execute Package,Field_Reference,Field_Number 0x15
0146 4ffd |O | Short_Literal -0x3
0147 4802 |H | Short_Literal 0x2
0148 0099 | | Action Reference_Dynamic
0149 e402 | | Load 0x2,0x2
014a 1919 | | Execute Package,Field_Reference,Field_Number 0x19
014b e402 | | Load 0x2,0x2
014c 191a | | Execute Package,Field_Reference,Field_Number 0x1a
014d e402 | | Load 0x2,0x2
014e 191b | | Execute Package,Field_Reference,Field_Number 0x1b
014f e402 | | Load 0x2,0x2
0150 191c | | Execute Package,Field_Reference,Field_Number 0x1c
0151 e402 | | Load 0x2,0x2
0152 191d | | Execute Package,Field_Reference,Field_Number 0x1d
0153 e402 | | Load 0x2,0x2
0154 191e | | Execute Package,Field_Reference,Field_Number 0x1e
0155 e402 | | Load 0x2,0x2
0156 191f | | Execute Package,Field_Reference,Field_Number 0x1f
0157 e402 | | Load 0x2,0x2
0158 1920 | | Execute Package,Field_Reference,Field_Number 0x20
0159 e402 | | Load 0x2,0x2
015a 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
015b e402 | | Load 0x2,0x2
015c 1922 | " | Execute Package,Field_Reference,Field_Number 0x22
015d e402 | | Load 0x2,0x2
015e 1923 | # | Execute Package,Field_Reference,Field_Number 0x23
015f e402 | | Load 0x2,0x2
0160 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24
0161 e402 | | Load 0x2,0x2
0162 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
0163 e402 | | Load 0x2,0x2
0164 1926 | & | Execute Package,Field_Reference,Field_Number 0x26
0165 e402 | | Load 0x2,0x2
0166 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27
0167 e402 | | Load 0x2,0x2
0168 1928 | ( | Execute Package,Field_Reference,Field_Number 0x28
0169 e007 | | Load 0x0,0x7
016a 0387 | | Declare_Variable Package
016b 00d8 | | Load_Top At_Offset_0
016c 020f | | Execute Module,Activate
016d BODY_0110:
016d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x3 = 0x16d,0x1
016e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
016f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x4 = 0x16f,0x2
0170 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0171 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0172 TRAP_0110:
0172 0007 | | Action Break_Optional
0173 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x5 = 0x173,0x3
0174 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0175 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x6 = 0x175,0x4
0176 0101 | | Execute Exception,Reraise
0177 0000 | | .XXX[0x1]
0178 0000 0000 | | .LITERAL {0x00000000, 0x003370f4}
017c 0062 2008 | b | .LITERAL {0x00622008, 0x000018b0}
0180 0000 0000 | | .LITERAL {0x00000000, 0x003370d4}
0184 0000 0000 | | .BLANK 0000[0x4]
0188 01ab 0004 | | .XXX[0x3]
018a 0013 | |
018b 4802 |H | Short_Literal 0x2 ; Debug Table 0x9 = .DEBUG 0x018b,0x041c,0x0000,0x0000,0x0033,0x70d4,0x0000,0x006b
018c 02cb | | Declare_Variable Entry
018d 4802 |H | Short_Literal 0x2
018e 02cb | | Declare_Variable Entry
018f 00bf | | Action Accept_Activation
0190 4801 |H | Short_Literal 0x1 ; Debug Table 0xa = .DEBUG 0x0190,0x041e,0x0000,0x0000,0x0033,0x71f4,0x0000,0x0008
; Debug Table 0xa.0x0 = 0x190,0xffff
0191 609a |` | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00000400}
0192 e001 | | Load 0x0,0x1
0193 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0194 0334 | 4 | Declare_Variable Array,With_Constraint
0195 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x1 = 0x195,0xfffe
0196 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0197 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x2 = 0x197,0xfffd
0198 608f |` | Indirect_Literal Discrete,0x228,{0x00622008, 0x00002330}
0199 02a0 | | Declare_Subprogram Null_Subprogram
019a 037d | } | Declare_Type Task,Defined
019b 036f | o | Declare_Variable Task
019c a002 | | Store_Unchecked 0x0,0x2 ; Debug Table 0xa.0x3 = 0x19c,0xfffc
019d e003 | | Load 0x0,0x3
019e e001 | | Load 0x0,0x1
019f 00b6 | | Action Make_Scope
01a0 e004 | | Load 0x0,0x4
01a1 4805 |H | Short_Literal 0x5
01a2 e211 | | Load 0x1,0x11
01a3 020e | | Execute Module,Augment_Imports
01a4 480d |H | Short_Literal 0xd
01a5 0299 01c3 | | Declare_Subprogram INIT_01c0,For_Accept
01a7 480e |H | Short_Literal 0xe
01a8 0299 01f3 | | Declare_Subprogram INIT_01f0,For_Accept
01aa 00bc | | Action Signal_Activated
01ab 00be | | Action Activate_Tasks
01ac 0007 | | Action Break_Optional ; Debug Table 0xa.0x4 = 0x1ac,0x1
01ad 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0xa.0x5 = 0x1ad,0x2
01ae 1d0d | | Execute_Immediate Reference_Lex_1,0xd
01af 0137 | 7 | Execute Entry,Rendezvous
01b0 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x6 = 0x1b0,0x3
01b1 6807 |h | Jump_Zero 0x1b9
01b2 0007 | | Action Break_Optional ; Debug Table 0xa.0x7 = 0x1b2,0x4
01b3 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0xa.0x8 = 0x1b3,0x5
01b4 1d0e | | Execute_Immediate Reference_Lex_1,0xe
01b5 0137 | 7 | Execute Entry,Rendezvous
01b6 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x9 = 0x1b6,0x6
01b7 6ff5 |o | Jump_Zero 0x1ad
01b8 7ffa | | Jump 0x1b3
01b9 00bb | | Action Signal_Completion
01ba 0000 0000 | | .BLANK 0000[0x6]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 480e |H | Short_Literal 0xe ; Debug Table 0xb = .DEBUG 0x01c3,0x0434,0x0003,0x0000,0x0033,0x71f4,0x0000,0x0181
01c4 0299 0223 | #| Declare_Subprogram INIT_0220,For_Accept
01c6 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x0 = 0x1c6,0x1
01c7 01db | | Execute Vector,Length
01c8 7008 |p | Jump_Nonzero 0x1d1
01c9 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x1 = 0x1c9,0x2
01ca a210 | | Store_Unchecked 0x1,0x10
01cb 4802 |H | Short_Literal 0x2 ; Debug Table 0xb.0x2 = 0x1cb,0x3
01cc 4802 |H | Short_Literal 0x2
01cd 0099 | | Action Reference_Dynamic
01ce 1d0e | | Execute_Immediate Reference_Lex_1,0xe
01cf 0137 | 7 | Execute Entry,Rendezvous
01d0 781c |x | Jump 0x1ed
01d1 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x3 = 0x1d1,0x4
01d2 01db | | Execute Vector,Length
01d3 6058 |`X | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00000400}
01d4 027a | z | Execute Discrete,Less_Equal
01d5 6809 |h | Jump_Zero 0x1df
01d6 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x4 = 0x1d6,0x5
01d7 01db | | Execute Vector,Length
01d8 c210 | | Store 0x1,0x10
01d9 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x5 = 0x1d9,0x6
01da 4801 |H | Short_Literal 0x1
01db e210 | | Load 0x1,0x10
01dc e20f | | Load 0x1,0xf
01dd 01ce | | Execute Vector,Slice_Write
01de 780e |x | Jump 0x1ed
01df 604c |`L | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00000400} ; Debug Table 0xb.0x6 = 0x1df,0x7
01e0 a210 | | Store_Unchecked 0x1,0x10
01e1 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x7 = 0x1e1,0x8
01e2 01dd | | Execute Vector,First
01e3 e5fe | | Load 0x2,-0x2
01e4 01dd | | Execute Vector,First
01e5 e210 | | Load 0x1,0x10
01e6 0273 | s | Execute Discrete,Plus
01e7 0aff | | Execute_Immediate Plus,-0x1
01e8 0248 | H | Execute Discrete,Check_In_Integer
01e9 e5fe | | Load 0x2,-0x2
01ea 01cf | | Execute Vector,Slice_Read
01eb e20f | | Load 0x1,0xf
01ec 01d4 | | Execute Vector,Structure_Write
01ed e210 | | Load 0x1,0x10 ; Debug Table 0xb.0x8 = 0x1ed,0x9
01ee a5fd | | Store_Unchecked 0x2,-0x3
01ef 4101 |A | End_Rendezvous 0x1
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3 | | .CONST 0x01f3 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0001 | | .CONST 0x0001 ; Number of locals
01f3 BODY_01f0:
01f3 INIT_01f0:
01f3 00db | | Load_Top At_Offset_3 ; Debug Table 0xc = .DEBUG 0x01f3,0x0448,0x0003,0x0000,0x0033,0x71f4,0x0000,0x01d5
; Debug Table 0xc.0x0 = 0x1f3,0x1
01f4 01db | | Execute Vector,Length
01f5 e210 | | Load 0x1,0x10
01f6 027a | z | Execute Discrete,Less_Equal
01f7 6810 |h | Jump_Zero 0x208
01f8 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x1 = 0x1f8,0x2
01f9 e5fe | | Load 0x2,-0x2
01fa 01db | | Execute Vector,Length
01fb e20f | | Load 0x1,0xf
01fc 01cf | | Execute Vector,Slice_Read
01fd e5fe | | Load 0x2,-0x2
01fe 01d4 | | Execute Vector,Structure_Write
01ff 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x2 = 0x1ff,0x3
0200 01db | | Execute Vector,Length
0201 c5fd | | Store 0x2,-0x3
0202 e210 | | Load 0x1,0x10 ; Debug Table 0xc.0x3 = 0x202,0x4
0203 e5fe | | Load 0x2,-0x2
0204 01db | | Execute Vector,Length
0205 0272 | r | Execute Discrete,Minus
0206 c210 | | Store 0x1,0x10
0207 4102 |A | End_Rendezvous 0x2
0208 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x4 = 0x208,0x5
0209 e210 | | Load 0x1,0x10
020a e20f | | Load 0x1,0xf
020b 01cf | | Execute Vector,Slice_Read
020c e5fe | | Load 0x2,-0x2
020d 01dd | | Execute Vector,First
020e e5fe | | Load 0x2,-0x2
020f 01dd | | Execute Vector,First
0210 e210 | | Load 0x1,0x10
0211 0273 | s | Execute Discrete,Plus
0212 0aff | | Execute_Immediate Plus,-0x1
0213 0248 | H | Execute Discrete,Check_In_Integer
0214 e5fe | | Load 0x2,-0x2
0215 01ce | | Execute Vector,Slice_Write
0216 e210 | | Load 0x1,0x10 ; Debug Table 0xc.0x5 = 0x216,0x6
0217 a5fd | | Store_Unchecked 0x2,-0x3
0218 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x6 = 0x218,0x7
0219 a210 | | Store_Unchecked 0x1,0x10
021a 4102 |A | End_Rendezvous 0x2
021b 0000 0000 | | .BLANK 0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 4800 |H | Short_Literal 0x0 ; Debug Table 0xd = .DEBUG 0x0223,0x0458,0x0003,0x0000,0x0033,0x71f4,0x0000,0x0142
; Debug Table 0xd.0x0 = 0x223,0x1
0224 a7fd | | Store_Unchecked 0x3,-0x3
0225 4102 |A | End_Rendezvous 0x2
0226 0000 0000 | | .XXX[0x2]
0228 0062 2008 | b | .LITERAL {0x00622008, 0x00002330}
022c 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
0230 024b 0251 | K Q| .XXX[0x3]
0232 0017 | |
0233 00bf | | Action Accept_Activation ; Debug Table 0xe = .DEBUG 0x0233,0x045c,0x0000,0x0000,0x0033,0x71f4,0x0000,0x001a
0234 4801 |H | Short_Literal 0x1 ; Debug Table 0xf = .DEBUG 0x0234,0x045e,0x0000,0x0000,0x0033,0x71f4,0x0000,0x001e
; Debug Table 0xf.0x0 = 0x234,0xffff
0235 67f6 |g | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00000400}
0236 00e9 | | Load_Encached String_Cache
0237 0334 | 4 | Declare_Variable Array,With_Constraint
0238 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xf.0x1 = 0x238,0xffff
0239 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
023a 0007 | | Action Break_Optional ; Debug Table 0xf.0x2 = 0x23a,0xffff
023b 029d 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call ; Debug Table 0xf.0x3 = 0x23b,0xffff
023d 029d 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call ; Debug Table 0xf.0x4 = 0x23d,0xffff
023f 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call ; Debug Table 0xf.0x5 = 0x23f,0xffff
0241 a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0xf.0x6 = 0x241,0xffff
0242 00c6 | | Action Check_Subprogram_Elaborated
0243 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0244 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0245 0092 02f0 | | Action Push_String_Extended,0x2f0 ; "EEDB"
0247 60a4 |` | Indirect_Literal Discrete,0x2ec,{0x00000000, 0x003371f4}
0248 4901 |I | Short_Literal 0x101
0249 4800 |H | Short_Literal 0x0
024a 00bc | | Action Signal_Activated
024b 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0xf.0x7 = 0x24b,0x1
024c 1d13 | | Execute_Immediate Reference_Lex_1,0x13
024d e214 | | Load 0x1,0x14
024e 1d15 | | Execute_Immediate Reference_Lex_1,0x15
024f 8001 | | Call 0x0,0x1
0250 00bb | | Action Signal_Completion
0251 00d8 0107 | | .XXX[0x6]
0253 4950 495f |IPI_|
0255 0262 6801 | bh |
0257 00bb | | Action Signal_Completion ; Debug Table 0xf.0x8 = 0x257,0x1
0258 0100 | | .XXX[0x1]
0259 0000 0000 | | .BLANK 0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0269 | i | .CONST 0x0269 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0004 | | .CONST 0x0004 ; Number of locals
0263 INIT_0260:
0263 029f 029b | | Declare_Subprogram INIT_0298,For_Call ; Debug Table 0x10 = .DEBUG 0x0263,0x0472,0x0002,0x0000,0x0033,0x71f4,0x0000,0x0035
; Debug Table 0x10.0x0 = 0x263,0xffff
0265 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
0267 029f 02db | | Declare_Subprogram INIT_02d8,For_Call
0269 BODY_0260:
0269 e20e | | Load 0x1,0xe ; Debug Table 0x10.0x1 = 0x269,0x1
026a 7001 |p | Jump_Nonzero 0x26c
026b 8402 | | Call 0x2,0x2 ; Debug Table 0x10.0x2 = 0x26b,0x1
026c e20e | | Load 0x1,0xe ; Debug Table 0x10.0x3 = 0x26c,0x1
026d 4801 |H | Short_Literal 0x1
026e 0263 | c | Execute Discrete,Above_Bound
026f 7007 |p | Jump_Nonzero 0x277
0270 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x4 = 0x270,0x1
0271 e20d | | Load 0x1,0xd
0272 01d7 | | Execute Vector,Field_Read
0273 0f0a | | Execute_Immediate Equal,0xa
0274 6801 |h | Jump_Zero 0x276
0275 8403 | | Call 0x2,0x3 ; Debug Table 0x10.0x5 = 0x275,0x1
0276 3ff9 |? | Loop_Increasing 0x270
0277 8404 | | Call 0x2,0x4 ; Debug Table 0x10.0x6 = 0x277,0x1
0278 4831 |H1 | Short_Literal 0x31
0279 0257 | W | Execute Discrete,Raise
027a 0000 0000 | | .BLANK 0000[0x6]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0284 | | .CONST 0x0284 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0002 | | .CONST 0x0002 ; Number of locals
0283 INIT_0280:
0283 820f | | Call 0x1,0xf ; Debug Table 0x11 = .DEBUG 0x0283,0x0482,0x0002,0x0000,0x0033,0x71f4,0x0000,0x00d3
; Debug Table 0x11.0x0 = 0x283,0xffff
0284 BODY_0280:
0284 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x1 = 0x284,0x1
0285 00d9 | | Load_Top At_Offset_1
0286 01cc | | Execute Vector,Catenate
0287 e002 | | Load 0x0,0x2
0288 180f | | Execute Package,Field_Execute,Field_Number 0xf
0289 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x289,0x1
028a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
028b 0000 0000 | | .BLANK 0000[0x5]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 00da | | Load_Top At_Offset_2 ; Debug Table 0x12 = .DEBUG 0x0293,0x048a,0x0001,0x0000,0x0033,0x71f4,0x0000,0x00f0
; Debug Table 0x12.0x0 = 0x293,0x1
0294 e002 | | Load 0x0,0x2
0295 180f | | Execute Package,Field_Execute,Field_Number 0xf
0296 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x12.0x1 = 0x296,0x1
0297 0000 | | .XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a1 | | .CONST 0x02a1 ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0002 | | .CONST 0x0002 ; Number of locals
029b INIT_0298:
029b e20d | | Load 0x1,0xd ; Debug Table 0x13 = .DEBUG 0x029b,0x0490,0x0004,0x0000,0x0033,0x71f4,0x0000,0x0074
; Debug Table 0x13.0x0 = 0x29b,0xffff
029c 01da | | Execute Vector,Bounds
029d e003 | | Load 0x0,0x3
029e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
029f 035b | [ | Declare_Type Array,Constrained
02a0 0337 | 7 | Declare_Variable Array
02a1 BODY_0298:
02a1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x13.0x1 = 0x2a1,0x1
02a2 00d9 | | Load_Top At_Offset_1
02a3 4802 |H | Short_Literal 0x2
02a4 e004 | | Load 0x0,0x4
02a5 170e | | Execute Task,Entry_Call,Field_Number 0xe
02a6 00d1 | | Pop_Control Pop_Count_1
02a7 c20e | | Store 0x1,0xe
02a8 e20e | | Load 0x1,0xe ; Debug Table 0x13.0x2 = 0x2a8,0x1
02a9 7002 |p | Jump_Nonzero 0x2ac
02aa 4950 |IP | Short_Literal 0x150 ; Debug Table 0x13.0x3 = 0x2aa,0x1
02ab 0257 | W | Execute Discrete,Raise
02ac 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x4 = 0x2ac,0x1
02ad e20e | | Load 0x1,0xe
02ae 00da | | Load_Top At_Offset_2
02af 01cf | | Execute Vector,Slice_Read
02b0 e005 | | Load 0x0,0x5
02b1 180d | | Execute Package,Field_Execute,Field_Number 0xd
02b2 4801 |H | Short_Literal 0x1
02b3 e20e | | Load 0x1,0xe
02b4 e20d | | Load 0x1,0xd
02b5 01ce | | Execute Vector,Slice_Write
02b6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02b7 0000 | | .XXX[0x1]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c4 | | .CONST 0x02c4 ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0002 | | .CONST 0x0002 ; Number of locals
02bb INIT_02b8:
02bb 4801 |H | Short_Literal 0x1 ; Debug Table 0x14 = .DEBUG 0x02bb,0x049c,0x0004,0x0000,0x0033,0x71f4,0x0000,0x00b2
; Debug Table 0x14.0x0 = 0x2bb,0xffff
02bc e406 | | Load 0x2,0x6
02bd 0aff | | Execute_Immediate Plus,-0x1
02be 0248 | H | Execute Discrete,Check_In_Integer
02bf e20d | | Load 0x1,0xd
02c0 01cf | | Execute Vector,Slice_Read
02c1 0335 | 5 | Declare_Variable Array,Duplicate
02c2 00d0 | | Action Swap_Control
02c3 00d1 | | Pop_Control Pop_Count_1
02c4 BODY_02b8:
02c4 e406 | | Load 0x2,0x6 ; Debug Table 0x14.0x1 = 0x2c4,0x1
02c5 0a01 | | Execute_Immediate Plus,0x1
02c6 0248 | H | Execute Discrete,Check_In_Integer
02c7 e20e | | Load 0x1,0xe
02c8 e20d | | Load 0x1,0xd
02c9 01cf | | Execute Vector,Slice_Read
02ca 4801 |H | Short_Literal 0x1
02cb e20e | | Load 0x1,0xe
02cc e406 | | Load 0x2,0x6
02cd 0272 | r | Execute Discrete,Minus
02ce 0248 | H | Execute Discrete,Check_In_Integer
02cf e20d | | Load 0x1,0xd
02d0 01ce | | Execute Vector,Slice_Write
02d1 e20e | | Load 0x1,0xe ; Debug Table 0x14.0x2 = 0x2d1,0x1
02d2 e406 | | Load 0x2,0x6
02d3 0272 | r | Execute Discrete,Minus
02d4 c20e | | Store 0x1,0xe
02d5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x3 = 0x2d5,0x1
02d6 00cb | | Action Pop_Block_With_Result
02d7 00ca | | Action Exit_Nullary_Function
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e2 | | .CONST 0x02e2 ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0002 | | .CONST 0x0002 ; Number of locals
02db INIT_02d8:
02db 4801 |H | Short_Literal 0x1 ; Debug Table 0x15 = .DEBUG 0x02db,0x04a6,0x0004,0x0000,0x0033,0x71f4,0x0000,0x00ce
; Debug Table 0x15.0x0 = 0x2db,0xffff
02dc e20e | | Load 0x1,0xe
02dd e20d | | Load 0x1,0xd
02de 01cf | | Execute Vector,Slice_Read
02df 0335 | 5 | Declare_Variable Array,Duplicate
02e0 00d0 | | Action Swap_Control
02e1 00d1 | | Pop_Control Pop_Count_1
02e2 BODY_02d8:
02e2 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x1 = 0x2e2,0x1
02e3 a20e | | Store_Unchecked 0x1,0xe
02e4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x2 = 0x2e4,0x1
02e5 820f | | Call 0x1,0xf
02e6 01cc | | Execute Vector,Catenate
02e7 00cb | | Action Pop_Block_With_Result
02e8 00ca | | Action Exit_Nullary_Function
02e9 0000 0000 | | .XXX[0x3]
02eb 0000 | |
02ec 0000 0000 | | .LITERAL {0x00000000, 0x003371f4}
02f0 ; --------------------------------------------------------------------------------------
02f0 ; STRING TABLE
02f0 ; --------------------------------------------------------------------------------------
02f0 0004 | | .STRTAB 0x0004->0x02f2 ; "EEDB"
02f1 0006 | | .STREND 0x0006->0x02f4
02f2 4545 4442 |EEDB| .STRTAB_STRINGS
02f4 0000 0000 | | .BLANK 0000[0x4]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; Debug Table
02f8 ; --------------------------------------------------------------------------------------
02f8 0003 0016 | | .CONST 0x0003,0x0016
02fa 000b 03aa | | .DEBUG 0x000b,0x03aa,0xc000,0x0000,0x0033,0x70d4,0x0000,0x0010
0302 0040 03c2 | @ | .DEBUG 0x0040,0x03c2,0xc000,0x0000,0x0033,0x70f4,0x0000,0x0009
030a 006b 03d6 | k | .DEBUG 0x006b,0x03d6,0x1002,0x0000,0x0033,0x70d4,0x0000,0x001b
0312 0073 03da | s | .DEBUG 0x0073,0x03da,0x1002,0x0000,0x0033,0x70d4,0x0000,0x0024
031a 007b 03de | { | .DEBUG 0x007b,0x03de,0x1001,0x0000,0x0033,0x70d4,0x0000,0x0031
0322 00a3 03ec | | .DEBUG 0x00a3,0x03ec,0x1001,0x0000,0x0033,0x70d4,0x0000,0x003d
032a 00c3 03f8 | | .DEBUG 0x00c3,0x03f8,0x1001,0x0000,0x0033,0x70d4,0x0000,0x0049
0332 00fb 040a | | .DEBUG 0x00fb,0x040a,0x1005,0x0000,0x0033,0x70d4,0x0000,0x0092
033a 0113 040c | | .DEBUG 0x0113,0x040c,0x3801,0x0002,0x0033,0x70f4,0x0000,0x001a
0342 018b 041c | | .DEBUG 0x018b,0x041c,0x0000,0x0000,0x0033,0x70d4,0x0000,0x006b
034a 0190 041e | | .DEBUG 0x0190,0x041e,0x0000,0x0000,0x0033,0x71f4,0x0000,0x0008
0352 01c3 0434 | 4| .DEBUG 0x01c3,0x0434,0x0003,0x0000,0x0033,0x71f4,0x0000,0x0181
035a 01f3 0448 | H| .DEBUG 0x01f3,0x0448,0x0003,0x0000,0x0033,0x71f4,0x0000,0x01d5
0362 0223 0458 | # X| .DEBUG 0x0223,0x0458,0x0003,0x0000,0x0033,0x71f4,0x0000,0x0142
036a 0233 045c | 3 \| .DEBUG 0x0233,0x045c,0x0000,0x0000,0x0033,0x71f4,0x0000,0x001a
0372 0234 045e | 4 ^| .DEBUG 0x0234,0x045e,0x0000,0x0000,0x0033,0x71f4,0x0000,0x001e
037a 0263 0472 | c r| .DEBUG 0x0263,0x0472,0x0002,0x0000,0x0033,0x71f4,0x0000,0x0035
0382 0283 0482 | | .DEBUG 0x0283,0x0482,0x0002,0x0000,0x0033,0x71f4,0x0000,0x00d3
038a 0293 048a | | .DEBUG 0x0293,0x048a,0x0001,0x0000,0x0033,0x71f4,0x0000,0x00f0
0392 029b 0490 | | .DEBUG 0x029b,0x0490,0x0004,0x0000,0x0033,0x71f4,0x0000,0x0074
039a 02bb 049c | | .DEBUG 0x02bb,0x049c,0x0004,0x0000,0x0033,0x71f4,0x0000,0x00b2
03a2 02db 04a6 | | .DEBUG 0x02db,0x04a6,0x0004,0x0000,0x0033,0x71f4,0x0000,0x00ce
03aa ; --------------------------------------------------------------------------------------
03aa ; Debug3 Subtable 0x0
03aa ; --------------------------------------------------------------------------------------
03aa 000b 0000 | | .DBG3TAB 0x000b,0x0000
03ac 000b ffff | | .CONST 0x000b,0xffff
03ae 000d fffe | | .CONST 0x000d,0xfffe
03b0 000f fffd | | .CONST 0x000f,0xfffd
03b2 0011 fffc | | .CONST 0x0011,0xfffc
03b4 0013 fffb | | .CONST 0x0013,0xfffb
03b6 0015 fffa | | .CONST 0x0015,0xfffa
03b8 0017 fff9 | | .CONST 0x0017,0xfff9
03ba 0018 fff8 | | .CONST 0x0018,0xfff8
03bc 002e fff7 | . | .CONST 0x002e,0xfff7
03be 0032 fff6 | 2 | .CONST 0x0032,0xfff6
03c0 0036 fff5 | 6 | .CONST 0x0036,0xfff5
03c2 ; --------------------------------------------------------------------------------------
03c2 ; Debug3 Subtable 0x1
03c2 ; --------------------------------------------------------------------------------------
03c2 0009 0000 | | .DBG3TAB 0x0009,0x0000
03c4 0040 ffff | @ | .CONST 0x0040,0xffff
03c6 004c fffe | L | .CONST 0x004c,0xfffe
03c8 004e fffd | N | .CONST 0x004e,0xfffd
03ca 0050 fffc | P | .CONST 0x0050,0xfffc
03cc 005a fffb | Z | .CONST 0x005a,0xfffb
03ce 005c fffa | \ | .CONST 0x005c,0xfffa
03d0 005e fff9 | ^ | .CONST 0x005e,0xfff9
03d2 0060 fff8 | ` | .CONST 0x0060,0xfff8
03d4 0062 fff7 | b | .CONST 0x0062,0xfff7
03d6 ; --------------------------------------------------------------------------------------
03d6 ; Debug3 Subtable 0x2
03d6 ; --------------------------------------------------------------------------------------
03d6 0000 0001 | | .DBG3TAB 0x0000,0x0001
03d8 006b 0001 | k | .CONST 0x006b,0x0001
03da ; --------------------------------------------------------------------------------------
03da ; Debug3 Subtable 0x3
03da ; --------------------------------------------------------------------------------------
03da 0000 0001 | | .DBG3TAB 0x0000,0x0001
03dc 0073 0001 | s | .CONST 0x0073,0x0001
03de ; --------------------------------------------------------------------------------------
03de ; Debug3 Subtable 0x4
03de ; --------------------------------------------------------------------------------------
03de 0000 0006 | | .DBG3TAB 0x0000,0x0006
03e0 007b 0001 | { | .CONST 0x007b,0x0001
03e2 007e 0002 | ~ | .CONST 0x007e,0x0002
03e4 0080 0003 | | .CONST 0x0080,0x0003
03e6 0085 0004 | | .CONST 0x0085,0x0004
03e8 008c 0005 | | .CONST 0x008c,0x0005
03ea 0094 0006 | | .CONST 0x0094,0x0006
03ec ; --------------------------------------------------------------------------------------
03ec ; Debug3 Subtable 0x5
03ec ; --------------------------------------------------------------------------------------
03ec 0001 0004 | | .DBG3TAB 0x0001,0x0004
03ee 00a3 ffff | | .CONST 0x00a3,0xffff
03f0 00a4 0001 | | .CONST 0x00a4,0x0001
03f2 00ab 0002 | | .CONST 0x00ab,0x0002
03f4 00b3 0003 | | .CONST 0x00b3,0x0003
03f6 00b6 0004 | | .CONST 0x00b6,0x0004
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug3 Subtable 0x6
03f8 ; --------------------------------------------------------------------------------------
03f8 0002 0006 | | .DBG3TAB 0x0002,0x0006
03fa 00c3 ffff | | .CONST 0x00c3,0xffff
03fc 00c4 fffe | | .CONST 0x00c4,0xfffe
03fe 00c5 0001 | | .CONST 0x00c5,0x0001
0400 00cc 0002 | | .CONST 0x00cc,0x0002
0402 00d5 0004 | | .CONST 0x00d5,0x0004
0404 00e5 0005 | | .CONST 0x00e5,0x0005
0406 00e9 0003 | | .CONST 0x00e9,0x0003
0408 00ef 0006 | | .CONST 0x00ef,0x0006
040a ; --------------------------------------------------------------------------------------
040a ; Debug3 Subtable 0x7
040a ; --------------------------------------------------------------------------------------
040a 0000 0000 | | .DBG3TAB 0x0000,0x0000
040c ; --------------------------------------------------------------------------------------
040c ; Debug3 Subtable 0x8
040c ; --------------------------------------------------------------------------------------
040c 0003 0004 | | .DBG3TAB 0x0003,0x0004
040e 0113 ffff | | .CONST 0x0113,0xffff
0410 0128 fffe | ( | .CONST 0x0128,0xfffe
0412 0137 fffd | 7 | .CONST 0x0137,0xfffd
0414 016d 0001 | m | .CONST 0x016d,0x0001
0416 016f 0002 | o | .CONST 0x016f,0x0002
0418 0173 0003 | s | .CONST 0x0173,0x0003
041a 0175 0004 | u | .CONST 0x0175,0x0004
041c ; --------------------------------------------------------------------------------------
041c ; Debug3 Subtable 0x9
041c ; --------------------------------------------------------------------------------------
041c 0000 0000 | | .DBG3TAB 0x0000,0x0000
041e ; --------------------------------------------------------------------------------------
041e ; Debug3 Subtable 0xa
041e ; --------------------------------------------------------------------------------------
041e 0004 0006 | | .DBG3TAB 0x0004,0x0006
0420 0190 ffff | | .CONST 0x0190,0xffff
0422 0195 fffe | | .CONST 0x0195,0xfffe
0424 0197 fffd | | .CONST 0x0197,0xfffd
0426 019c fffc | | .CONST 0x019c,0xfffc
0428 01ac 0001 | | .CONST 0x01ac,0x0001
042a 01ad 0002 | | .CONST 0x01ad,0x0002
042c 01b0 0003 | | .CONST 0x01b0,0x0003
042e 01b2 0004 | | .CONST 0x01b2,0x0004
0430 01b3 0005 | | .CONST 0x01b3,0x0005
0432 01b6 0006 | | .CONST 0x01b6,0x0006
0434 ; --------------------------------------------------------------------------------------
0434 ; Debug3 Subtable 0xb
0434 ; --------------------------------------------------------------------------------------
0434 0000 0009 | | .DBG3TAB 0x0000,0x0009
0436 01c6 0001 | | .CONST 0x01c6,0x0001
0438 01c9 0002 | | .CONST 0x01c9,0x0002
043a 01cb 0003 | | .CONST 0x01cb,0x0003
043c 01d1 0004 | | .CONST 0x01d1,0x0004
043e 01d6 0005 | | .CONST 0x01d6,0x0005
0440 01d9 0006 | | .CONST 0x01d9,0x0006
0442 01df 0007 | | .CONST 0x01df,0x0007
0444 01e1 0008 | | .CONST 0x01e1,0x0008
0446 01ed 0009 | | .CONST 0x01ed,0x0009
0448 ; --------------------------------------------------------------------------------------
0448 ; Debug3 Subtable 0xc
0448 ; --------------------------------------------------------------------------------------
0448 0000 0007 | | .DBG3TAB 0x0000,0x0007
044a 01f3 0001 | | .CONST 0x01f3,0x0001
044c 01f8 0002 | | .CONST 0x01f8,0x0002
044e 01ff 0003 | | .CONST 0x01ff,0x0003
0450 0202 0004 | | .CONST 0x0202,0x0004
0452 0208 0005 | | .CONST 0x0208,0x0005
0454 0216 0006 | | .CONST 0x0216,0x0006
0456 0218 0007 | | .CONST 0x0218,0x0007
0458 ; --------------------------------------------------------------------------------------
0458 ; Debug3 Subtable 0xd
0458 ; --------------------------------------------------------------------------------------
0458 0000 0001 | | .DBG3TAB 0x0000,0x0001
045a 0223 0001 | # | .CONST 0x0223,0x0001
045c ; --------------------------------------------------------------------------------------
045c ; Debug3 Subtable 0xe
045c ; --------------------------------------------------------------------------------------
045c 0000 0000 | | .DBG3TAB 0x0000,0x0000
045e ; --------------------------------------------------------------------------------------
045e ; Debug3 Subtable 0xf
045e ; --------------------------------------------------------------------------------------
045e 0007 0002 | | .DBG3TAB 0x0007,0x0002
0460 0234 ffff | 4 | .CONST 0x0234,0xffff
0462 0238 ffff | 8 | .CONST 0x0238,0xffff
0464 023a ffff | : | .CONST 0x023a,0xffff
0466 023b ffff | ; | .CONST 0x023b,0xffff
0468 023d ffff | = | .CONST 0x023d,0xffff
046a 023f ffff | ? | .CONST 0x023f,0xffff
046c 0241 ffff | A | .CONST 0x0241,0xffff
046e 024b 0001 | K | .CONST 0x024b,0x0001
0470 0257 0001 | W | .CONST 0x0257,0x0001
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug3 Subtable 0x10
0472 ; --------------------------------------------------------------------------------------
0472 0001 0006 | | .DBG3TAB 0x0001,0x0006
0474 0263 ffff | c | .CONST 0x0263,0xffff
0476 0269 0001 | i | .CONST 0x0269,0x0001
0478 026b 0001 | k | .CONST 0x026b,0x0001
047a 026c 0001 | l | .CONST 0x026c,0x0001
047c 0270 0001 | p | .CONST 0x0270,0x0001
047e 0275 0001 | u | .CONST 0x0275,0x0001
0480 0277 0001 | w | .CONST 0x0277,0x0001
0482 ; --------------------------------------------------------------------------------------
0482 ; Debug3 Subtable 0x11
0482 ; --------------------------------------------------------------------------------------
0482 0001 0002 | | .DBG3TAB 0x0001,0x0002
0484 0283 ffff | | .CONST 0x0283,0xffff
0486 0284 0001 | | .CONST 0x0284,0x0001
0488 0289 0001 | | .CONST 0x0289,0x0001
048a ; --------------------------------------------------------------------------------------
048a ; Debug3 Subtable 0x12
048a ; --------------------------------------------------------------------------------------
048a 0000 0002 | | .DBG3TAB 0x0000,0x0002
048c 0293 0001 | | .CONST 0x0293,0x0001
048e 0296 0001 | | .CONST 0x0296,0x0001
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug3 Subtable 0x13
0490 ; --------------------------------------------------------------------------------------
0490 0001 0004 | | .DBG3TAB 0x0001,0x0004
0492 029b ffff | | .CONST 0x029b,0xffff
0494 02a1 0001 | | .CONST 0x02a1,0x0001
0496 02a8 0001 | | .CONST 0x02a8,0x0001
0498 02aa 0001 | | .CONST 0x02aa,0x0001
049a 02ac 0001 | | .CONST 0x02ac,0x0001
049c ; --------------------------------------------------------------------------------------
049c ; Debug3 Subtable 0x14
049c ; --------------------------------------------------------------------------------------
049c 0001 0003 | | .DBG3TAB 0x0001,0x0003
049e 02bb ffff | | .CONST 0x02bb,0xffff
04a0 02c4 0001 | | .CONST 0x02c4,0x0001
04a2 02d1 0001 | | .CONST 0x02d1,0x0001
04a4 02d5 0001 | | .CONST 0x02d5,0x0001
04a6 ; --------------------------------------------------------------------------------------
04a6 ; Debug3 Subtable 0x15
04a6 ; --------------------------------------------------------------------------------------
04a6 0001 0002 | | .DBG3TAB 0x0001,0x0002
04a8 02db ffff | | .CONST 0x02db,0xffff
04aa 02e2 0001 | | .CONST 0x02e2,0x0001
04ac 02e4 0001 | | .CONST 0x02e4,0x0001
04ae 0000 0000 | | .BLANK 0000[0x152]