|
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: 4096 (0x1000)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 0570 | p | .CONST 0x0570 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 013e | > | .CONST 0x013e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 004b | K | .CONST 0x004b ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x05fa,0x8000,0x0000,0x0058,0x6b35,0x0000,0x0019
; 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 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0017 e005 | | Load 0x0,0x5
0018 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0019 e006 | | Load 0x0,0x6
001a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
001b e007 | | Load 0x0,0x7
001c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
001d e008 | | Load 0x0,0x8
001e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
001f e009 | | Load 0x0,0x9
0020 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0021 e00a | | Load 0x0,0xa
0022 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0023 00e1 | | Load_Encached Boolean_Cache
0024 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call
0026 4809 |H | Short_Literal 0x9
0027 032e | . | Declare_Type Record,Defined,Visible
0028 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x28,0xfffb
002a 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x2a,0xfffa
002c 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x2c,0xfff9
002e 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x2e,0xfff8
0030 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x30,0xfff7
0032 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x32,0xfff6
0034 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x34,0xfff5
0036 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x36,0xfff4
0038 029a 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x38,0xfff3
003a 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x3a,0xfff2
003c 00bf | | Action Accept_Activation
003d e00b | | Load 0x0,0xb ; Debug Table 0x1 = .DEBUG 0x003d,0x0618,0x8000,0x0000,0x0058,0x7105,0x0000,0x0027
; Debug Table 0x1.0x0 = 0x3d,0xffff
003e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
003f e00b | | Load 0x0,0xb ; Debug Table 0x1.0x1 = 0x3f,0xfffe
0040 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0041 e00b | | Load 0x0,0xb ; Debug Table 0x1.0x2 = 0x41,0xfffd
0042 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0043 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x43,0xfffc
0044 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x44,0xfffb
0045 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x45,0xfffa
0046 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x6 = 0x46,0xfff9
0047 4815 |H | Short_Literal 0x15
0048 00e9 | | Load_Encached String_Cache
0049 0334 | 4 | Declare_Variable Array,With_Constraint
004a 52bd |R | Indirect_Literal Any,0x308,{0x54686973, 0x20697320}
004b 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x4b,0xfff8
004c 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x8 = 0x4c,0xfff7
004d 4815 |H | Short_Literal 0x15
004e 00e9 | | Load_Encached String_Cache
004f 035b | [ | Declare_Type Array,Constrained
0050 00e3 | | Load_Encached Natural_Cache
0051 e20e | | Load 0x1,0xe
0052 e00c | | Load 0x0,0xc
0053 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0054 e00c | | Load 0x0,0xc
0055 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0056 e00c | | Load 0x0,0xc
0057 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0058 e00c | | Load 0x0,0xc
0059 1b17 | | Execute Package,Field_Read,Field_Number 0x17
005a e00c | | Load 0x0,0xc
005b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
005c e00c | | Load 0x0,0xc
005d 1b17 | | Execute Package,Field_Read,Field_Number 0x17
005e 00e2 | | Load_Encached Integer_Cache
005f 00e2 | | Load_Encached Integer_Cache
0060 00e2 | | Load_Encached Integer_Cache
0061 00e2 | | Load_Encached Integer_Cache
0062 00e2 | | Load_Encached Integer_Cache
0063 00e2 | | Load_Encached Integer_Cache
0064 029f 04bb | | Declare_Subprogram INIT_04b8,For_Call
0066 480f |H | Short_Literal 0xf
0067 032d | - | Declare_Type Record,Defined
0068 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x9 = 0x68,0xfff6
0069 02a0 | | Declare_Subprogram Null_Subprogram
006a 03ad | | Declare_Type Heap_Access,Defined
006b 0007 | | Action Break_Optional ; Debug Table 0x1.0xa = 0x6b,0xfff5
006c 6297 |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0xb = 0x6c,0xfff4
006d 4904 |I | Short_Literal 0x104
006e 00db | | Load_Top At_Offset_3
006f 00db | | Load_Top At_Offset_3
0070 e00a | | Load 0x0,0xa
0071 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0072 0387 | | Declare_Variable Package
0073 00d8 | | Load_Top At_Offset_0
0074 020f | | Execute Module,Activate
0075 628e |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0xc = 0x75,0xfff3
0076 490d |I | Short_Literal 0x10d
0077 e21f | | Load 0x1,0x1f
0078 e00a | | Load 0x0,0xa
0079 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
007a 0387 | | Declare_Variable Package
007b 00d8 | | Load_Top At_Offset_0
007c 020f | | Execute Module,Activate
007d 029d 050b | | Declare_Subprogram INIT_0508,For_Outer_Call ; Debug Table 0x1.0xd = 0x7d,0xfff2
007f 029d 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call ; Debug Table 0x1.0xe = 0x7f,0xfff1
0081 6282 |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0xf = 0x81,0xfff0
0082 49b4 |I | Short_Literal 0x1b4
0083 e21b | | Load 0x1,0x1b
0084 0335 | 5 | Declare_Variable Array,Duplicate
0085 00d0 | | Action Swap_Control
0086 00d1 | | Pop_Control Pop_Count_1
0087 e21d | | Load 0x1,0x1d
0088 00d8 | | Load_Top At_Offset_0
0089 0120 | | Execute Any,Is_Value
008a 7002 |p | Jump_Nonzero 0x8d
008b 00d8 | | Load_Top At_Offset_0
008c 011e | | Execute Any,Convert
008d 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
008e e002 | | Load 0x0,0x2
008f 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0090 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0091 0387 | | Declare_Variable Package
0092 00d8 | | Load_Top At_Offset_0
0093 020f | | Execute Module,Activate
0094 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x10 = 0x94,0xffef
0095 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0096 e21c | | Load 0x1,0x1c
0097 027f | | Execute Discrete,Equal
0098 7002 |p | Jump_Nonzero 0x9b
0099 4887 |H | Short_Literal 0x87
009a 0257 | W | Execute Discrete,Raise
009b 029d 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call ; Debug Table 0x1.0x11 = 0x9b,0xffee
009d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x12 = 0x9d,0xffed
009e 00c7 | | Action Elaborate_Subprogram
009f 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x13 = 0x9f,0xffec
00a0 00c7 | | Action Elaborate_Subprogram
00a1 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x14 = 0xa1,0xffeb
00a2 00c7 | | Action Elaborate_Subprogram
00a3 6260 |b` | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x15 = 0xa3,0xffea
00a4 4afe |J | Short_Literal 0x2fe
00a5 e21f | | Load 0x1,0x1f
00a6 e220 | | Load 0x1,0x20
00a7 e00d | | Load 0x0,0xd
00a8 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00a9 0387 | | Declare_Variable Package
00aa 00d8 | | Load_Top At_Offset_0
00ab 020f | | Execute Module,Activate
00ac 6257 |bW | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x16 = 0xac,0xffe9
00ad 4b07 |K | Short_Literal 0x307
00ae e004 | | Load 0x0,0x4
00af 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00b0 e004 | | Load 0x0,0x4
00b1 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00b2 e00d | | Load 0x0,0xd
00b3 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00b4 0387 | | Declare_Variable Package
00b5 00d8 | | Load_Top At_Offset_0
00b6 020f | | Execute Module,Activate
00b7 624c |bL | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x17 = 0xb7,0xffe8
00b8 4b14 |K | Short_Literal 0x314
00b9 e005 | | Load 0x0,0x5
00ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00bb e005 | | Load 0x0,0x5
00bc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00bd e00d | | Load 0x0,0xd
00be 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00bf 0387 | | Declare_Variable Package
00c0 00d8 | | Load_Top At_Offset_0
00c1 020f | | Execute Module,Activate
00c2 6241 |bA | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x18 = 0xc2,0xffe7
00c3 4b21 |K! | Short_Literal 0x321
00c4 e006 | | Load 0x0,0x6
00c5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00c6 e006 | | Load 0x0,0x6
00c7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00c8 e00d | | Load 0x0,0xd
00c9 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00ca 0387 | | Declare_Variable Package
00cb 00d8 | | Load_Top At_Offset_0
00cc 020f | | Execute Module,Activate
00cd 6236 |b6 | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x19 = 0xcd,0xffe6
00ce 4b2e |K. | Short_Literal 0x32e
00cf e007 | | Load 0x0,0x7
00d0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d1 e007 | | Load 0x0,0x7
00d2 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00d3 e00d | | Load 0x0,0xd
00d4 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00d5 0387 | | Declare_Variable Package
00d6 00d8 | | Load_Top At_Offset_0
00d7 020f | | Execute Module,Activate
00d8 622b |b+ | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x1a = 0xd8,0xffe5
00d9 4b3b |K; | Short_Literal 0x33b
00da e008 | | Load 0x0,0x8
00db 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00dc e008 | | Load 0x0,0x8
00dd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00de e00d | | Load 0x0,0xd
00df 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00e0 0387 | | Declare_Variable Package
00e1 00d8 | | Load_Top At_Offset_0
00e2 020f | | Execute Module,Activate
00e3 6220 |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105} ; Debug Table 0x1.0x1b = 0xe3,0xffe4
00e4 4b48 |KH | Short_Literal 0x348
00e5 e009 | | Load 0x0,0x9
00e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e7 e009 | | Load 0x0,0x9
00e8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00e9 e00d | | Load 0x0,0xd
00ea 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00eb 0387 | | Declare_Variable Package
00ec 00d8 | | Load_Top At_Offset_0
00ed 020f | | Execute Module,Activate
00ee e00d | | Load 0x0,0xd ; Debug Table 0x1.0x1c = 0xee,0xffe3
00ef 1919 | | Execute Package,Field_Reference,Field_Number 0x19
00f0 00c6 | | Action Check_Subprogram_Elaborated
00f1 e004 | | Load 0x0,0x4
00f2 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00f3 e004 | | Load 0x0,0x4
00f4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00f5 620e |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105}
00f6 4b55 |KU | Short_Literal 0x355
00f7 4800 |H | Short_Literal 0x0
00f8 0007 | | Action Break_Optional
00f9 e00d | | Load 0x0,0xd ; Debug Table 0x1.0x1d = 0xf9,0xffe2
00fa 1919 | | Execute Package,Field_Reference,Field_Number 0x19
00fb 00c6 | | Action Check_Subprogram_Elaborated
00fc e005 | | Load 0x0,0x5
00fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00fe e005 | | Load 0x0,0x5
00ff 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0100 6203 |b | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105}
0101 4b66 |Kf | Short_Literal 0x366
0102 4800 |H | Short_Literal 0x0
0103 0007 | | Action Break_Optional
0104 e00d | | Load 0x0,0xd ; Debug Table 0x1.0x1e = 0x104,0xffe1
0105 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0106 00c6 | | Action Check_Subprogram_Elaborated
0107 e006 | | Load 0x0,0x6
0108 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0109 e006 | | Load 0x0,0x6
010a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
010b 61f8 |a | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105}
010c 4b77 |Kw | Short_Literal 0x377
010d 4800 |H | Short_Literal 0x0
010e 0007 | | Action Break_Optional
010f e00d | | Load 0x0,0xd ; Debug Table 0x1.0x1f = 0x10f,0xffe0
0110 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0111 00c6 | | Action Check_Subprogram_Elaborated
0112 e007 | | Load 0x0,0x7
0113 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0114 e007 | | Load 0x0,0x7
0115 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0116 61ed |a | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105}
0117 4b88 |K | Short_Literal 0x388
0118 4800 |H | Short_Literal 0x0
0119 0007 | | Action Break_Optional
011a e00d | | Load 0x0,0xd ; Debug Table 0x1.0x20 = 0x11a,0xffdf
011b 1919 | | Execute Package,Field_Reference,Field_Number 0x19
011c 00c6 | | Action Check_Subprogram_Elaborated
011d e008 | | Load 0x0,0x8
011e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
011f e008 | | Load 0x0,0x8
0120 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0121 61e2 |a | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105}
0122 4b99 |K | Short_Literal 0x399
0123 4800 |H | Short_Literal 0x0
0124 0007 | | Action Break_Optional
0125 e00d | | Load 0x0,0xd ; Debug Table 0x1.0x21 = 0x125,0xffde
0126 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0127 00c6 | | Action Check_Subprogram_Elaborated
0128 e009 | | Load 0x0,0x9
0129 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012a e009 | | Load 0x0,0x9
012b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
012c 61d7 |a | Indirect_Literal Discrete,0x304,{0x00000000, 0x00587105}
012d 4baa |K | Short_Literal 0x3aa
012e 4800 |H | Short_Literal 0x0
012f 0007 | | Action Break_Optional
0130 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x22 = 0x130,0xffdd
0131 00c7 | | Action Elaborate_Subprogram
0132 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x23 = 0x132,0xffdc
0133 00c7 | | Action Elaborate_Subprogram
0134 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x24 = 0x134,0xffdb
0135 00c7 | | Action Elaborate_Subprogram
0136 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x25 = 0x136,0xffda
0137 00c7 | | Action Elaborate_Subprogram
0138 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x26 = 0x138,0xffd9
0139 00c7 | | Action Elaborate_Subprogram
013a 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x27 = 0x13a,0xffd8
013b 00c7 | | Action Elaborate_Subprogram
013c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x28 = 0x13c,0xffd7
013d 00c7 | | Action Elaborate_Subprogram
013e BODY_0008:
013e 00bc | | Action Signal_Activated
013f 00bb | | Action Signal_Completion
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 4608 |F | Jump_Case 0x9 ; Debug Table 0x2 = .DEBUG 0x0143,0x066c,0x0005,0x0000,0x0058,0x6b35,0x0000,0x002c
0144 7808 |x | Jump 0x14d ; case 0x0
0145 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0146 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0147 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0148 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0149 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
014a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
014b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
014c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
014d 00da | | Load_Top At_Offset_2
014e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
014f 0125 | % | Execute Any,Set_Constraint
0150 00da | | Load_Top At_Offset_2
0151 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0152 1c00 | | Execute_Immediate Run_Utility,0x0
0153 00da | | Load_Top At_Offset_2
0154 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0155 0125 | % | Execute Any,Set_Constraint
0156 00da | | Load_Top At_Offset_2
0157 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0158 1c00 | | Execute_Immediate Run_Utility,0x0
0159 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
015a 0000 0000 | | .BLANK 0000[0x6]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0163,0x066e,0x0002,0x0000,0x0058,0x6b35,0x0000,0x006b
; Debug Table 0x3.0x0 = 0x163,0x1
0164 e002 | | Load 0x0,0x2
0165 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0166 6802 |h | Jump_Zero 0x169
0167 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x1 = 0x167,0x2
0168 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0169 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x2 = 0x169,0x3
016a e002 | | Load 0x0,0x2
016b 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
016c 180d | | Execute Package,Field_Execute,Field_Number 0xd
016d e00e | | Load 0x0,0xe
016e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
016f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 017b | { | .CONST 0x017b ; Address of begin
0171 0196 | | .CONST 0x0196 ; Address of exception handler
0172 0003 | | .CONST 0x0003 ; Number of locals
0173 INIT_0170:
0173 e002 | | Load 0x0,0x2 ; Debug Table 0x4 = .DEBUG 0x0173,0x0676,0x0001,0x0000,0x0058,0x6b35,0x0000,0x0074
; Debug Table 0x4.0x0 = 0x173,0xffff
0174 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0175 02c7 | | Declare_Variable Any
0176 e002 | | Load 0x0,0x2
0177 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0178 c402 | | Store 0x2,0x2
0179 e20d | | Load 0x1,0xd ; Debug Table 0x4.0x1 = 0x179,0xfffe
017a 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
017b BODY_0170:
017b 487e |H~ | Short_Literal 0x7e ; Debug Table 0x4.0x2 = 0x17b,0x1
017c a5fd | | Store_Unchecked 0x2,-0x3
017d e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x3 = 0x17d,0x2
017e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
017f c5fe | | Store 0x2,-0x2
0180 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x4 = 0x180,0x3
0181 680f |h | Jump_Zero 0x191
0182 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x5 = 0x182,0x4
0183 e00e | | Load 0x0,0xe
0184 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0185 e002 | | Load 0x0,0x2
0186 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0187 180e | | Execute Package,Field_Execute,Field_Number 0xe
0188 c402 | | Store 0x2,0x2
0189 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x6 = 0x189,0x5
018a 8226 | & | Call 0x1,0x26
018b 7005 |p | Jump_Nonzero 0x191
018c 487c |H| | Short_Literal 0x7c ; Debug Table 0x4.0x7 = 0x18c,0x6
018d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
018e e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x8 = 0x18e,0x7
018f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0190 0257 | W | Execute Discrete,Raise
0191 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x9 = 0x191,0x8
0192 c5fe | | Store 0x2,-0x2
0193 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xa = 0x193,0x9
0194 a5fd | | Store_Unchecked 0x2,-0x3
0195 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0196 TRAP_0170:
0196 010d | | Execute Exception,Is_Numeric_Error
0197 6803 |h | Jump_Zero 0x19b
0198 487c |H| | Short_Literal 0x7c ; Debug Table 0x4.0xb = 0x198,0xa
0199 a5fd | | Store_Unchecked 0x2,-0x3
019a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
019b e001 | | Load 0x0,0x1
019c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
019d 010f | | Execute Exception,Equal
019e 6803 |h | Jump_Zero 0x1a2
019f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xc = 0x19f,0xb
01a0 a5fd | | Store_Unchecked 0x2,-0x3
01a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01a2 0100 | | Execute Exception,Raise
01a3 0000 0000 | | .BLANK 0000[0x5]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b7 | | .CONST 0x01b7 ; Address of begin
01a9 01e7 | | .CONST 0x01e7 ; Address of exception handler
01aa 0004 | | .CONST 0x0004 ; Number of locals
01ab INIT_01a8:
01ab e002 | | Load 0x0,0x2 ; Debug Table 0x5 = .DEBUG 0x01ab,0x0692,0x0001,0x0000,0x0058,0x6b35,0x0000,0x0084
; Debug Table 0x5.0x0 = 0x1ab,0xffff
01ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01ad 02c7 | | Declare_Variable Any
01ae 00d8 | | Load_Top At_Offset_0
01af 1c00 | | Execute_Immediate Run_Utility,0x0
01b0 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x1 = 0x1b0,0xfffe
01b1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01b2 02ff | | Declare_Variable Variant_Record
01b3 00d8 | | Load_Top At_Offset_0
01b4 1c00 | | Execute_Immediate Run_Utility,0x0
01b5 e20d | | Load 0x1,0xd ; Debug Table 0x5.0x2 = 0x1b5,0xfffd
01b6 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
01b7 BODY_01a8:
01b7 487e |H~ | Short_Literal 0x7e ; Debug Table 0x5.0x3 = 0x1b7,0x1
01b8 a5fd | | Store_Unchecked 0x2,-0x3
01b9 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x4 = 0x1b9,0x2
01ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01bb c5fe | | Store 0x2,-0x2
01bc e00f | | Load 0x0,0xf ; Debug Table 0x5.0x5 = 0x1bc,0x3
01bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01be 00da | | Load_Top At_Offset_2
01bf e5ff | | Load 0x2,-0x1
01c0 e00f | | Load 0x0,0xf
01c1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01c2 00d1 | | Pop_Control Pop_Count_1
01c3 0059 | Y | Store_Top Discrete,At_Offset_1
01c4 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x6 = 0x1c4,0x4
01c5 00d9 | | Load_Top At_Offset_1
01c6 e001 | | Load 0x0,0x1
01c7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01c8 e00f | | Load 0x0,0xf ; Debug Table 0x5.0x7 = 0x1c8,0x5
01c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ca 00db | | Load_Top At_Offset_3
01cb 0120 | | Execute Any,Is_Value
01cc 6803 |h | Jump_Zero 0x1d0
01cd e002 | | Load 0x0,0x2
01ce 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01cf 7801 |x | Jump 0x1d1
01d0 00db | | Load_Top At_Offset_3
01d1 00db | | Load_Top At_Offset_3
01d2 e00f | | Load 0x0,0xf
01d3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01d4 c402 | | Store 0x2,0x2
01d5 0059 | Y | Store_Top Discrete,At_Offset_1
01d6 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x8 = 0x1d6,0x6
01d7 00d9 | | Load_Top At_Offset_1
01d8 e001 | | Load 0x0,0x1
01d9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01da 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x9 = 0x1da,0x7
01db 8226 | & | Call 0x1,0x26
01dc 7005 |p | Jump_Nonzero 0x1e2
01dd 487c |H| | Short_Literal 0x7c ; Debug Table 0x5.0xa = 0x1dd,0x8
01de 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01df e001 | | Load 0x0,0x1 ; Debug Table 0x5.0xb = 0x1df,0x9
01e0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01e1 0257 | W | Execute Discrete,Raise
01e2 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xc = 0x1e2,0xa
01e3 c5fe | | Store 0x2,-0x2
01e4 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xd = 0x1e4,0xb
01e5 a5fd | | Store_Unchecked 0x2,-0x3
01e6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01e7 TRAP_01a8:
01e7 e001 | | Load 0x0,0x1
01e8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01e9 010f | | Execute Exception,Equal
01ea 6803 |h | Jump_Zero 0x1ee
01eb 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xe = 0x1eb,0xc
01ec a5fd | | Store_Unchecked 0x2,-0x3
01ed 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01ee 0100 | | Execute Exception,Raise
01ef 0000 | | .XXX[0x1]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 0204 | | .CONST 0x0204 ; Address of begin
01f1 02ee | | .CONST 0x02ee ; Address of exception handler
01f2 0007 | | .CONST 0x0007 ; Number of locals
01f3 INIT_01f0:
01f3 e20d | | Load 0x1,0xd ; Debug Table 0x6 = .DEBUG 0x01f3,0x06b2,0x0001,0x0000,0x0058,0x6b35,0x0000,0x0094
; Debug Table 0x6.0x0 = 0x1f3,0xffff
01f4 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
01f5 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x1 = 0x1f5,0xfffe
01f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f7 e21f | | Load 0x1,0x1f ; Debug Table 0x6.0x2 = 0x1f7,0xfffd
01f8 0322 | " | Declare_Variable Record
01f9 00d8 | | Load_Top At_Offset_0
01fa 1c00 | | Execute_Immediate Run_Utility,0x0
01fb e220 | | Load 0x1,0x20 ; Debug Table 0x6.0x3 = 0x1fb,0xfffc
01fc 0007 | | Action Break_Optional
01fd 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x6.0x4 = 0x1fd,0xfffb
01fe e010 | | Load 0x0,0x10 ; Debug Table 0x6.0x5 = 0x1fe,0xfffa
01ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0200 02c7 | | Declare_Variable Any
0201 e010 | | Load 0x0,0x10
0202 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0203 c407 | | Store 0x2,0x7
0204 BODY_01f0:
0204 487e |H~ | Short_Literal 0x7e ; Debug Table 0x6.0x6 = 0x204,0x1
0205 a5fc | | Store_Unchecked 0x2,-0x4
0206 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x7 = 0x206,0x2
0207 e010 | | Load 0x0,0x10
0208 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0209 012e | . | Execute Any,Not_Equal
020a e5fd | | Load 0x2,-0x3
020b 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
020c e011 | | Load 0x0,0x11 ; Debug Table 0x6.0x8 = 0x20c,0x3
020d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
020e e5fe | | Load 0x2,-0x2
020f e010 | | Load 0x0,0x10
0210 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0211 c407 | | Store 0x2,0x7
0212 e00f | | Load 0x0,0xf ; Debug Table 0x6.0x9 = 0x212,0x4
0213 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0214 e5fd | | Load 0x2,-0x3
0215 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0216 0120 | | Execute Any,Is_Value
0217 6803 |h | Jump_Zero 0x21b
0218 e002 | | Load 0x0,0x2
0219 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021a 7802 |x | Jump 0x21d
021b e5fd | | Load 0x2,-0x3
021c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021d 00da | | Load_Top At_Offset_2
021e e21c | | Load 0x1,0x1c
021f e21d | | Load 0x1,0x1d
0220 e5ff | | Load 0x2,-0x1
0221 e00f | | Load 0x0,0xf
0222 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0223 e5fd | | Load 0x2,-0x3
0224 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0225 c402 | | Store 0x2,0x2
0226 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xa = 0x226,0x5
0227 e402 | | Load 0x2,0x2
0228 e001 | | Load 0x0,0x1
0229 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022a e00a | | Load 0x0,0xa ; Debug Table 0x6.0xb = 0x22a,0x6
022b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
022c e5fd | | Load 0x2,-0x3
022d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
022e 4800 |H | Short_Literal 0x0
022f 60d0 |` | Indirect_Literal Discrete,0x300,{0x00000000, 0x00004000}
0230 e407 | | Load 0x2,0x7
0231 4800 |H | Short_Literal 0x0
0232 e5fd | | Load 0x2,-0x3
0233 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0234 4802 |H | Short_Literal 0x2
0235 e00a | | Load 0x0,0xa
0236 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0237 e5fd | | Load 0x2,-0x3
0238 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0239 c403 | | Store 0x2,0x3
023a e403 | | Load 0x2,0x3 ; Debug Table 0x6.0xc = 0x23a,0x7
023b e00f | | Load 0x0,0xf
023c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
023d a402 | | Store_Unchecked 0x2,0x2
023e 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xd = 0x23e,0x8
023f e402 | | Load 0x2,0x2
0240 e001 | | Load 0x0,0x1
0241 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0242 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0xe = 0x242,0x9
0243 e00a | | Load 0x0,0xa
0244 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0245 e5fd | | Load 0x2,-0x3
0246 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0247 e222 | " | Load 0x1,0x22
0248 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0249 e00a | | Load 0x0,0xa ; Debug Table 0x6.0xf = 0x249,0xa
024a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
024b e5fd | | Load 0x2,-0x3
024c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
024d e221 | ! | Load 0x1,0x21
024e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0250 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x10 = 0x250,0xb
0251 e227 | ' | Load 0x1,0x27
0252 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0253 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0254 e21e | | Load 0x1,0x1e ; Debug Table 0x6.0x11 = 0x254,0xc
0255 00db | | Load_Top At_Offset_3
0256 0217 | | Execute Heap_Access,All_Reference
0257 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0258 4802 |H | Short_Literal 0x2 ; Debug Table 0x6.0x12 = 0x258,0xd
0259 00db | | Load_Top At_Offset_3
025a 0217 | | Execute Heap_Access,All_Reference
025b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
025c e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x13 = 0x25c,0xe
025d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
025e 00db | | Load_Top At_Offset_3
025f 0217 | | Execute Heap_Access,All_Reference
0260 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0261 e004 | | Load 0x0,0x4 ; Debug Table 0x6.0x14 = 0x261,0xf
0262 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0263 00da | | Load_Top At_Offset_2
0264 039c | | Declare_Variable Heap_Access,By_Allocation
0265 00d8 | | Load_Top At_Offset_0
0266 0217 | | Execute Heap_Access,All_Reference
0267 1c00 | | Execute_Immediate Run_Utility,0x0
0268 e5fd | | Load 0x2,-0x3
0269 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
026a 0007 | | Action Break_Optional ; Debug Table 0x6.0x15 = 0x26a,0x10
026b e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x16 = 0x26b,0x11
026c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
026d 0219 | | Execute Heap_Access,All_Read
026e 00d8 | | Load_Top At_Offset_0
026f e004 | | Load 0x0,0x4
0270 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0271 00d2 | | Pop_Control Pop_Count_2
0272 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x17 = 0x272,0x12
0273 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0274 e228 | ( | Load 0x1,0x28
0275 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0276 00db | | Load_Top At_Offset_3
0277 0217 | | Execute Heap_Access,All_Reference
0278 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0279 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x18 = 0x279,0x13
027a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
027b 00da | | Load_Top At_Offset_2
027c 039c | | Declare_Variable Heap_Access,By_Allocation
027d 00d8 | | Load_Top At_Offset_0
027e 0217 | | Execute Heap_Access,All_Reference
027f 1c00 | | Execute_Immediate Run_Utility,0x0
0280 e5fd | | Load 0x2,-0x3
0281 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0282 0007 | | Action Break_Optional ; Debug Table 0x6.0x19 = 0x282,0x14
0283 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x1a = 0x283,0x15
0284 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0285 e229 | ) | Load 0x1,0x29
0286 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0287 00db | | Load_Top At_Offset_3
0288 0217 | | Execute Heap_Access,All_Reference
0289 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
028a e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x1b = 0x28a,0x16
028b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
028c 00da | | Load_Top At_Offset_2
028d 039c | | Declare_Variable Heap_Access,By_Allocation
028e 00d8 | | Load_Top At_Offset_0
028f 0217 | | Execute Heap_Access,All_Reference
0290 1c00 | | Execute_Immediate Run_Utility,0x0
0291 e5fd | | Load 0x2,-0x3
0292 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0293 0007 | | Action Break_Optional ; Debug Table 0x6.0x1c = 0x293,0x17
0294 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x1d = 0x294,0x18
0295 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0296 e22a | * | Load 0x1,0x2a
0297 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0298 00db | | Load_Top At_Offset_3
0299 0217 | | Execute Heap_Access,All_Reference
029a 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
029b e007 | | Load 0x0,0x7 ; Debug Table 0x6.0x1e = 0x29b,0x19
029c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
029d 00da | | Load_Top At_Offset_2
029e 039c | | Declare_Variable Heap_Access,By_Allocation
029f 00d8 | | Load_Top At_Offset_0
02a0 0217 | | Execute Heap_Access,All_Reference
02a1 1c00 | | Execute_Immediate Run_Utility,0x0
02a2 e5fd | | Load 0x2,-0x3
02a3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
02a4 0007 | | Action Break_Optional ; Debug Table 0x6.0x1f = 0x2a4,0x1a
02a5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x20 = 0x2a5,0x1b
02a6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02a7 e22b | + | Load 0x1,0x2b
02a8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02a9 00db | | Load_Top At_Offset_3
02aa 0217 | | Execute Heap_Access,All_Reference
02ab 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
02ac e008 | | Load 0x0,0x8 ; Debug Table 0x6.0x21 = 0x2ac,0x1c
02ad 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02ae 00da | | Load_Top At_Offset_2
02af 039c | | Declare_Variable Heap_Access,By_Allocation
02b0 00d8 | | Load_Top At_Offset_0
02b1 0217 | | Execute Heap_Access,All_Reference
02b2 1c00 | | Execute_Immediate Run_Utility,0x0
02b3 e5fd | | Load 0x2,-0x3
02b4 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
02b5 0007 | | Action Break_Optional ; Debug Table 0x6.0x22 = 0x2b5,0x1d
02b6 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x23 = 0x2b6,0x1e
02b7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
02b8 e22c | , | Load 0x1,0x2c
02b9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02ba 00db | | Load_Top At_Offset_3
02bb 0217 | | Execute Heap_Access,All_Reference
02bc 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02bd e009 | | Load 0x0,0x9 ; Debug Table 0x6.0x24 = 0x2bd,0x1f
02be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02bf 00da | | Load_Top At_Offset_2
02c0 039c | | Declare_Variable Heap_Access,By_Allocation
02c1 e5fd | | Load 0x2,-0x3
02c2 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
02c3 0007 | | Action Break_Optional ; Debug Table 0x6.0x25 = 0x2c3,0x20
02c4 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x26 = 0x2c4,0x21
02c5 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
02c6 0219 | | Execute Heap_Access,All_Read
02c7 00d8 | | Load_Top At_Offset_0
02c8 00db | | Load_Top At_Offset_3
02c9 e009 | | Load 0x0,0x9
02ca 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02cb 00d2 | | Pop_Control Pop_Count_2
02cc e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x27 = 0x2cc,0x22
02cd 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
02ce e22d | - | Load 0x1,0x2d
02cf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02d0 00db | | Load_Top At_Offset_3
02d1 0217 | | Execute Heap_Access,All_Reference
02d2 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
02d3 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x28 = 0x2d3,0x23
02d4 00db | | Load_Top At_Offset_3
02d5 0217 | | Execute Heap_Access,All_Reference
02d6 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
02d7 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x29 = 0x2d7,0x24
02d8 00db | | Load_Top At_Offset_3
02d9 0217 | | Execute Heap_Access,All_Reference
02da 380a |8 | Execute Record,Field_Write,Field_Number 0xa
02db 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x2a = 0x2db,0x25
02dc 00db | | Load_Top At_Offset_3
02dd 0217 | | Execute Heap_Access,All_Reference
02de 380b |8 | Execute Record,Field_Write,Field_Number 0xb
02df 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x2b = 0x2df,0x26
02e0 00db | | Load_Top At_Offset_3
02e1 0217 | | Execute Heap_Access,All_Reference
02e2 380c |8 | Execute Record,Field_Write,Field_Number 0xc
02e3 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x2c = 0x2e3,0x27
02e4 00db | | Load_Top At_Offset_3
02e5 0217 | | Execute Heap_Access,All_Reference
02e6 380d |8 | Execute Record,Field_Write,Field_Number 0xd
02e7 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x2d = 0x2e7,0x28
02e8 00db | | Load_Top At_Offset_3
02e9 0217 | | Execute Heap_Access,All_Reference
02ea 380e |8 | Execute Record,Field_Write,Field_Number 0xe
02eb 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x2e = 0x2eb,0x29
02ec a5fc | | Store_Unchecked 0x2,-0x4
02ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02ee TRAP_01f0:
02ee e001 | | Load 0x0,0x1
02ef 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02f0 010f | | Execute Exception,Equal
02f1 680d |h | Jump_Zero 0x2ff
02f2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x2f = 0x2f2,0x2a
02f3 e010 | | Load 0x0,0x10
02f4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02f5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x30 = 0x2f5,0x2b
02f6 4801 |H | Short_Literal 0x1
02f7 4800 |H | Short_Literal 0x0
02f8 e5fe | | Load 0x2,-0x2
02f9 e010 | | Load 0x0,0x10
02fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02fb c407 | | Store 0x2,0x7
02fc e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x31 = 0x2fc,0x2c
02fd a5fc | | Store_Unchecked 0x2,-0x4
02fe 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02ff 0100 | | Execute Exception,Raise
0300 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0304 0000 0000 | | .LITERAL {0x00000000, 0x00587105}
0308 5468 6973 |This| .LITERAL {0x54686973, 0x20697320}
030c 6120 576f |a Wo| .XXX[0x8]
030e 726b 5f4f |rk_O|
0310 7264 6572 |rder|
0312 2e20 2020 |. |
0314 0000 0000 | | .BLANK 0000[0x4]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0328 | ( | .CONST 0x0328 ; Address of begin
0319 03bc | | .CONST 0x03bc ; Address of exception handler
031a 0006 | | .CONST 0x0006 ; Number of locals
031b INIT_0318:
031b e20d | | Load 0x1,0xd ; Debug Table 0x7 = .DEBUG 0x031b,0x0718,0x0001,0x0000,0x0058,0x6b35,0x0000,0x00ad
; Debug Table 0x7.0x0 = 0x31b,0xffff
031c 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
031d e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x1 = 0x31d,0xfffe
031e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031f e220 | | Load 0x1,0x20 ; Debug Table 0x7.0x2 = 0x31f,0xfffd
0320 0007 | | Action Break_Optional
0321 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x7.0x3 = 0x321,0xfffc
0322 e010 | | Load 0x0,0x10 ; Debug Table 0x7.0x4 = 0x322,0xfffb
0323 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0324 02c7 | | Declare_Variable Any
0325 e010 | | Load 0x0,0x10
0326 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0327 c406 | | Store 0x2,0x6
0328 BODY_0318:
0328 487e |H~ | Short_Literal 0x7e ; Debug Table 0x7.0x5 = 0x328,0x1
0329 a5fc | | Store_Unchecked 0x2,-0x4
032a e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x6 = 0x32a,0x2
032b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
032c 8226 | & | Call 0x1,0x26
032d 7005 |p | Jump_Nonzero 0x333
032e 487c |H| | Short_Literal 0x7c ; Debug Table 0x7.0x7 = 0x32e,0x3
032f a402 | | Store_Unchecked 0x2,0x2
0330 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x8 = 0x330,0x4
0331 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0332 0257 | W | Execute Discrete,Raise
0333 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x9 = 0x333,0x5
0334 7005 |p | Jump_Nonzero 0x33a
0335 4878 |Hx | Short_Literal 0x78 ; Debug Table 0x7.0xa = 0x335,0x6
0336 a402 | | Store_Unchecked 0x2,0x2
0337 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0xb = 0x337,0x7
0338 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0339 0257 | W | Execute Discrete,Raise
033a e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0xc = 0x33a,0x8
033b e010 | | Load 0x0,0x10
033c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033d 012e | . | Execute Any,Not_Equal
033e e5fd | | Load 0x2,-0x3
033f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0340 e011 | | Load 0x0,0x11 ; Debug Table 0x7.0xd = 0x340,0x9
0341 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0342 e5fe | | Load 0x2,-0x2
0343 e010 | | Load 0x0,0x10
0344 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0345 c406 | | Store 0x2,0x6
0346 e00a | | Load 0x0,0xa ; Debug Table 0x7.0xe = 0x346,0xa
0347 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0348 e5fd | | Load 0x2,-0x3
0349 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
034a 4800 |H | Short_Literal 0x0
034b 67b4 |g | Indirect_Literal Discrete,0x300,{0x00000000, 0x00004000}
034c e406 | | Load 0x2,0x6
034d 4800 |H | Short_Literal 0x0
034e e5fd | | Load 0x2,-0x3
034f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0350 e5ff | | Load 0x2,-0x1
0351 e003 | | Load 0x0,0x3
0352 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0353 01d7 | | Execute Vector,Field_Read
0354 e00a | | Load 0x0,0xa
0355 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0356 e5fd | | Load 0x2,-0x3
0357 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0358 c403 | | Store 0x2,0x3
0359 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0xf = 0x359,0xb
035a e00f | | Load 0x0,0xf
035b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
035c a402 | | Store_Unchecked 0x2,0x2
035d 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x10 = 0x35d,0xc
035e e402 | | Load 0x2,0x2
035f e001 | | Load 0x0,0x1
0360 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0361 e00a | | Load 0x0,0xa ; Debug Table 0x7.0x11 = 0x361,0xd
0362 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0363 e5fd | | Load 0x2,-0x3
0364 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0365 e221 | ! | Load 0x1,0x21
0366 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0367 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0368 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x12 = 0x368,0xe
0369 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
036a 00db | | Load_Top At_Offset_3
036b 0217 | | Execute Heap_Access,All_Reference
036c 8223 | # | Call 0x1,0x23
036d 7005 |p | Jump_Nonzero 0x373
036e 487c |H| | Short_Literal 0x7c ; Debug Table 0x7.0x13 = 0x36e,0xf
036f a402 | | Store_Unchecked 0x2,0x2
0370 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x14 = 0x370,0x10
0371 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0372 0257 | W | Execute Discrete,Raise
0373 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x15 = 0x373,0x11
0374 e227 | ' | Load 0x1,0x27
0375 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0376 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0377 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x16 = 0x377,0x12
0378 0217 | | Execute Heap_Access,All_Reference
0379 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
037a 00da | | Load_Top At_Offset_2
037b e22e | . | Load 0x1,0x2e
037c e22f | / | Load 0x1,0x2f
037d 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
037e e00d | | Load 0x0,0xd
037f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0380 e5fd | | Load 0x2,-0x3
0381 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0382 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x17 = 0x382,0x13
0383 0217 | | Execute Heap_Access,All_Reference
0384 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0385 00da | | Load_Top At_Offset_2
0386 e233 | 3 | Load 0x1,0x33
0387 e234 | 4 | Load 0x1,0x34
0388 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
0389 e00d | | Load 0x0,0xd
038a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
038b e5fd | | Load 0x2,-0x3
038c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
038d 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x18 = 0x38d,0x14
038e 0217 | | Execute Heap_Access,All_Reference
038f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0390 00da | | Load_Top At_Offset_2
0391 e238 | 8 | Load 0x1,0x38
0392 e239 | 9 | Load 0x1,0x39
0393 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
0394 e00d | | Load 0x0,0xd
0395 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0396 e5fd | | Load 0x2,-0x3
0397 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0398 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x19 = 0x398,0x15
0399 0217 | | Execute Heap_Access,All_Reference
039a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
039b 00da | | Load_Top At_Offset_2
039c e23d | = | Load 0x1,0x3d
039d e23e | > | Load 0x1,0x3e
039e 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
039f e00d | | Load 0x0,0xd
03a0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03a1 e5fd | | Load 0x2,-0x3
03a2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
03a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x1a = 0x3a3,0x16
03a4 0217 | | Execute Heap_Access,All_Reference
03a5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
03a6 00da | | Load_Top At_Offset_2
03a7 e242 | B | Load 0x1,0x42
03a8 e243 | C | Load 0x1,0x43
03a9 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
03aa e00d | | Load 0x0,0xd
03ab 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03ac e5fd | | Load 0x2,-0x3
03ad 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
03ae 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x1b = 0x3ae,0x17
03af 0217 | | Execute Heap_Access,All_Reference
03b0 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
03b1 00da | | Load_Top At_Offset_2
03b2 e247 | G | Load 0x1,0x47
03b3 e248 | H | Load 0x1,0x48
03b4 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
03b5 e00d | | Load 0x0,0xd
03b6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03b7 e5fd | | Load 0x2,-0x3
03b8 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
03b9 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x1c = 0x3b9,0x18
03ba a5fc | | Store_Unchecked 0x2,-0x4
03bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03bc TRAP_0318:
03bc e001 | | Load 0x0,0x1
03bd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03be 010f | | Execute Exception,Equal
03bf 680d |h | Jump_Zero 0x3cd
03c0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x1d = 0x3c0,0x19
03c1 e010 | | Load 0x0,0x10
03c2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03c3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x1e = 0x3c3,0x1a
03c4 4801 |H | Short_Literal 0x1
03c5 4800 |H | Short_Literal 0x0
03c6 e5fe | | Load 0x2,-0x2
03c7 e010 | | Load 0x0,0x10
03c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03c9 c406 | | Store 0x2,0x6
03ca e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x1f = 0x3ca,0x1b
03cb a5fc | | Store_Unchecked 0x2,-0x4
03cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03cd 0100 | | Execute Exception,Raise
03ce 0000 0000 | | .XXX[0x2]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d7 | | .CONST 0x03d7 ; Address of begin
03d1 03ee | | .CONST 0x03ee ; Address of exception handler
03d2 0003 | | .CONST 0x0003 ; Number of locals
03d3 INIT_03d0:
03d3 e20d | | Load 0x1,0xd ; Debug Table 0x8 = .DEBUG 0x03d3,0x075a,0x0001,0x0000,0x0058,0x6b35,0x0000,0x00c6
; Debug Table 0x8.0x0 = 0x3d3,0xffff
03d4 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
03d5 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x1 = 0x3d5,0xfffe
03d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d7 BODY_03d0:
03d7 487e |H~ | Short_Literal 0x7e ; Debug Table 0x8.0x2 = 0x3d7,0x1
03d8 a5fe | | Store_Unchecked 0x2,-0x2
03d9 e00a | | Load 0x0,0xa ; Debug Table 0x8.0x3 = 0x3d9,0x2
03da 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03db e5ff | | Load 0x2,-0x1
03dc 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
03dd 4800 |H | Short_Literal 0x0
03de e00a | | Load 0x0,0xa
03df 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03e0 e5ff | | Load 0x2,-0x1
03e1 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
03e2 0059 | Y | Store_Top Discrete,At_Offset_1
03e3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x4 = 0x3e3,0x3
03e4 e00f | | Load 0x0,0xf
03e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03e6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
03e7 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x5 = 0x3e7,0x4
03e8 00da | | Load_Top At_Offset_2
03e9 e001 | | Load 0x0,0x1
03ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03eb 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x6 = 0x3eb,0x5
03ec a5fe | | Store_Unchecked 0x2,-0x2
03ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03ee TRAP_03d0:
03ee e001 | | Load 0x0,0x1
03ef 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03f0 010f | | Execute Exception,Equal
03f1 6803 |h | Jump_Zero 0x3f5
03f2 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x7 = 0x3f2,0x6
03f3 a5fe | | Store_Unchecked 0x2,-0x2
03f4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03f5 0100 | | Execute Exception,Raise
03f6 0000 0000 | | .XXX[0x2]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0405 | | .CONST 0x0405 ; Address of begin
03f9 0473 | s | .CONST 0x0473 ; Address of exception handler
03fa 0004 | | .CONST 0x0004 ; Number of locals
03fb INIT_03f8:
03fb e20d | | Load 0x1,0xd ; Debug Table 0x9 = .DEBUG 0x03fb,0x076c,0x0001,0x0000,0x0058,0x6b35,0x0000,0x00d2
; Debug Table 0x9.0x0 = 0x3fb,0xffff
03fc 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
03fd e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x1 = 0x3fd,0xfffe
03fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ff e010 | | Load 0x0,0x10 ; Debug Table 0x9.0x2 = 0x3ff,0xfffd
0400 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0401 02c7 | | Declare_Variable Any
0402 e5ff | | Load 0x2,-0x1
0403 8218 | | Call 0x1,0x18
0404 c404 | | Store 0x2,0x4
0405 BODY_03f8:
0405 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x3 = 0x405,0x1
0406 8219 | | Call 0x1,0x19
0407 4602 |F | Jump_Case 0x3
0408 784d |xM | Jump 0x456 ; case 0x0
0409 784c |xL | Jump 0x456 ; case 0x1
040a 7800 |x | Jump 0x40b ; case 0x2
040b e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x4 = 0x40b,0x2
040c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
040d 0219 | | Execute Heap_Access,All_Read
040e e005 | | Load 0x0,0x5
040f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0410 00d9 | | Load_Top At_Offset_1
0411 e005 | | Load 0x0,0x5
0412 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0413 00d1 | | Pop_Control Pop_Count_1
0414 c402 | | Store 0x2,0x2
0415 00d1 | | Pop_Control Pop_Count_1
0416 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x5 = 0x416,0x3
0417 00db | | Load_Top At_Offset_3
0418 e001 | | Load 0x0,0x1
0419 1818 | | Execute Package,Field_Execute,Field_Number 0x18
041a e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x6 = 0x41a,0x4
041b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
041c 0219 | | Execute Heap_Access,All_Read
041d e006 | | Load 0x0,0x6
041e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
041f 00d9 | | Load_Top At_Offset_1
0420 e006 | | Load 0x0,0x6
0421 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0422 00d1 | | Pop_Control Pop_Count_1
0423 c402 | | Store 0x2,0x2
0424 00d1 | | Pop_Control Pop_Count_1
0425 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x7 = 0x425,0x5
0426 00db | | Load_Top At_Offset_3
0427 e001 | | Load 0x0,0x1
0428 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0429 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x8 = 0x429,0x6
042a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
042b 0219 | | Execute Heap_Access,All_Read
042c e007 | | Load 0x0,0x7
042d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042e 00d9 | | Load_Top At_Offset_1
042f e007 | | Load 0x0,0x7
0430 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0431 00d1 | | Pop_Control Pop_Count_1
0432 c402 | | Store 0x2,0x2
0433 00d1 | | Pop_Control Pop_Count_1
0434 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x9 = 0x434,0x7
0435 00db | | Load_Top At_Offset_3
0436 e001 | | Load 0x0,0x1
0437 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0438 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0xa = 0x438,0x8
0439 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
043a 0219 | | Execute Heap_Access,All_Read
043b e008 | | Load 0x0,0x8
043c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
043d 00d9 | | Load_Top At_Offset_1
043e e008 | | Load 0x0,0x8
043f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0440 00d1 | | Pop_Control Pop_Count_1
0441 c402 | | Store 0x2,0x2
0442 00d1 | | Pop_Control Pop_Count_1
0443 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xb = 0x443,0x9
0444 00db | | Load_Top At_Offset_3
0445 e001 | | Load 0x0,0x1
0446 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0447 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0xc = 0x447,0xa
0448 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0449 0219 | | Execute Heap_Access,All_Read
044a e009 | | Load 0x0,0x9
044b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044c 00d9 | | Load_Top At_Offset_1
044d e009 | | Load 0x0,0x9
044e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
044f 00d1 | | Pop_Control Pop_Count_1
0450 c402 | | Store 0x2,0x2
0451 00d1 | | Pop_Control Pop_Count_1
0452 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xd = 0x452,0xb
0453 00db | | Load_Top At_Offset_3
0454 e001 | | Load 0x0,0x1
0455 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0456 e00a | | Load 0x0,0xa ; Debug Table 0x9.0xe = 0x456,0xd
0457 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0458 e5ff | | Load 0x2,-0x1
0459 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
045a e00a | | Load 0x0,0xa
045b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
045c e5ff | | Load 0x2,-0x1
045d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
045e 005a | Z | Store_Top Discrete,At_Offset_2
045f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xf = 0x45f,0xe
0460 e00f | | Load 0x0,0xf
0461 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0462 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0463 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x10 = 0x463,0xf
0464 00db | | Load_Top At_Offset_3
0465 e001 | | Load 0x0,0x1
0466 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0467 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x11 = 0x467,0x10
0468 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0469 7006 |p | Jump_Nonzero 0x470
046a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x12 = 0x46a,0x11
046b 4801 |H | Short_Literal 0x1
046c 4801 |H | Short_Literal 0x1
046d e010 | | Load 0x0,0x10
046e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
046f c404 | | Store 0x2,0x4
0470 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x13 = 0x470,0x12
0471 a5fe | | Store_Unchecked 0x2,-0x2
0472 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0473 TRAP_03f8:
0473 e012 | | Load 0x0,0x12
0474 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0475 010f | | Execute Exception,Equal
0476 6809 |h | Jump_Zero 0x480
0477 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x14 = 0x477,0x13
0478 4801 |H | Short_Literal 0x1
0479 4800 |H | Short_Literal 0x0
047a e010 | | Load 0x0,0x10
047b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
047c c404 | | Store 0x2,0x4
047d 4877 |Hw | Short_Literal 0x77 ; Debug Table 0x9.0x15 = 0x47d,0x14
047e a5fe | | Store_Unchecked 0x2,-0x2
047f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0480 e001 | | Load 0x0,0x1
0481 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0482 010f | | Execute Exception,Equal
0483 6806 |h | Jump_Zero 0x48a
0484 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x16 = 0x484,0x15
0485 e010 | | Load 0x0,0x10
0486 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0487 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x17 = 0x487,0x16
0488 a5fe | | Store_Unchecked 0x2,-0x2
0489 4501 |E | Exit_Suprogram New_Top_Offset 0x1
048a 0100 | | Execute Exception,Raise
048b 0000 0000 | | .BLANK 0000[0x5]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493 | | .CONST 0x0493 ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0001 | | .CONST 0x0001 ; Number of locals
0493 BODY_0490:
0493 INIT_0490:
0493 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x0493,0x079e,0x0002,0x0000,0x0058,0x6b35,0x0000,0x00de
; Debug Table 0xa.0x0 = 0x493,0x1
0494 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0495 e00a | | Load 0x0,0xa
0496 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0497 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b | | .CONST 0x049b ; Address of begin
0499 0004 | | .CONST 0x0004 ; Address of exception handler
049a 0001 | | .CONST 0x0001 ; Number of locals
049b BODY_0498:
049b INIT_0498:
049b 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x049b,0x07a2,0x0002,0x0000,0x0058,0x6b35,0x0000,0x00e9
; Debug Table 0xb.0x0 = 0x49b,0x1
049c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
049d e00a | | Load 0x0,0xa
049e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
049f 4603 |F | Jump_Case 0x4
04a0 7805 |x | Jump 0x4a6 ; case 0x0
04a1 7806 |x | Jump 0x4a8 ; case 0x1
04a2 7807 |x | Jump 0x4aa ; case 0x2
04a3 7800 |x | Jump 0x4a4 ; case 0x3
04a4 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x1 = 0x4a4,0x2
04a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04a6 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x2 = 0x4a6,0x3
04a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04a8 48e2 |H | Short_Literal 0xe2 ; Debug Table 0xb.0x3 = 0x4a8,0x4
04a9 0257 | W | Execute Discrete,Raise
04aa 4802 |H | Short_Literal 0x2 ; Debug Table 0xb.0x4 = 0x4aa,0x5
04ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ac 0000 0000 | | .BLANK 0000[0x4]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3 | | .CONST 0x04b3 ; Address of begin
04b1 0004 | | .CONST 0x0004 ; Address of exception handler
04b2 0001 | | .CONST 0x0001 ; Number of locals
04b3 BODY_04b0:
04b3 INIT_04b0:
04b3 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x04b3,0x07ae,0x0002,0x0000,0x0058,0x6b35,0x0000,0x00f2
; Debug Table 0xc.0x0 = 0x4b3,0x1
04b4 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
04b5 e00a | | Load 0x0,0xa
04b6 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb | | .CONST 0x04bb ; Address of begin
04b9 0004 | | .CONST 0x0004 ; Address of exception handler
04ba 0001 | | .CONST 0x0001 ; Number of locals
04bb BODY_04b8:
04bb INIT_04b8:
04bb 4608 |F | Jump_Case 0x9 ; Debug Table 0xd = .DEBUG 0x04bb,0x07b2,0x0005,0x0000,0x0058,0x7105,0x0000,0x008a
04bc 7808 |x | Jump 0x4c5 ; case 0x0
04bd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
04be 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
04bf 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
04c0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
04c1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
04c2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
04c3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
04c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
04c5 e21e | | Load 0x1,0x1e
04c6 00db | | Load_Top At_Offset_3
04c7 00d9 | | Load_Top At_Offset_1
04c8 00d9 | | Load_Top At_Offset_1
04c9 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
04ca 0119 | | Execute Any,Check_In_Formal_Type
04cb 00d1 | | Pop_Control Pop_Count_1
04cc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04cd 4802 |H | Short_Literal 0x2
04ce 00db | | Load_Top At_Offset_3
04cf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04d0 00da | | Load_Top At_Offset_2
04d1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
04d2 0125 | % | Execute Any,Set_Constraint
04d3 e002 | | Load 0x0,0x2
04d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04d5 00db | | Load_Top At_Offset_3
04d6 00d9 | | Load_Top At_Offset_1
04d7 00d9 | | Load_Top At_Offset_1
04d8 3002 |0 | Execute Record,Field_Type,Field_Number 0x2
04d9 0119 | | Execute Any,Check_In_Formal_Type
04da 00d1 | | Pop_Control Pop_Count_1
04db 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04dc 4800 |H | Short_Literal 0x0
04dd 00db | | Load_Top At_Offset_3
04de 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04df 4800 |H | Short_Literal 0x0
04e0 00db | | Load_Top At_Offset_3
04e1 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
04e2 4800 |H | Short_Literal 0x0
04e3 00db | | Load_Top At_Offset_3
04e4 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
04e5 4800 |H | Short_Literal 0x0
04e6 00db | | Load_Top At_Offset_3
04e7 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
04e8 4800 |H | Short_Literal 0x0
04e9 00db | | Load_Top At_Offset_3
04ea 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
04eb 4800 |H | Short_Literal 0x0
04ec 00db | | Load_Top At_Offset_3
04ed 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
04ee 4800 |H | Short_Literal 0x0
04ef 00db | | Load_Top At_Offset_3
04f0 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
04f1 4800 |H | Short_Literal 0x0
04f2 00db | | Load_Top At_Offset_3
04f3 380a |8 | Execute Record,Field_Write,Field_Number 0xa
04f4 4800 |H | Short_Literal 0x0
04f5 00db | | Load_Top At_Offset_3
04f6 380b |8 | Execute Record,Field_Write,Field_Number 0xb
04f7 4800 |H | Short_Literal 0x0
04f8 00db | | Load_Top At_Offset_3
04f9 380c |8 | Execute Record,Field_Write,Field_Number 0xc
04fa 4800 |H | Short_Literal 0x0
04fb 00db | | Load_Top At_Offset_3
04fc 380d |8 | Execute Record,Field_Write,Field_Number 0xd
04fd 4800 |H | Short_Literal 0x0
04fe 00db | | Load_Top At_Offset_3
04ff 380e |8 | Execute Record,Field_Write,Field_Number 0xe
0500 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0501 0000 0000 | | .BLANK 0000[0x7]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 051b | | .CONST 0x051b ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x050b,0x07b4,0x0002,0x0000,0x0058,0x7105,0x0000,0x0115
; Debug Table 0xe.0x0 = 0x50b,0x1
050c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
050d e21e | | Load 0x1,0x1e
050e 01df | | Execute Vector,Equal
050f 6809 |h | Jump_Zero 0x519
0510 00da | | Load_Top At_Offset_2
0511 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0512 0f02 | | Execute_Immediate Equal,0x2
0513 6805 |h | Jump_Zero 0x519
0514 00da | | Load_Top At_Offset_2
0515 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0516 e5fe | | Load 0x2,-0x2
0517 012f | / | Execute Any,Equal
0518 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0519 4800 |H | Short_Literal 0x0
051a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
051b TRAP_0508:
051b 0007 | | Action Break_Optional
051c 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x1 = 0x51c,0x2
051d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
051e 0000 0000 | | .XXX[0x2]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 052f | / | .CONST 0x052f ; Address of begin
0521 0556 | V | .CONST 0x0556 ; Address of exception handler
0522 0005 | | .CONST 0x0005 ; Number of locals
0523 INIT_0520:
0523 e00a | | Load 0x0,0xa ; Debug Table 0xf = .DEBUG 0x0523,0x07ba,0x0002,0x0000,0x0058,0x7105,0x0000,0x0146
; Debug Table 0xf.0x0 = 0x523,0xffff
0524 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0525 02c7 | | Declare_Variable Any
0526 00d8 | | Load_Top At_Offset_0
0527 1c00 | | Execute_Immediate Run_Utility,0x0
0528 e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x1 = 0x528,0xfffe
0529 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052a e21f | | Load 0x1,0x1f ; Debug Table 0xf.0x2 = 0x52a,0xfffd
052b 0322 | " | Declare_Variable Record
052c 00d8 | | Load_Top At_Offset_0
052d 1c00 | | Execute_Immediate Run_Utility,0x0
052e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x3 = 0x52e,0xfffc
052f BODY_0520:
052f 00be | | Action Activate_Tasks
0530 e00a | | Load 0x0,0xa ; Debug Table 0xf.0x4 = 0x530,0x1
0531 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0532 e402 | | Load 0x2,0x2
0533 4800 |H | Short_Literal 0x0
0534 65cb |e | Indirect_Literal Discrete,0x300,{0x00000000, 0x00004000}
0535 e010 | | Load 0x0,0x10
0536 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0537 4800 |H | Short_Literal 0x0
0538 e5ff | | Load 0x2,-0x1
0539 4803 |H | Short_Literal 0x3
053a e00a | | Load 0x0,0xa
053b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
053c c402 | | Store 0x2,0x2
053d 005b | [ | Store_Top Discrete,At_Offset_3
053e 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x5 = 0x53e,0x2
053f 6802 |h | Jump_Zero 0x542
0540 4887 |H | Short_Literal 0x87
0541 0257 | W | Execute Discrete,Raise
0542 e00a | | Load 0x0,0xa ; Debug Table 0xf.0x6 = 0x542,0x3
0543 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0544 e402 | | Load 0x2,0x2
0545 e222 | " | Load 0x1,0x22
0546 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0547 00da | | Load_Top At_Offset_2
0548 017d | } | Execute Record,Structure_Write
0549 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x7 = 0x549,0x4
054a 00da | | Load_Top At_Offset_2
054b 8223 | # | Call 0x1,0x23
054c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
054d e00a | | Load 0x0,0xa ; Debug Table 0xf.0x8 = 0x54d,0x5
054e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
054f e402 | | Load 0x2,0x2
0550 e00a | | Load 0x0,0xa
0551 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0552 c402 | | Store 0x2,0x2
0553 005b | [ | Store_Top Discrete,At_Offset_3
0554 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x9 = 0x554,0x6
0555 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0556 TRAP_0520:
0556 0007 | | Action Break_Optional
0557 e00a | | Load 0x0,0xa ; Debug Table 0xf.0xa = 0x557,0x7
0558 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0559 e402 | | Load 0x2,0x2
055a e00a | | Load 0x0,0xa
055b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
055c c402 | | Store 0x2,0x2
055d c403 | | Store 0x2,0x3
055e 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0xb = 0x55e,0x8
055f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563 | c | .CONST 0x0563 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0001 | | .CONST 0x0001 ; Number of locals
0563 BODY_0560:
0563 INIT_0560:
0563 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x0563,0x07d4,0x0002,0x0000,0x0058,0x7105,0x0000,0x01ca
; Debug Table 0x10.0x0 = 0x563,0x1
0564 e002 | | Load 0x0,0x2
0565 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0566 e21c | | Load 0x1,0x1c
0567 027f | | Execute Discrete,Equal
0568 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0569 0000 0000 | | .BLANK 0000[0x7]
0570 ; --------------------------------------------------------------------------------------
0570 ; Debug Table
0570 ; --------------------------------------------------------------------------------------
0570 0003 0011 | | .CONST 0x0003,0x0011
0572 000b 05fa | | .DEBUG 0x000b,0x05fa,0x8000,0x0000,0x0058,0x6b35,0x0000,0x0019
057a 003d 0618 | = | .DEBUG 0x003d,0x0618,0x8000,0x0000,0x0058,0x7105,0x0000,0x0027
0582 0143 066c | C l| .DEBUG 0x0143,0x066c,0x0005,0x0000,0x0058,0x6b35,0x0000,0x002c
058a 0163 066e | c n| .DEBUG 0x0163,0x066e,0x0002,0x0000,0x0058,0x6b35,0x0000,0x006b
0592 0173 0676 | s v| .DEBUG 0x0173,0x0676,0x0001,0x0000,0x0058,0x6b35,0x0000,0x0074
059a 01ab 0692 | | .DEBUG 0x01ab,0x0692,0x0001,0x0000,0x0058,0x6b35,0x0000,0x0084
05a2 01f3 06b2 | | .DEBUG 0x01f3,0x06b2,0x0001,0x0000,0x0058,0x6b35,0x0000,0x0094
05aa 031b 0718 | | .DEBUG 0x031b,0x0718,0x0001,0x0000,0x0058,0x6b35,0x0000,0x00ad
05b2 03d3 075a | Z| .DEBUG 0x03d3,0x075a,0x0001,0x0000,0x0058,0x6b35,0x0000,0x00c6
05ba 03fb 076c | l| .DEBUG 0x03fb,0x076c,0x0001,0x0000,0x0058,0x6b35,0x0000,0x00d2
05c2 0493 079e | | .DEBUG 0x0493,0x079e,0x0002,0x0000,0x0058,0x6b35,0x0000,0x00de
05ca 049b 07a2 | | .DEBUG 0x049b,0x07a2,0x0002,0x0000,0x0058,0x6b35,0x0000,0x00e9
05d2 04b3 07ae | | .DEBUG 0x04b3,0x07ae,0x0002,0x0000,0x0058,0x6b35,0x0000,0x00f2
05da 04bb 07b2 | | .DEBUG 0x04bb,0x07b2,0x0005,0x0000,0x0058,0x7105,0x0000,0x008a
05e2 050b 07b4 | | .DEBUG 0x050b,0x07b4,0x0002,0x0000,0x0058,0x7105,0x0000,0x0115
05ea 0523 07ba | # | .DEBUG 0x0523,0x07ba,0x0002,0x0000,0x0058,0x7105,0x0000,0x0146
05f2 0563 07d4 | c | .DEBUG 0x0563,0x07d4,0x0002,0x0000,0x0058,0x7105,0x0000,0x01ca
05fa ; --------------------------------------------------------------------------------------
05fa ; Debug3 Subtable 0x0
05fa ; --------------------------------------------------------------------------------------
05fa 000e 0000 | | .DBG3TAB 0x000e,0x0000
05fc 000b ffff | | .CONST 0x000b,0xffff
05fe 000e fffe | | .CONST 0x000e,0xfffe
0600 0011 fffd | | .CONST 0x0011,0xfffd
0602 0014 fffc | | .CONST 0x0014,0xfffc
0604 0028 fffb | ( | .CONST 0x0028,0xfffb
0606 002a fffa | * | .CONST 0x002a,0xfffa
0608 002c fff9 | , | .CONST 0x002c,0xfff9
060a 002e fff8 | . | .CONST 0x002e,0xfff8
060c 0030 fff7 | 0 | .CONST 0x0030,0xfff7
060e 0032 fff6 | 2 | .CONST 0x0032,0xfff6
0610 0034 fff5 | 4 | .CONST 0x0034,0xfff5
0612 0036 fff4 | 6 | .CONST 0x0036,0xfff4
0614 0038 fff3 | 8 | .CONST 0x0038,0xfff3
0616 003a fff2 | : | .CONST 0x003a,0xfff2
0618 ; --------------------------------------------------------------------------------------
0618 ; Debug3 Subtable 0x1
0618 ; --------------------------------------------------------------------------------------
0618 0029 0000 | ) | .DBG3TAB 0x0029,0x0000
061a 003d ffff | = | .CONST 0x003d,0xffff
061c 003f fffe | ? | .CONST 0x003f,0xfffe
061e 0041 fffd | A | .CONST 0x0041,0xfffd
0620 0043 fffc | C | .CONST 0x0043,0xfffc
0622 0044 fffb | D | .CONST 0x0044,0xfffb
0624 0045 fffa | E | .CONST 0x0045,0xfffa
0626 0046 fff9 | F | .CONST 0x0046,0xfff9
0628 004b fff8 | K | .CONST 0x004b,0xfff8
062a 004c fff7 | L | .CONST 0x004c,0xfff7
062c 0068 fff6 | h | .CONST 0x0068,0xfff6
062e 006b fff5 | k | .CONST 0x006b,0xfff5
0630 006c fff4 | l | .CONST 0x006c,0xfff4
0632 0075 fff3 | u | .CONST 0x0075,0xfff3
0634 007d fff2 | } | .CONST 0x007d,0xfff2
0636 007f fff1 | | .CONST 0x007f,0xfff1
0638 0081 fff0 | | .CONST 0x0081,0xfff0
063a 0094 ffef | | .CONST 0x0094,0xffef
063c 009b ffee | | .CONST 0x009b,0xffee
063e 009d ffed | | .CONST 0x009d,0xffed
0640 009f ffec | | .CONST 0x009f,0xffec
0642 00a1 ffeb | | .CONST 0x00a1,0xffeb
0644 00a3 ffea | | .CONST 0x00a3,0xffea
0646 00ac ffe9 | | .CONST 0x00ac,0xffe9
0648 00b7 ffe8 | | .CONST 0x00b7,0xffe8
064a 00c2 ffe7 | | .CONST 0x00c2,0xffe7
064c 00cd ffe6 | | .CONST 0x00cd,0xffe6
064e 00d8 ffe5 | | .CONST 0x00d8,0xffe5
0650 00e3 ffe4 | | .CONST 0x00e3,0xffe4
0652 00ee ffe3 | | .CONST 0x00ee,0xffe3
0654 00f9 ffe2 | | .CONST 0x00f9,0xffe2
0656 0104 ffe1 | | .CONST 0x0104,0xffe1
0658 010f ffe0 | | .CONST 0x010f,0xffe0
065a 011a ffdf | | .CONST 0x011a,0xffdf
065c 0125 ffde | % | .CONST 0x0125,0xffde
065e 0130 ffdd | 0 | .CONST 0x0130,0xffdd
0660 0132 ffdc | 2 | .CONST 0x0132,0xffdc
0662 0134 ffdb | 4 | .CONST 0x0134,0xffdb
0664 0136 ffda | 6 | .CONST 0x0136,0xffda
0666 0138 ffd9 | 8 | .CONST 0x0138,0xffd9
0668 013a ffd8 | : | .CONST 0x013a,0xffd8
066a 013c ffd7 | < | .CONST 0x013c,0xffd7
066c ; --------------------------------------------------------------------------------------
066c ; Debug3 Subtable 0x2
066c ; --------------------------------------------------------------------------------------
066c 0000 0000 | | .DBG3TAB 0x0000,0x0000
066e ; --------------------------------------------------------------------------------------
066e ; Debug3 Subtable 0x3
066e ; --------------------------------------------------------------------------------------
066e 0000 0003 | | .DBG3TAB 0x0000,0x0003
0670 0163 0001 | c | .CONST 0x0163,0x0001
0672 0167 0002 | g | .CONST 0x0167,0x0002
0674 0169 0003 | i | .CONST 0x0169,0x0003
0676 ; --------------------------------------------------------------------------------------
0676 ; Debug3 Subtable 0x4
0676 ; --------------------------------------------------------------------------------------
0676 0002 000b | | .DBG3TAB 0x0002,0x000b
0678 0173 ffff | s | .CONST 0x0173,0xffff
067a 0179 fffe | y | .CONST 0x0179,0xfffe
067c 017b 0001 | { | .CONST 0x017b,0x0001
067e 017d 0002 | } | .CONST 0x017d,0x0002
0680 0180 0003 | | .CONST 0x0180,0x0003
0682 0182 0004 | | .CONST 0x0182,0x0004
0684 0189 0005 | | .CONST 0x0189,0x0005
0686 018c 0006 | | .CONST 0x018c,0x0006
0688 018e 0007 | | .CONST 0x018e,0x0007
068a 0191 0008 | | .CONST 0x0191,0x0008
068c 0193 0009 | | .CONST 0x0193,0x0009
068e 0198 000a | | .CONST 0x0198,0x000a
0690 019f 000b | | .CONST 0x019f,0x000b
0692 ; --------------------------------------------------------------------------------------
0692 ; Debug3 Subtable 0x5
0692 ; --------------------------------------------------------------------------------------
0692 0003 000c | | .DBG3TAB 0x0003,0x000c
0694 01ab ffff | | .CONST 0x01ab,0xffff
0696 01b0 fffe | | .CONST 0x01b0,0xfffe
0698 01b5 fffd | | .CONST 0x01b5,0xfffd
069a 01b7 0001 | | .CONST 0x01b7,0x0001
069c 01b9 0002 | | .CONST 0x01b9,0x0002
069e 01bc 0003 | | .CONST 0x01bc,0x0003
06a0 01c4 0004 | | .CONST 0x01c4,0x0004
06a2 01c8 0005 | | .CONST 0x01c8,0x0005
06a4 01d6 0006 | | .CONST 0x01d6,0x0006
06a6 01da 0007 | | .CONST 0x01da,0x0007
06a8 01dd 0008 | | .CONST 0x01dd,0x0008
06aa 01df 0009 | | .CONST 0x01df,0x0009
06ac 01e2 000a | | .CONST 0x01e2,0x000a
06ae 01e4 000b | | .CONST 0x01e4,0x000b
06b0 01eb 000c | | .CONST 0x01eb,0x000c
06b2 ; --------------------------------------------------------------------------------------
06b2 ; Debug3 Subtable 0x6
06b2 ; --------------------------------------------------------------------------------------
06b2 0006 002c | ,| .DBG3TAB 0x0006,0x002c
06b4 01f3 ffff | | .CONST 0x01f3,0xffff
06b6 01f5 fffe | | .CONST 0x01f5,0xfffe
06b8 01f7 fffd | | .CONST 0x01f7,0xfffd
06ba 01fb fffc | | .CONST 0x01fb,0xfffc
06bc 01fd fffb | | .CONST 0x01fd,0xfffb
06be 01fe fffa | | .CONST 0x01fe,0xfffa
06c0 0204 0001 | | .CONST 0x0204,0x0001
06c2 0206 0002 | | .CONST 0x0206,0x0002
06c4 020c 0003 | | .CONST 0x020c,0x0003
06c6 0212 0004 | | .CONST 0x0212,0x0004
06c8 0226 0005 | & | .CONST 0x0226,0x0005
06ca 022a 0006 | * | .CONST 0x022a,0x0006
06cc 023a 0007 | : | .CONST 0x023a,0x0007
06ce 023e 0008 | > | .CONST 0x023e,0x0008
06d0 0242 0009 | B | .CONST 0x0242,0x0009
06d2 0249 000a | I | .CONST 0x0249,0x000a
06d4 0250 000b | P | .CONST 0x0250,0x000b
06d6 0254 000c | T | .CONST 0x0254,0x000c
06d8 0258 000d | X | .CONST 0x0258,0x000d
06da 025c 000e | \ | .CONST 0x025c,0x000e
06dc 0261 000f | a | .CONST 0x0261,0x000f
06de 026a 0010 | j | .CONST 0x026a,0x0010
06e0 026b 0011 | k | .CONST 0x026b,0x0011
06e2 0272 0012 | r | .CONST 0x0272,0x0012
06e4 0279 0013 | y | .CONST 0x0279,0x0013
06e6 0282 0014 | | .CONST 0x0282,0x0014
06e8 0283 0015 | | .CONST 0x0283,0x0015
06ea 028a 0016 | | .CONST 0x028a,0x0016
06ec 0293 0017 | | .CONST 0x0293,0x0017
06ee 0294 0018 | | .CONST 0x0294,0x0018
06f0 029b 0019 | | .CONST 0x029b,0x0019
06f2 02a4 001a | | .CONST 0x02a4,0x001a
06f4 02a5 001b | | .CONST 0x02a5,0x001b
06f6 02ac 001c | | .CONST 0x02ac,0x001c
06f8 02b5 001d | | .CONST 0x02b5,0x001d
06fa 02b6 001e | | .CONST 0x02b6,0x001e
06fc 02bd 001f | | .CONST 0x02bd,0x001f
06fe 02c3 0020 | | .CONST 0x02c3,0x0020
0700 02c4 0021 | !| .CONST 0x02c4,0x0021
0702 02cc 0022 | "| .CONST 0x02cc,0x0022
0704 02d3 0023 | #| .CONST 0x02d3,0x0023
0706 02d7 0024 | $| .CONST 0x02d7,0x0024
0708 02db 0025 | %| .CONST 0x02db,0x0025
070a 02df 0026 | &| .CONST 0x02df,0x0026
070c 02e3 0027 | '| .CONST 0x02e3,0x0027
070e 02e7 0028 | (| .CONST 0x02e7,0x0028
0710 02eb 0029 | )| .CONST 0x02eb,0x0029
0712 02f2 002a | *| .CONST 0x02f2,0x002a
0714 02f5 002b | +| .CONST 0x02f5,0x002b
0716 02fc 002c | ,| .CONST 0x02fc,0x002c
0718 ; --------------------------------------------------------------------------------------
0718 ; Debug3 Subtable 0x7
0718 ; --------------------------------------------------------------------------------------
0718 0005 001b | | .DBG3TAB 0x0005,0x001b
071a 031b ffff | | .CONST 0x031b,0xffff
071c 031d fffe | | .CONST 0x031d,0xfffe
071e 031f fffd | | .CONST 0x031f,0xfffd
0720 0321 fffc | ! | .CONST 0x0321,0xfffc
0722 0322 fffb | " | .CONST 0x0322,0xfffb
0724 0328 0001 | ( | .CONST 0x0328,0x0001
0726 032a 0002 | * | .CONST 0x032a,0x0002
0728 032e 0003 | . | .CONST 0x032e,0x0003
072a 0330 0004 | 0 | .CONST 0x0330,0x0004
072c 0333 0005 | 3 | .CONST 0x0333,0x0005
072e 0335 0006 | 5 | .CONST 0x0335,0x0006
0730 0337 0007 | 7 | .CONST 0x0337,0x0007
0732 033a 0008 | : | .CONST 0x033a,0x0008
0734 0340 0009 | @ | .CONST 0x0340,0x0009
0736 0346 000a | F | .CONST 0x0346,0x000a
0738 0359 000b | Y | .CONST 0x0359,0x000b
073a 035d 000c | ] | .CONST 0x035d,0x000c
073c 0361 000d | a | .CONST 0x0361,0x000d
073e 0368 000e | h | .CONST 0x0368,0x000e
0740 036e 000f | n | .CONST 0x036e,0x000f
0742 0370 0010 | p | .CONST 0x0370,0x0010
0744 0373 0011 | s | .CONST 0x0373,0x0011
0746 0377 0012 | w | .CONST 0x0377,0x0012
0748 0382 0013 | | .CONST 0x0382,0x0013
074a 038d 0014 | | .CONST 0x038d,0x0014
074c 0398 0015 | | .CONST 0x0398,0x0015
074e 03a3 0016 | | .CONST 0x03a3,0x0016
0750 03ae 0017 | | .CONST 0x03ae,0x0017
0752 03b9 0018 | | .CONST 0x03b9,0x0018
0754 03c0 0019 | | .CONST 0x03c0,0x0019
0756 03c3 001a | | .CONST 0x03c3,0x001a
0758 03ca 001b | | .CONST 0x03ca,0x001b
075a ; --------------------------------------------------------------------------------------
075a ; Debug3 Subtable 0x8
075a ; --------------------------------------------------------------------------------------
075a 0002 0006 | | .DBG3TAB 0x0002,0x0006
075c 03d3 ffff | | .CONST 0x03d3,0xffff
075e 03d5 fffe | | .CONST 0x03d5,0xfffe
0760 03d7 0001 | | .CONST 0x03d7,0x0001
0762 03d9 0002 | | .CONST 0x03d9,0x0002
0764 03e3 0003 | | .CONST 0x03e3,0x0003
0766 03e7 0004 | | .CONST 0x03e7,0x0004
0768 03eb 0005 | | .CONST 0x03eb,0x0005
076a 03f2 0006 | | .CONST 0x03f2,0x0006
076c ; --------------------------------------------------------------------------------------
076c ; Debug3 Subtable 0x9
076c ; --------------------------------------------------------------------------------------
076c 0003 0015 | | .DBG3TAB 0x0003,0x0015
076e 03fb ffff | | .CONST 0x03fb,0xffff
0770 03fd fffe | | .CONST 0x03fd,0xfffe
0772 03ff fffd | | .CONST 0x03ff,0xfffd
0774 0405 0001 | | .CONST 0x0405,0x0001
0776 040b 0002 | | .CONST 0x040b,0x0002
0778 0416 0003 | | .CONST 0x0416,0x0003
077a 041a 0004 | | .CONST 0x041a,0x0004
077c 0425 0005 | % | .CONST 0x0425,0x0005
077e 0429 0006 | ) | .CONST 0x0429,0x0006
0780 0434 0007 | 4 | .CONST 0x0434,0x0007
0782 0438 0008 | 8 | .CONST 0x0438,0x0008
0784 0443 0009 | C | .CONST 0x0443,0x0009
0786 0447 000a | G | .CONST 0x0447,0x000a
0788 0452 000b | R | .CONST 0x0452,0x000b
078a 0456 000d | V | .CONST 0x0456,0x000d
078c 045f 000e | _ | .CONST 0x045f,0x000e
078e 0463 000f | c | .CONST 0x0463,0x000f
0790 0467 0010 | g | .CONST 0x0467,0x0010
0792 046a 0011 | j | .CONST 0x046a,0x0011
0794 0470 0012 | p | .CONST 0x0470,0x0012
0796 0477 0013 | w | .CONST 0x0477,0x0013
0798 047d 0014 | } | .CONST 0x047d,0x0014
079a 0484 0015 | | .CONST 0x0484,0x0015
079c 0487 0016 | | .CONST 0x0487,0x0016
079e ; --------------------------------------------------------------------------------------
079e ; Debug3 Subtable 0xa
079e ; --------------------------------------------------------------------------------------
079e 0000 0001 | | .DBG3TAB 0x0000,0x0001
07a0 0493 0001 | | .CONST 0x0493,0x0001
07a2 ; --------------------------------------------------------------------------------------
07a2 ; Debug3 Subtable 0xb
07a2 ; --------------------------------------------------------------------------------------
07a2 0000 0005 | | .DBG3TAB 0x0000,0x0005
07a4 049b 0001 | | .CONST 0x049b,0x0001
07a6 04a4 0002 | | .CONST 0x04a4,0x0002
07a8 04a6 0003 | | .CONST 0x04a6,0x0003
07aa 04a8 0004 | | .CONST 0x04a8,0x0004
07ac 04aa 0005 | | .CONST 0x04aa,0x0005
07ae ; --------------------------------------------------------------------------------------
07ae ; Debug3 Subtable 0xc
07ae ; --------------------------------------------------------------------------------------
07ae 0000 0001 | | .DBG3TAB 0x0000,0x0001
07b0 04b3 0001 | | .CONST 0x04b3,0x0001
07b2 ; --------------------------------------------------------------------------------------
07b2 ; Debug3 Subtable 0xd
07b2 ; --------------------------------------------------------------------------------------
07b2 0000 0000 | | .DBG3TAB 0x0000,0x0000
07b4 ; --------------------------------------------------------------------------------------
07b4 ; Debug3 Subtable 0xe
07b4 ; --------------------------------------------------------------------------------------
07b4 0000 0002 | | .DBG3TAB 0x0000,0x0002
07b6 050b 0001 | | .CONST 0x050b,0x0001
07b8 051c 0002 | | .CONST 0x051c,0x0002
07ba ; --------------------------------------------------------------------------------------
07ba ; Debug3 Subtable 0xf
07ba ; --------------------------------------------------------------------------------------
07ba 0004 0008 | | .DBG3TAB 0x0004,0x0008
07bc 0523 ffff | # | .CONST 0x0523,0xffff
07be 0528 fffe | ( | .CONST 0x0528,0xfffe
07c0 052a fffd | * | .CONST 0x052a,0xfffd
07c2 052e fffc | . | .CONST 0x052e,0xfffc
07c4 0530 0001 | 0 | .CONST 0x0530,0x0001
07c6 053e 0002 | > | .CONST 0x053e,0x0002
07c8 0542 0003 | B | .CONST 0x0542,0x0003
07ca 0549 0004 | I | .CONST 0x0549,0x0004
07cc 054d 0005 | M | .CONST 0x054d,0x0005
07ce 0554 0006 | T | .CONST 0x0554,0x0006
07d0 0557 0007 | W | .CONST 0x0557,0x0007
07d2 055e 0008 | ^ | .CONST 0x055e,0x0008
07d4 ; --------------------------------------------------------------------------------------
07d4 ; Debug3 Subtable 0x10
07d4 ; --------------------------------------------------------------------------------------
07d4 0000 0001 | | .DBG3TAB 0x0000,0x0001
07d6 0563 0001 | c | .CONST 0x0563,0x0001
07d8 0000 0000 | | .BLANK 0000[0x28]