|
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_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 03f8 | | .CONST 0x03f8 ; 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 00ce | | .CONST 0x00ce ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0031 | 1 | .CONST 0x0031 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x0472,0x8000,0x0000,0x0059,0xed05,0x0000,0x0011
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
000d 0129 | ) | Execute Any,Make_Visible
000e e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0010 0129 | ) | Execute Any,Make_Visible
0011 e003 | | Load 0x0,0x3 ; Debug Table 0x0.0x2 = 0x11,0xfffd
0012 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0013 0129 | ) | Execute Any,Make_Visible
0014 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x3 = 0x14,0xfffc
0015 e004 | | Load 0x0,0x4
0016 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0017 e005 | | Load 0x0,0x5
0018 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0019 e006 | | Load 0x0,0x6
001a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
001b 00e1 | | Load_Encached Boolean_Cache
001c 029f 00d3 | | Declare_Subprogram INIT_00d0,For_Call
001e 4805 |H | Short_Literal 0x5
001f 032e | . | Declare_Type Record,Defined,Visible
0020 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x20,0xfffb
0022 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x22,0xfffa
0024 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x24,0xfff9
0026 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x26,0xfff8
0028 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x28,0xfff7
002a 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x2a,0xfff6
002c 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x2c,0xfff5
002e 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x2e,0xfff4
0030 00bf | | Action Accept_Activation
0031 e007 | | Load 0x0,0x7 ; Debug Table 0x1 = .DEBUG 0x0031,0x048c,0x8000,0x0000,0x0059,0xee05,0x0000,0x001b
; Debug Table 0x1.0x0 = 0x31,0xffff
0032 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0033 e007 | | Load 0x0,0x7 ; Debug Table 0x1.0x1 = 0x33,0xfffe
0034 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0035 e007 | | Load 0x0,0x7 ; Debug Table 0x1.0x2 = 0x35,0xfffd
0036 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0037 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x37,0xfffc
0038 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x38,0xfffb
0039 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x39,0xfffa
003a 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x6 = 0x3a,0xfff9
003b 481a |H | Short_Literal 0x1a
003c 00e9 | | Load_Encached String_Cache
003d 0334 | 4 | Declare_Variable Array,With_Constraint
003e 52d9 |R | Indirect_Literal Any,0x318,{0x54686973, 0x20697320}
003f 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x3f,0xfff8
0040 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x8 = 0x40,0xfff7
0041 481a |H | Short_Literal 0x1a
0042 00e9 | | Load_Encached String_Cache
0043 035b | [ | Declare_Type Array,Constrained
0044 00e3 | | Load_Encached Natural_Cache
0045 e20e | | Load 0x1,0xe
0046 e008 | | Load 0x0,0x8
0047 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0048 e008 | | Load 0x0,0x8
0049 1b17 | | Execute Package,Field_Read,Field_Number 0x17
004a 00e2 | | Load_Encached Integer_Cache
004b 00e2 | | Load_Encached Integer_Cache
004c 00e2 | | Load_Encached Integer_Cache
004d 00e2 | | Load_Encached Integer_Cache
004e 00e2 | | Load_Encached Integer_Cache
004f 00e2 | | Load_Encached Integer_Cache
0050 029f 0353 | S| Declare_Subprogram INIT_0350,For_Call
0052 480b |H | Short_Literal 0xb
0053 032d | - | Declare_Type Record,Defined
0054 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x9 = 0x54,0xfff6
0055 02a0 | | Declare_Subprogram Null_Subprogram
0056 03ad | | Declare_Type Heap_Access,Defined
0057 0007 | | Action Break_Optional ; Debug Table 0x1.0xa = 0x57,0xfff5
0058 62bb |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05} ; Debug Table 0x1.0xb = 0x58,0xfff4
0059 48d8 |H | Short_Literal 0xd8
005a 00db | | Load_Top At_Offset_3
005b 00db | | Load_Top At_Offset_3
005c e006 | | Load 0x0,0x6
005d 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
005e 0387 | | Declare_Variable Package
005f 00d8 | | Load_Top At_Offset_0
0060 020f | | Execute Module,Activate
0061 62b2 |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05} ; Debug Table 0x1.0xc = 0x61,0xfff3
0062 48e1 |H | Short_Literal 0xe1
0063 e21d | | Load 0x1,0x1d
0064 e006 | | Load 0x0,0x6
0065 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
0066 0387 | | Declare_Variable Package
0067 00d8 | | Load_Top At_Offset_0
0068 020f | | Execute Module,Activate
0069 029d 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call ; Debug Table 0x1.0xd = 0x69,0xfff2
006b 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call ; Debug Table 0x1.0xe = 0x6b,0xfff1
006d 62a6 |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05} ; Debug Table 0x1.0xf = 0x6d,0xfff0
006e 4988 |I | Short_Literal 0x188
006f e219 | | Load 0x1,0x19
0070 0335 | 5 | Declare_Variable Array,Duplicate
0071 00d0 | | Action Swap_Control
0072 00d1 | | Pop_Control Pop_Count_1
0073 e21b | | Load 0x1,0x1b
0074 00d8 | | Load_Top At_Offset_0
0075 0120 | | Execute Any,Is_Value
0076 7002 |p | Jump_Nonzero 0x79
0077 00d8 | | Load_Top At_Offset_0
0078 011e | | Execute Any,Convert
0079 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
007a e002 | | Load 0x0,0x2
007b 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
007c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
007d 0387 | | Declare_Variable Package
007e 00d8 | | Load_Top At_Offset_0
007f 020f | | Execute Module,Activate
0080 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x10 = 0x80,0xffef
0081 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0082 e21a | | Load 0x1,0x1a
0083 027f | | Execute Discrete,Equal
0084 7002 |p | Jump_Nonzero 0x87
0085 4887 |H | Short_Literal 0x87
0086 0257 | W | Execute Discrete,Raise
0087 029d 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call ; Debug Table 0x1.0x11 = 0x87,0xffee
0089 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x12 = 0x89,0xffed
008a 00c7 | | Action Elaborate_Subprogram
008b 6288 |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05} ; Debug Table 0x1.0x13 = 0x8b,0xffec
008c 4a2c |J, | Short_Literal 0x22c
008d e21d | | Load 0x1,0x1d
008e e21e | | Load 0x1,0x1e
008f e009 | | Load 0x0,0x9
0090 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0091 0387 | | Declare_Variable Package
0092 00d8 | | Load_Top At_Offset_0
0093 020f | | Execute Module,Activate
0094 627f |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05} ; Debug Table 0x1.0x14 = 0x94,0xffeb
0095 4a35 |J5 | Short_Literal 0x235
0096 e004 | | Load 0x0,0x4
0097 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0098 e004 | | Load 0x0,0x4
0099 1b10 | | Execute Package,Field_Read,Field_Number 0x10
009a e009 | | Load 0x0,0x9
009b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
009c 0387 | | Declare_Variable Package
009d 00d8 | | Load_Top At_Offset_0
009e 020f | | Execute Module,Activate
009f 6274 |bt | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05} ; Debug Table 0x1.0x15 = 0x9f,0xffea
00a0 4a42 |JB | Short_Literal 0x242
00a1 e005 | | Load 0x0,0x5
00a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a3 e005 | | Load 0x0,0x5
00a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00a5 e009 | | Load 0x0,0x9
00a6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00a7 0387 | | Declare_Variable Package
00a8 00d8 | | Load_Top At_Offset_0
00a9 020f | | Execute Module,Activate
00aa e009 | | Load 0x0,0x9 ; Debug Table 0x1.0x16 = 0xaa,0xffe9
00ab 1919 | | Execute Package,Field_Reference,Field_Number 0x19
00ac 00c6 | | Action Check_Subprogram_Elaborated
00ad e004 | | Load 0x0,0x4
00ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00af e004 | | Load 0x0,0x4
00b0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00b1 6262 |bb | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05}
00b2 4a4f |JO | Short_Literal 0x24f
00b3 4800 |H | Short_Literal 0x0
00b4 0007 | | Action Break_Optional
00b5 e009 | | Load 0x0,0x9 ; Debug Table 0x1.0x17 = 0xb5,0xffe8
00b6 1919 | | Execute Package,Field_Reference,Field_Number 0x19
00b7 00c6 | | Action Check_Subprogram_Elaborated
00b8 e005 | | Load 0x0,0x5
00b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00ba e005 | | Load 0x0,0x5
00bb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00bc 6257 |bW | Indirect_Literal Discrete,0x314,{0x00000000, 0x0059ee05}
00bd 4a60 |J` | Short_Literal 0x260
00be 4800 |H | Short_Literal 0x0
00bf 0007 | | Action Break_Optional
00c0 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x18 = 0xc0,0xffe7
00c1 00c7 | | Action Elaborate_Subprogram
00c2 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x19 = 0xc2,0xffe6
00c3 00c7 | | Action Elaborate_Subprogram
00c4 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x1a = 0xc4,0xffe5
00c5 00c7 | | Action Elaborate_Subprogram
00c6 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x1b = 0xc6,0xffe4
00c7 00c7 | | Action Elaborate_Subprogram
00c8 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x1c = 0xc8,0xffe3
00c9 00c7 | | Action Elaborate_Subprogram
00ca 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x1d = 0xca,0xffe2
00cb 00c7 | | Action Elaborate_Subprogram
00cc 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x1e = 0xcc,0xffe1
00cd 00c7 | | Action Elaborate_Subprogram
00ce BODY_0008:
00ce 00bc | | Action Signal_Activated
00cf 00bb | | Action Signal_Completion
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 4608 |F | Jump_Case 0x9 ; Debug Table 0x2 = .DEBUG 0x00d3,0x04cc,0x0005,0x0000,0x0059,0xed05,0x0000,0x0024
00d4 7808 |x | Jump 0xdd ; case 0x0
00d5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
00d6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
00d7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
00d8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
00d9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
00da 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
00db 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
00dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
00dd 00da | | Load_Top At_Offset_2
00de 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00df 0125 | % | Execute Any,Set_Constraint
00e0 00da | | Load_Top At_Offset_2
00e1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00e2 1c00 | | Execute_Immediate Run_Utility,0x0
00e3 00da | | Load_Top At_Offset_2
00e4 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
00e5 0125 | % | Execute Any,Set_Constraint
00e6 00da | | Load_Top At_Offset_2
00e7 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
00e8 1c00 | | Execute_Immediate Run_Utility,0x0
00e9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00ea 0000 0000 | | .BLANK 0000[0x6]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00ff | | .CONST 0x00ff ; Address of begin
00f1 012f | / | .CONST 0x012f ; Address of exception handler
00f2 0004 | | .CONST 0x0004 ; Number of locals
00f3 INIT_00f0:
00f3 e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x00f3,0x04ce,0x0001,0x0000,0x0059,0xed05,0x0000,0x0047
; Debug Table 0x3.0x0 = 0xf3,0xffff
00f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00f5 02c7 | | Declare_Variable Any
00f6 00d8 | | Load_Top At_Offset_0
00f7 1c00 | | Execute_Immediate Run_Utility,0x0
00f8 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x1 = 0xf8,0xfffe
00f9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00fa 02ff | | Declare_Variable Variant_Record
00fb 00d8 | | Load_Top At_Offset_0
00fc 1c00 | | Execute_Immediate Run_Utility,0x0
00fd e20d | | Load 0x1,0xd ; Debug Table 0x3.0x2 = 0xfd,0xfffd
00fe 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
00ff BODY_00f0:
00ff 487e |H~ | Short_Literal 0x7e ; Debug Table 0x3.0x3 = 0xff,0x1
0100 a5fd | | Store_Unchecked 0x2,-0x3
0101 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x4 = 0x101,0x2
0102 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0103 c5fe | | Store 0x2,-0x2
0104 e00a | | Load 0x0,0xa ; Debug Table 0x3.0x5 = 0x104,0x3
0105 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0106 00da | | Load_Top At_Offset_2
0107 e5ff | | Load 0x2,-0x1
0108 e00a | | Load 0x0,0xa
0109 1811 | | Execute Package,Field_Execute,Field_Number 0x11
010a 00d1 | | Pop_Control Pop_Count_1
010b 0059 | Y | Store_Top Discrete,At_Offset_1
010c 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x6 = 0x10c,0x4
010d 00d9 | | Load_Top At_Offset_1
010e e001 | | Load 0x0,0x1
010f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0110 e00a | | Load 0x0,0xa ; Debug Table 0x3.0x7 = 0x110,0x5
0111 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0112 00db | | Load_Top At_Offset_3
0113 0120 | | Execute Any,Is_Value
0114 6803 |h | Jump_Zero 0x118
0115 e002 | | Load 0x0,0x2
0116 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0117 7801 |x | Jump 0x119
0118 00db | | Load_Top At_Offset_3
0119 00db | | Load_Top At_Offset_3
011a e00a | | Load 0x0,0xa
011b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
011c c402 | | Store 0x2,0x2
011d 0059 | Y | Store_Top Discrete,At_Offset_1
011e 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x8 = 0x11e,0x6
011f 00d9 | | Load_Top At_Offset_1
0120 e001 | | Load 0x0,0x1
0121 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0122 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x9 = 0x122,0x7
0123 8224 | $ | Call 0x1,0x24
0124 7005 |p | Jump_Nonzero 0x12a
0125 487d |H} | Short_Literal 0x7d ; Debug Table 0x3.0xa = 0x125,0x8
0126 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0127 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0xb = 0x127,0x9
0128 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0129 0257 | W | Execute Discrete,Raise
012a 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0xc = 0x12a,0xa
012b c5fe | | Store 0x2,-0x2
012c 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xd = 0x12c,0xb
012d a5fd | | Store_Unchecked 0x2,-0x3
012e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
012f TRAP_00f0:
012f e001 | | Load 0x0,0x1
0130 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0131 010f | | Execute Exception,Equal
0132 6803 |h | Jump_Zero 0x136
0133 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0xe = 0x133,0xc
0134 a5fd | | Store_Unchecked 0x2,-0x3
0135 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0136 0100 | | Execute Exception,Raise
0137 0000 | | .XXX[0x1]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 014c | L | .CONST 0x014c ; Address of begin
0139 01ed | | .CONST 0x01ed ; Address of exception handler
013a 0007 | | .CONST 0x0007 ; Number of locals
013b INIT_0138:
013b e20d | | Load 0x1,0xd ; Debug Table 0x4 = .DEBUG 0x013b,0x04ee,0x0001,0x0000,0x0059,0xed05,0x0000,0x0057
; Debug Table 0x4.0x0 = 0x13b,0xffff
013c 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
013d e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x1 = 0x13d,0xfffe
013e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013f e21d | | Load 0x1,0x1d ; Debug Table 0x4.0x2 = 0x13f,0xfffd
0140 0322 | " | Declare_Variable Record
0141 00d8 | | Load_Top At_Offset_0
0142 1c00 | | Execute_Immediate Run_Utility,0x0
0143 e21e | | Load 0x1,0x1e ; Debug Table 0x4.0x3 = 0x143,0xfffc
0144 0007 | | Action Break_Optional
0145 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x4.0x4 = 0x145,0xfffb
0146 e00b | | Load 0x0,0xb ; Debug Table 0x4.0x5 = 0x146,0xfffa
0147 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0148 02c7 | | Declare_Variable Any
0149 e00b | | Load 0x0,0xb
014a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014b c407 | | Store 0x2,0x7
014c BODY_0138:
014c 487e |H~ | Short_Literal 0x7e ; Debug Table 0x4.0x6 = 0x14c,0x1
014d a5fc | | Store_Unchecked 0x2,-0x4
014e e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x7 = 0x14e,0x2
014f e00b | | Load 0x0,0xb
0150 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0151 012e | . | Execute Any,Not_Equal
0152 e5fd | | Load 0x2,-0x3
0153 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0154 e00c | | Load 0x0,0xc ; Debug Table 0x4.0x8 = 0x154,0x3
0155 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0156 e5fe | | Load 0x2,-0x2
0157 e00b | | Load 0x0,0xb
0158 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0159 c407 | | Store 0x2,0x7
015a e00a | | Load 0x0,0xa ; Debug Table 0x4.0x9 = 0x15a,0x4
015b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015c e5fd | | Load 0x2,-0x3
015d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
015e 0120 | | Execute Any,Is_Value
015f 6803 |h | Jump_Zero 0x163
0160 e002 | | Load 0x0,0x2
0161 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0162 7802 |x | Jump 0x165
0163 e5fd | | Load 0x2,-0x3
0164 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0165 00da | | Load_Top At_Offset_2
0166 e21a | | Load 0x1,0x1a
0167 e21b | | Load 0x1,0x1b
0168 e5ff | | Load 0x2,-0x1
0169 e00a | | Load 0x0,0xa
016a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
016b e5fd | | Load 0x2,-0x3
016c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
016d c402 | | Store 0x2,0x2
016e 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xa = 0x16e,0x5
016f e402 | | Load 0x2,0x2
0170 e001 | | Load 0x0,0x1
0171 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0172 e006 | | Load 0x0,0x6 ; Debug Table 0x4.0xb = 0x172,0x6
0173 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0174 e5fd | | Load 0x2,-0x3
0175 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0176 4800 |H | Short_Literal 0x0
0177 6198 |a | Indirect_Literal Discrete,0x310,{0x00000000, 0x00004000}
0178 e407 | | Load 0x2,0x7
0179 4800 |H | Short_Literal 0x0
017a e5fd | | Load 0x2,-0x3
017b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
017c 4802 |H | Short_Literal 0x2
017d e006 | | Load 0x0,0x6
017e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
017f e5fd | | Load 0x2,-0x3
0180 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0181 c403 | | Store 0x2,0x3
0182 e403 | | Load 0x2,0x3 ; Debug Table 0x4.0xc = 0x182,0x7
0183 e00a | | Load 0x0,0xa
0184 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0185 a402 | | Store_Unchecked 0x2,0x2
0186 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xd = 0x186,0x8
0187 e402 | | Load 0x2,0x2
0188 e001 | | Load 0x0,0x1
0189 1818 | | Execute Package,Field_Execute,Field_Number 0x18
018a 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xe = 0x18a,0x9
018b e006 | | Load 0x0,0x6
018c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
018d e5fd | | Load 0x2,-0x3
018e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
018f e220 | | Load 0x1,0x20
0190 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0191 e006 | | Load 0x0,0x6 ; Debug Table 0x4.0xf = 0x191,0xa
0192 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0193 e5fd | | Load 0x2,-0x3
0194 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0195 e21f | | Load 0x1,0x1f
0196 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0197 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0198 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x10 = 0x198,0xb
0199 e225 | % | Load 0x1,0x25
019a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019b 0032 | 2 | Store_Top Heap_Access,At_Offset_2
019c e21c | | Load 0x1,0x1c ; Debug Table 0x4.0x11 = 0x19c,0xc
019d 00db | | Load_Top At_Offset_3
019e 0217 | | Execute Heap_Access,All_Reference
019f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01a0 4802 |H | Short_Literal 0x2 ; Debug Table 0x4.0x12 = 0x1a0,0xd
01a1 00db | | Load_Top At_Offset_3
01a2 0217 | | Execute Heap_Access,All_Reference
01a3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01a4 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x13 = 0x1a4,0xe
01a5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01a6 00db | | Load_Top At_Offset_3
01a7 0217 | | Execute Heap_Access,All_Reference
01a8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01a9 e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x14 = 0x1a9,0xf
01aa 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01ab 00da | | Load_Top At_Offset_2
01ac 039c | | Declare_Variable Heap_Access,By_Allocation
01ad 00d8 | | Load_Top At_Offset_0
01ae 0217 | | Execute Heap_Access,All_Reference
01af 1c00 | | Execute_Immediate Run_Utility,0x0
01b0 e5fd | | Load 0x2,-0x3
01b1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01b2 0007 | | Action Break_Optional ; Debug Table 0x4.0x15 = 0x1b2,0x10
01b3 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x16 = 0x1b3,0x11
01b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01b5 0219 | | Execute Heap_Access,All_Read
01b6 00d8 | | Load_Top At_Offset_0
01b7 e004 | | Load 0x0,0x4
01b8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01b9 00d2 | | Pop_Control Pop_Count_2
01ba e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x17 = 0x1ba,0x12
01bb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01bc e226 | & | Load 0x1,0x26
01bd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01be 00db | | Load_Top At_Offset_3
01bf 0217 | | Execute Heap_Access,All_Reference
01c0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01c1 e005 | | Load 0x0,0x5 ; Debug Table 0x4.0x18 = 0x1c1,0x13
01c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01c3 00da | | Load_Top At_Offset_2
01c4 039c | | Declare_Variable Heap_Access,By_Allocation
01c5 00d8 | | Load_Top At_Offset_0
01c6 0217 | | Execute Heap_Access,All_Reference
01c7 1c00 | | Execute_Immediate Run_Utility,0x0
01c8 e5fd | | Load 0x2,-0x3
01c9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01ca 0007 | | Action Break_Optional ; Debug Table 0x4.0x19 = 0x1ca,0x14
01cb e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x1a = 0x1cb,0x15
01cc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01cd e227 | ' | Load 0x1,0x27
01ce 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01cf 00db | | Load_Top At_Offset_3
01d0 0217 | | Execute Heap_Access,All_Reference
01d1 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01d2 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1b = 0x1d2,0x16
01d3 00db | | Load_Top At_Offset_3
01d4 0217 | | Execute Heap_Access,All_Reference
01d5 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01d6 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1c = 0x1d6,0x17
01d7 00db | | Load_Top At_Offset_3
01d8 0217 | | Execute Heap_Access,All_Reference
01d9 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01da 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1d = 0x1da,0x18
01db 00db | | Load_Top At_Offset_3
01dc 0217 | | Execute Heap_Access,All_Reference
01dd 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
01de 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1e = 0x1de,0x19
01df 00db | | Load_Top At_Offset_3
01e0 0217 | | Execute Heap_Access,All_Reference
01e1 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
01e2 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1f = 0x1e2,0x1a
01e3 00db | | Load_Top At_Offset_3
01e4 0217 | | Execute Heap_Access,All_Reference
01e5 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
01e6 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x20 = 0x1e6,0x1b
01e7 00db | | Load_Top At_Offset_3
01e8 0217 | | Execute Heap_Access,All_Reference
01e9 380a |8 | Execute Record,Field_Write,Field_Number 0xa
01ea 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x21 = 0x1ea,0x1c
01eb a5fc | | Store_Unchecked 0x2,-0x4
01ec 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01ed TRAP_0138:
01ed e001 | | Load 0x0,0x1
01ee 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01ef 010f | | Execute Exception,Equal
01f0 680d |h | Jump_Zero 0x1fe
01f1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x22 = 0x1f1,0x1d
01f2 e00b | | Load 0x0,0xb
01f3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01f4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x23 = 0x1f4,0x1e
01f5 4801 |H | Short_Literal 0x1
01f6 4800 |H | Short_Literal 0x0
01f7 e5fe | | Load 0x2,-0x2
01f8 e00b | | Load 0x0,0xb
01f9 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01fa c407 | | Store 0x2,0x7
01fb e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x24 = 0x1fb,0x1f
01fc a5fc | | Store_Unchecked 0x2,-0x4
01fd 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01fe 0100 | | Execute Exception,Raise
01ff 0000 | | .XXX[0x1]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0210 | | .CONST 0x0210 ; Address of begin
0201 0278 | x | .CONST 0x0278 ; Address of exception handler
0202 0006 | | .CONST 0x0006 ; Number of locals
0203 INIT_0200:
0203 e20d | | Load 0x1,0xd ; Debug Table 0x5 = .DEBUG 0x0203,0x053a,0x0001,0x0000,0x0059,0xed05,0x0000,0x0070
; Debug Table 0x5.0x0 = 0x203,0xffff
0204 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
0205 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x1 = 0x205,0xfffe
0206 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0207 e21e | | Load 0x1,0x1e ; Debug Table 0x5.0x2 = 0x207,0xfffd
0208 0007 | | Action Break_Optional
0209 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x5.0x3 = 0x209,0xfffc
020a e00b | | Load 0x0,0xb ; Debug Table 0x5.0x4 = 0x20a,0xfffb
020b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020c 02c7 | | Declare_Variable Any
020d e00b | | Load 0x0,0xb
020e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020f c406 | | Store 0x2,0x6
0210 BODY_0200:
0210 487e |H~ | Short_Literal 0x7e ; Debug Table 0x5.0x5 = 0x210,0x1
0211 a5fc | | Store_Unchecked 0x2,-0x4
0212 e5fd | | Load 0x2,-0x3 ; Debug Table 0x5.0x6 = 0x212,0x2
0213 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0214 8224 | $ | Call 0x1,0x24
0215 7005 |p | Jump_Nonzero 0x21b
0216 487d |H} | Short_Literal 0x7d ; Debug Table 0x5.0x7 = 0x216,0x3
0217 a402 | | Store_Unchecked 0x2,0x2
0218 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x8 = 0x218,0x4
0219 1b16 | | Execute Package,Field_Read,Field_Number 0x16
021a 0257 | W | Execute Discrete,Raise
021b e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x9 = 0x21b,0x5
021c 7005 |p | Jump_Nonzero 0x222
021d 4878 |Hx | Short_Literal 0x78 ; Debug Table 0x5.0xa = 0x21d,0x6
021e a402 | | Store_Unchecked 0x2,0x2
021f e001 | | Load 0x0,0x1 ; Debug Table 0x5.0xb = 0x21f,0x7
0220 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0221 0257 | W | Execute Discrete,Raise
0222 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xc = 0x222,0x8
0223 e00b | | Load 0x0,0xb
0224 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0225 012e | . | Execute Any,Not_Equal
0226 e5fd | | Load 0x2,-0x3
0227 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0228 e00c | | Load 0x0,0xc ; Debug Table 0x5.0xd = 0x228,0x9
0229 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022a e5fe | | Load 0x2,-0x2
022b e00b | | Load 0x0,0xb
022c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
022d c406 | | Store 0x2,0x6
022e e006 | | Load 0x0,0x6 ; Debug Table 0x5.0xe = 0x22e,0xa
022f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0230 e5fd | | Load 0x2,-0x3
0231 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0232 4800 |H | Short_Literal 0x0
0233 60dc |` | Indirect_Literal Discrete,0x310,{0x00000000, 0x00004000}
0234 e406 | | Load 0x2,0x6
0235 4800 |H | Short_Literal 0x0
0236 e5fd | | Load 0x2,-0x3
0237 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0238 e5ff | | Load 0x2,-0x1
0239 e003 | | Load 0x0,0x3
023a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
023b 01d7 | | Execute Vector,Field_Read
023c e006 | | Load 0x0,0x6
023d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
023e e5fd | | Load 0x2,-0x3
023f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0240 c403 | | Store 0x2,0x3
0241 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0xf = 0x241,0xb
0242 e00a | | Load 0x0,0xa
0243 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0244 a402 | | Store_Unchecked 0x2,0x2
0245 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x10 = 0x245,0xc
0246 e402 | | Load 0x2,0x2
0247 e001 | | Load 0x0,0x1
0248 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0249 e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x11 = 0x249,0xd
024a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
024b e5fd | | Load 0x2,-0x3
024c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
024d e21f | | Load 0x1,0x1f
024e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0250 e5fd | | Load 0x2,-0x3 ; Debug Table 0x5.0x12 = 0x250,0xe
0251 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0252 00db | | Load_Top At_Offset_3
0253 0217 | | Execute Heap_Access,All_Reference
0254 8221 | ! | Call 0x1,0x21
0255 7005 |p | Jump_Nonzero 0x25b
0256 487d |H} | Short_Literal 0x7d ; Debug Table 0x5.0x13 = 0x256,0xf
0257 a402 | | Store_Unchecked 0x2,0x2
0258 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x14 = 0x258,0x10
0259 1b16 | | Execute Package,Field_Read,Field_Number 0x16
025a 0257 | W | Execute Discrete,Raise
025b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x15 = 0x25b,0x11
025c e225 | % | Load 0x1,0x25
025d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
025e 0032 | 2 | Store_Top Heap_Access,At_Offset_2
025f 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x16 = 0x25f,0x12
0260 0217 | | Execute Heap_Access,All_Reference
0261 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0262 00da | | Load_Top At_Offset_2
0263 e228 | ( | Load 0x1,0x28
0264 e229 | ) | Load 0x1,0x29
0265 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
0266 e009 | | Load 0x0,0x9
0267 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0268 e5fd | | Load 0x2,-0x3
0269 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
026a 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x17 = 0x26a,0x13
026b 0217 | | Execute Heap_Access,All_Reference
026c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
026d 00da | | Load_Top At_Offset_2
026e e22d | - | Load 0x1,0x2d
026f e22e | . | Load 0x1,0x2e
0270 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0271 e009 | | Load 0x0,0x9
0272 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0273 e5fd | | Load 0x2,-0x3
0274 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0275 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x18 = 0x275,0x14
0276 a5fc | | Store_Unchecked 0x2,-0x4
0277 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0278 TRAP_0200:
0278 e001 | | Load 0x0,0x1
0279 1b16 | | Execute Package,Field_Read,Field_Number 0x16
027a 010f | | Execute Exception,Equal
027b 680d |h | Jump_Zero 0x289
027c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x19 = 0x27c,0x15
027d e00b | | Load 0x0,0xb
027e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
027f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x1a = 0x27f,0x16
0280 4801 |H | Short_Literal 0x1
0281 4800 |H | Short_Literal 0x0
0282 e5fe | | Load 0x2,-0x2
0283 e00b | | Load 0x0,0xb
0284 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0285 c406 | | Store 0x2,0x6
0286 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x1b = 0x286,0x17
0287 a5fc | | Store_Unchecked 0x2,-0x4
0288 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0289 0100 | | Execute Exception,Raise
028a 0000 0000 | | .BLANK 0000[0x6]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0297 | | .CONST 0x0297 ; Address of begin
0291 02ae | | .CONST 0x02ae ; Address of exception handler
0292 0003 | | .CONST 0x0003 ; Number of locals
0293 INIT_0290:
0293 e20d | | Load 0x1,0xd ; Debug Table 0x6 = .DEBUG 0x0293,0x0574,0x0001,0x0000,0x0059,0xed05,0x0000,0x0089
; Debug Table 0x6.0x0 = 0x293,0xffff
0294 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
0295 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x1 = 0x295,0xfffe
0296 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0297 BODY_0290:
0297 487e |H~ | Short_Literal 0x7e ; Debug Table 0x6.0x2 = 0x297,0x1
0298 a5fe | | Store_Unchecked 0x2,-0x2
0299 e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x3 = 0x299,0x2
029a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
029b e5ff | | Load 0x2,-0x1
029c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
029d 4800 |H | Short_Literal 0x0
029e e006 | | Load 0x0,0x6
029f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02a0 e5ff | | Load 0x2,-0x1
02a1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02a2 0059 | Y | Store_Top Discrete,At_Offset_1
02a3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x4 = 0x2a3,0x3
02a4 e00a | | Load 0x0,0xa
02a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02a6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02a7 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x5 = 0x2a7,0x4
02a8 00da | | Load_Top At_Offset_2
02a9 e001 | | Load 0x0,0x1
02aa 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02ab 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x6 = 0x2ab,0x5
02ac a5fe | | Store_Unchecked 0x2,-0x2
02ad 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02ae TRAP_0290:
02ae e001 | | Load 0x0,0x1
02af 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02b0 010f | | Execute Exception,Equal
02b1 6803 |h | Jump_Zero 0x2b5
02b2 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x7 = 0x2b2,0x6
02b3 a5fe | | Store_Unchecked 0x2,-0x2
02b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02b5 0100 | | Execute Exception,Raise
02b6 0000 0000 | | .XXX[0x2]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c5 | | .CONST 0x02c5 ; Address of begin
02b9 02f7 | | .CONST 0x02f7 ; Address of exception handler
02ba 0004 | | .CONST 0x0004 ; Number of locals
02bb INIT_02b8:
02bb e20d | | Load 0x1,0xd ; Debug Table 0x7 = .DEBUG 0x02bb,0x0586,0x0001,0x0000,0x0059,0xed05,0x0000,0x0095
; Debug Table 0x7.0x0 = 0x2bb,0xffff
02bc 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
02bd e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x1 = 0x2bd,0xfffe
02be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02bf e00b | | Load 0x0,0xb ; Debug Table 0x7.0x2 = 0x2bf,0xfffd
02c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c1 02c7 | | Declare_Variable Any
02c2 e5ff | | Load 0x2,-0x1
02c3 8216 | | Call 0x1,0x16
02c4 c404 | | Store 0x2,0x4
02c5 BODY_02b8:
02c5 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x3 = 0x2c5,0x1
02c6 8217 | | Call 0x1,0x17
02c7 4602 |F | Jump_Case 0x3
02c8 7811 |x | Jump 0x2da ; case 0x0
02c9 7810 |x | Jump 0x2da ; case 0x1
02ca 7800 |x | Jump 0x2cb ; case 0x2
02cb e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x4 = 0x2cb,0x2
02cc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02cd 0219 | | Execute Heap_Access,All_Read
02ce e005 | | Load 0x0,0x5
02cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d0 00d9 | | Load_Top At_Offset_1
02d1 e005 | | Load 0x0,0x5
02d2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02d3 00d1 | | Pop_Control Pop_Count_1
02d4 c402 | | Store 0x2,0x2
02d5 00d1 | | Pop_Control Pop_Count_1
02d6 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x5 = 0x2d6,0x3
02d7 00db | | Load_Top At_Offset_3
02d8 e001 | | Load 0x0,0x1
02d9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02da e006 | | Load 0x0,0x6 ; Debug Table 0x7.0x6 = 0x2da,0x5
02db 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02dc e5ff | | Load 0x2,-0x1
02dd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02de e006 | | Load 0x0,0x6
02df 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02e0 e5ff | | Load 0x2,-0x1
02e1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02e2 005a | Z | Store_Top Discrete,At_Offset_2
02e3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x7 = 0x2e3,0x6
02e4 e00a | | Load 0x0,0xa
02e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02e6 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
02e7 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x8 = 0x2e7,0x7
02e8 00db | | Load_Top At_Offset_3
02e9 e001 | | Load 0x0,0x1
02ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02eb e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x9 = 0x2eb,0x8
02ec 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02ed 7006 |p | Jump_Nonzero 0x2f4
02ee 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xa = 0x2ee,0x9
02ef 4801 |H | Short_Literal 0x1
02f0 4801 |H | Short_Literal 0x1
02f1 e00b | | Load 0x0,0xb
02f2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02f3 c404 | | Store 0x2,0x4
02f4 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0xb = 0x2f4,0xa
02f5 a5fe | | Store_Unchecked 0x2,-0x2
02f6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02f7 TRAP_02b8:
02f7 e00d | | Load 0x0,0xd
02f8 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02f9 010f | | Execute Exception,Equal
02fa 6809 |h | Jump_Zero 0x304
02fb 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0xc = 0x2fb,0xb
02fc 4801 |H | Short_Literal 0x1
02fd 4800 |H | Short_Literal 0x0
02fe e00b | | Load 0x0,0xb
02ff 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0300 c404 | | Store 0x2,0x4
0301 4877 |Hw | Short_Literal 0x77 ; Debug Table 0x7.0xd = 0x301,0xc
0302 a5fe | | Store_Unchecked 0x2,-0x2
0303 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0304 e001 | | Load 0x0,0x1
0305 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0306 010f | | Execute Exception,Equal
0307 6806 |h | Jump_Zero 0x30e
0308 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0xe = 0x308,0xd
0309 e00b | | Load 0x0,0xb
030a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
030b 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0xf = 0x30b,0xe
030c a5fe | | Store_Unchecked 0x2,-0x2
030d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
030e 0100 | | Execute Exception,Raise
030f 0000 | | .XXX[0x1]
0310 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0314 0000 0000 | | .LITERAL {0x00000000, 0x0059ee05}
0318 5468 6973 |This| .LITERAL {0x54686973, 0x20697320}
031c 6120 576f |a Wo| .XXX[0xc]
031e 726b 5f4f |rk_O|
0320 7264 6572 |rder|
0322 5f4c 6973 |_Lis|
0324 742e 2020 |t. |
0326 2020 2020 | |
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x032b,0x05a8,0x0002,0x0000,0x0059,0xed05,0x0000,0x00a1
; Debug Table 0x8.0x0 = 0x32b,0x1
032c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
032d e006 | | Load 0x0,0x6
032e 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
032f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x0333,0x05ac,0x0002,0x0000,0x0059,0xed05,0x0000,0x00ac
; Debug Table 0x9.0x0 = 0x333,0x1
0334 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0335 e006 | | Load 0x0,0x6
0336 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0337 4603 |F | Jump_Case 0x4
0338 7805 |x | Jump 0x33e ; case 0x0
0339 7806 |x | Jump 0x340 ; case 0x1
033a 7807 |x | Jump 0x342 ; case 0x2
033b 7800 |x | Jump 0x33c ; case 0x3
033c 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x1 = 0x33c,0x2
033d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033e 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x2 = 0x33e,0x3
033f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0340 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x9.0x3 = 0x340,0x4
0341 0257 | W | Execute Discrete,Raise
0342 4802 |H | Short_Literal 0x2 ; Debug Table 0x9.0x4 = 0x342,0x5
0343 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0344 0000 0000 | | .BLANK 0000[0x4]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b | K | .CONST 0x034b ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0001 | | .CONST 0x0001 ; Number of locals
034b BODY_0348:
034b INIT_0348:
034b 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x034b,0x05b8,0x0002,0x0000,0x0059,0xed05,0x0000,0x00b5
; Debug Table 0xa.0x0 = 0x34b,0x1
034c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
034d e006 | | Load 0x0,0x6
034e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
034f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353 | S | .CONST 0x0353 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0001 | | .CONST 0x0001 ; Number of locals
0353 BODY_0350:
0353 INIT_0350:
0353 4608 |F | Jump_Case 0x9 ; Debug Table 0xb = .DEBUG 0x0353,0x05bc,0x0005,0x0000,0x0059,0xee05,0x0000,0x007e
0354 7808 |x | Jump 0x35d ; case 0x0
0355 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0356 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0357 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0358 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0359 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
035a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
035b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
035c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
035d e21c | | Load 0x1,0x1c
035e 00db | | Load_Top At_Offset_3
035f 00d9 | | Load_Top At_Offset_1
0360 00d9 | | Load_Top At_Offset_1
0361 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0362 0119 | | Execute Any,Check_In_Formal_Type
0363 00d1 | | Pop_Control Pop_Count_1
0364 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0365 4802 |H | Short_Literal 0x2
0366 00db | | Load_Top At_Offset_3
0367 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0368 00da | | Load_Top At_Offset_2
0369 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
036a 0125 | % | Execute Any,Set_Constraint
036b e002 | | Load 0x0,0x2
036c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
036d 00db | | Load_Top At_Offset_3
036e 00d9 | | Load_Top At_Offset_1
036f 00d9 | | Load_Top At_Offset_1
0370 3002 |0 | Execute Record,Field_Type,Field_Number 0x2
0371 0119 | | Execute Any,Check_In_Formal_Type
0372 00d1 | | Pop_Control Pop_Count_1
0373 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0374 4800 |H | Short_Literal 0x0
0375 00db | | Load_Top At_Offset_3
0376 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0377 4800 |H | Short_Literal 0x0
0378 00db | | Load_Top At_Offset_3
0379 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
037a 4800 |H | Short_Literal 0x0
037b 00db | | Load_Top At_Offset_3
037c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
037d 4800 |H | Short_Literal 0x0
037e 00db | | Load_Top At_Offset_3
037f 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0380 4800 |H | Short_Literal 0x0
0381 00db | | Load_Top At_Offset_3
0382 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0383 4800 |H | Short_Literal 0x0
0384 00db | | Load_Top At_Offset_3
0385 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0386 4800 |H | Short_Literal 0x0
0387 00db | | Load_Top At_Offset_3
0388 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0389 4800 |H | Short_Literal 0x0
038a 00db | | Load_Top At_Offset_3
038b 380a |8 | Execute Record,Field_Write,Field_Number 0xa
038c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
038d 0000 0000 | | .XXX[0x3]
038f 0000 | |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 03a3 | | .CONST 0x03a3 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x0393,0x05be,0x0002,0x0000,0x0059,0xee05,0x0000,0x00e9
; Debug Table 0xc.0x0 = 0x393,0x1
0394 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0395 e21c | | Load 0x1,0x1c
0396 01df | | Execute Vector,Equal
0397 6809 |h | Jump_Zero 0x3a1
0398 00da | | Load_Top At_Offset_2
0399 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
039a e5fe | | Load 0x2,-0x2
039b 012f | / | Execute Any,Equal
039c 6804 |h | Jump_Zero 0x3a1
039d 00da | | Load_Top At_Offset_2
039e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
039f 0f02 | | Execute_Immediate Equal,0x2
03a0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03a1 4800 |H | Short_Literal 0x0
03a2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03a3 TRAP_0390:
03a3 0007 | | Action Break_Optional
03a4 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x1 = 0x3a4,0x2
03a5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03a6 0000 0000 | | .XXX[0x2]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03b7 | | .CONST 0x03b7 ; Address of begin
03a9 03de | | .CONST 0x03de ; Address of exception handler
03aa 0005 | | .CONST 0x0005 ; Number of locals
03ab INIT_03a8:
03ab e006 | | Load 0x0,0x6 ; Debug Table 0xd = .DEBUG 0x03ab,0x05c4,0x0002,0x0000,0x0059,0xee05,0x0000,0x011a
; Debug Table 0xd.0x0 = 0x3ab,0xffff
03ac 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03ad 02c7 | | Declare_Variable Any
03ae 00d8 | | Load_Top At_Offset_0
03af 1c00 | | Execute_Immediate Run_Utility,0x0
03b0 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x1 = 0x3b0,0xfffe
03b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b2 e21d | | Load 0x1,0x1d ; Debug Table 0xd.0x2 = 0x3b2,0xfffd
03b3 0322 | " | Declare_Variable Record
03b4 00d8 | | Load_Top At_Offset_0
03b5 1c00 | | Execute_Immediate Run_Utility,0x0
03b6 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x3 = 0x3b6,0xfffc
03b7 BODY_03a8:
03b7 00be | | Action Activate_Tasks
03b8 e006 | | Load 0x0,0x6 ; Debug Table 0xd.0x4 = 0x3b8,0x1
03b9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03ba e402 | | Load 0x2,0x2
03bb 4800 |H | Short_Literal 0x0
03bc 6753 |gS | Indirect_Literal Discrete,0x310,{0x00000000, 0x00004000}
03bd e00b | | Load 0x0,0xb
03be 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03bf 4800 |H | Short_Literal 0x0
03c0 e5ff | | Load 0x2,-0x1
03c1 4803 |H | Short_Literal 0x3
03c2 e006 | | Load 0x0,0x6
03c3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03c4 c402 | | Store 0x2,0x2
03c5 005b | [ | Store_Top Discrete,At_Offset_3
03c6 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x5 = 0x3c6,0x2
03c7 6802 |h | Jump_Zero 0x3ca
03c8 4887 |H | Short_Literal 0x87
03c9 0257 | W | Execute Discrete,Raise
03ca e006 | | Load 0x0,0x6 ; Debug Table 0xd.0x6 = 0x3ca,0x3
03cb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03cc e402 | | Load 0x2,0x2
03cd e220 | | Load 0x1,0x20
03ce 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03cf 00da | | Load_Top At_Offset_2
03d0 017d | } | Execute Record,Structure_Write
03d1 e5ff | | Load 0x2,-0x1 ; Debug Table 0xd.0x7 = 0x3d1,0x4
03d2 00da | | Load_Top At_Offset_2
03d3 8221 | ! | Call 0x1,0x21
03d4 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
03d5 e006 | | Load 0x0,0x6 ; Debug Table 0xd.0x8 = 0x3d5,0x5
03d6 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03d7 e402 | | Load 0x2,0x2
03d8 e006 | | Load 0x0,0x6
03d9 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
03da c402 | | Store 0x2,0x2
03db 005b | [ | Store_Top Discrete,At_Offset_3
03dc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x9 = 0x3dc,0x6
03dd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03de TRAP_03a8:
03de 0007 | | Action Break_Optional
03df e006 | | Load 0x0,0x6 ; Debug Table 0xd.0xa = 0x3df,0x7
03e0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03e1 e402 | | Load 0x2,0x2
03e2 e006 | | Load 0x0,0x6
03e3 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
03e4 c402 | | Store 0x2,0x2
03e5 c403 | | Store 0x2,0x3
03e6 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xb = 0x3e6,0x8
03e7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x03eb,0x05de,0x0002,0x0000,0x0059,0xee05,0x0000,0x019e
; Debug Table 0xe.0x0 = 0x3eb,0x1
03ec e002 | | Load 0x0,0x2
03ed 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03ee e21a | | Load 0x1,0x1a
03ef 027f | | Execute Discrete,Equal
03f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f1 0000 0000 | | .BLANK 0000[0x7]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug Table
03f8 ; --------------------------------------------------------------------------------------
03f8 0003 000f | | .CONST 0x0003,0x000f
03fa 000b 0472 | r| .DEBUG 0x000b,0x0472,0x8000,0x0000,0x0059,0xed05,0x0000,0x0011
0402 0031 048c | 1 | .DEBUG 0x0031,0x048c,0x8000,0x0000,0x0059,0xee05,0x0000,0x001b
040a 00d3 04cc | | .DEBUG 0x00d3,0x04cc,0x0005,0x0000,0x0059,0xed05,0x0000,0x0024
0412 00f3 04ce | | .DEBUG 0x00f3,0x04ce,0x0001,0x0000,0x0059,0xed05,0x0000,0x0047
041a 013b 04ee | ; | .DEBUG 0x013b,0x04ee,0x0001,0x0000,0x0059,0xed05,0x0000,0x0057
0422 0203 053a | :| .DEBUG 0x0203,0x053a,0x0001,0x0000,0x0059,0xed05,0x0000,0x0070
042a 0293 0574 | t| .DEBUG 0x0293,0x0574,0x0001,0x0000,0x0059,0xed05,0x0000,0x0089
0432 02bb 0586 | | .DEBUG 0x02bb,0x0586,0x0001,0x0000,0x0059,0xed05,0x0000,0x0095
043a 032b 05a8 | + | .DEBUG 0x032b,0x05a8,0x0002,0x0000,0x0059,0xed05,0x0000,0x00a1
0442 0333 05ac | 3 | .DEBUG 0x0333,0x05ac,0x0002,0x0000,0x0059,0xed05,0x0000,0x00ac
044a 034b 05b8 | K | .DEBUG 0x034b,0x05b8,0x0002,0x0000,0x0059,0xed05,0x0000,0x00b5
0452 0353 05bc | S | .DEBUG 0x0353,0x05bc,0x0005,0x0000,0x0059,0xee05,0x0000,0x007e
045a 0393 05be | | .DEBUG 0x0393,0x05be,0x0002,0x0000,0x0059,0xee05,0x0000,0x00e9
0462 03ab 05c4 | | .DEBUG 0x03ab,0x05c4,0x0002,0x0000,0x0059,0xee05,0x0000,0x011a
046a 03eb 05de | | .DEBUG 0x03eb,0x05de,0x0002,0x0000,0x0059,0xee05,0x0000,0x019e
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug3 Subtable 0x0
0472 ; --------------------------------------------------------------------------------------
0472 000c 0000 | | .DBG3TAB 0x000c,0x0000
0474 000b ffff | | .CONST 0x000b,0xffff
0476 000e fffe | | .CONST 0x000e,0xfffe
0478 0011 fffd | | .CONST 0x0011,0xfffd
047a 0014 fffc | | .CONST 0x0014,0xfffc
047c 0020 fffb | | .CONST 0x0020,0xfffb
047e 0022 fffa | " | .CONST 0x0022,0xfffa
0480 0024 fff9 | $ | .CONST 0x0024,0xfff9
0482 0026 fff8 | & | .CONST 0x0026,0xfff8
0484 0028 fff7 | ( | .CONST 0x0028,0xfff7
0486 002a fff6 | * | .CONST 0x002a,0xfff6
0488 002c fff5 | , | .CONST 0x002c,0xfff5
048a 002e fff4 | . | .CONST 0x002e,0xfff4
048c ; --------------------------------------------------------------------------------------
048c ; Debug3 Subtable 0x1
048c ; --------------------------------------------------------------------------------------
048c 001f 0000 | | .DBG3TAB 0x001f,0x0000
048e 0031 ffff | 1 | .CONST 0x0031,0xffff
0490 0033 fffe | 3 | .CONST 0x0033,0xfffe
0492 0035 fffd | 5 | .CONST 0x0035,0xfffd
0494 0037 fffc | 7 | .CONST 0x0037,0xfffc
0496 0038 fffb | 8 | .CONST 0x0038,0xfffb
0498 0039 fffa | 9 | .CONST 0x0039,0xfffa
049a 003a fff9 | : | .CONST 0x003a,0xfff9
049c 003f fff8 | ? | .CONST 0x003f,0xfff8
049e 0040 fff7 | @ | .CONST 0x0040,0xfff7
04a0 0054 fff6 | T | .CONST 0x0054,0xfff6
04a2 0057 fff5 | W | .CONST 0x0057,0xfff5
04a4 0058 fff4 | X | .CONST 0x0058,0xfff4
04a6 0061 fff3 | a | .CONST 0x0061,0xfff3
04a8 0069 fff2 | i | .CONST 0x0069,0xfff2
04aa 006b fff1 | k | .CONST 0x006b,0xfff1
04ac 006d fff0 | m | .CONST 0x006d,0xfff0
04ae 0080 ffef | | .CONST 0x0080,0xffef
04b0 0087 ffee | | .CONST 0x0087,0xffee
04b2 0089 ffed | | .CONST 0x0089,0xffed
04b4 008b ffec | | .CONST 0x008b,0xffec
04b6 0094 ffeb | | .CONST 0x0094,0xffeb
04b8 009f ffea | | .CONST 0x009f,0xffea
04ba 00aa ffe9 | | .CONST 0x00aa,0xffe9
04bc 00b5 ffe8 | | .CONST 0x00b5,0xffe8
04be 00c0 ffe7 | | .CONST 0x00c0,0xffe7
04c0 00c2 ffe6 | | .CONST 0x00c2,0xffe6
04c2 00c4 ffe5 | | .CONST 0x00c4,0xffe5
04c4 00c6 ffe4 | | .CONST 0x00c6,0xffe4
04c6 00c8 ffe3 | | .CONST 0x00c8,0xffe3
04c8 00ca ffe2 | | .CONST 0x00ca,0xffe2
04ca 00cc ffe1 | | .CONST 0x00cc,0xffe1
04cc ; --------------------------------------------------------------------------------------
04cc ; Debug3 Subtable 0x2
04cc ; --------------------------------------------------------------------------------------
04cc 0000 0000 | | .DBG3TAB 0x0000,0x0000
04ce ; --------------------------------------------------------------------------------------
04ce ; Debug3 Subtable 0x3
04ce ; --------------------------------------------------------------------------------------
04ce 0003 000c | | .DBG3TAB 0x0003,0x000c
04d0 00f3 ffff | | .CONST 0x00f3,0xffff
04d2 00f8 fffe | | .CONST 0x00f8,0xfffe
04d4 00fd fffd | | .CONST 0x00fd,0xfffd
04d6 00ff 0001 | | .CONST 0x00ff,0x0001
04d8 0101 0002 | | .CONST 0x0101,0x0002
04da 0104 0003 | | .CONST 0x0104,0x0003
04dc 010c 0004 | | .CONST 0x010c,0x0004
04de 0110 0005 | | .CONST 0x0110,0x0005
04e0 011e 0006 | | .CONST 0x011e,0x0006
04e2 0122 0007 | " | .CONST 0x0122,0x0007
04e4 0125 0008 | % | .CONST 0x0125,0x0008
04e6 0127 0009 | ' | .CONST 0x0127,0x0009
04e8 012a 000a | * | .CONST 0x012a,0x000a
04ea 012c 000b | , | .CONST 0x012c,0x000b
04ec 0133 000c | 3 | .CONST 0x0133,0x000c
04ee ; --------------------------------------------------------------------------------------
04ee ; Debug3 Subtable 0x4
04ee ; --------------------------------------------------------------------------------------
04ee 0006 001f | | .DBG3TAB 0x0006,0x001f
04f0 013b ffff | ; | .CONST 0x013b,0xffff
04f2 013d fffe | = | .CONST 0x013d,0xfffe
04f4 013f fffd | ? | .CONST 0x013f,0xfffd
04f6 0143 fffc | C | .CONST 0x0143,0xfffc
04f8 0145 fffb | E | .CONST 0x0145,0xfffb
04fa 0146 fffa | F | .CONST 0x0146,0xfffa
04fc 014c 0001 | L | .CONST 0x014c,0x0001
04fe 014e 0002 | N | .CONST 0x014e,0x0002
0500 0154 0003 | T | .CONST 0x0154,0x0003
0502 015a 0004 | Z | .CONST 0x015a,0x0004
0504 016e 0005 | n | .CONST 0x016e,0x0005
0506 0172 0006 | r | .CONST 0x0172,0x0006
0508 0182 0007 | | .CONST 0x0182,0x0007
050a 0186 0008 | | .CONST 0x0186,0x0008
050c 018a 0009 | | .CONST 0x018a,0x0009
050e 0191 000a | | .CONST 0x0191,0x000a
0510 0198 000b | | .CONST 0x0198,0x000b
0512 019c 000c | | .CONST 0x019c,0x000c
0514 01a0 000d | | .CONST 0x01a0,0x000d
0516 01a4 000e | | .CONST 0x01a4,0x000e
0518 01a9 000f | | .CONST 0x01a9,0x000f
051a 01b2 0010 | | .CONST 0x01b2,0x0010
051c 01b3 0011 | | .CONST 0x01b3,0x0011
051e 01ba 0012 | | .CONST 0x01ba,0x0012
0520 01c1 0013 | | .CONST 0x01c1,0x0013
0522 01ca 0014 | | .CONST 0x01ca,0x0014
0524 01cb 0015 | | .CONST 0x01cb,0x0015
0526 01d2 0016 | | .CONST 0x01d2,0x0016
0528 01d6 0017 | | .CONST 0x01d6,0x0017
052a 01da 0018 | | .CONST 0x01da,0x0018
052c 01de 0019 | | .CONST 0x01de,0x0019
052e 01e2 001a | | .CONST 0x01e2,0x001a
0530 01e6 001b | | .CONST 0x01e6,0x001b
0532 01ea 001c | | .CONST 0x01ea,0x001c
0534 01f1 001d | | .CONST 0x01f1,0x001d
0536 01f4 001e | | .CONST 0x01f4,0x001e
0538 01fb 001f | | .CONST 0x01fb,0x001f
053a ; --------------------------------------------------------------------------------------
053a ; Debug3 Subtable 0x5
053a ; --------------------------------------------------------------------------------------
053a 0005 0017 | | .DBG3TAB 0x0005,0x0017
053c 0203 ffff | | .CONST 0x0203,0xffff
053e 0205 fffe | | .CONST 0x0205,0xfffe
0540 0207 fffd | | .CONST 0x0207,0xfffd
0542 0209 fffc | | .CONST 0x0209,0xfffc
0544 020a fffb | | .CONST 0x020a,0xfffb
0546 0210 0001 | | .CONST 0x0210,0x0001
0548 0212 0002 | | .CONST 0x0212,0x0002
054a 0216 0003 | | .CONST 0x0216,0x0003
054c 0218 0004 | | .CONST 0x0218,0x0004
054e 021b 0005 | | .CONST 0x021b,0x0005
0550 021d 0006 | | .CONST 0x021d,0x0006
0552 021f 0007 | | .CONST 0x021f,0x0007
0554 0222 0008 | " | .CONST 0x0222,0x0008
0556 0228 0009 | ( | .CONST 0x0228,0x0009
0558 022e 000a | . | .CONST 0x022e,0x000a
055a 0241 000b | A | .CONST 0x0241,0x000b
055c 0245 000c | E | .CONST 0x0245,0x000c
055e 0249 000d | I | .CONST 0x0249,0x000d
0560 0250 000e | P | .CONST 0x0250,0x000e
0562 0256 000f | V | .CONST 0x0256,0x000f
0564 0258 0010 | X | .CONST 0x0258,0x0010
0566 025b 0011 | [ | .CONST 0x025b,0x0011
0568 025f 0012 | _ | .CONST 0x025f,0x0012
056a 026a 0013 | j | .CONST 0x026a,0x0013
056c 0275 0014 | u | .CONST 0x0275,0x0014
056e 027c 0015 | | | .CONST 0x027c,0x0015
0570 027f 0016 | | .CONST 0x027f,0x0016
0572 0286 0017 | | .CONST 0x0286,0x0017
0574 ; --------------------------------------------------------------------------------------
0574 ; Debug3 Subtable 0x6
0574 ; --------------------------------------------------------------------------------------
0574 0002 0006 | | .DBG3TAB 0x0002,0x0006
0576 0293 ffff | | .CONST 0x0293,0xffff
0578 0295 fffe | | .CONST 0x0295,0xfffe
057a 0297 0001 | | .CONST 0x0297,0x0001
057c 0299 0002 | | .CONST 0x0299,0x0002
057e 02a3 0003 | | .CONST 0x02a3,0x0003
0580 02a7 0004 | | .CONST 0x02a7,0x0004
0582 02ab 0005 | | .CONST 0x02ab,0x0005
0584 02b2 0006 | | .CONST 0x02b2,0x0006
0586 ; --------------------------------------------------------------------------------------
0586 ; Debug3 Subtable 0x7
0586 ; --------------------------------------------------------------------------------------
0586 0003 000d | | .DBG3TAB 0x0003,0x000d
0588 02bb ffff | | .CONST 0x02bb,0xffff
058a 02bd fffe | | .CONST 0x02bd,0xfffe
058c 02bf fffd | | .CONST 0x02bf,0xfffd
058e 02c5 0001 | | .CONST 0x02c5,0x0001
0590 02cb 0002 | | .CONST 0x02cb,0x0002
0592 02d6 0003 | | .CONST 0x02d6,0x0003
0594 02da 0005 | | .CONST 0x02da,0x0005
0596 02e3 0006 | | .CONST 0x02e3,0x0006
0598 02e7 0007 | | .CONST 0x02e7,0x0007
059a 02eb 0008 | | .CONST 0x02eb,0x0008
059c 02ee 0009 | | .CONST 0x02ee,0x0009
059e 02f4 000a | | .CONST 0x02f4,0x000a
05a0 02fb 000b | | .CONST 0x02fb,0x000b
05a2 0301 000c | | .CONST 0x0301,0x000c
05a4 0308 000d | | .CONST 0x0308,0x000d
05a6 030b 000e | | .CONST 0x030b,0x000e
05a8 ; --------------------------------------------------------------------------------------
05a8 ; Debug3 Subtable 0x8
05a8 ; --------------------------------------------------------------------------------------
05a8 0000 0001 | | .DBG3TAB 0x0000,0x0001
05aa 032b 0001 | + | .CONST 0x032b,0x0001
05ac ; --------------------------------------------------------------------------------------
05ac ; Debug3 Subtable 0x9
05ac ; --------------------------------------------------------------------------------------
05ac 0000 0005 | | .DBG3TAB 0x0000,0x0005
05ae 0333 0001 | 3 | .CONST 0x0333,0x0001
05b0 033c 0002 | < | .CONST 0x033c,0x0002
05b2 033e 0003 | > | .CONST 0x033e,0x0003
05b4 0340 0004 | @ | .CONST 0x0340,0x0004
05b6 0342 0005 | B | .CONST 0x0342,0x0005
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug3 Subtable 0xa
05b8 ; --------------------------------------------------------------------------------------
05b8 0000 0001 | | .DBG3TAB 0x0000,0x0001
05ba 034b 0001 | K | .CONST 0x034b,0x0001
05bc ; --------------------------------------------------------------------------------------
05bc ; Debug3 Subtable 0xb
05bc ; --------------------------------------------------------------------------------------
05bc 0000 0000 | | .DBG3TAB 0x0000,0x0000
05be ; --------------------------------------------------------------------------------------
05be ; Debug3 Subtable 0xc
05be ; --------------------------------------------------------------------------------------
05be 0000 0002 | | .DBG3TAB 0x0000,0x0002
05c0 0393 0001 | | .CONST 0x0393,0x0001
05c2 03a4 0002 | | .CONST 0x03a4,0x0002
05c4 ; --------------------------------------------------------------------------------------
05c4 ; Debug3 Subtable 0xd
05c4 ; --------------------------------------------------------------------------------------
05c4 0004 0008 | | .DBG3TAB 0x0004,0x0008
05c6 03ab ffff | | .CONST 0x03ab,0xffff
05c8 03b0 fffe | | .CONST 0x03b0,0xfffe
05ca 03b2 fffd | | .CONST 0x03b2,0xfffd
05cc 03b6 fffc | | .CONST 0x03b6,0xfffc
05ce 03b8 0001 | | .CONST 0x03b8,0x0001
05d0 03c6 0002 | | .CONST 0x03c6,0x0002
05d2 03ca 0003 | | .CONST 0x03ca,0x0003
05d4 03d1 0004 | | .CONST 0x03d1,0x0004
05d6 03d5 0005 | | .CONST 0x03d5,0x0005
05d8 03dc 0006 | | .CONST 0x03dc,0x0006
05da 03df 0007 | | .CONST 0x03df,0x0007
05dc 03e6 0008 | | .CONST 0x03e6,0x0008
05de ; --------------------------------------------------------------------------------------
05de ; Debug3 Subtable 0xe
05de ; --------------------------------------------------------------------------------------
05de 0000 0001 | | .DBG3TAB 0x0000,0x0001
05e0 03eb 0001 | | .CONST 0x03eb,0x0001
05e2 0000 0000 | | .BLANK 0000[0x1e]