|
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: 12288 (0x3000)
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 10b8 | | .CONST 0x10b8 ; 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 000b | | .CONST 0x000b ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; SUBPROGRAM
0008 ; See instruction 0x02cf at 0xcf8, index=0x0
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x116a,0x8000,0x0000,0x004f,0x2ee5,0x0000,0x0005
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0081 | | .CONST 0x0081 ; Address of begin
0019 008f | | .CONST 0x008f ; Address of exception handler
001a 001a | | .CONST 0x001a ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x001b,0x116c,0xa801,0x0002,0x004f,0x2ee5,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x1b,0xffff
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 02c7 | | Declare_Variable Any
001e 00d8 | | Load_Top At_Offset_0
001f 1c00 | | Execute_Immediate Run_Utility,0x0
0020 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x20,0xfffe
0021 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x21,0xfffd
0022 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x3 = 0x22,0xfffc
0023 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0024 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x4 = 0x24,0xfffb
0025 0664 | d | Execute_Immediate Set_Value_Unchecked,0x64
0026 029f 00ab | | Declare_Subprogram INIT_00a8,For_Call ; Debug Table 0x1.0x5 = 0x26,0xfffa
0028 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call ; Debug Table 0x1.0x6 = 0x28,0xfff9
002a 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call ; Debug Table 0x1.0x7 = 0x2a,0xfff8
002c 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call ; Debug Table 0x1.0x8 = 0x2c,0xfff7
002e 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call ; Debug Table 0x1.0x9 = 0x2e,0xfff6
0030 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call ; Debug Table 0x1.0xa = 0x30,0xfff5
0032 029f 033b | ;| Declare_Subprogram INIT_0338,For_Call ; Debug Table 0x1.0xb = 0x32,0xfff4
0034 029f 058b | | Declare_Subprogram INIT_0588,For_Call ; Debug Table 0x1.0xc = 0x34,0xfff3
0036 029f 0683 | | Declare_Subprogram INIT_0680,For_Call ; Debug Table 0x1.0xd = 0x36,0xfff2
0038 029f 0773 | s| Declare_Subprogram INIT_0770,For_Call ; Debug Table 0x1.0xe = 0x38,0xfff1
003a 029f 08cb | | Declare_Subprogram INIT_08c8,For_Call ; Debug Table 0x1.0xf = 0x3a,0xfff0
003c 029f 0a1b | | Declare_Subprogram INIT_0a18,For_Call ; Debug Table 0x1.0x10 = 0x3c,0xffef
003e 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x11 = 0x3e,0xffee
003f 4808 |H | Short_Literal 0x8
0040 00e3 | | Load_Encached Natural_Cache
0041 03f8 | | Declare_Type Discrete,Constrained
0042 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x12 = 0x42,0xffed
0043 62f0 |b | Indirect_Literal Discrete,0x334,{0x00c02014, 0x0000ce30}
0044 02a0 | | Declare_Subprogram Null_Subprogram
0045 037a | z | Declare_Type Task,Defined,Not_Elaborated
0046 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1.0x13 = 0x46,0xffec
0047 e002 | | Load 0x0,0x2
0048 e003 | | Load 0x0,0x3
0049 e004 | | Load 0x0,0x4
004a 4803 |H | Short_Literal 0x3
004b 4802 |H | Short_Literal 0x2
004c 0099 | | Action Reference_Dynamic
004d 4807 |H | Short_Literal 0x7
004e 4802 |H | Short_Literal 0x2
004f 0099 | | Action Reference_Dynamic
0050 e005 | | Load 0x0,0x5
0051 4809 |H | Short_Literal 0x9
0052 4802 |H | Short_Literal 0x2
0053 0099 | | Action Reference_Dynamic
0054 480a |H | Short_Literal 0xa
0055 4802 |H | Short_Literal 0x2
0056 0099 | | Action Reference_Dynamic
0057 480b |H | Short_Literal 0xb
0058 4802 |H | Short_Literal 0x2
0059 0099 | | Action Reference_Dynamic
005a 4810 |H | Short_Literal 0x10
005b 4802 |H | Short_Literal 0x2
005c 0099 | | Action Reference_Dynamic
005d 480d |H | Short_Literal 0xd
005e 4802 |H | Short_Literal 0x2
005f 0099 | | Action Reference_Dynamic
0060 480e |H | Short_Literal 0xe
0061 4802 |H | Short_Literal 0x2
0062 0099 | | Action Reference_Dynamic
0063 480f |H | Short_Literal 0xf
0064 4802 |H | Short_Literal 0x2
0065 0099 | | Action Reference_Dynamic
0066 480c |H | Short_Literal 0xc
0067 4802 |H | Short_Literal 0x2
0068 0099 | | Action Reference_Dynamic
0069 480f |H | Short_Literal 0xf
006a e412 | | Load 0x2,0x12
006b 020e | | Execute Module,Augment_Imports
006c 00d8 | | Load_Top At_Offset_0
006d 020d | | Execute Module,Elaborate
006e 0007 | | Action Break_Optional
006f 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x14 = 0x6f,0xffeb
0070 4803 |H | Short_Literal 0x3
0071 e002 | | Load 0x0,0x2
0072 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0073 03f8 | | Declare_Type Discrete,Constrained
0074 029f 0c23 | #| Declare_Subprogram INIT_0c20,For_Call ; Debug Table 0x1.0x15 = 0x74,0xffea
0076 029f 0c5b | [| Declare_Subprogram INIT_0c58,For_Call ; Debug Table 0x1.0x16 = 0x76,0xffe9
0078 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x17 = 0x78,0xffe8
0079 1912 | | Execute Package,Field_Reference,Field_Number 0x12
007a 00c6 | | Action Check_Subprogram_Elaborated
007b e411 | | Load 0x2,0x11
007c 62b3 |b | Indirect_Literal Discrete,0x330,{0x00000000, 0x004f2f05}
007d 62ae |b | Indirect_Literal Discrete,0x32c,{0x00000000, 0x0000170d}
007e 4819 |H | Short_Literal 0x19
007f 029f 0c7b | {| Declare_Subprogram INIT_0c78,For_Call
0081 BODY_0018:
0081 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x18 = 0x81,0x1
0082 0120 | | Execute Any,Is_Value
0083 6803 |h | Jump_Zero 0x87
0084 e001 | | Load 0x0,0x1
0085 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0086 7801 |x | Jump 0x88
0087 e402 | | Load 0x2,0x2
0088 0092 0df0 | | Action Push_String_Extended,0xdf0 ; "Tape Tester"
008a e001 | | Load 0x0,0x1
008b 180e | | Execute Package,Field_Execute,Field_Number 0xe
008c c402 | | Store 0x2,0x2
008d 841a | | Call 0x2,0x1a ; Debug Table 0x1.0x19 = 0x8d,0x2
008e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
008f TRAP_0018:
008f 6298 |b | Indirect_Literal Discrete,0x328,{0x00000000, 0x4f2f0501}
0090 010f | | Execute Exception,Equal
0091 6806 |h | Jump_Zero 0x98
0092 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x1a = 0x92,0x3
0093 0092 0df1 | | Action Push_String_Extended,0xdf1 ; "Assertion failure terminated test"
0095 e001 | | Load 0x0,0x1
0096 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0097 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0098 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x1b = 0x98,0x4
0099 0092 0df2 | | Action Push_String_Extended,0xdf2 ; "Unhandled Exception "
009b e005 | | Load 0x0,0x5
009c 180d | | Execute Package,Field_Execute,Field_Number 0xd
009d 01cc | | Execute Vector,Catenate
009e 0092 0df3 | | Action Push_String_Extended,0xdf3 ; " terminated test."
00a0 01cc | | Execute Vector,Catenate
00a1 e001 | | Load 0x0,0x1
00a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00a4 0000 0000 | | .BLANK 0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x00ab,0x11a6,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0044
; Debug Table 0x2.0x0 = 0xab,0x1
00ac 7002 |p | Jump_Nonzero 0xaf
00ad 627a |bz | Indirect_Literal Discrete,0x328,{0x00000000, 0x4f2f0501} ; Debug Table 0x2.0x1 = 0xad,0x2
00ae 0257 | W | Execute Discrete,Raise
00af 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 e402 | | Load 0x2,0x2 ; Debug Table 0x3 = .DEBUG 0x00b3,0x11ac,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0059
; Debug Table 0x3.0x0 = 0xb3,0x1
00b4 00db | | Load_Top At_Offset_3
00b5 e001 | | Load 0x0,0x1
00b6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b7 6270 |bp | Indirect_Literal Discrete,0x328,{0x00000000, 0x4f2f0501} ; Debug Table 0x3.0x1 = 0xb7,0x2
00b8 0257 | W | Execute Discrete,Raise
00b9 0000 0000 | | .BLANK 0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 e402 | | Load 0x2,0x2 ; Debug Table 0x4 = .DEBUG 0x00c3,0x11b2,0x0801,0x0002,0x004f,0x2f05,0x0000,0x006e
; Debug Table 0x4.0x0 = 0xc3,0x1
00c4 00db | | Load_Top At_Offset_3
00c5 e001 | | Load 0x0,0x1
00c6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00c7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00ce | | .CONST 0x00ce ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0003 | | .CONST 0x0003 ; Number of locals
00cb INIT_00c8:
00cb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5 = .DEBUG 0x00cb,0x11b6,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0081
; Debug Table 0x5.0x0 = 0xcb,0xffff
00cc e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x1 = 0xcc,0xfffe
00cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ce BODY_00c8:
00ce 00cf | | Action Mark_Auxiliary
00cf 0007 | | Action Break_Optional ; Debug Table 0x5.0x2 = 0xcf,0x1
00d0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x3 = 0xd0,0x2
00d1 e002 | | Load 0x0,0x2
00d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d3 e7ff | | Load 0x3,-0x1
00d4 e004 | | Load 0x0,0x4
00d5 180f | | Execute Package,Field_Execute,Field_Number 0xf
00d6 005b | [ | Store_Top Discrete,At_Offset_3
00d7 005b | [ | Store_Top Discrete,At_Offset_3
00d8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x4 = 0xd8,0x3
00d9 4604 |F | Jump_Case 0x5
00da 7815 |x | Jump 0xf0 ; case 0x0
00db 7810 |x | Jump 0xec ; case 0x1
00dc 780f |x | Jump 0xec ; case 0x2
00dd 780e |x | Jump 0xec ; case 0x3
00de 7800 |x | Jump 0xdf ; case 0x4
00df 0092 0df4 | | Action Push_String_Extended,0xdf4 ; "Tape"
; Debug Table 0x5.0x5 = 0xdf,0x4
00e1 e7ff | | Load 0x3,-0x1
00e2 00e0 | | Load_Encached Standard_Cache
00e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00e4 01cc | | Execute Vector,Catenate
00e5 0092 0df5 | | Action Push_String_Extended,0xdf5 ; " is not on line, will retry."
00e7 01cc | | Execute Vector,Catenate
00e8 8407 | | Call 0x2,0x7
00e9 623a |b: | Indirect_Literal Discrete,0x324,{0x00000000, 0x00028000} ; Debug Table 0x5.0x6 = 0xe9,0x5
00ea 00ba | | Action Initiate_Delay
00eb 7802 |x | Jump 0xee
00ec 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x7 = 0xec,0x7
00ed 8405 | | Call 0x2,0x5
00ee 00c9 | | Action Pop_Auxiliary_Loop
00ef 7fe0 | | Jump 0xd0
00f0 00ce | | Action Pop_Auxiliary
00f1 e7fe | | Load 0x3,-0x2 ; Debug Table 0x5.0x8 = 0xf1,0x8
00f2 6802 |h | Jump_Zero 0xf5
00f3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x9 = 0xf3,0x9
00f4 8405 | | Call 0x2,0x5
00f5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00f6 0000 0000 | | .XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 010e | | .CONST 0x010e ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0007 | | .CONST 0x0007 ; Number of locals
00fb INIT_00f8:
00fb e002 | | Load 0x0,0x2 ; Debug Table 0x6 = .DEBUG 0x00fb,0x11cc,0x0801,0x0002,0x004f,0x2f05,0x0000,0x00d2
; Debug Table 0x6.0x0 = 0xfb,0xffff
00fc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00fd e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x1 = 0xfd,0xfffe
00fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00ff 0322 | " | Declare_Variable Record
0100 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x2 = 0x100,0xfffd
0101 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0102 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x3 = 0x102,0xfffc
0103 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0104 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x4 = 0x104,0xfffb
0105 4811 |H | Short_Literal 0x11
0106 e002 | | Load 0x0,0x2
0107 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0108 03f8 | | Declare_Type Discrete,Constrained
0109 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x5 = 0x109,0xfffa
010a 4811 |H | Short_Literal 0x11
010b e006 | | Load 0x0,0x6
010c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
010d 0334 | 4 | Declare_Variable Array,With_Constraint
010e BODY_00f8:
010e 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x6 = 0x10e,0x1
010f e7ff | | Load 0x3,-0x1
0110 8408 | | Call 0x2,0x8
0111 00cf | | Action Mark_Auxiliary
0112 0007 | | Action Break_Optional ; Debug Table 0x6.0x7 = 0x112,0x2
0113 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x8 = 0x113,0x3
0114 4811 |H | Short_Literal 0x11
0115 e006 | | Load 0x0,0x6
0116 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0117 0334 | 4 | Declare_Variable Array,With_Constraint
0118 4811 |H | Short_Literal 0x11
0119 4800 |H | Short_Literal 0x0
011a e604 | | Load 0x3,0x4
011b 48ff |H | Short_Literal 0xff
011c 0279 | y | Execute Discrete,And
011d e006 | | Load 0x0,0x6
011e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
011f 025b | [ | Execute Discrete,Check_In_Type
0120 00d9 | | Load_Top At_Offset_1
0121 e609 | | Load 0x3,0x9
0122 01d6 | | Execute Vector,Field_Write
0123 3ff6 |? | Loop_Increasing 0x11a
0124 00da | | Load_Top At_Offset_2
0125 01d4 | | Execute Vector,Structure_Write
0126 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x9 = 0x126,0x4
0127 00da | | Load_Top At_Offset_2
0128 e7ff | | Load 0x3,-0x1
0129 e004 | | Load 0x0,0x4
012a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
012b 00d1 | | Pop_Control Pop_Count_1
012c e603 | | Load 0x3,0x3 ; Debug Table 0x6.0xa = 0x12c,0x5
012d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
012e 0f00 | | Execute_Immediate Equal,0x0
012f 8405 | | Call 0x2,0x5
0130 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0xb = 0x130,0x6
0131 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0132 0f12 | | Execute_Immediate Equal,0x12
0133 8405 | | Call 0x2,0x5
0134 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0xc = 0x134,0x7
0135 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0136 0f00 | | Execute_Immediate Equal,0x0
0137 8405 | | Call 0x2,0x5
0138 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0xd = 0x138,0x8
0139 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
013a 700b |p | Jump_Nonzero 0x146
013b e403 | | Load 0x2,0x3 ; Debug Table 0x6.0xe = 0x13b,0x9
013c 6804 |h | Jump_Zero 0x141
013d e604 | | Load 0x3,0x4
013e e404 | | Load 0x2,0x4
013f 027f | | Execute Discrete,Equal
0140 7005 |p | Jump_Nonzero 0x146
0141 e604 | | Load 0x3,0x4 ; Debug Table 0x6.0xf = 0x141,0xa
0142 0a01 | | Execute_Immediate Plus,0x1
0143 c604 | | Store 0x3,0x4
0144 00c9 | | Action Pop_Auxiliary_Loop
0145 7fcd | | Jump 0x113
0146 00ce | | Action Pop_Auxiliary
0147 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x10 = 0x147,0xb
0148 e7ff | | Load 0x3,-0x1
0149 e004 | | Load 0x0,0x4
014a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
014b 00d1 | | Pop_Control Pop_Count_1
014c e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x11 = 0x14c,0xc
014d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014e 0f00 | | Execute_Immediate Equal,0x0
014f 8405 | | Call 0x2,0x5
0150 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x12 = 0x150,0xd
0151 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0152 0f00 | | Execute_Immediate Equal,0x0
0153 8405 | | Call 0x2,0x5
0154 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x13 = 0x154,0xe
0155 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0156 0f00 | | Execute_Immediate Equal,0x0
0157 8405 | | Call 0x2,0x5
0158 e403 | | Load 0x2,0x3 ; Debug Table 0x6.0x14 = 0x158,0xf
0159 7003 |p | Jump_Nonzero 0x15d
015a e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x15 = 0x15a,0x10
015b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
015c 8405 | | Call 0x2,0x5
015d e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x16 = 0x15d,0x11
015e 4800 |H | Short_Literal 0x0
015f e7ff | | Load 0x3,-0x1
0160 e004 | | Load 0x0,0x4
0161 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0162 00d1 | | Pop_Control Pop_Count_1
0163 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x17 = 0x163,0x12
0164 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0165 0f00 | | Execute_Immediate Equal,0x0
0166 8405 | | Call 0x2,0x5
0167 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x18 = 0x167,0x13
0168 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0169 0f00 | | Execute_Immediate Equal,0x0
016a 8405 | | Call 0x2,0x5
016b e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x19 = 0x16b,0x14
016c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
016d 0f00 | | Execute_Immediate Equal,0x0
016e 8405 | | Call 0x2,0x5
016f e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x1a = 0x16f,0x15
0170 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0171 0f00 | | Execute_Immediate Equal,0x0
0172 8405 | | Call 0x2,0x5
0173 00cf | | Action Mark_Auxiliary
0174 0007 | | Action Break_Optional ; Debug Table 0x6.0x1b = 0x174,0x16
0175 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x1c = 0x175,0x17
0176 e603 | | Load 0x3,0x3
0177 e7ff | | Load 0x3,-0x1
0178 e004 | | Load 0x0,0x4
0179 1817 | | Execute Package,Field_Execute,Field_Number 0x17
017a 00d2 | | Pop_Control Pop_Count_2
017b e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x1d = 0x17b,0x18
017c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
017d 0f00 | | Execute_Immediate Equal,0x0
017e 8405 | | Call 0x2,0x5
017f e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x1e = 0x17f,0x19
0180 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0181 0b00 | | Execute_Immediate Case_Compare,0x0
0182 7005 |p | Jump_Nonzero 0x188
0183 0b05 | | Execute_Immediate Case_Compare,0x5
0184 7025 |p% | Jump_Nonzero 0x1aa
0185 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x1f = 0x185,0x22
0186 8405 | | Call 0x2,0x5
0187 782d |x- | Jump 0x1b5
0188 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x20 = 0x188,0x1a
0189 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
018a 0e12 | | Execute_Immediate Not_Equal,0x12
018b 6803 |h | Jump_Zero 0x18f
018c 0092 0df6 | | Action Push_String_Extended,0xdf6 ; "Block length read /= block length written"
; Debug Table 0x6.0x21 = 0x18c,0x1b
018e 8406 | | Call 0x2,0x6
018f 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x22 = 0x18f,0x1c
0190 4800 |H | Short_Literal 0x0
0191 4811 |H | Short_Literal 0x11
0192 e006 | | Load 0x0,0x6
0193 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0194 0334 | 4 | Declare_Variable Array,With_Constraint
0195 4811 |H | Short_Literal 0x11
0196 4800 |H | Short_Literal 0x0
0197 e605 | | Load 0x3,0x5
0198 48ff |H | Short_Literal 0xff
0199 0279 | y | Execute Discrete,And
019a e006 | | Load 0x0,0x6
019b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
019c 025b | [ | Execute Discrete,Check_In_Type
019d 00d9 | | Load_Top At_Offset_1
019e e60b | | Load 0x3,0xb
019f 01d6 | | Execute Vector,Field_Write
01a0 3ff6 |? | Loop_Increasing 0x197
01a1 01de | | Execute Vector,Not_Equal
01a2 6803 |h | Jump_Zero 0x1a6
01a3 0092 0df7 | | Action Push_String_Extended,0xdf7 ; "Data read /= data written"
; Debug Table 0x6.0x23 = 0x1a3,0x1d
01a5 8406 | | Call 0x2,0x6
01a6 e605 | | Load 0x3,0x5 ; Debug Table 0x6.0x24 = 0x1a6,0x1e
01a7 0a01 | | Execute_Immediate Plus,0x1
01a8 c605 | | Store 0x3,0x5
01a9 780b |x | Jump 0x1b5
01aa e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x25 = 0x1aa,0x1f
01ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01ac 0f00 | | Execute_Immediate Equal,0x0
01ad 8405 | | Call 0x2,0x5
01ae e605 | | Load 0x3,0x5 ; Debug Table 0x6.0x26 = 0x1ae,0x20
01af e604 | | Load 0x3,0x4
01b0 0a01 | | Execute_Immediate Plus,0x1
01b1 027f | | Execute Discrete,Equal
01b2 8405 | | Call 0x2,0x5
01b3 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x6.0x27 = 0x1b3,0x21
01b4 7803 |x | Jump 0x1b8
01b5 00d1 | | Pop_Control Pop_Count_1
01b6 00c9 | | Action Pop_Auxiliary_Loop
01b7 7fbd | | Jump 0x175
01b8 00ce | | Action Pop_Auxiliary
01b9 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x28 = 0x1b9,0x23
01ba 4800 |H | Short_Literal 0x0
01bb e7ff | | Load 0x3,-0x1
01bc e004 | | Load 0x0,0x4
01bd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01be 00d1 | | Pop_Control Pop_Count_1
01bf e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x29 = 0x1bf,0x24
01c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01c1 0f00 | | Execute_Immediate Equal,0x0
01c2 8405 | | Call 0x2,0x5
01c3 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x2a = 0x1c3,0x25
01c4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c5 0f00 | | Execute_Immediate Equal,0x0
01c6 8405 | | Call 0x2,0x5
01c7 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x2b = 0x1c7,0x26
01c8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
01c9 0f00 | | Execute_Immediate Equal,0x0
01ca 8405 | | Call 0x2,0x5
01cb e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x2c = 0x1cb,0x27
01cc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01cd 0f00 | | Execute_Immediate Equal,0x0
01ce 8405 | | Call 0x2,0x5
01cf e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x2d = 0x1cf,0x28
01d0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01d1 e7ff | | Load 0x3,-0x1
01d2 e004 | | Load 0x0,0x4
01d3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d4 c602 | | Store 0x3,0x2
01d5 e602 | | Load 0x3,0x2 ; Debug Table 0x6.0x2e = 0x1d5,0x29
01d6 0f00 | | Execute_Immediate Equal,0x0
01d7 8405 | | Call 0x2,0x5
01d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01d9 0000 0000 | | .BLANK 0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01f6 | | .CONST 0x01f6 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0007 | | .CONST 0x0007 ; Number of locals
01e3 INIT_01e0:
01e3 e002 | | Load 0x0,0x2 ; Debug Table 0x7 = .DEBUG 0x01e3,0x122c,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0268
; Debug Table 0x7.0x0 = 0x1e3,0xffff
01e4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01e5 e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x1 = 0x1e5,0xfffe
01e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01e7 0322 | " | Declare_Variable Record
01e8 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x7.0x2 = 0x1e8,0xfffd
01e9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ea 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x7.0x3 = 0x1ea,0xfffc
01eb 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ec 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x4 = 0x1ec,0xfffb
01ed 4811 |H | Short_Literal 0x11
01ee e002 | | Load 0x0,0x2
01ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f0 03f8 | | Declare_Type Discrete,Constrained
01f1 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x5 = 0x1f1,0xfffa
01f2 4811 |H | Short_Literal 0x11
01f3 e006 | | Load 0x0,0x6
01f4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01f5 0334 | 4 | Declare_Variable Array,With_Constraint
01f6 BODY_01e0:
01f6 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x6 = 0x1f6,0x1
01f7 e7ff | | Load 0x3,-0x1
01f8 8408 | | Call 0x2,0x8
01f9 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x7 = 0x1f9,0x2
01fa e004 | | Load 0x0,0x4
01fb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01fc 4812 |H | Short_Literal 0x12
01fd e7ff | | Load 0x3,-0x1
01fe e004 | | Load 0x0,0x4
01ff 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0200 00d1 | | Pop_Control Pop_Count_1
0201 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x8 = 0x201,0x3
0202 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0203 0f02 | | Execute_Immediate Equal,0x2
0204 8405 | | Call 0x2,0x5
0205 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x9 = 0x205,0x4
0206 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0207 0f00 | | Execute_Immediate Equal,0x0
0208 8405 | | Call 0x2,0x5
0209 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0xa = 0x209,0x5
020a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
020b 0f00 | | Execute_Immediate Equal,0x0
020c 8405 | | Call 0x2,0x5
020d e603 | | Load 0x3,0x3 ; Debug Table 0x7.0xb = 0x20d,0x6
020e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
020f 0f00 | | Execute_Immediate Equal,0x0
0210 8405 | | Call 0x2,0x5
0211 00cf | | Action Mark_Auxiliary
0212 0007 | | Action Break_Optional ; Debug Table 0x7.0xc = 0x212,0x7
0213 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0xd = 0x213,0x8
0214 4811 |H | Short_Literal 0x11
0215 e006 | | Load 0x0,0x6
0216 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0217 0334 | 4 | Declare_Variable Array,With_Constraint
0218 4811 |H | Short_Literal 0x11
0219 4800 |H | Short_Literal 0x0
021a e604 | | Load 0x3,0x4
021b 48ff |H | Short_Literal 0xff
021c 0279 | y | Execute Discrete,And
021d e006 | | Load 0x0,0x6
021e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
021f 025b | [ | Execute Discrete,Check_In_Type
0220 00d9 | | Load_Top At_Offset_1
0221 e609 | | Load 0x3,0x9
0222 01d6 | | Execute Vector,Field_Write
0223 3ff6 |? | Loop_Increasing 0x21a
0224 00da | | Load_Top At_Offset_2
0225 01d4 | | Execute Vector,Structure_Write
0226 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0xe = 0x226,0x9
0227 00da | | Load_Top At_Offset_2
0228 e7ff | | Load 0x3,-0x1
0229 e004 | | Load 0x0,0x4
022a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
022b 00d1 | | Pop_Control Pop_Count_1
022c e603 | | Load 0x3,0x3 ; Debug Table 0x7.0xf = 0x22c,0xa
022d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
022e 0f02 | | Execute_Immediate Equal,0x2
022f 8405 | | Call 0x2,0x5
0230 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x10 = 0x230,0xb
0231 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0232 0f12 | | Execute_Immediate Equal,0x12
0233 8405 | | Call 0x2,0x5
0234 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x11 = 0x234,0xc
0235 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0236 0f00 | | Execute_Immediate Equal,0x0
0237 8405 | | Call 0x2,0x5
0238 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x12 = 0x238,0xd
0239 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
023a 700b |p | Jump_Nonzero 0x246
023b e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x13 = 0x23b,0xe
023c 6804 |h | Jump_Zero 0x241
023d e604 | | Load 0x3,0x4
023e e404 | | Load 0x2,0x4
023f 027f | | Execute Discrete,Equal
0240 7005 |p | Jump_Nonzero 0x246
0241 e604 | | Load 0x3,0x4 ; Debug Table 0x7.0x14 = 0x241,0xf
0242 0a01 | | Execute_Immediate Plus,0x1
0243 c604 | | Store 0x3,0x4
0244 00c9 | | Action Pop_Auxiliary_Loop
0245 7fcd | | Jump 0x213
0246 00ce | | Action Pop_Auxiliary
0247 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x15 = 0x247,0x10
0248 e7ff | | Load 0x3,-0x1
0249 e004 | | Load 0x0,0x4
024a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
024b 00d1 | | Pop_Control Pop_Count_1
024c e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x16 = 0x24c,0x11
024d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
024e 0f00 | | Execute_Immediate Equal,0x0
024f 8405 | | Call 0x2,0x5
0250 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x17 = 0x250,0x12
0251 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0252 0f00 | | Execute_Immediate Equal,0x0
0253 8405 | | Call 0x2,0x5
0254 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x18 = 0x254,0x13
0255 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0256 0f00 | | Execute_Immediate Equal,0x0
0257 8405 | | Call 0x2,0x5
0258 e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x19 = 0x258,0x14
0259 7003 |p | Jump_Nonzero 0x25d
025a e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x1a = 0x25a,0x15
025b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
025c 8405 | | Call 0x2,0x5
025d e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x1b = 0x25d,0x16
025e e7ff | | Load 0x3,-0x1
025f e004 | | Load 0x0,0x4
0260 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0261 00d1 | | Pop_Control Pop_Count_1
0262 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x1c = 0x262,0x17
0263 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0264 0f00 | | Execute_Immediate Equal,0x0
0265 8405 | | Call 0x2,0x5
0266 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x1d = 0x266,0x18
0267 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0268 0f00 | | Execute_Immediate Equal,0x0
0269 8405 | | Call 0x2,0x5
026a e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x1e = 0x26a,0x19
026b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
026c 0f00 | | Execute_Immediate Equal,0x0
026d 8405 | | Call 0x2,0x5
026e e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x1f = 0x26e,0x1a
026f 7003 |p | Jump_Nonzero 0x273
0270 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x20 = 0x270,0x1b
0271 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0272 8405 | | Call 0x2,0x5
0273 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x21 = 0x273,0x1c
0274 4800 |H | Short_Literal 0x0
0275 e7ff | | Load 0x3,-0x1
0276 e004 | | Load 0x0,0x4
0277 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0278 00d1 | | Pop_Control Pop_Count_1
0279 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x22 = 0x279,0x1d
027a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
027b 0f00 | | Execute_Immediate Equal,0x0
027c 8405 | | Call 0x2,0x5
027d e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x23 = 0x27d,0x1e
027e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
027f 0f00 | | Execute_Immediate Equal,0x0
0280 8405 | | Call 0x2,0x5
0281 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x24 = 0x281,0x1f
0282 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0283 0f00 | | Execute_Immediate Equal,0x0
0284 8405 | | Call 0x2,0x5
0285 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x25 = 0x285,0x20
0286 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0287 0f00 | | Execute_Immediate Equal,0x0
0288 8405 | | Call 0x2,0x5
0289 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x26 = 0x289,0x21
028a e004 | | Load 0x0,0x4
028b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
028c 4812 |H | Short_Literal 0x12
028d e7ff | | Load 0x3,-0x1
028e e004 | | Load 0x0,0x4
028f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0290 00d1 | | Pop_Control Pop_Count_1
0291 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x27 = 0x291,0x22
0292 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0293 0f01 | | Execute_Immediate Equal,0x1
0294 8405 | | Call 0x2,0x5
0295 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x28 = 0x295,0x23
0296 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0297 0f00 | | Execute_Immediate Equal,0x0
0298 8405 | | Call 0x2,0x5
0299 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x29 = 0x299,0x24
029a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
029b 0f00 | | Execute_Immediate Equal,0x0
029c 8405 | | Call 0x2,0x5
029d e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x2a = 0x29d,0x25
029e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
029f 0f00 | | Execute_Immediate Equal,0x0
02a0 8405 | | Call 0x2,0x5
02a1 00cf | | Action Mark_Auxiliary
02a2 0007 | | Action Break_Optional ; Debug Table 0x7.0x2b = 0x2a2,0x26
02a3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x2c = 0x2a3,0x27
02a4 e603 | | Load 0x3,0x3
02a5 e7ff | | Load 0x3,-0x1
02a6 e004 | | Load 0x0,0x4
02a7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02a8 00d2 | | Pop_Control Pop_Count_2
02a9 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x2d = 0x2a9,0x28
02aa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02ab 0f01 | | Execute_Immediate Equal,0x1
02ac 8405 | | Call 0x2,0x5
02ad e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x2e = 0x2ad,0x29
02ae 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02af 0b00 | | Execute_Immediate Case_Compare,0x0
02b0 7005 |p | Jump_Nonzero 0x2b6
02b1 0b05 | | Execute_Immediate Case_Compare,0x5
02b2 7026 |p& | Jump_Nonzero 0x2d9
02b3 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x2f = 0x2b3,0x32
02b4 8405 | | Call 0x2,0x5
02b5 782e |x. | Jump 0x2e4
02b6 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x30 = 0x2b6,0x2a
02b7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b8 0e12 | | Execute_Immediate Not_Equal,0x12
02b9 6803 |h | Jump_Zero 0x2bd
02ba 0092 0df6 | | Action Push_String_Extended,0xdf6 ; "Block length read /= block length written"
; Debug Table 0x7.0x31 = 0x2ba,0x2b
02bc 8406 | | Call 0x2,0x6
02bd 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x32 = 0x2bd,0x2c
02be 4800 |H | Short_Literal 0x0
02bf 4811 |H | Short_Literal 0x11
02c0 e006 | | Load 0x0,0x6
02c1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02c2 035b | [ | Declare_Type Array,Constrained
02c3 0337 | 7 | Declare_Variable Array
02c4 4811 |H | Short_Literal 0x11
02c5 4800 |H | Short_Literal 0x0
02c6 e605 | | Load 0x3,0x5
02c7 48ff |H | Short_Literal 0xff
02c8 0279 | y | Execute Discrete,And
02c9 e006 | | Load 0x0,0x6
02ca 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02cb 025b | [ | Execute Discrete,Check_In_Type
02cc 00d9 | | Load_Top At_Offset_1
02cd e60b | | Load 0x3,0xb
02ce 01d6 | | Execute Vector,Field_Write
02cf 3ff6 |? | Loop_Increasing 0x2c6
02d0 01de | | Execute Vector,Not_Equal
02d1 6803 |h | Jump_Zero 0x2d5
02d2 0092 0df7 | | Action Push_String_Extended,0xdf7 ; "Data read /= data written"
; Debug Table 0x7.0x33 = 0x2d2,0x2d
02d4 8406 | | Call 0x2,0x6
02d5 e605 | | Load 0x3,0x5 ; Debug Table 0x7.0x34 = 0x2d5,0x2e
02d6 0a01 | | Execute_Immediate Plus,0x1
02d7 c605 | | Store 0x3,0x5
02d8 780b |x | Jump 0x2e4
02d9 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x35 = 0x2d9,0x2f
02da 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02db 0f00 | | Execute_Immediate Equal,0x0
02dc 8405 | | Call 0x2,0x5
02dd e605 | | Load 0x3,0x5 ; Debug Table 0x7.0x36 = 0x2dd,0x30
02de e604 | | Load 0x3,0x4
02df 0a01 | | Execute_Immediate Plus,0x1
02e0 027f | | Execute Discrete,Equal
02e1 8405 | | Call 0x2,0x5
02e2 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x7.0x37 = 0x2e2,0x31
02e3 7803 |x | Jump 0x2e7
02e4 00d1 | | Pop_Control Pop_Count_1
02e5 00c9 | | Action Pop_Auxiliary_Loop
02e6 7fbc | | Jump 0x2a3
02e7 00ce | | Action Pop_Auxiliary
02e8 e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x38 = 0x2e8,0x33
02e9 7003 |p | Jump_Nonzero 0x2ed
02ea e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x39 = 0x2ea,0x34
02eb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02ec 8405 | | Call 0x2,0x5
02ed e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x3a = 0x2ed,0x35
02ee e7ff | | Load 0x3,-0x1
02ef e004 | | Load 0x0,0x4
02f0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02f1 00d1 | | Pop_Control Pop_Count_1
02f2 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x3b = 0x2f2,0x36
02f3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02f4 0f00 | | Execute_Immediate Equal,0x0
02f5 8405 | | Call 0x2,0x5
02f6 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x3c = 0x2f6,0x37
02f7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02f8 0f00 | | Execute_Immediate Equal,0x0
02f9 8405 | | Call 0x2,0x5
02fa e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x3d = 0x2fa,0x38
02fb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02fc 0f00 | | Execute_Immediate Equal,0x0
02fd 8405 | | Call 0x2,0x5
02fe e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x3e = 0x2fe,0x39
02ff 7003 |p | Jump_Nonzero 0x303
0300 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x3f = 0x300,0x3a
0301 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0302 8405 | | Call 0x2,0x5
0303 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x40 = 0x303,0x3b
0304 4800 |H | Short_Literal 0x0
0305 e7ff | | Load 0x3,-0x1
0306 e004 | | Load 0x0,0x4
0307 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0308 00d1 | | Pop_Control Pop_Count_1
0309 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x41 = 0x309,0x3c
030a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
030b 0f00 | | Execute_Immediate Equal,0x0
030c 8405 | | Call 0x2,0x5
030d e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x42 = 0x30d,0x3d
030e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
030f 0f00 | | Execute_Immediate Equal,0x0
0310 8405 | | Call 0x2,0x5
0311 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x43 = 0x311,0x3e
0312 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0313 0f00 | | Execute_Immediate Equal,0x0
0314 8405 | | Call 0x2,0x5
0315 e603 | | Load 0x3,0x3 ; Debug Table 0x7.0x44 = 0x315,0x3f
0316 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0317 0f00 | | Execute_Immediate Equal,0x0
0318 8405 | | Call 0x2,0x5
0319 e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x45 = 0x319,0x40
031a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
031b e7ff | | Load 0x3,-0x1
031c e004 | | Load 0x0,0x4
031d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031e c602 | | Store 0x3,0x2
031f e602 | | Load 0x3,0x2 ; Debug Table 0x7.0x46 = 0x31f,0x41
0320 0f00 | | Execute_Immediate Equal,0x0
0321 8405 | | Call 0x2,0x5
0322 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0323 0000 | | .XXX[0x1]
0324 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0328 0000 0000 | | .LITERAL {0x00000000, 0x4f2f0501}
032c 0000 0000 | | .LITERAL {0x00000000, 0x0000170d}
0330 0000 0000 | | .LITERAL {0x00000000, 0x004f2f05}
0334 00c0 2014 | | .LITERAL {0x00c02014, 0x0000ce30}
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 034f | O | .CONST 0x034f ; Address of begin
0339 057e | ~ | .CONST 0x057e ; Address of exception handler
033a 0008 | | .CONST 0x0008 ; Number of locals
033b INIT_0338:
033b e002 | | Load 0x0,0x2 ; Debug Table 0x8 = .DEBUG 0x033b,0x12bc,0x0801,0x0002,0x004f,0x2f05,0x0000,0x04ca
; Debug Table 0x8.0x0 = 0x33b,0xffff
033c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
033d e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x1 = 0x33d,0xfffe
033e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
033f 0322 | " | Declare_Variable Record
0340 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x2 = 0x340,0xfffd
0341 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0342 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x3 = 0x342,0xfffc
0343 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0344 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x4 = 0x344,0xfffb
0345 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x5 = 0x345,0xfffa
0346 4811 |H | Short_Literal 0x11
0347 e002 | | Load 0x0,0x2
0348 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0349 03f8 | | Declare_Type Discrete,Constrained
034a 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x6 = 0x34a,0xfff9
034b 4811 |H | Short_Literal 0x11
034c e006 | | Load 0x0,0x6
034d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
034e 0334 | 4 | Declare_Variable Array,With_Constraint
034f BODY_0338:
034f 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x7 = 0x34f,0x1
0350 e7ff | | Load 0x3,-0x1
0351 8408 | | Call 0x2,0x8
0352 00cf | | Action Mark_Auxiliary
0353 480a |H | Short_Literal 0xa ; Debug Table 0x8.0x8 = 0x353,0x2
0354 4801 |H | Short_Literal 0x1
0355 0007 | | Action Break_Optional
0356 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x9 = 0x356,0x3
0357 e004 | | Load 0x0,0x4
0358 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0359 4812 |H | Short_Literal 0x12
035a e7ff | | Load 0x3,-0x1
035b e004 | | Load 0x0,0x4
035c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
035d 00d1 | | Pop_Control Pop_Count_1
035e e603 | | Load 0x3,0x3 ; Debug Table 0x8.0xa = 0x35e,0x4
035f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0360 0f02 | | Execute_Immediate Equal,0x2
0361 8405 | | Call 0x2,0x5
0362 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0xb = 0x362,0x5
0363 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0364 0f00 | | Execute_Immediate Equal,0x0
0365 8405 | | Call 0x2,0x5
0366 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0xc = 0x366,0x6
0367 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0368 0f00 | | Execute_Immediate Equal,0x0
0369 8405 | | Call 0x2,0x5
036a e603 | | Load 0x3,0x3 ; Debug Table 0x8.0xd = 0x36a,0x7
036b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
036c 0f00 | | Execute_Immediate Equal,0x0
036d 8405 | | Call 0x2,0x5
036e 00cf | | Action Mark_Auxiliary
036f 4864 |Hd | Short_Literal 0x64 ; Debug Table 0x8.0xe = 0x36f,0x8
0370 4801 |H | Short_Literal 0x1
0371 0007 | | Action Break_Optional
0372 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xf = 0x372,0x9
0373 4811 |H | Short_Literal 0x11
0374 e006 | | Load 0x0,0x6
0375 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0376 0334 | 4 | Declare_Variable Array,With_Constraint
0377 4811 |H | Short_Literal 0x11
0378 4800 |H | Short_Literal 0x0
0379 00db | | Load_Top At_Offset_3
037a 00d9 | | Load_Top At_Offset_1
037b e60f | | Load 0x3,0xf
037c 01d6 | | Execute Vector,Field_Write
037d 3ffb |? | Loop_Increasing 0x379
037e e608 | | Load 0x3,0x8
037f 01d4 | | Execute Vector,Structure_Write
0380 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x10 = 0x380,0xa
0381 e608 | | Load 0x3,0x8
0382 e7ff | | Load 0x3,-0x1
0383 e004 | | Load 0x0,0x4
0384 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0385 00d1 | | Pop_Control Pop_Count_1
0386 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x11 = 0x386,0xb
0387 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0388 0f02 | | Execute_Immediate Equal,0x2
0389 8405 | | Call 0x2,0x5
038a e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x12 = 0x38a,0xc
038b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
038c 0f12 | | Execute_Immediate Equal,0x12
038d 8405 | | Call 0x2,0x5
038e e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x13 = 0x38e,0xd
038f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0390 0f00 | | Execute_Immediate Equal,0x0
0391 8405 | | Call 0x2,0x5
0392 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x14 = 0x392,0xe
0393 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0394 0f00 | | Execute_Immediate Equal,0x0
0395 8405 | | Call 0x2,0x5
0396 00c8 | | Action Pop_Auxiliary_Range
0397 3fda |? | Loop_Increasing 0x372
0398 00ce | | Action Pop_Auxiliary
0399 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x15 = 0x399,0xf
039a e7ff | | Load 0x3,-0x1
039b e004 | | Load 0x0,0x4
039c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
039d 00d1 | | Pop_Control Pop_Count_1
039e e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x16 = 0x39e,0x10
039f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03a0 0f00 | | Execute_Immediate Equal,0x0
03a1 8405 | | Call 0x2,0x5
03a2 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x17 = 0x3a2,0x11
03a3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03a4 0f00 | | Execute_Immediate Equal,0x0
03a5 8405 | | Call 0x2,0x5
03a6 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x18 = 0x3a6,0x12
03a7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03a8 0f00 | | Execute_Immediate Equal,0x0
03a9 8405 | | Call 0x2,0x5
03aa e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x19 = 0x3aa,0x13
03ab 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03ac 0f00 | | Execute_Immediate Equal,0x0
03ad 8405 | | Call 0x2,0x5
03ae e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x1a = 0x3ae,0x14
03af e7ff | | Load 0x3,-0x1
03b0 e004 | | Load 0x0,0x4
03b1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03b2 00d1 | | Pop_Control Pop_Count_1
03b3 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x1b = 0x3b3,0x15
03b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03b5 0f00 | | Execute_Immediate Equal,0x0
03b6 8405 | | Call 0x2,0x5
03b7 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x1c = 0x3b7,0x16
03b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03b9 0f00 | | Execute_Immediate Equal,0x0
03ba 8405 | | Call 0x2,0x5
03bb e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x1d = 0x3bb,0x17
03bc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03bd 0f00 | | Execute_Immediate Equal,0x0
03be 8405 | | Call 0x2,0x5
03bf e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x1e = 0x3bf,0x18
03c0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03c1 0f00 | | Execute_Immediate Equal,0x0
03c2 8405 | | Call 0x2,0x5
03c3 00c8 | | Action Pop_Auxiliary_Range
03c4 3f91 |? | Loop_Increasing 0x356
03c5 00ce | | Action Pop_Auxiliary
03c6 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x1f = 0x3c6,0x19
03c7 e7ff | | Load 0x3,-0x1
03c8 e004 | | Load 0x0,0x4
03c9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03ca 00d1 | | Pop_Control Pop_Count_1
03cb e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x20 = 0x3cb,0x1a
03cc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03cd 0f00 | | Execute_Immediate Equal,0x0
03ce 8405 | | Call 0x2,0x5
03cf e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x21 = 0x3cf,0x1b
03d0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03d1 0f00 | | Execute_Immediate Equal,0x0
03d2 8405 | | Call 0x2,0x5
03d3 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x22 = 0x3d3,0x1c
03d4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03d5 0f00 | | Execute_Immediate Equal,0x0
03d6 8405 | | Call 0x2,0x5
03d7 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x23 = 0x3d7,0x1d
03d8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03d9 0f00 | | Execute_Immediate Equal,0x0
03da 8405 | | Call 0x2,0x5
03db e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x24 = 0x3db,0x1e
03dc 4800 |H | Short_Literal 0x0
03dd e7ff | | Load 0x3,-0x1
03de e004 | | Load 0x0,0x4
03df 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03e0 00d1 | | Pop_Control Pop_Count_1
03e1 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x25 = 0x3e1,0x1f
03e2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03e3 0f00 | | Execute_Immediate Equal,0x0
03e4 8405 | | Call 0x2,0x5
03e5 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x26 = 0x3e5,0x20
03e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03e7 0f00 | | Execute_Immediate Equal,0x0
03e8 8405 | | Call 0x2,0x5
03e9 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x27 = 0x3e9,0x21
03ea 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03eb 0f00 | | Execute_Immediate Equal,0x0
03ec 8405 | | Call 0x2,0x5
03ed e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x28 = 0x3ed,0x22
03ee 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03ef 0f00 | | Execute_Immediate Equal,0x0
03f0 8405 | | Call 0x2,0x5
03f1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x29 = 0x3f1,0x23
03f2 e603 | | Load 0x3,0x3
03f3 4832 |H2 | Short_Literal 0x32
03f4 4802 |H | Short_Literal 0x2
03f5 e7ff | | Load 0x3,-0x1
03f6 e004 | | Load 0x0,0x4
03f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03f8 00d1 | | Pop_Control Pop_Count_1
03f9 005b | [ | Store_Top Discrete,At_Offset_3
03fa e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x2a = 0x3fa,0x24
03fb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03fc 0f00 | | Execute_Immediate Equal,0x0
03fd 8405 | | Call 0x2,0x5
03fe e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x2b = 0x3fe,0x25
03ff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0400 0f00 | | Execute_Immediate Equal,0x0
0401 8405 | | Call 0x2,0x5
0402 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x2c = 0x402,0x26
0403 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0404 0f00 | | Execute_Immediate Equal,0x0
0405 8405 | | Call 0x2,0x5
0406 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x2d = 0x406,0x27
0407 0f00 | | Execute_Immediate Equal,0x0
0408 8405 | | Call 0x2,0x5
0409 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x2e = 0x409,0x28
040a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
040b 0f00 | | Execute_Immediate Equal,0x0
040c 8405 | | Call 0x2,0x5
040d 00cf | | Action Mark_Auxiliary
040e 0007 | | Action Break_Optional ; Debug Table 0x8.0x2f = 0x40e,0x29
040f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x30 = 0x40f,0x2a
0410 e603 | | Load 0x3,0x3
0411 e7ff | | Load 0x3,-0x1
0412 e004 | | Load 0x0,0x4
0413 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0414 00d2 | | Pop_Control Pop_Count_2
0415 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x31 = 0x415,0x2b
0416 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0417 0f00 | | Execute_Immediate Equal,0x0
0418 8405 | | Call 0x2,0x5
0419 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x32 = 0x419,0x2c
041a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
041b 0f00 | | Execute_Immediate Equal,0x0
041c 8405 | | Call 0x2,0x5
041d e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x33 = 0x41d,0x2d
041e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
041f 0f12 | | Execute_Immediate Equal,0x12
0420 8405 | | Call 0x2,0x5
0421 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x34 = 0x421,0x2e
0422 4800 |H | Short_Literal 0x0
0423 4811 |H | Short_Literal 0x11
0424 e006 | | Load 0x0,0x6
0425 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0426 0334 | 4 | Declare_Variable Array,With_Constraint
0427 4811 |H | Short_Literal 0x11
0428 4800 |H | Short_Literal 0x0
0429 4833 |H3 | Short_Literal 0x33
042a 00d9 | | Load_Top At_Offset_1
042b e60b | | Load 0x3,0xb
042c 01d6 | | Execute Vector,Field_Write
042d 3ffb |? | Loop_Increasing 0x429
042e 01df | | Execute Vector,Equal
042f 8405 | | Call 0x2,0x5
0430 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x35 = 0x430,0x2f
0431 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0432 0f00 | | Execute_Immediate Equal,0x0
0433 8405 | | Call 0x2,0x5
0434 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x36 = 0x434,0x30
0435 e603 | | Load 0x3,0x3
0436 4863 |Hc | Short_Literal 0x63
0437 4802 |H | Short_Literal 0x2
0438 e7ff | | Load 0x3,-0x1
0439 e004 | | Load 0x0,0x4
043a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
043b 00d1 | | Pop_Control Pop_Count_1
043c c606 | | Store 0x3,0x6
043d e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x37 = 0x43d,0x31
043e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
043f 0f00 | | Execute_Immediate Equal,0x0
0440 8405 | | Call 0x2,0x5
0441 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x38 = 0x441,0x32
0442 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0443 0f00 | | Execute_Immediate Equal,0x0
0444 8405 | | Call 0x2,0x5
0445 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x39 = 0x445,0x33
0446 0f32 | 2 | Execute_Immediate Equal,0x32
0447 8405 | | Call 0x2,0x5
0448 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x3a = 0x448,0x34
0449 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
044a 0f00 | | Execute_Immediate Equal,0x0
044b 8405 | | Call 0x2,0x5
044c e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x3b = 0x44c,0x35
044d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
044e 0f05 | | Execute_Immediate Equal,0x5
044f 6828 |h( | Jump_Zero 0x478
0450 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x3c = 0x450,0x36
0451 e603 | | Load 0x3,0x3
0452 4832 |H2 | Short_Literal 0x32
0453 4802 |H | Short_Literal 0x2
0454 e7ff | | Load 0x3,-0x1
0455 e004 | | Load 0x0,0x4
0456 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0457 00d1 | | Pop_Control Pop_Count_1
0458 c606 | | Store 0x3,0x6
0459 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x3d = 0x459,0x37
045a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
045b 0f00 | | Execute_Immediate Equal,0x0
045c 8405 | | Call 0x2,0x5
045d e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x3e = 0x45d,0x38
045e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
045f 0f00 | | Execute_Immediate Equal,0x0
0460 8405 | | Call 0x2,0x5
0461 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x3f = 0x461,0x39
0462 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0463 0f00 | | Execute_Immediate Equal,0x0
0464 8405 | | Call 0x2,0x5
0465 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x40 = 0x465,0x3a
0466 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0467 0b05 | | Execute_Immediate Case_Compare,0x5
0468 7005 |p | Jump_Nonzero 0x46e
0469 0b00 | | Execute_Immediate Case_Compare,0x0
046a 7008 |p | Jump_Nonzero 0x473
046b 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x41 = 0x46b,0x3e
046c 8405 | | Call 0x2,0x5
046d 7808 |x | Jump 0x476
046e e606 | | Load 0x3,0x6 ; Debug Table 0x8.0x42 = 0x46e,0x3b
046f 0f32 | 2 | Execute_Immediate Equal,0x32
0470 8405 | | Call 0x2,0x5
0471 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x8.0x43 = 0x471,0x3c
0472 7809 |x | Jump 0x47c
0473 e606 | | Load 0x3,0x6 ; Debug Table 0x8.0x44 = 0x473,0x3d
0474 0f00 | | Execute_Immediate Equal,0x0
0475 8405 | | Call 0x2,0x5
0476 00d1 | | Pop_Control Pop_Count_1
0477 7802 |x | Jump 0x47a
0478 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x45 = 0x478,0x3f
0479 8405 | | Call 0x2,0x5
047a 00c9 | | Action Pop_Auxiliary_Loop
047b 7f93 | | Jump 0x40f
047c 00ce | | Action Pop_Auxiliary
047d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x46 = 0x47d,0x40
047e e603 | | Load 0x3,0x3
047f 4832 |H2 | Short_Literal 0x32
0480 4803 |H | Short_Literal 0x3
0481 e7ff | | Load 0x3,-0x1
0482 e004 | | Load 0x0,0x4
0483 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0484 00d1 | | Pop_Control Pop_Count_1
0485 005b | [ | Store_Top Discrete,At_Offset_3
0486 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x47 = 0x486,0x41
0487 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0488 0f00 | | Execute_Immediate Equal,0x0
0489 8405 | | Call 0x2,0x5
048a e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x48 = 0x48a,0x42
048b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
048c 0f00 | | Execute_Immediate Equal,0x0
048d 8405 | | Call 0x2,0x5
048e e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x49 = 0x48e,0x43
048f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0490 0f05 | | Execute_Immediate Equal,0x5
0491 8405 | | Call 0x2,0x5
0492 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x4a = 0x492,0x44
0493 0f32 | 2 | Execute_Immediate Equal,0x32
0494 8405 | | Call 0x2,0x5
0495 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x4b = 0x495,0x45
0496 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0497 0f00 | | Execute_Immediate Equal,0x0
0498 8405 | | Call 0x2,0x5
0499 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x4c = 0x499,0x46
049a e603 | | Load 0x3,0x3
049b 4832 |H2 | Short_Literal 0x32
049c 4803 |H | Short_Literal 0x3
049d e7ff | | Load 0x3,-0x1
049e e004 | | Load 0x0,0x4
049f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04a0 00d1 | | Pop_Control Pop_Count_1
04a1 005b | [ | Store_Top Discrete,At_Offset_3
04a2 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x4d = 0x4a2,0x47
04a3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04a4 0f00 | | Execute_Immediate Equal,0x0
04a5 8405 | | Call 0x2,0x5
04a6 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x4e = 0x4a6,0x48
04a7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04a8 0f00 | | Execute_Immediate Equal,0x0
04a9 8405 | | Call 0x2,0x5
04aa e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x4f = 0x4aa,0x49
04ab 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04ac 0f05 | | Execute_Immediate Equal,0x5
04ad 8405 | | Call 0x2,0x5
04ae 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x50 = 0x4ae,0x4a
04af 0f32 | 2 | Execute_Immediate Equal,0x32
04b0 8405 | | Call 0x2,0x5
04b1 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x51 = 0x4b1,0x4b
04b2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04b3 0f00 | | Execute_Immediate Equal,0x0
04b4 8405 | | Call 0x2,0x5
04b5 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x52 = 0x4b5,0x4c
04b6 e603 | | Load 0x3,0x3
04b7 4832 |H2 | Short_Literal 0x32
04b8 4803 |H | Short_Literal 0x3
04b9 e7ff | | Load 0x3,-0x1
04ba e004 | | Load 0x0,0x4
04bb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04bc 00d1 | | Pop_Control Pop_Count_1
04bd 005b | [ | Store_Top Discrete,At_Offset_3
04be e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x53 = 0x4be,0x4d
04bf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04c0 0f00 | | Execute_Immediate Equal,0x0
04c1 8405 | | Call 0x2,0x5
04c2 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x54 = 0x4c2,0x4e
04c3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04c4 0f00 | | Execute_Immediate Equal,0x0
04c5 8405 | | Call 0x2,0x5
04c6 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x55 = 0x4c6,0x4f
04c7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04c8 0f00 | | Execute_Immediate Equal,0x0
04c9 8405 | | Call 0x2,0x5
04ca 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x56 = 0x4ca,0x50
04cb 0f00 | | Execute_Immediate Equal,0x0
04cc 8405 | | Call 0x2,0x5
04cd e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x57 = 0x4cd,0x51
04ce 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04cf 0f00 | | Execute_Immediate Equal,0x0
04d0 8405 | | Call 0x2,0x5
04d1 00cf | | Action Mark_Auxiliary
04d2 0007 | | Action Break_Optional ; Debug Table 0x8.0x58 = 0x4d2,0x52
04d3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x59 = 0x4d3,0x53
04d4 e603 | | Load 0x3,0x3
04d5 e7ff | | Load 0x3,-0x1
04d6 e004 | | Load 0x0,0x4
04d7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04d8 00d2 | | Pop_Control Pop_Count_2
04d9 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x5a = 0x4d9,0x54
04da 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04db 0f00 | | Execute_Immediate Equal,0x0
04dc 8405 | | Call 0x2,0x5
04dd e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x5b = 0x4dd,0x55
04de 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04df 0f00 | | Execute_Immediate Equal,0x0
04e0 8405 | | Call 0x2,0x5
04e1 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x5c = 0x4e1,0x56
04e2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04e3 0f12 | | Execute_Immediate Equal,0x12
04e4 8405 | | Call 0x2,0x5
04e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x5d = 0x4e5,0x57
04e6 4800 |H | Short_Literal 0x0
04e7 4811 |H | Short_Literal 0x11
04e8 e006 | | Load 0x0,0x6
04e9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04ea 0334 | 4 | Declare_Variable Array,With_Constraint
04eb 4811 |H | Short_Literal 0x11
04ec 4800 |H | Short_Literal 0x0
04ed 4833 |H3 | Short_Literal 0x33
04ee 00d9 | | Load_Top At_Offset_1
04ef e60b | | Load 0x3,0xb
04f0 01d6 | | Execute Vector,Field_Write
04f1 3ffb |? | Loop_Increasing 0x4ed
04f2 01df | | Execute Vector,Equal
04f3 8405 | | Call 0x2,0x5
04f4 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x5e = 0x4f4,0x58
04f5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04f6 0f00 | | Execute_Immediate Equal,0x0
04f7 8405 | | Call 0x2,0x5
04f8 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x5f = 0x4f8,0x59
04f9 e603 | | Load 0x3,0x3
04fa 4865 |He | Short_Literal 0x65
04fb 4803 |H | Short_Literal 0x3
04fc e7ff | | Load 0x3,-0x1
04fd e004 | | Load 0x0,0x4
04fe 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04ff 00d1 | | Pop_Control Pop_Count_1
0500 c606 | | Store 0x3,0x6
0501 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x60 = 0x501,0x5a
0502 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0503 0f00 | | Execute_Immediate Equal,0x0
0504 8405 | | Call 0x2,0x5
0505 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x61 = 0x505,0x5b
0506 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0507 0f00 | | Execute_Immediate Equal,0x0
0508 8405 | | Call 0x2,0x5
0509 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x62 = 0x509,0x5c
050a 0f32 | 2 | Execute_Immediate Equal,0x32
050b 8405 | | Call 0x2,0x5
050c e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x63 = 0x50c,0x5d
050d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
050e 0f00 | | Execute_Immediate Equal,0x0
050f 8405 | | Call 0x2,0x5
0510 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x64 = 0x510,0x5e
0511 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0512 0b05 | | Execute_Immediate Case_Compare,0x5
0513 7005 |p | Jump_Nonzero 0x519
0514 0b0e | | Execute_Immediate Case_Compare,0xe
0515 7020 |p | Jump_Nonzero 0x536
0516 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x65 = 0x516,0x66
0517 8405 | | Call 0x2,0x5
0518 781f |x | Jump 0x538
0519 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x66 = 0x519,0x5f
051a e603 | | Load 0x3,0x3
051b 4832 |H2 | Short_Literal 0x32
051c 4803 |H | Short_Literal 0x3
051d e7ff | | Load 0x3,-0x1
051e e004 | | Load 0x0,0x4
051f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0520 00d1 | | Pop_Control Pop_Count_1
0521 c606 | | Store 0x3,0x6
0522 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x67 = 0x522,0x60
0523 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0524 0f00 | | Execute_Immediate Equal,0x0
0525 8405 | | Call 0x2,0x5
0526 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x68 = 0x526,0x61
0527 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0528 0f00 | | Execute_Immediate Equal,0x0
0529 8405 | | Call 0x2,0x5
052a e606 | | Load 0x3,0x6 ; Debug Table 0x8.0x69 = 0x52a,0x62
052b 0f00 | | Execute_Immediate Equal,0x0
052c 8405 | | Call 0x2,0x5
052d e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x6a = 0x52d,0x63
052e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
052f 0f00 | | Execute_Immediate Equal,0x0
0530 8405 | | Call 0x2,0x5
0531 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x6b = 0x531,0x64
0532 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0533 0f00 | | Execute_Immediate Equal,0x0
0534 8405 | | Call 0x2,0x5
0535 7802 |x | Jump 0x538
0536 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x8.0x6c = 0x536,0x65
0537 7803 |x | Jump 0x53b
0538 00d1 | | Pop_Control Pop_Count_1
0539 00c9 | | Action Pop_Auxiliary_Loop
053a 7f98 | | Jump 0x4d3
053b 00ce | | Action Pop_Auxiliary
053c 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x6d = 0x53c,0x67
053d e603 | | Load 0x3,0x3
053e 480b |H | Short_Literal 0xb
053f 4804 |H | Short_Literal 0x4
0540 e7ff | | Load 0x3,-0x1
0541 e004 | | Load 0x0,0x4
0542 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0543 00d1 | | Pop_Control Pop_Count_1
0544 005b | [ | Store_Top Discrete,At_Offset_3
0545 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x6e = 0x545,0x68
0546 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0547 0f00 | | Execute_Immediate Equal,0x0
0548 8405 | | Call 0x2,0x5
0549 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x6f = 0x549,0x69
054a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
054b 0f00 | | Execute_Immediate Equal,0x0
054c 8405 | | Call 0x2,0x5
054d e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x70 = 0x54d,0x6a
054e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
054f 0f0d | | Execute_Immediate Equal,0xd
0550 8405 | | Call 0x2,0x5
0551 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x71 = 0x551,0x6b
0552 0f01 | | Execute_Immediate Equal,0x1
0553 8405 | | Call 0x2,0x5
0554 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x72 = 0x554,0x6c
0555 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0556 0f00 | | Execute_Immediate Equal,0x0
0557 8405 | | Call 0x2,0x5
0558 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x73 = 0x558,0x6d
0559 e603 | | Load 0x3,0x3
055a 480c |H | Short_Literal 0xc
055b 4805 |H | Short_Literal 0x5
055c e7ff | | Load 0x3,-0x1
055d e004 | | Load 0x0,0x4
055e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
055f 00d1 | | Pop_Control Pop_Count_1
0560 005b | [ | Store_Top Discrete,At_Offset_3
0561 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x74 = 0x561,0x6e
0562 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0563 0f00 | | Execute_Immediate Equal,0x0
0564 8405 | | Call 0x2,0x5
0565 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x75 = 0x565,0x6f
0566 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0567 0f00 | | Execute_Immediate Equal,0x0
0568 8405 | | Call 0x2,0x5
0569 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x76 = 0x569,0x70
056a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
056b 0f0e | | Execute_Immediate Equal,0xe
056c 8405 | | Call 0x2,0x5
056d 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x77 = 0x56d,0x71
056e 0f01 | | Execute_Immediate Equal,0x1
056f 8405 | | Call 0x2,0x5
0570 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x78 = 0x570,0x72
0571 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0572 0f00 | | Execute_Immediate Equal,0x0
0573 8405 | | Call 0x2,0x5
0574 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x79 = 0x574,0x73
0575 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0576 e7ff | | Load 0x3,-0x1
0577 e004 | | Load 0x0,0x4
0578 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0579 c602 | | Store 0x3,0x2
057a e602 | | Load 0x3,0x2 ; Debug Table 0x8.0x7a = 0x57a,0x74
057b 0f00 | | Execute_Immediate Equal,0x0
057c 8405 | | Call 0x2,0x5
057d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
057e TRAP_0338:
057e 65a9 |e | Indirect_Literal Discrete,0x328,{0x00000000, 0x4f2f0501}
057f 010f | | Execute Exception,Equal
0580 6804 |h | Jump_Zero 0x585
0581 0092 0df8 | | Action Push_String_Extended,0xdf8 ; "Tape positioning failure"
; Debug Table 0x8.0x7b = 0x581,0x75
0583 8406 | | Call 0x2,0x6
0584 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0585 0100 | | Execute Exception,Raise
0586 0000 0000 | | .XXX[0x2]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 059f | | .CONST 0x059f ; Address of begin
0589 0677 | w | .CONST 0x0677 ; Address of exception handler
058a 0008 | | .CONST 0x0008 ; Number of locals
058b INIT_0588:
058b e002 | | Load 0x0,0x2 ; Debug Table 0x9 = .DEBUG 0x058b,0x13b6,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0905
; Debug Table 0x9.0x0 = 0x58b,0xffff
058c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
058d e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x1 = 0x58d,0xfffe
058e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
058f e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x2 = 0x58f,0xfffd
0590 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0591 0322 | " | Declare_Variable Record
0592 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x9.0x3 = 0x592,0xfffc
0593 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0594 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x4 = 0x594,0xfffb
0595 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x5 = 0x595,0xfffa
0596 4811 |H | Short_Literal 0x11
0597 e002 | | Load 0x0,0x2
0598 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0599 03f8 | | Declare_Type Discrete,Constrained
059a 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x6 = 0x59a,0xfff9
059b 4811 |H | Short_Literal 0x11
059c e006 | | Load 0x0,0x6
059d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
059e 0334 | 4 | Declare_Variable Array,With_Constraint
059f BODY_0588:
059f 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x7 = 0x59f,0x1
05a0 e7ff | | Load 0x3,-0x1
05a1 8408 | | Call 0x2,0x8
05a2 00cf | | Action Mark_Auxiliary
05a3 0007 | | Action Break_Optional ; Debug Table 0x9.0x8 = 0x5a3,0x2
05a4 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x9 = 0x5a4,0x3
05a5 4811 |H | Short_Literal 0x11
05a6 e006 | | Load 0x0,0x6
05a7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
05a8 0334 | 4 | Declare_Variable Array,With_Constraint
05a9 4811 |H | Short_Literal 0x11
05aa 4800 |H | Short_Literal 0x0
05ab e605 | | Load 0x3,0x5
05ac 48ff |H | Short_Literal 0xff
05ad 0279 | y | Execute Discrete,And
05ae e006 | | Load 0x0,0x6
05af 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05b0 025b | [ | Execute Discrete,Check_In_Type
05b1 00d9 | | Load_Top At_Offset_1
05b2 e60a | | Load 0x3,0xa
05b3 01d6 | | Execute Vector,Field_Write
05b4 3ff6 |? | Loop_Increasing 0x5ab
05b5 00da | | Load_Top At_Offset_2
05b6 01d4 | | Execute Vector,Structure_Write
05b7 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0xa = 0x5b7,0x4
05b8 00da | | Load_Top At_Offset_2
05b9 e7ff | | Load 0x3,-0x1
05ba e004 | | Load 0x0,0x4
05bb 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05bc 00d1 | | Pop_Control Pop_Count_1
05bd e604 | | Load 0x3,0x4 ; Debug Table 0x9.0xb = 0x5bd,0x5
05be 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05bf 0f00 | | Execute_Immediate Equal,0x0
05c0 8405 | | Call 0x2,0x5
05c1 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0xc = 0x5c1,0x6
05c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05c3 0f12 | | Execute_Immediate Equal,0x12
05c4 8405 | | Call 0x2,0x5
05c5 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0xd = 0x5c5,0x7
05c6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05c7 0f00 | | Execute_Immediate Equal,0x0
05c8 8405 | | Call 0x2,0x5
05c9 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0xe = 0x5c9,0x8
05ca 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05cb 704b |pK | Jump_Nonzero 0x617
05cc e403 | | Load 0x2,0x3 ; Debug Table 0x9.0xf = 0x5cc,0x9
05cd e605 | | Load 0x3,0x5
05ce e404 | | Load 0x2,0x4
05cf 027f | | Execute Discrete,Equal
05d0 0279 | y | Execute Discrete,And
05d1 7045 |pE | Jump_Nonzero 0x617
05d2 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x10 = 0x5d2,0xa
05d3 4803 |H | Short_Literal 0x3
05d4 e7ff | | Load 0x3,-0x1
05d5 e004 | | Load 0x0,0x4
05d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05d7 00d1 | | Pop_Control Pop_Count_1
05d8 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x11 = 0x5d8,0xb
05d9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05da 0f00 | | Execute_Immediate Equal,0x0
05db 8405 | | Call 0x2,0x5
05dc e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x12 = 0x5dc,0xc
05dd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05de 0f00 | | Execute_Immediate Equal,0x0
05df 8405 | | Call 0x2,0x5
05e0 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x13 = 0x5e0,0xd
05e1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05e2 0f00 | | Execute_Immediate Equal,0x0
05e3 8405 | | Call 0x2,0x5
05e4 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x14 = 0x5e4,0xe
05e5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05e6 0f00 | | Execute_Immediate Equal,0x0
05e7 8405 | | Call 0x2,0x5
05e8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x15 = 0x5e8,0xf
05e9 e604 | | Load 0x3,0x4
05ea e7ff | | Load 0x3,-0x1
05eb e004 | | Load 0x0,0x4
05ec 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05ed 00d2 | | Pop_Control Pop_Count_2
05ee e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x16 = 0x5ee,0x10
05ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05f0 0f00 | | Execute_Immediate Equal,0x0
05f1 8405 | | Call 0x2,0x5
05f2 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x17 = 0x5f2,0x11
05f3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05f4 0f00 | | Execute_Immediate Equal,0x0
05f5 8405 | | Call 0x2,0x5
05f6 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x18 = 0x5f6,0x12
05f7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05f8 0f00 | | Execute_Immediate Equal,0x0
05f9 8405 | | Call 0x2,0x5
05fa e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x19 = 0x5fa,0x13
05fb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05fc 0f12 | | Execute_Immediate Equal,0x12
05fd 8405 | | Call 0x2,0x5
05fe 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x1a = 0x5fe,0x14
05ff 4800 |H | Short_Literal 0x0
0600 4811 |H | Short_Literal 0x11
0601 e006 | | Load 0x0,0x6
0602 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0603 0334 | 4 | Declare_Variable Array,With_Constraint
0604 4811 |H | Short_Literal 0x11
0605 4800 |H | Short_Literal 0x0
0606 e605 | | Load 0x3,0x5
0607 48ff |H | Short_Literal 0xff
0608 0279 | y | Execute Discrete,And
0609 e006 | | Load 0x0,0x6
060a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
060b 025b | [ | Execute Discrete,Check_In_Type
060c 00d9 | | Load_Top At_Offset_1
060d e60b | | Load 0x3,0xb
060e 01d6 | | Execute Vector,Field_Write
060f 3ff6 |? | Loop_Increasing 0x606
0610 01df | | Execute Vector,Equal
0611 8405 | | Call 0x2,0x5
0612 e605 | | Load 0x3,0x5 ; Debug Table 0x9.0x1b = 0x612,0x15
0613 0a01 | | Execute_Immediate Plus,0x1
0614 c605 | | Store 0x3,0x5
0615 00c9 | | Action Pop_Auxiliary_Loop
0616 7f8d | | Jump 0x5a4
0617 00ce | | Action Pop_Auxiliary
0618 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x1c = 0x618,0x16
0619 e7ff | | Load 0x3,-0x1
061a e004 | | Load 0x0,0x4
061b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
061c 00d1 | | Pop_Control Pop_Count_1
061d e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x1d = 0x61d,0x17
061e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
061f 0f00 | | Execute_Immediate Equal,0x0
0620 8405 | | Call 0x2,0x5
0621 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x1e = 0x621,0x18
0622 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0623 0f00 | | Execute_Immediate Equal,0x0
0624 8405 | | Call 0x2,0x5
0625 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x1f = 0x625,0x19
0626 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0627 0f00 | | Execute_Immediate Equal,0x0
0628 8405 | | Call 0x2,0x5
0629 e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x20 = 0x629,0x1a
062a 7003 |p | Jump_Nonzero 0x62e
062b e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x21 = 0x62b,0x1b
062c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
062d 8405 | | Call 0x2,0x5
062e e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x22 = 0x62e,0x1c
062f 4803 |H | Short_Literal 0x3
0630 e7ff | | Load 0x3,-0x1
0631 e004 | | Load 0x0,0x4
0632 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0633 00d1 | | Pop_Control Pop_Count_1
0634 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x23 = 0x634,0x1d
0635 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0636 0f00 | | Execute_Immediate Equal,0x0
0637 8405 | | Call 0x2,0x5
0638 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x24 = 0x638,0x1e
0639 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
063a 0f00 | | Execute_Immediate Equal,0x0
063b 8405 | | Call 0x2,0x5
063c e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x25 = 0x63c,0x1f
063d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
063e 0f05 | | Execute_Immediate Equal,0x5
063f 8405 | | Call 0x2,0x5
0640 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x26 = 0x640,0x20
0641 e604 | | Load 0x3,0x4
0642 e7ff | | Load 0x3,-0x1
0643 e004 | | Load 0x0,0x4
0644 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0645 00d2 | | Pop_Control Pop_Count_2
0646 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x27 = 0x646,0x21
0647 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0648 0f00 | | Execute_Immediate Equal,0x0
0649 8405 | | Call 0x2,0x5
064a e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x28 = 0x64a,0x22
064b 7003 |p | Jump_Nonzero 0x64f
064c e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x29 = 0x64c,0x23
064d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
064e 8405 | | Call 0x2,0x5
064f e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x2a = 0x64f,0x24
0650 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0651 0f05 | | Execute_Immediate Equal,0x5
0652 8405 | | Call 0x2,0x5
0653 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x2b = 0x653,0x25
0654 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0655 0f00 | | Execute_Immediate Equal,0x0
0656 8405 | | Call 0x2,0x5
0657 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x2c = 0x657,0x26
0658 4800 |H | Short_Literal 0x0
0659 e7ff | | Load 0x3,-0x1
065a e004 | | Load 0x0,0x4
065b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
065c 00d1 | | Pop_Control Pop_Count_1
065d e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x2d = 0x65d,0x27
065e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
065f 0f00 | | Execute_Immediate Equal,0x0
0660 8405 | | Call 0x2,0x5
0661 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x2e = 0x661,0x28
0662 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0663 0f00 | | Execute_Immediate Equal,0x0
0664 8405 | | Call 0x2,0x5
0665 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x2f = 0x665,0x29
0666 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0667 0f00 | | Execute_Immediate Equal,0x0
0668 8405 | | Call 0x2,0x5
0669 e604 | | Load 0x3,0x4 ; Debug Table 0x9.0x30 = 0x669,0x2a
066a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
066b 0f00 | | Execute_Immediate Equal,0x0
066c 8405 | | Call 0x2,0x5
066d e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x31 = 0x66d,0x2b
066e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
066f e7ff | | Load 0x3,-0x1
0670 e004 | | Load 0x0,0x4
0671 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0672 c603 | | Store 0x3,0x3
0673 e603 | | Load 0x3,0x3 ; Debug Table 0x9.0x32 = 0x673,0x2c
0674 0f00 | | Execute_Immediate Equal,0x0
0675 8405 | | Call 0x2,0x5
0676 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0677 TRAP_0588:
0677 64b0 |d | Indirect_Literal Discrete,0x328,{0x00000000, 0x4f2f0501}
0678 010f | | Execute Exception,Equal
0679 6804 |h | Jump_Zero 0x67e
067a 0092 0df8 | | Action Push_String_Extended,0xdf8 ; "Tape positioning failure"
; Debug Table 0x9.0x33 = 0x67a,0x2d
067c 8406 | | Call 0x2,0x6
067d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
067e 0100 | | Execute Exception,Raise
067f 0000 | | .XXX[0x1]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 069f | | .CONST 0x069f ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0008 | | .CONST 0x0008 ; Number of locals
0683 INIT_0680:
0683 e002 | | Load 0x0,0x2 ; Debug Table 0xa = .DEBUG 0x0683,0x1420,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0ad2
; Debug Table 0xa.0x0 = 0x683,0xffff
0684 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0685 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x1 = 0x685,0xfffe
0686 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0687 0322 | " | Declare_Variable Record
0688 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x2 = 0x688,0xfffd
0689 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
068a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x3 = 0x68a,0xfffc
068b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
068c e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x4 = 0x68c,0xfffb
068d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
068e e002 | | Load 0x0,0x2
068f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0690 03f1 | | Declare_Variable Discrete,With_Value
0691 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x5 = 0x691,0xfffa
0692 00d9 | | Load_Top At_Offset_1
0693 0aff | | Execute_Immediate Plus,-0x1
0694 0248 | H | Execute Discrete,Check_In_Integer
0695 e002 | | Load 0x0,0x2
0696 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0697 03f8 | | Declare_Type Discrete,Constrained
0698 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x6 = 0x698,0xfff9
0699 00d9 | | Load_Top At_Offset_1
069a 0269 | i | Execute Discrete,Last
069b e006 | | Load 0x0,0x6
069c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
069d 035b | [ | Declare_Type Array,Constrained
069e 0337 | 7 | Declare_Variable Array
069f BODY_0680:
069f 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x7 = 0x69f,0x1
06a0 e7ff | | Load 0x3,-0x1
06a1 8408 | | Call 0x2,0x8
06a2 00cf | | Action Mark_Auxiliary
06a3 00cf | | Action Mark_Auxiliary ; Debug Table 0xa.0x8 = 0x6a3,0x2
06a4 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x9 = 0x6a4,0x3
06a5 0269 | i | Execute Discrete,Last
06a6 4800 |H | Short_Literal 0x0
06a7 0263 | c | Execute Discrete,Above_Bound
06a8 700e |p | Jump_Nonzero 0x6b7
06a9 e604 | | Load 0x3,0x4 ; Debug Table 0xa.0xa = 0x6a9,0x4
06aa 00d9 | | Load_Top At_Offset_1
06ab 0273 | s | Execute Discrete,Plus
06ac 0248 | H | Execute Discrete,Check_In_Integer
06ad 48ff |H | Short_Literal 0xff
06ae 0279 | y | Execute Discrete,And
06af e006 | | Load 0x0,0x6
06b0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
06b1 025b | [ | Execute Discrete,Check_In_Type
06b2 00d9 | | Load_Top At_Offset_1
06b3 e608 | | Load 0x3,0x8
06b4 01d6 | | Execute Vector,Field_Write
06b5 00c8 | | Action Pop_Auxiliary_Range
06b6 3ff2 |? | Loop_Increasing 0x6a9
06b7 00ce | | Action Pop_Auxiliary
06b8 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0xb = 0x6b8,0x5
06b9 00da | | Load_Top At_Offset_2
06ba e7ff | | Load 0x3,-0x1
06bb e004 | | Load 0x0,0x4
06bc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06bd 00d1 | | Pop_Control Pop_Count_1
06be e603 | | Load 0x3,0x3 ; Debug Table 0xa.0xc = 0x6be,0x6
06bf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06c0 0f00 | | Execute_Immediate Equal,0x0
06c1 8405 | | Call 0x2,0x5
06c2 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0xd = 0x6c2,0x7
06c3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06c4 e606 | | Load 0x3,0x6
06c5 027f | | Execute Discrete,Equal
06c6 8405 | | Call 0x2,0x5
06c7 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0xe = 0x6c7,0x8
06c8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
06c9 0f00 | | Execute_Immediate Equal,0x0
06ca 8405 | | Call 0x2,0x5
06cb e603 | | Load 0x3,0x3 ; Debug Table 0xa.0xf = 0x6cb,0x9
06cc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06cd 700b |p | Jump_Nonzero 0x6d9
06ce e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x10 = 0x6ce,0xa
06cf 6804 |h | Jump_Zero 0x6d4
06d0 e604 | | Load 0x3,0x4
06d1 e404 | | Load 0x2,0x4
06d2 027f | | Execute Discrete,Equal
06d3 7005 |p | Jump_Nonzero 0x6d9
06d4 e604 | | Load 0x3,0x4 ; Debug Table 0xa.0x11 = 0x6d4,0xb
06d5 0a01 | | Execute_Immediate Plus,0x1
06d6 c604 | | Store 0x3,0x4
06d7 00c9 | | Action Pop_Auxiliary_Loop
06d8 7fca | | Jump 0x6a3
06d9 00ce | | Action Pop_Auxiliary
06da e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x12 = 0x6da,0xc
06db e7ff | | Load 0x3,-0x1
06dc e004 | | Load 0x0,0x4
06dd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
06de 00d1 | | Pop_Control Pop_Count_1
06df e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x13 = 0x6df,0xd
06e0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06e1 0f00 | | Execute_Immediate Equal,0x0
06e2 8405 | | Call 0x2,0x5
06e3 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x14 = 0x6e3,0xe
06e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06e5 0f00 | | Execute_Immediate Equal,0x0
06e6 8405 | | Call 0x2,0x5
06e7 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x15 = 0x6e7,0xf
06e8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
06e9 0f00 | | Execute_Immediate Equal,0x0
06ea 8405 | | Call 0x2,0x5
06eb e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x16 = 0x6eb,0x10
06ec 7003 |p | Jump_Nonzero 0x6f0
06ed e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x17 = 0x6ed,0x11
06ee 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06ef 8405 | | Call 0x2,0x5
06f0 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x18 = 0x6f0,0x12
06f1 4800 |H | Short_Literal 0x0
06f2 e7ff | | Load 0x3,-0x1
06f3 e004 | | Load 0x0,0x4
06f4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06f5 00d1 | | Pop_Control Pop_Count_1
06f6 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x19 = 0x6f6,0x13
06f7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06f8 0f00 | | Execute_Immediate Equal,0x0
06f9 8405 | | Call 0x2,0x5
06fa e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x1a = 0x6fa,0x14
06fb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06fc 0f00 | | Execute_Immediate Equal,0x0
06fd 8405 | | Call 0x2,0x5
06fe e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x1b = 0x6fe,0x15
06ff 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0700 0f00 | | Execute_Immediate Equal,0x0
0701 8405 | | Call 0x2,0x5
0702 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x1c = 0x702,0x16
0703 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0704 0f00 | | Execute_Immediate Equal,0x0
0705 8405 | | Call 0x2,0x5
0706 00cf | | Action Mark_Auxiliary
0707 0007 | | Action Break_Optional ; Debug Table 0xa.0x1d = 0x707,0x17
0708 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x1e = 0x708,0x18
0709 e603 | | Load 0x3,0x3
070a e7ff | | Load 0x3,-0x1
070b e004 | | Load 0x0,0x4
070c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
070d 00d2 | | Pop_Control Pop_Count_2
070e e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x1f = 0x70e,0x19
070f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0710 0f00 | | Execute_Immediate Equal,0x0
0711 8405 | | Call 0x2,0x5
0712 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x20 = 0x712,0x1a
0713 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0714 0b00 | | Execute_Immediate Case_Compare,0x0
0715 7005 |p | Jump_Nonzero 0x71b
0716 0b05 | | Execute_Immediate Case_Compare,0x5
0717 7029 |p) | Jump_Nonzero 0x741
0718 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x21 = 0x718,0x24
0719 8405 | | Call 0x2,0x5
071a 7831 |x1 | Jump 0x74c
071b e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x22 = 0x71b,0x1b
071c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
071d e606 | | Load 0x3,0x6
071e 027e | ~ | Execute Discrete,Not_Equal
071f 6803 |h | Jump_Zero 0x723
0720 0092 0df6 | | Action Push_String_Extended,0xdf6 ; "Block length read /= block length written"
; Debug Table 0xa.0x23 = 0x720,0x1c
0722 8406 | | Call 0x2,0x6
0723 00cf | | Action Mark_Auxiliary
0724 e607 | | Load 0x3,0x7 ; Debug Table 0xa.0x24 = 0x724,0x1d
0725 0269 | i | Execute Discrete,Last
0726 4800 |H | Short_Literal 0x0
0727 0263 | c | Execute Discrete,Above_Bound
0728 7013 |p | Jump_Nonzero 0x73c
0729 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x25 = 0x729,0x1e
072a e608 | | Load 0x3,0x8
072b 01d7 | | Execute Vector,Field_Read
072c e605 | | Load 0x3,0x5
072d 00da | | Load_Top At_Offset_2
072e 0273 | s | Execute Discrete,Plus
072f 0248 | H | Execute Discrete,Check_In_Integer
0730 48ff |H | Short_Literal 0xff
0731 0279 | y | Execute Discrete,And
0732 e006 | | Load 0x0,0x6
0733 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0734 025b | [ | Execute Discrete,Check_In_Type
0735 027e | ~ | Execute Discrete,Not_Equal
0736 6803 |h | Jump_Zero 0x73a
0737 0092 0df7 | | Action Push_String_Extended,0xdf7 ; "Data read /= data written"
; Debug Table 0xa.0x26 = 0x737,0x1f
0739 8406 | | Call 0x2,0x6
073a 00c8 | | Action Pop_Auxiliary_Range
073b 3fed |? | Loop_Increasing 0x729
073c 00ce | | Action Pop_Auxiliary
073d e605 | | Load 0x3,0x5 ; Debug Table 0xa.0x27 = 0x73d,0x20
073e 0a01 | | Execute_Immediate Plus,0x1
073f c605 | | Store 0x3,0x5
0740 780b |x | Jump 0x74c
0741 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x28 = 0x741,0x21
0742 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0743 0f00 | | Execute_Immediate Equal,0x0
0744 8405 | | Call 0x2,0x5
0745 e605 | | Load 0x3,0x5 ; Debug Table 0xa.0x29 = 0x745,0x22
0746 e604 | | Load 0x3,0x4
0747 0a01 | | Execute_Immediate Plus,0x1
0748 027f | | Execute Discrete,Equal
0749 8405 | | Call 0x2,0x5
074a 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xa.0x2a = 0x74a,0x23
074b 7803 |x | Jump 0x74f
074c 00d1 | | Pop_Control Pop_Count_1
074d 00c9 | | Action Pop_Auxiliary_Loop
074e 7fb9 | | Jump 0x708
074f 00ce | | Action Pop_Auxiliary
0750 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x2b = 0x750,0x25
0751 4800 |H | Short_Literal 0x0
0752 e7ff | | Load 0x3,-0x1
0753 e004 | | Load 0x0,0x4
0754 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0755 00d1 | | Pop_Control Pop_Count_1
0756 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x2c = 0x756,0x26
0757 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0758 0f00 | | Execute_Immediate Equal,0x0
0759 8405 | | Call 0x2,0x5
075a e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x2d = 0x75a,0x27
075b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
075c 0f00 | | Execute_Immediate Equal,0x0
075d 8405 | | Call 0x2,0x5
075e e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x2e = 0x75e,0x28
075f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0760 0f00 | | Execute_Immediate Equal,0x0
0761 8405 | | Call 0x2,0x5
0762 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x2f = 0x762,0x29
0763 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0764 0f00 | | Execute_Immediate Equal,0x0
0765 8405 | | Call 0x2,0x5
0766 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x30 = 0x766,0x2a
0767 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0768 e7ff | | Load 0x3,-0x1
0769 e004 | | Load 0x0,0x4
076a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
076b c602 | | Store 0x3,0x2
076c e602 | | Load 0x3,0x2 ; Debug Table 0xa.0x31 = 0x76c,0x2b
076d 0f00 | | Execute_Immediate Equal,0x0
076e 8405 | | Call 0x2,0x5
076f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 078f | | .CONST 0x078f ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0008 | | .CONST 0x0008 ; Number of locals
0773 INIT_0770:
0773 e002 | | Load 0x0,0x2 ; Debug Table 0xb = .DEBUG 0x0773,0x1486,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0c88
; Debug Table 0xb.0x0 = 0x773,0xffff
0774 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0775 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x775,0xfffe
0776 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0777 0322 | " | Declare_Variable Record
0778 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x2 = 0x778,0xfffd
0779 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
077a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x3 = 0x77a,0xfffc
077b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
077c e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x4 = 0x77c,0xfffb
077d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
077e e002 | | Load 0x0,0x2
077f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0780 03f1 | | Declare_Variable Discrete,With_Value
0781 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x5 = 0x781,0xfffa
0782 00d9 | | Load_Top At_Offset_1
0783 0aff | | Execute_Immediate Plus,-0x1
0784 0248 | H | Execute Discrete,Check_In_Integer
0785 e002 | | Load 0x0,0x2
0786 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0787 03f8 | | Declare_Type Discrete,Constrained
0788 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x6 = 0x788,0xfff9
0789 00d9 | | Load_Top At_Offset_1
078a 0269 | i | Execute Discrete,Last
078b e006 | | Load 0x0,0x6
078c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
078d 035b | [ | Declare_Type Array,Constrained
078e 0337 | 7 | Declare_Variable Array
078f BODY_0770:
078f 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x7 = 0x78f,0x1
0790 e7ff | | Load 0x3,-0x1
0791 8408 | | Call 0x2,0x8
0792 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x8 = 0x792,0x2
0793 4806 |H | Short_Literal 0x6
0794 00da | | Load_Top At_Offset_2
0795 01db | | Execute Vector,Length
0796 e002 | | Load 0x0,0x2
0797 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0798 025b | [ | Execute Discrete,Check_In_Type
0799 e7ff | | Load 0x3,-0x1
079a e004 | | Load 0x0,0x4
079b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
079c 00d1 | | Pop_Control Pop_Count_1
079d e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x9 = 0x79d,0x3
079e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
079f 0f02 | | Execute_Immediate Equal,0x2
07a0 8405 | | Call 0x2,0x5
07a1 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0xa = 0x7a1,0x4
07a2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
07a3 0f00 | | Execute_Immediate Equal,0x0
07a4 8405 | | Call 0x2,0x5
07a5 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0xb = 0x7a5,0x5
07a6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07a7 0f00 | | Execute_Immediate Equal,0x0
07a8 8405 | | Call 0x2,0x5
07a9 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0xc = 0x7a9,0x6
07aa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
07ab 0f00 | | Execute_Immediate Equal,0x0
07ac 8405 | | Call 0x2,0x5
07ad 00cf | | Action Mark_Auxiliary
07ae 00cf | | Action Mark_Auxiliary ; Debug Table 0xb.0xd = 0x7ae,0x7
07af 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0xe = 0x7af,0x8
07b0 0269 | i | Execute Discrete,Last
07b1 4800 |H | Short_Literal 0x0
07b2 0263 | c | Execute Discrete,Above_Bound
07b3 700e |p | Jump_Nonzero 0x7c2
07b4 e604 | | Load 0x3,0x4 ; Debug Table 0xb.0xf = 0x7b4,0x9
07b5 00d9 | | Load_Top At_Offset_1
07b6 0273 | s | Execute Discrete,Plus
07b7 0248 | H | Execute Discrete,Check_In_Integer
07b8 48ff |H | Short_Literal 0xff
07b9 0279 | y | Execute Discrete,And
07ba e006 | | Load 0x0,0x6
07bb 1b11 | | Execute Package,Field_Read,Field_Number 0x11
07bc 025b | [ | Execute Discrete,Check_In_Type
07bd 00d9 | | Load_Top At_Offset_1
07be e608 | | Load 0x3,0x8
07bf 01d6 | | Execute Vector,Field_Write
07c0 00c8 | | Action Pop_Auxiliary_Range
07c1 3ff2 |? | Loop_Increasing 0x7b4
07c2 00ce | | Action Pop_Auxiliary
07c3 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x10 = 0x7c3,0xa
07c4 00da | | Load_Top At_Offset_2
07c5 e7ff | | Load 0x3,-0x1
07c6 e004 | | Load 0x0,0x4
07c7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07c8 00d1 | | Pop_Control Pop_Count_1
07c9 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x11 = 0x7c9,0xb
07ca 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07cb 0f02 | | Execute_Immediate Equal,0x2
07cc 8405 | | Call 0x2,0x5
07cd e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x12 = 0x7cd,0xc
07ce 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07cf e606 | | Load 0x3,0x6
07d0 027f | | Execute Discrete,Equal
07d1 8405 | | Call 0x2,0x5
07d2 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x13 = 0x7d2,0xd
07d3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
07d4 0f00 | | Execute_Immediate Equal,0x0
07d5 8405 | | Call 0x2,0x5
07d6 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x14 = 0x7d6,0xe
07d7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
07d8 700b |p | Jump_Nonzero 0x7e4
07d9 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x15 = 0x7d9,0xf
07da 6804 |h | Jump_Zero 0x7df
07db e604 | | Load 0x3,0x4
07dc e404 | | Load 0x2,0x4
07dd 027f | | Execute Discrete,Equal
07de 7005 |p | Jump_Nonzero 0x7e4
07df e604 | | Load 0x3,0x4 ; Debug Table 0xb.0x16 = 0x7df,0x10
07e0 0a01 | | Execute_Immediate Plus,0x1
07e1 c604 | | Store 0x3,0x4
07e2 00c9 | | Action Pop_Auxiliary_Loop
07e3 7fca | | Jump 0x7ae
07e4 00ce | | Action Pop_Auxiliary
07e5 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x17 = 0x7e5,0x11
07e6 e7ff | | Load 0x3,-0x1
07e7 e004 | | Load 0x0,0x4
07e8 1820 | | Execute Package,Field_Execute,Field_Number 0x20
07e9 00d1 | | Pop_Control Pop_Count_1
07ea e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x18 = 0x7ea,0x12
07eb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07ec 0f00 | | Execute_Immediate Equal,0x0
07ed 8405 | | Call 0x2,0x5
07ee e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x19 = 0x7ee,0x13
07ef 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
07f0 0f00 | | Execute_Immediate Equal,0x0
07f1 8405 | | Call 0x2,0x5
07f2 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x1a = 0x7f2,0x14
07f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07f4 0f00 | | Execute_Immediate Equal,0x0
07f5 8405 | | Call 0x2,0x5
07f6 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x1b = 0x7f6,0x15
07f7 7003 |p | Jump_Nonzero 0x7fb
07f8 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x1c = 0x7f8,0x16
07f9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
07fa 8405 | | Call 0x2,0x5
07fb e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x1d = 0x7fb,0x17
07fc e7ff | | Load 0x3,-0x1
07fd e004 | | Load 0x0,0x4
07fe 181b | | Execute Package,Field_Execute,Field_Number 0x1b
07ff 00d1 | | Pop_Control Pop_Count_1
0800 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x1e = 0x800,0x18
0801 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0802 0f00 | | Execute_Immediate Equal,0x0
0803 8405 | | Call 0x2,0x5
0804 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x1f = 0x804,0x19
0805 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0806 0f00 | | Execute_Immediate Equal,0x0
0807 8405 | | Call 0x2,0x5
0808 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x20 = 0x808,0x1a
0809 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
080a 0f00 | | Execute_Immediate Equal,0x0
080b 8405 | | Call 0x2,0x5
080c e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x21 = 0x80c,0x1b
080d 7003 |p | Jump_Nonzero 0x811
080e e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x22 = 0x80e,0x1c
080f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0810 8405 | | Call 0x2,0x5
0811 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x23 = 0x811,0x1d
0812 4800 |H | Short_Literal 0x0
0813 e7ff | | Load 0x3,-0x1
0814 e004 | | Load 0x0,0x4
0815 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0816 00d1 | | Pop_Control Pop_Count_1
0817 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x24 = 0x817,0x1e
0818 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0819 0f00 | | Execute_Immediate Equal,0x0
081a 8405 | | Call 0x2,0x5
081b e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x25 = 0x81b,0x1f
081c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
081d 0f00 | | Execute_Immediate Equal,0x0
081e 8405 | | Call 0x2,0x5
081f e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x26 = 0x81f,0x20
0820 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0821 0f00 | | Execute_Immediate Equal,0x0
0822 8405 | | Call 0x2,0x5
0823 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x27 = 0x823,0x21
0824 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0825 0f00 | | Execute_Immediate Equal,0x0
0826 8405 | | Call 0x2,0x5
0827 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x28 = 0x827,0x22
0828 4806 |H | Short_Literal 0x6
0829 00da | | Load_Top At_Offset_2
082a 01db | | Execute Vector,Length
082b e002 | | Load 0x0,0x2
082c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
082d 025b | [ | Execute Discrete,Check_In_Type
082e e7ff | | Load 0x3,-0x1
082f e004 | | Load 0x0,0x4
0830 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0831 00d1 | | Pop_Control Pop_Count_1
0832 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x29 = 0x832,0x23
0833 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0834 0f01 | | Execute_Immediate Equal,0x1
0835 8405 | | Call 0x2,0x5
0836 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x2a = 0x836,0x24
0837 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0838 0f00 | | Execute_Immediate Equal,0x0
0839 8405 | | Call 0x2,0x5
083a e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x2b = 0x83a,0x25
083b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
083c 0f00 | | Execute_Immediate Equal,0x0
083d 8405 | | Call 0x2,0x5
083e e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x2c = 0x83e,0x26
083f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0840 0f00 | | Execute_Immediate Equal,0x0
0841 8405 | | Call 0x2,0x5
0842 00cf | | Action Mark_Auxiliary
0843 0007 | | Action Break_Optional ; Debug Table 0xb.0x2d = 0x843,0x27
0844 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x2e = 0x844,0x28
0845 e603 | | Load 0x3,0x3
0846 e7ff | | Load 0x3,-0x1
0847 e004 | | Load 0x0,0x4
0848 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0849 00d2 | | Pop_Control Pop_Count_2
084a e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x2f = 0x84a,0x29
084b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
084c 0f01 | | Execute_Immediate Equal,0x1
084d 8405 | | Call 0x2,0x5
084e e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x30 = 0x84e,0x2a
084f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0850 0b00 | | Execute_Immediate Case_Compare,0x0
0851 7005 |p | Jump_Nonzero 0x857
0852 0b05 | | Execute_Immediate Case_Compare,0x5
0853 7029 |p) | Jump_Nonzero 0x87d
0854 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x31 = 0x854,0x34
0855 8405 | | Call 0x2,0x5
0856 7831 |x1 | Jump 0x888
0857 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x32 = 0x857,0x2b
0858 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0859 e606 | | Load 0x3,0x6
085a 027e | ~ | Execute Discrete,Not_Equal
085b 6803 |h | Jump_Zero 0x85f
085c 0092 0df6 | | Action Push_String_Extended,0xdf6 ; "Block length read /= block length written"
; Debug Table 0xb.0x33 = 0x85c,0x2c
085e 8406 | | Call 0x2,0x6
085f 00cf | | Action Mark_Auxiliary
0860 e607 | | Load 0x3,0x7 ; Debug Table 0xb.0x34 = 0x860,0x2d
0861 0269 | i | Execute Discrete,Last
0862 4800 |H | Short_Literal 0x0
0863 0263 | c | Execute Discrete,Above_Bound
0864 7013 |p | Jump_Nonzero 0x878
0865 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x35 = 0x865,0x2e
0866 e608 | | Load 0x3,0x8
0867 01d7 | | Execute Vector,Field_Read
0868 e605 | | Load 0x3,0x5
0869 00da | | Load_Top At_Offset_2
086a 0273 | s | Execute Discrete,Plus
086b 0248 | H | Execute Discrete,Check_In_Integer
086c 48ff |H | Short_Literal 0xff
086d 0279 | y | Execute Discrete,And
086e e006 | | Load 0x0,0x6
086f 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0870 025b | [ | Execute Discrete,Check_In_Type
0871 027e | ~ | Execute Discrete,Not_Equal
0872 6803 |h | Jump_Zero 0x876
0873 0092 0df7 | | Action Push_String_Extended,0xdf7 ; "Data read /= data written"
; Debug Table 0xb.0x36 = 0x873,0x2f
0875 8406 | | Call 0x2,0x6
0876 00c8 | | Action Pop_Auxiliary_Range
0877 3fed |? | Loop_Increasing 0x865
0878 00ce | | Action Pop_Auxiliary
0879 e605 | | Load 0x3,0x5 ; Debug Table 0xb.0x37 = 0x879,0x30
087a 0a01 | | Execute_Immediate Plus,0x1
087b c605 | | Store 0x3,0x5
087c 780b |x | Jump 0x888
087d e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x38 = 0x87d,0x31
087e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
087f 0f00 | | Execute_Immediate Equal,0x0
0880 8405 | | Call 0x2,0x5
0881 e605 | | Load 0x3,0x5 ; Debug Table 0xb.0x39 = 0x881,0x32
0882 e604 | | Load 0x3,0x4
0883 0a01 | | Execute_Immediate Plus,0x1
0884 027f | | Execute Discrete,Equal
0885 8405 | | Call 0x2,0x5
0886 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xb.0x3a = 0x886,0x33
0887 7803 |x | Jump 0x88b
0888 00d1 | | Pop_Control Pop_Count_1
0889 00c9 | | Action Pop_Auxiliary_Loop
088a 7fb9 | | Jump 0x844
088b 00ce | | Action Pop_Auxiliary
088c e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x3b = 0x88c,0x35
088d e7ff | | Load 0x3,-0x1
088e e004 | | Load 0x0,0x4
088f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0890 00d1 | | Pop_Control Pop_Count_1
0891 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x3c = 0x891,0x36
0892 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0893 0f00 | | Execute_Immediate Equal,0x0
0894 8405 | | Call 0x2,0x5
0895 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x3d = 0x895,0x37
0896 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0897 0f00 | | Execute_Immediate Equal,0x0
0898 8405 | | Call 0x2,0x5
0899 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x3e = 0x899,0x38
089a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
089b 0f00 | | Execute_Immediate Equal,0x0
089c 8405 | | Call 0x2,0x5
089d e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x3f = 0x89d,0x39
089e 7003 |p | Jump_Nonzero 0x8a2
089f e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x40 = 0x89f,0x3a
08a0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
08a1 8405 | | Call 0x2,0x5
08a2 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x41 = 0x8a2,0x3b
08a3 4800 |H | Short_Literal 0x0
08a4 e7ff | | Load 0x3,-0x1
08a5 e004 | | Load 0x0,0x4
08a6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08a7 00d1 | | Pop_Control Pop_Count_1
08a8 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x42 = 0x8a8,0x3c
08a9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08aa 0f00 | | Execute_Immediate Equal,0x0
08ab 8405 | | Call 0x2,0x5
08ac e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x43 = 0x8ac,0x3d
08ad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08ae 0f00 | | Execute_Immediate Equal,0x0
08af 8405 | | Call 0x2,0x5
08b0 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x44 = 0x8b0,0x3e
08b1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
08b2 0f00 | | Execute_Immediate Equal,0x0
08b3 8405 | | Call 0x2,0x5
08b4 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x45 = 0x8b4,0x3f
08b5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
08b6 0f00 | | Execute_Immediate Equal,0x0
08b7 8405 | | Call 0x2,0x5
08b8 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x46 = 0x8b8,0x40
08b9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
08ba e7ff | | Load 0x3,-0x1
08bb e004 | | Load 0x0,0x4
08bc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08bd c602 | | Store 0x3,0x2
08be e602 | | Load 0x3,0x2 ; Debug Table 0xb.0x47 = 0x8be,0x41
08bf 0f00 | | Execute_Immediate Equal,0x0
08c0 8405 | | Call 0x2,0x5
08c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
08c2 0000 0000 | | .BLANK 0000[0x6]
08c8 ; --------------------------------------------------------------------------------------
08c8 ; SUBPROGRAM
08c8 ; --------------------------------------------------------------------------------------
08c8 08e7 | | .CONST 0x08e7 ; Address of begin
08c9 0a0f | | .CONST 0x0a0f ; Address of exception handler
08ca 0008 | | .CONST 0x0008 ; Number of locals
08cb INIT_08c8:
08cb e002 | | Load 0x0,0x2 ; Debug Table 0xc = .DEBUG 0x08cb,0x1518,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0efe
; Debug Table 0xc.0x0 = 0x8cb,0xffff
08cc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
08cd e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x1 = 0x8cd,0xfffe
08ce 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08cf 0322 | " | Declare_Variable Record
08d0 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x2 = 0x8d0,0xfffd
08d1 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
08d2 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x3 = 0x8d2,0xfffc
08d3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
08d4 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x4 = 0x8d4,0xfffb
08d5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
08d6 e002 | | Load 0x0,0x2
08d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08d8 03f1 | | Declare_Variable Discrete,With_Value
08d9 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x5 = 0x8d9,0xfffa
08da 00d9 | | Load_Top At_Offset_1
08db 0aff | | Execute_Immediate Plus,-0x1
08dc 0248 | H | Execute Discrete,Check_In_Integer
08dd e002 | | Load 0x0,0x2
08de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08df 03f8 | | Declare_Type Discrete,Constrained
08e0 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x6 = 0x8e0,0xfff9
08e1 00d9 | | Load_Top At_Offset_1
08e2 0269 | i | Execute Discrete,Last
08e3 e006 | | Load 0x0,0x6
08e4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
08e5 035b | [ | Declare_Type Array,Constrained
08e6 0337 | 7 | Declare_Variable Array
08e7 BODY_08c8:
08e7 00cf | | Action Mark_Auxiliary
08e8 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x7 = 0x8e8,0x1
08e9 0269 | i | Execute Discrete,Last
08ea 4800 |H | Short_Literal 0x0
08eb 0263 | c | Execute Discrete,Above_Bound
08ec 700b |p | Jump_Nonzero 0x8f8
08ed 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x8 = 0x8ed,0x2
08ee 48ff |H | Short_Literal 0xff
08ef 0279 | y | Execute Discrete,And
08f0 e006 | | Load 0x0,0x6
08f1 1b11 | | Execute Package,Field_Read,Field_Number 0x11
08f2 025b | [ | Execute Discrete,Check_In_Type
08f3 00d9 | | Load_Top At_Offset_1
08f4 e608 | | Load 0x3,0x8
08f5 01d6 | | Execute Vector,Field_Write
08f6 00c8 | | Action Pop_Auxiliary_Range
08f7 3ff5 |? | Loop_Increasing 0x8ed
08f8 00ce | | Action Pop_Auxiliary
08f9 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x9 = 0x8f9,0x3
08fa e7ff | | Load 0x3,-0x1
08fb 8408 | | Call 0x2,0x8
08fc e603 | | Load 0x3,0x3 ; Debug Table 0xc.0xa = 0x8fc,0x4
08fd 4806 |H | Short_Literal 0x6
08fe 00da | | Load_Top At_Offset_2
08ff 01db | | Execute Vector,Length
0900 e002 | | Load 0x0,0x2
0901 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0902 025b | [ | Execute Discrete,Check_In_Type
0903 e7ff | | Load 0x3,-0x1
0904 e004 | | Load 0x0,0x4
0905 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0906 00d1 | | Pop_Control Pop_Count_1
0907 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0xb = 0x907,0x5
0908 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0909 0f02 | | Execute_Immediate Equal,0x2
090a 8405 | | Call 0x2,0x5
090b e603 | | Load 0x3,0x3 ; Debug Table 0xc.0xc = 0x90b,0x6
090c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
090d 0f00 | | Execute_Immediate Equal,0x0
090e 8405 | | Call 0x2,0x5
090f e603 | | Load 0x3,0x3 ; Debug Table 0xc.0xd = 0x90f,0x7
0910 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0911 0f00 | | Execute_Immediate Equal,0x0
0912 8405 | | Call 0x2,0x5
0913 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0xe = 0x913,0x8
0914 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0915 0f00 | | Execute_Immediate Equal,0x0
0916 8405 | | Call 0x2,0x5
0917 00cf | | Action Mark_Auxiliary
0918 0007 | | Action Break_Optional ; Debug Table 0xc.0xf = 0x918,0x9
0919 e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x10 = 0x919,0xa
091a 48ff |H | Short_Literal 0xff
091b 0279 | y | Execute Discrete,And
091c e006 | | Load 0x0,0x6
091d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
091e 025b | [ | Execute Discrete,Check_In_Type
091f 4800 |H | Short_Literal 0x0
0920 00db | | Load_Top At_Offset_3
0921 01d6 | | Execute Vector,Field_Write
0922 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x11 = 0x922,0xb
0923 00da | | Load_Top At_Offset_2
0924 e7ff | | Load 0x3,-0x1
0925 e004 | | Load 0x0,0x4
0926 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0927 00d1 | | Pop_Control Pop_Count_1
0928 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x12 = 0x928,0xc
0929 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
092a 0f02 | | Execute_Immediate Equal,0x2
092b 8405 | | Call 0x2,0x5
092c e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x13 = 0x92c,0xd
092d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
092e e606 | | Load 0x3,0x6
092f 027f | | Execute Discrete,Equal
0930 8405 | | Call 0x2,0x5
0931 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x14 = 0x931,0xe
0932 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0933 0f00 | | Execute_Immediate Equal,0x0
0934 8405 | | Call 0x2,0x5
0935 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x15 = 0x935,0xf
0936 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0937 700b |p | Jump_Nonzero 0x943
0938 e403 | | Load 0x2,0x3 ; Debug Table 0xc.0x16 = 0x938,0x10
0939 6804 |h | Jump_Zero 0x93e
093a e604 | | Load 0x3,0x4
093b e404 | | Load 0x2,0x4
093c 027f | | Execute Discrete,Equal
093d 7005 |p | Jump_Nonzero 0x943
093e e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x17 = 0x93e,0x11
093f 0a01 | | Execute_Immediate Plus,0x1
0940 c604 | | Store 0x3,0x4
0941 00c9 | | Action Pop_Auxiliary_Loop
0942 7fd6 | | Jump 0x919
0943 00ce | | Action Pop_Auxiliary
0944 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x18 = 0x944,0x12
0945 e7ff | | Load 0x3,-0x1
0946 e004 | | Load 0x0,0x4
0947 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0948 00d1 | | Pop_Control Pop_Count_1
0949 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x19 = 0x949,0x13
094a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
094b 0f00 | | Execute_Immediate Equal,0x0
094c 8405 | | Call 0x2,0x5
094d e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x1a = 0x94d,0x14
094e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
094f 0f00 | | Execute_Immediate Equal,0x0
0950 8405 | | Call 0x2,0x5
0951 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x1b = 0x951,0x15
0952 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0953 0f00 | | Execute_Immediate Equal,0x0
0954 8405 | | Call 0x2,0x5
0955 e403 | | Load 0x2,0x3 ; Debug Table 0xc.0x1c = 0x955,0x16
0956 7003 |p | Jump_Nonzero 0x95a
0957 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x1d = 0x957,0x17
0958 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0959 8405 | | Call 0x2,0x5
095a e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x1e = 0x95a,0x18
095b e7ff | | Load 0x3,-0x1
095c e004 | | Load 0x0,0x4
095d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
095e 00d1 | | Pop_Control Pop_Count_1
095f e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x1f = 0x95f,0x19
0960 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0961 0f00 | | Execute_Immediate Equal,0x0
0962 8405 | | Call 0x2,0x5
0963 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x20 = 0x963,0x1a
0964 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0965 0f00 | | Execute_Immediate Equal,0x0
0966 8405 | | Call 0x2,0x5
0967 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x21 = 0x967,0x1b
0968 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0969 0f00 | | Execute_Immediate Equal,0x0
096a 8405 | | Call 0x2,0x5
096b e403 | | Load 0x2,0x3 ; Debug Table 0xc.0x22 = 0x96b,0x1c
096c 7003 |p | Jump_Nonzero 0x970
096d e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x23 = 0x96d,0x1d
096e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
096f 8405 | | Call 0x2,0x5
0970 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x24 = 0x970,0x1e
0971 4800 |H | Short_Literal 0x0
0972 e7ff | | Load 0x3,-0x1
0973 e004 | | Load 0x0,0x4
0974 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0975 00d1 | | Pop_Control Pop_Count_1
0976 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x25 = 0x976,0x1f
0977 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0978 0f00 | | Execute_Immediate Equal,0x0
0979 8405 | | Call 0x2,0x5
097a e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x26 = 0x97a,0x20
097b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
097c 0f00 | | Execute_Immediate Equal,0x0
097d 8405 | | Call 0x2,0x5
097e e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x27 = 0x97e,0x21
097f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0980 0f00 | | Execute_Immediate Equal,0x0
0981 8405 | | Call 0x2,0x5
0982 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x28 = 0x982,0x22
0983 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0984 0f00 | | Execute_Immediate Equal,0x0
0985 8405 | | Call 0x2,0x5
0986 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x29 = 0x986,0x23
0987 4806 |H | Short_Literal 0x6
0988 00da | | Load_Top At_Offset_2
0989 01db | | Execute Vector,Length
098a e002 | | Load 0x0,0x2
098b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
098c 025b | [ | Execute Discrete,Check_In_Type
098d e7ff | | Load 0x3,-0x1
098e e004 | | Load 0x0,0x4
098f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0990 00d1 | | Pop_Control Pop_Count_1
0991 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x2a = 0x991,0x24
0992 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0993 0f01 | | Execute_Immediate Equal,0x1
0994 8405 | | Call 0x2,0x5
0995 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x2b = 0x995,0x25
0996 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0997 0f00 | | Execute_Immediate Equal,0x0
0998 8405 | | Call 0x2,0x5
0999 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x2c = 0x999,0x26
099a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
099b 0f00 | | Execute_Immediate Equal,0x0
099c 8405 | | Call 0x2,0x5
099d e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x2d = 0x99d,0x27
099e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
099f 0f00 | | Execute_Immediate Equal,0x0
09a0 8405 | | Call 0x2,0x5
09a1 00cf | | Action Mark_Auxiliary
09a2 0007 | | Action Break_Optional ; Debug Table 0xc.0x2e = 0x9a2,0x28
09a3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x2f = 0x9a3,0x29
09a4 e603 | | Load 0x3,0x3
09a5 e7ff | | Load 0x3,-0x1
09a6 e004 | | Load 0x0,0x4
09a7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09a8 00d2 | | Pop_Control Pop_Count_2
09a9 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x30 = 0x9a9,0x2a
09aa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09ab 0f01 | | Execute_Immediate Equal,0x1
09ac 8405 | | Call 0x2,0x5
09ad e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x31 = 0x9ad,0x2b
09ae 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09af 0b00 | | Execute_Immediate Case_Compare,0x0
09b0 7005 |p | Jump_Nonzero 0x9b6
09b1 0b05 | | Execute_Immediate Case_Compare,0x5
09b2 7017 |p | Jump_Nonzero 0x9ca
09b3 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x32 = 0x9b3,0x32
09b4 8405 | | Call 0x2,0x5
09b5 781f |x | Jump 0x9d5
09b6 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x33 = 0x9b6,0x2c
09b7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09b8 e606 | | Load 0x3,0x6
09b9 027f | | Execute Discrete,Equal
09ba 8405 | | Call 0x2,0x5
09bb 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x34 = 0x9bb,0x2d
09bc 00db | | Load_Top At_Offset_3
09bd 01d7 | | Execute Vector,Field_Read
09be e605 | | Load 0x3,0x5
09bf 48ff |H | Short_Literal 0xff
09c0 0279 | y | Execute Discrete,And
09c1 e006 | | Load 0x0,0x6
09c2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
09c3 025b | [ | Execute Discrete,Check_In_Type
09c4 027f | | Execute Discrete,Equal
09c5 8405 | | Call 0x2,0x5
09c6 e605 | | Load 0x3,0x5 ; Debug Table 0xc.0x35 = 0x9c6,0x2e
09c7 0a01 | | Execute_Immediate Plus,0x1
09c8 c605 | | Store 0x3,0x5
09c9 780b |x | Jump 0x9d5
09ca e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x36 = 0x9ca,0x2f
09cb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09cc 0f00 | | Execute_Immediate Equal,0x0
09cd 8405 | | Call 0x2,0x5
09ce e605 | | Load 0x3,0x5 ; Debug Table 0xc.0x37 = 0x9ce,0x30
09cf e604 | | Load 0x3,0x4
09d0 0a01 | | Execute_Immediate Plus,0x1
09d1 027f | | Execute Discrete,Equal
09d2 8405 | | Call 0x2,0x5
09d3 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xc.0x38 = 0x9d3,0x31
09d4 7803 |x | Jump 0x9d8
09d5 00d1 | | Pop_Control Pop_Count_1
09d6 00c9 | | Action Pop_Auxiliary_Loop
09d7 7fcb | | Jump 0x9a3
09d8 00ce | | Action Pop_Auxiliary
09d9 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x39 = 0x9d9,0x33
09da e7ff | | Load 0x3,-0x1
09db e004 | | Load 0x0,0x4
09dc 181e | | Execute Package,Field_Execute,Field_Number 0x1e
09dd 00d1 | | Pop_Control Pop_Count_1
09de e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3a = 0x9de,0x34
09df 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09e0 0f00 | | Execute_Immediate Equal,0x0
09e1 8405 | | Call 0x2,0x5
09e2 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3b = 0x9e2,0x35
09e3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09e4 0f00 | | Execute_Immediate Equal,0x0
09e5 8405 | | Call 0x2,0x5
09e6 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3c = 0x9e6,0x36
09e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09e8 0f00 | | Execute_Immediate Equal,0x0
09e9 8405 | | Call 0x2,0x5
09ea e403 | | Load 0x2,0x3 ; Debug Table 0xc.0x3d = 0x9ea,0x37
09eb 7003 |p | Jump_Nonzero 0x9ef
09ec e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3e = 0x9ec,0x38
09ed 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
09ee 8405 | | Call 0x2,0x5
09ef e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3f = 0x9ef,0x39
09f0 4800 |H | Short_Literal 0x0
09f1 e7ff | | Load 0x3,-0x1
09f2 e004 | | Load 0x0,0x4
09f3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09f4 00d1 | | Pop_Control Pop_Count_1
09f5 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x40 = 0x9f5,0x3a
09f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09f7 0f00 | | Execute_Immediate Equal,0x0
09f8 8405 | | Call 0x2,0x5
09f9 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x41 = 0x9f9,0x3b
09fa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09fb 0f00 | | Execute_Immediate Equal,0x0
09fc 8405 | | Call 0x2,0x5
09fd e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x42 = 0x9fd,0x3c
09fe 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09ff 0f00 | | Execute_Immediate Equal,0x0
0a00 8405 | | Call 0x2,0x5
0a01 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x43 = 0xa01,0x3d
0a02 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a03 0f00 | | Execute_Immediate Equal,0x0
0a04 8405 | | Call 0x2,0x5
0a05 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x44 = 0xa05,0x3e
0a06 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a07 e7ff | | Load 0x3,-0x1
0a08 e004 | | Load 0x0,0x4
0a09 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a0a c602 | | Store 0x3,0x2
0a0b e602 | | Load 0x3,0x2 ; Debug Table 0xc.0x45 = 0xa0b,0x3f
0a0c 0f00 | | Execute_Immediate Equal,0x0
0a0d 8405 | | Call 0x2,0x5
0a0e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a0f TRAP_08c8:
0a0f 62c8 |b | Indirect_Literal Discrete,0xcd8,{0x00000000, 0x4f2f0501}
0a10 010f | | Execute Exception,Equal
0a11 6804 |h | Jump_Zero 0xa16
0a12 0092 0df9 | | Action Push_String_Extended,0xdf9 ; "Assert Failure"
; Debug Table 0xc.0x46 = 0xa12,0x40
0a14 8406 | | Call 0x2,0x6
0a15 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a16 0100 | | Execute Exception,Raise
0a17 0000 | | .XXX[0x1]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0aab | | .CONST 0x0aab ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0010 | | .CONST 0x0010 ; Number of locals
0a1b INIT_0a18:
0a1b e002 | | Load 0x0,0x2 ; Debug Table 0xd = .DEBUG 0x0a1b,0x15a8,0x0801,0x0002,0x004f,0x2f05,0x0000,0x1177
; Debug Table 0xd.0x0 = 0xa1b,0xffff
0a1c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a1d e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x1 = 0xa1d,0xfffe
0a1e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a1f 0322 | " | Declare_Variable Record
0a20 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xd.0x2 = 0xa20,0xfffd
0a21 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a22 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xd.0x3 = 0xa22,0xfffc
0a23 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a24 e004 | | Load 0x0,0x4 ; Debug Table 0xd.0x4 = 0xa24,0xfffb
0a25 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a26 e002 | | Load 0x0,0x2
0a27 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a28 03f1 | | Declare_Variable Discrete,With_Value
0a29 e007 | | Load 0x0,0x7 ; Debug Table 0xd.0x5 = 0xa29,0xfffa
0a2a 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
0a2b e007 | | Load 0x0,0x7 ; Debug Table 0xd.0x6 = 0xa2b,0xfff9
0a2c 1b42 | B | Execute Package,Field_Read,Field_Number 0x42
0a2d e004 | | Load 0x0,0x4 ; Debug Table 0xd.0x7 = 0xa2d,0xfff8
0a2e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a2f e002 | | Load 0x0,0x2
0a30 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a31 03f1 | | Declare_Variable Discrete,With_Value
0a32 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x8 = 0xa32,0xfff7
0a33 00d9 | | Load_Top At_Offset_1
0a34 e002 | | Load 0x0,0x2
0a35 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0a36 0334 | 4 | Declare_Variable Array,With_Constraint
0a37 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x9 = 0xa37,0xfff6
0a38 0a02 | | Execute_Immediate Plus,0x2
0a39 0248 | H | Execute Discrete,Check_In_Integer
0a3a 090d | | Execute_Immediate Binary_Scale,0xd
0a3b 00e3 | | Load_Encached Natural_Cache
0a3c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0a3d 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0xa = 0xa3d,0xfff5
0a3e 00d9 | | Load_Top At_Offset_1
0a3f 09fd | | Execute_Immediate Binary_Scale,-0x3
0a40 e006 | | Load 0x0,0x6
0a41 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0a42 02a0 | | Declare_Subprogram Null_Subprogram
0a43 4801 |H | Short_Literal 0x1
0a44 035d | ] | Declare_Type Array,Defined
0a45 00d8 | | Load_Top At_Offset_0
0a46 0337 | 7 | Declare_Variable Array
0a47 e008 | | Load 0x0,0x8 ; Debug Table 0xd.0xb = 0xa47,0xfff4
0a48 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a49 0322 | " | Declare_Variable Record
0a4a 4804 |H | Short_Literal 0x4
0a4b 6288 |b | Indirect_Literal Discrete,0xcd4,{0x00000000, 0x00000401}
0a4c 00db | | Load_Top At_Offset_3
0a4d 01d5 | | Execute Vector,Field_Reference
0a4e 012d | - | Execute Any,Address
0a4f e008 | | Load 0x0,0x8
0a50 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a51 00d9 | | Load_Top At_Offset_1
0a52 017d | } | Execute Record,Structure_Write
0a53 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xc = 0xa53,0xfff3
0a54 4807 |H | Short_Literal 0x7
0a55 e006 | | Load 0x0,0x6
0a56 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a57 0334 | 4 | Declare_Variable Array,With_Constraint
0a58 4800 |H | Short_Literal 0x0
0a59 4807 |H | Short_Literal 0x7
0a5a e006 | | Load 0x0,0x6
0a5b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a5c 0334 | 4 | Declare_Variable Array,With_Constraint
0a5d 4801 |H | Short_Literal 0x1
0a5e 4800 |H | Short_Literal 0x0
0a5f 00da | | Load_Top At_Offset_2
0a60 01d6 | | Execute Vector,Field_Write
0a61 4802 |H | Short_Literal 0x2
0a62 4801 |H | Short_Literal 0x1
0a63 00da | | Load_Top At_Offset_2
0a64 01d6 | | Execute Vector,Field_Write
0a65 4804 |H | Short_Literal 0x4
0a66 4802 |H | Short_Literal 0x2
0a67 00da | | Load_Top At_Offset_2
0a68 01d6 | | Execute Vector,Field_Write
0a69 4808 |H | Short_Literal 0x8
0a6a 4803 |H | Short_Literal 0x3
0a6b 00da | | Load_Top At_Offset_2
0a6c 01d6 | | Execute Vector,Field_Write
0a6d 4810 |H | Short_Literal 0x10
0a6e 4804 |H | Short_Literal 0x4
0a6f 00da | | Load_Top At_Offset_2
0a70 01d6 | | Execute Vector,Field_Write
0a71 4820 |H | Short_Literal 0x20
0a72 4805 |H | Short_Literal 0x5
0a73 00da | | Load_Top At_Offset_2
0a74 01d6 | | Execute Vector,Field_Write
0a75 4840 |H@ | Short_Literal 0x40
0a76 4806 |H | Short_Literal 0x6
0a77 00da | | Load_Top At_Offset_2
0a78 01d6 | | Execute Vector,Field_Write
0a79 4880 |H | Short_Literal 0x80
0a7a 4807 |H | Short_Literal 0x7
0a7b 00da | | Load_Top At_Offset_2
0a7c 01d6 | | Execute Vector,Field_Write
0a7d 00d9 | | Load_Top At_Offset_1
0a7e 01d4 | | Execute Vector,Structure_Write
0a7f 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xd = 0xa7f,0xfff2
0a80 4807 |H | Short_Literal 0x7
0a81 e006 | | Load 0x0,0x6
0a82 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a83 0334 | 4 | Declare_Variable Array,With_Constraint
0a84 4800 |H | Short_Literal 0x0
0a85 4807 |H | Short_Literal 0x7
0a86 e006 | | Load 0x0,0x6
0a87 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a88 0334 | 4 | Declare_Variable Array,With_Constraint
0a89 48fe |H | Short_Literal 0xfe
0a8a 4800 |H | Short_Literal 0x0
0a8b 00da | | Load_Top At_Offset_2
0a8c 01d6 | | Execute Vector,Field_Write
0a8d 48fd |H | Short_Literal 0xfd
0a8e 4801 |H | Short_Literal 0x1
0a8f 00da | | Load_Top At_Offset_2
0a90 01d6 | | Execute Vector,Field_Write
0a91 48fb |H | Short_Literal 0xfb
0a92 4802 |H | Short_Literal 0x2
0a93 00da | | Load_Top At_Offset_2
0a94 01d6 | | Execute Vector,Field_Write
0a95 48f7 |H | Short_Literal 0xf7
0a96 4803 |H | Short_Literal 0x3
0a97 00da | | Load_Top At_Offset_2
0a98 01d6 | | Execute Vector,Field_Write
0a99 48ef |H | Short_Literal 0xef
0a9a 4804 |H | Short_Literal 0x4
0a9b 00da | | Load_Top At_Offset_2
0a9c 01d6 | | Execute Vector,Field_Write
0a9d 48df |H | Short_Literal 0xdf
0a9e 4805 |H | Short_Literal 0x5
0a9f 00da | | Load_Top At_Offset_2
0aa0 01d6 | | Execute Vector,Field_Write
0aa1 48bf |H | Short_Literal 0xbf
0aa2 4806 |H | Short_Literal 0x6
0aa3 00da | | Load_Top At_Offset_2
0aa4 01d6 | | Execute Vector,Field_Write
0aa5 487f |H | Short_Literal 0x7f
0aa6 4807 |H | Short_Literal 0x7
0aa7 00da | | Load_Top At_Offset_2
0aa8 01d6 | | Execute Vector,Field_Write
0aa9 00d9 | | Load_Top At_Offset_1
0aaa 01d4 | | Execute Vector,Structure_Write
0aab BODY_0a18:
0aab 00cf | | Action Mark_Auxiliary
0aac e60a | | Load 0x3,0xa ; Debug Table 0xd.0xe = 0xaac,0x1
0aad 01d9 | | Execute Vector,Reverse_Bounds
0aae 0263 | c | Execute Discrete,Above_Bound
0aaf 7010 |p | Jump_Nonzero 0xac0
0ab0 4804 |H | Short_Literal 0x4 ; Debug Table 0xd.0xf = 0xab0,0x2
0ab1 00d9 | | Load_Top At_Offset_1
0ab2 090a | | Execute_Immediate Binary_Scale,0xa
0ab3 6220 |b | Indirect_Literal Discrete,0xcd4,{0x00000000, 0x00000401}
0ab4 0273 | s | Execute Discrete,Plus
0ab5 0248 | H | Execute Discrete,Check_In_Integer
0ab6 e60d | | Load 0x3,0xd
0ab7 01d5 | | Execute Vector,Field_Reference
0ab8 012d | - | Execute Any,Address
0ab9 e008 | | Load 0x0,0x8
0aba 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0abb 00d9 | | Load_Top At_Offset_1
0abc e60a | | Load 0x3,0xa
0abd 01d6 | | Execute Vector,Field_Write
0abe 00c8 | | Action Pop_Auxiliary_Range
0abf 3ff0 |? | Loop_Increasing 0xab0
0ac0 00c9 | | Action Pop_Auxiliary_Loop
0ac1 e609 | | Load 0x3,0x9 ; Debug Table 0xd.0x10 = 0xac1,0x3
0ac2 0a02 | | Execute_Immediate Plus,0x2
0ac3 0aff | | Execute_Immediate Plus,-0x1
0ac4 0248 | H | Execute Discrete,Check_In_Integer
0ac5 4800 |H | Short_Literal 0x0
0ac6 0263 | c | Execute Discrete,Above_Bound
0ac7 7055 |pU | Jump_Nonzero 0xb1d
0ac8 00cf | | Action Mark_Auxiliary
0ac9 4807 |H | Short_Literal 0x7 ; Debug Table 0xd.0x11 = 0xac9,0x4
0aca 4800 |H | Short_Literal 0x0
0acb 00cf | | Action Mark_Auxiliary
0acc 4820 |H | Short_Literal 0x20 ; Debug Table 0xd.0x12 = 0xacc,0x5
0acd 4801 |H | Short_Literal 0x1
0ace 0007 | | Action Break_Optional
0acf 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x13 = 0xacf,0x6
0ad0 e613 | | Load 0x3,0x13
0ad1 090a | | Execute_Immediate Binary_Scale,0xa
0ad2 e616 | | Load 0x3,0x16
0ad3 0907 | | Execute_Immediate Binary_Scale,0x7
0ad4 0273 | s | Execute Discrete,Plus
0ad5 0248 | H | Execute Discrete,Check_In_Integer
0ad6 00da | | Load_Top At_Offset_2
0ad7 0901 | | Execute_Immediate Binary_Scale,0x1
0ad8 0248 | H | Execute Discrete,Check_In_Integer
0ad9 0273 | s | Execute Discrete,Plus
0ada 0aff | | Execute_Immediate Plus,-0x1
0adb 0248 | H | Execute Discrete,Check_In_Integer
0adc e60d | | Load 0x3,0xd
0add 01d6 | | Execute Vector,Field_Write
0ade 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x14 = 0xade,0x7
0adf e610 | | Load 0x3,0x10
0ae0 01d7 | | Execute Vector,Field_Read
0ae1 e613 | | Load 0x3,0x13
0ae2 090a | | Execute_Immediate Binary_Scale,0xa
0ae3 0248 | H | Execute Discrete,Check_In_Integer
0ae4 e616 | | Load 0x3,0x16
0ae5 0907 | | Execute_Immediate Binary_Scale,0x7
0ae6 0248 | H | Execute Discrete,Check_In_Integer
0ae7 0273 | s | Execute Discrete,Plus
0ae8 00da | | Load_Top At_Offset_2
0ae9 0901 | | Execute_Immediate Binary_Scale,0x1
0aea 0273 | s | Execute Discrete,Plus
0aeb 0248 | H | Execute Discrete,Check_In_Integer
0aec e60d | | Load 0x3,0xd
0aed 01d6 | | Execute Vector,Field_Write
0aee 00c8 | | Action Pop_Auxiliary_Range
0aef 3fdf |? | Loop_Increasing 0xacf
0af0 00c9 | | Action Pop_Auxiliary_Loop
0af1 4840 |H@ | Short_Literal 0x40 ; Debug Table 0xd.0x15 = 0xaf1,0x8
0af2 4821 |H! | Short_Literal 0x21
0af3 0007 | | Action Break_Optional
0af4 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x16 = 0xaf4,0x9
0af5 e60f | | Load 0x3,0xf
0af6 01d7 | | Execute Vector,Field_Read
0af7 e613 | | Load 0x3,0x13
0af8 090a | | Execute_Immediate Binary_Scale,0xa
0af9 e616 | | Load 0x3,0x16
0afa 0907 | | Execute_Immediate Binary_Scale,0x7
0afb 0273 | s | Execute Discrete,Plus
0afc 0248 | H | Execute Discrete,Check_In_Integer
0afd 00da | | Load_Top At_Offset_2
0afe 0901 | | Execute_Immediate Binary_Scale,0x1
0aff 0248 | H | Execute Discrete,Check_In_Integer
0b00 0273 | s | Execute Discrete,Plus
0b01 0aff | | Execute_Immediate Plus,-0x1
0b02 0248 | H | Execute Discrete,Check_In_Integer
0b03 e60d | | Load 0x3,0xd
0b04 01d6 | | Execute Vector,Field_Write
0b05 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x17 = 0xb05,0xa
0b06 e610 | | Load 0x3,0x10
0b07 01d7 | | Execute Vector,Field_Read
0b08 e613 | | Load 0x3,0x13
0b09 090a | | Execute_Immediate Binary_Scale,0xa
0b0a 0248 | H | Execute Discrete,Check_In_Integer
0b0b e616 | | Load 0x3,0x16
0b0c 0907 | | Execute_Immediate Binary_Scale,0x7
0b0d 0248 | H | Execute Discrete,Check_In_Integer
0b0e 0273 | s | Execute Discrete,Plus
0b0f 00da | | Load_Top At_Offset_2
0b10 0901 | | Execute_Immediate Binary_Scale,0x1
0b11 0273 | s | Execute Discrete,Plus
0b12 0248 | H | Execute Discrete,Check_In_Integer
0b13 e60d | | Load 0x3,0xd
0b14 01d6 | | Execute Vector,Field_Write
0b15 00c8 | | Action Pop_Auxiliary_Range
0b16 3fdd |? | Loop_Increasing 0xaf4
0b17 00ce | | Action Pop_Auxiliary
0b18 00c8 | | Action Pop_Auxiliary_Range
0b19 3fb1 |? | Loop_Increasing 0xacb
0b1a 00ce | | Action Pop_Auxiliary
0b1b 00c8 | | Action Pop_Auxiliary_Range
0b1c 3fab |? | Loop_Increasing 0xac8
0b1d 00ce | | Action Pop_Auxiliary
0b1e 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x18 = 0xb1e,0xb
0b1f e7ff | | Load 0x3,-0x1
0b20 8408 | | Call 0x2,0x8
0b21 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x19 = 0xb21,0xc
0b22 4806 |H | Short_Literal 0x6
0b23 e606 | | Load 0x3,0x6
0b24 e7ff | | Load 0x3,-0x1
0b25 e004 | | Load 0x0,0x4
0b26 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0b27 00d1 | | Pop_Control Pop_Count_1
0b28 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x1a = 0xb28,0xd
0b29 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b2a 0f02 | | Execute_Immediate Equal,0x2
0b2b 8405 | | Call 0x2,0x5
0b2c e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x1b = 0xb2c,0xe
0b2d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b2e 0f00 | | Execute_Immediate Equal,0x0
0b2f 8405 | | Call 0x2,0x5
0b30 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x1c = 0xb30,0xf
0b31 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b32 0f00 | | Execute_Immediate Equal,0x0
0b33 8405 | | Call 0x2,0x5
0b34 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x1d = 0xb34,0x10
0b35 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b36 0f00 | | Execute_Immediate Equal,0x0
0b37 8405 | | Call 0x2,0x5
0b38 00cf | | Action Mark_Auxiliary
0b39 0007 | | Action Break_Optional ; Debug Table 0xd.0x1e = 0xb39,0x11
0b3a e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x1f = 0xb3a,0x12
0b3b e60a | | Load 0x3,0xa
0b3c e7ff | | Load 0x3,-0x1
0b3d e004 | | Load 0x0,0x4
0b3e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0b3f 00d1 | | Pop_Control Pop_Count_1
0b40 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x20 = 0xb40,0x13
0b41 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b42 0f02 | | Execute_Immediate Equal,0x2
0b43 8405 | | Call 0x2,0x5
0b44 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x21 = 0xb44,0x14
0b45 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b46 e606 | | Load 0x3,0x6
0b47 027f | | Execute Discrete,Equal
0b48 8405 | | Call 0x2,0x5
0b49 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x22 = 0xb49,0x15
0b4a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b4b 0f00 | | Execute_Immediate Equal,0x0
0b4c 8405 | | Call 0x2,0x5
0b4d e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x23 = 0xb4d,0x16
0b4e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b4f 700c |p | Jump_Nonzero 0xb5c
0b50 e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x24 = 0xb50,0x17
0b51 e604 | | Load 0x3,0x4
0b52 e404 | | Load 0x2,0x4
0b53 0902 | | Execute_Immediate Binary_Scale,0x2
0b54 027f | | Execute Discrete,Equal
0b55 0279 | y | Execute Discrete,And
0b56 7005 |p | Jump_Nonzero 0xb5c
0b57 e604 | | Load 0x3,0x4 ; Debug Table 0xd.0x25 = 0xb57,0x18
0b58 0a01 | | Execute_Immediate Plus,0x1
0b59 c604 | | Store 0x3,0x4
0b5a 00c9 | | Action Pop_Auxiliary_Loop
0b5b 7fde | | Jump 0xb3a
0b5c 00ce | | Action Pop_Auxiliary
0b5d e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x26 = 0xb5d,0x19
0b5e e7ff | | Load 0x3,-0x1
0b5f e004 | | Load 0x0,0x4
0b60 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b61 00d1 | | Pop_Control Pop_Count_1
0b62 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x27 = 0xb62,0x1a
0b63 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b64 0f00 | | Execute_Immediate Equal,0x0
0b65 8405 | | Call 0x2,0x5
0b66 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x28 = 0xb66,0x1b
0b67 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b68 0f00 | | Execute_Immediate Equal,0x0
0b69 8405 | | Call 0x2,0x5
0b6a e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x29 = 0xb6a,0x1c
0b6b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b6c 0f00 | | Execute_Immediate Equal,0x0
0b6d 8405 | | Call 0x2,0x5
0b6e e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x2a = 0xb6e,0x1d
0b6f 7003 |p | Jump_Nonzero 0xb73
0b70 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x2b = 0xb70,0x1e
0b71 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b72 8405 | | Call 0x2,0x5
0b73 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x2c = 0xb73,0x1f
0b74 e7ff | | Load 0x3,-0x1
0b75 e004 | | Load 0x0,0x4
0b76 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b77 00d1 | | Pop_Control Pop_Count_1
0b78 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x2d = 0xb78,0x20
0b79 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b7a 0f00 | | Execute_Immediate Equal,0x0
0b7b 8405 | | Call 0x2,0x5
0b7c e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x2e = 0xb7c,0x21
0b7d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b7e 0f00 | | Execute_Immediate Equal,0x0
0b7f 8405 | | Call 0x2,0x5
0b80 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x2f = 0xb80,0x22
0b81 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b82 0f00 | | Execute_Immediate Equal,0x0
0b83 8405 | | Call 0x2,0x5
0b84 e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x30 = 0xb84,0x23
0b85 7003 |p | Jump_Nonzero 0xb89
0b86 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x31 = 0xb86,0x24
0b87 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b88 8405 | | Call 0x2,0x5
0b89 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x32 = 0xb89,0x25
0b8a 4800 |H | Short_Literal 0x0
0b8b e7ff | | Load 0x3,-0x1
0b8c e004 | | Load 0x0,0x4
0b8d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b8e 00d1 | | Pop_Control Pop_Count_1
0b8f e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x33 = 0xb8f,0x26
0b90 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b91 0f00 | | Execute_Immediate Equal,0x0
0b92 8405 | | Call 0x2,0x5
0b93 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x34 = 0xb93,0x27
0b94 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b95 0f00 | | Execute_Immediate Equal,0x0
0b96 8405 | | Call 0x2,0x5
0b97 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x35 = 0xb97,0x28
0b98 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b99 0f00 | | Execute_Immediate Equal,0x0
0b9a 8405 | | Call 0x2,0x5
0b9b e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x36 = 0xb9b,0x29
0b9c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b9d 0f00 | | Execute_Immediate Equal,0x0
0b9e 8405 | | Call 0x2,0x5
0b9f e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x37 = 0xb9f,0x2a
0ba0 4806 |H | Short_Literal 0x6
0ba1 e606 | | Load 0x3,0x6
0ba2 e7ff | | Load 0x3,-0x1
0ba3 e004 | | Load 0x0,0x4
0ba4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0ba5 00d1 | | Pop_Control Pop_Count_1
0ba6 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x38 = 0xba6,0x2b
0ba7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ba8 0f01 | | Execute_Immediate Equal,0x1
0ba9 8405 | | Call 0x2,0x5
0baa e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x39 = 0xbaa,0x2c
0bab 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0bac 0f00 | | Execute_Immediate Equal,0x0
0bad 8405 | | Call 0x2,0x5
0bae e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x3a = 0xbae,0x2d
0baf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0bb0 0f00 | | Execute_Immediate Equal,0x0
0bb1 8405 | | Call 0x2,0x5
0bb2 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x3b = 0xbb2,0x2e
0bb3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0bb4 0f00 | | Execute_Immediate Equal,0x0
0bb5 8405 | | Call 0x2,0x5
0bb6 00cf | | Action Mark_Auxiliary
0bb7 0007 | | Action Break_Optional ; Debug Table 0xd.0x3c = 0xbb7,0x2f
0bb8 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x3d = 0xbb8,0x30
0bb9 e60a | | Load 0x3,0xa
0bba e7ff | | Load 0x3,-0x1
0bbb e004 | | Load 0x0,0x4
0bbc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0bbd 00d1 | | Pop_Control Pop_Count_1
0bbe e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x3e = 0xbbe,0x31
0bbf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bc0 0f01 | | Execute_Immediate Equal,0x1
0bc1 8405 | | Call 0x2,0x5
0bc2 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x3f = 0xbc2,0x32
0bc3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0bc4 0b00 | | Execute_Immediate Case_Compare,0x0
0bc5 7005 |p | Jump_Nonzero 0xbcb
0bc6 0b05 | | Execute_Immediate Case_Compare,0x5
0bc7 700f |p | Jump_Nonzero 0xbd7
0bc8 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x40 = 0xbc8,0x39
0bc9 8405 | | Call 0x2,0x5
0bca 7817 |x | Jump 0xbe2
0bcb e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x41 = 0xbcb,0x33
0bcc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0bcd e606 | | Load 0x3,0x6
0bce 027e | ~ | Execute Discrete,Not_Equal
0bcf 6803 |h | Jump_Zero 0xbd3
0bd0 0092 0df6 | | Action Push_String_Extended,0xdf6 ; "Block length read /= block length written"
; Debug Table 0xd.0x42 = 0xbd0,0x34
0bd2 8406 | | Call 0x2,0x6
0bd3 e605 | | Load 0x3,0x5 ; Debug Table 0xd.0x43 = 0xbd3,0x35
0bd4 0a01 | | Execute_Immediate Plus,0x1
0bd5 c605 | | Store 0x3,0x5
0bd6 780b |x | Jump 0xbe2
0bd7 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x44 = 0xbd7,0x36
0bd8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0bd9 0f00 | | Execute_Immediate Equal,0x0
0bda 8405 | | Call 0x2,0x5
0bdb e605 | | Load 0x3,0x5 ; Debug Table 0xd.0x45 = 0xbdb,0x37
0bdc e604 | | Load 0x3,0x4
0bdd 0a01 | | Execute_Immediate Plus,0x1
0bde 027f | | Execute Discrete,Equal
0bdf 8405 | | Call 0x2,0x5
0be0 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xd.0x46 = 0xbe0,0x38
0be1 7803 |x | Jump 0xbe5
0be2 00d1 | | Pop_Control Pop_Count_1
0be3 00c9 | | Action Pop_Auxiliary_Loop
0be4 7fd3 | | Jump 0xbb8
0be5 00ce | | Action Pop_Auxiliary
0be6 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x47 = 0xbe6,0x3a
0be7 e7ff | | Load 0x3,-0x1
0be8 e004 | | Load 0x0,0x4
0be9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0bea 00d1 | | Pop_Control Pop_Count_1
0beb e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x48 = 0xbeb,0x3b
0bec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bed 0f00 | | Execute_Immediate Equal,0x0
0bee 8405 | | Call 0x2,0x5
0bef e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x49 = 0xbef,0x3c
0bf0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0bf1 0f00 | | Execute_Immediate Equal,0x0
0bf2 8405 | | Call 0x2,0x5
0bf3 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x4a = 0xbf3,0x3d
0bf4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0bf5 0f00 | | Execute_Immediate Equal,0x0
0bf6 8405 | | Call 0x2,0x5
0bf7 e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x4b = 0xbf7,0x3e
0bf8 7003 |p | Jump_Nonzero 0xbfc
0bf9 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x4c = 0xbf9,0x3f
0bfa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0bfb 8405 | | Call 0x2,0x5
0bfc e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x4d = 0xbfc,0x40
0bfd 4800 |H | Short_Literal 0x0
0bfe e7ff | | Load 0x3,-0x1
0bff e004 | | Load 0x0,0x4
0c00 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0c01 00d1 | | Pop_Control Pop_Count_1
0c02 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x4e = 0xc02,0x41
0c03 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c04 0f00 | | Execute_Immediate Equal,0x0
0c05 8405 | | Call 0x2,0x5
0c06 e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x4f = 0xc06,0x42
0c07 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c08 0f00 | | Execute_Immediate Equal,0x0
0c09 8405 | | Call 0x2,0x5
0c0a e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x50 = 0xc0a,0x43
0c0b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0c0c 0f00 | | Execute_Immediate Equal,0x0
0c0d 8405 | | Call 0x2,0x5
0c0e e603 | | Load 0x3,0x3 ; Debug Table 0xd.0x51 = 0xc0e,0x44
0c0f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c10 0f00 | | Execute_Immediate Equal,0x0
0c11 8405 | | Call 0x2,0x5
0c12 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x52 = 0xc12,0x45
0c13 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c14 e7ff | | Load 0x3,-0x1
0c15 e004 | | Load 0x0,0x4
0c16 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c17 c602 | | Store 0x3,0x2
0c18 e602 | | Load 0x3,0x2 ; Debug Table 0xd.0x53 = 0xc18,0x46
0c19 0f00 | | Execute_Immediate Equal,0x0
0c1a 8405 | | Call 0x2,0x5
0c1b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c1c 0000 0000 | | .BLANK 0000[0x4]
0c20 ; --------------------------------------------------------------------------------------
0c20 ; SUBPROGRAM
0c20 ; --------------------------------------------------------------------------------------
0c20 0c23 | # | .CONST 0x0c23 ; Address of begin
0c21 0004 | | .CONST 0x0004 ; Address of exception handler
0c22 0001 | | .CONST 0x0001 ; Number of locals
0c23 BODY_0c20:
0c23 INIT_0c20:
0c23 0092 0dfa | | Action Push_String_Extended,0xdfa ; "This program consists of 8 separate tests, 1 through 8."
; Debug Table 0xe = .DEBUG 0x0c23,0x1652,0x0801,0x0002,0x004f,0x2f05,0x0000,0x168f
; Debug Table 0xe.0x0 = 0xc23,0x1
0c25 8407 | | Call 0x2,0x7
0c26 0092 0dfb | | Action Push_String_Extended,0xdfb ; "Test 1 is a start stop R/W test of minimal block length."
; Debug Table 0xe.0x1 = 0xc26,0x2
0c28 8407 | | Call 0x2,0x7
0c29 0092 0dfc | | Action Push_String_Extended,0xdfc ; "Test 2 is a streaming R/W test of minimal block length."
; Debug Table 0xe.0x2 = 0xc29,0x3
0c2b 8407 | | Call 0x2,0x7
0c2c 0092 0dfd | | Action Push_String_Extended,0xdfd ; "Test 3 is a streaming write, start stop read test with"
; Debug Table 0xe.0x3 = 0xc2c,0x4
0c2e 8407 | | Call 0x2,0x7
0c2f 0092 0dfe | | Action Push_String_Extended,0xdfe ; " repositioning, record skipping and reverse reading."
; Debug Table 0xe.0x4 = 0xc2f,0x5
0c31 8407 | | Call 0x2,0x7
0c32 0092 0dff | | Action Push_String_Extended,0xdff ; "Test 4 is a maximum block length streaming R/W test with no checking"
; Debug Table 0xe.0x5 = 0xc32,0x6
0c34 8407 | | Call 0x2,0x7
0c35 0092 0e00 | | Action Push_String_Extended,0xe00 ; " of data read. This test writes worst case data patterns."
; Debug Table 0xe.0x6 = 0xc35,0x7
0c37 8407 | | Call 0x2,0x7
0c38 0092 0e01 | | Action Push_String_Extended,0xe01 ; "Test 5 is a maximum block start stop R/W test."
; Debug Table 0xe.0x7 = 0xc38,0x8
0c3a 8407 | | Call 0x2,0x7
0c3b 0092 0e02 | | Action Push_String_Extended,0xe02 ; "Test 6 is a maximum block length streaming R/W test checking all"
; Debug Table 0xe.0x8 = 0xc3b,0x9
0c3d 8407 | | Call 0x2,0x7
0c3e 0092 0e03 | | Action Push_String_Extended,0xe03 ; " read data for correctness."
; Debug Table 0xe.0x9 = 0xc3e,0xa
0c40 8407 | | Call 0x2,0x7
0c41 0092 0e04 | | Action Push_String_Extended,0xe04 ; "Test 7 is a maximum block length streaming R/W test with only"
; Debug Table 0xe.0xa = 0xc41,0xb
0c43 8407 | | Call 0x2,0x7
0c44 0092 0e05 | | Action Push_String_Extended,0xe05 ; " partial data checking."
; Debug Table 0xe.0xb = 0xc44,0xc
0c46 8407 | | Call 0x2,0x7
0c47 0092 0e06 | | Action Push_String_Extended,0xe06 ; "Test 8 is a jostle test and takes a very long time."
; Debug Table 0xe.0xc = 0xc47,0xd
0c49 8407 | | Call 0x2,0x7
0c4a 0092 0e07 | | Action Push_String_Extended,0xe07 ; "First pass is abbreviated, subsequent passes will take longer."
; Debug Table 0xe.0xd = 0xc4a,0xe
0c4c 8407 | | Call 0x2,0x7
0c4d 0092 0e08 | | Action Push_String_Extended,0xe08 ; " "
; Debug Table 0xe.0xe = 0xc4d,0xf
0c4f 8407 | | Call 0x2,0x7
0c50 0092 0e09 | | Action Push_String_Extended,0xe09 ; "Select the test you want by number, or 0 to run them all in order :"
; Debug Table 0xe.0xf = 0xc50,0x10
0c52 8407 | | Call 0x2,0x7
0c53 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c54 0000 0000 | | .BLANK 0000[0x4]
0c58 ; --------------------------------------------------------------------------------------
0c58 ; SUBPROGRAM
0c58 ; --------------------------------------------------------------------------------------
0c58 0c5f | _ | .CONST 0x0c5f ; Address of begin
0c59 0004 | | .CONST 0x0004 ; Address of exception handler
0c5a 0002 | | .CONST 0x0002 ; Number of locals
0c5b INIT_0c58:
0c5b e402 | | Load 0x2,0x2 ; Debug Table 0xf = .DEBUG 0x0c5b,0x1674,0x0802,0x0002,0x004f,0x2f05,0x0000,0x16d7
; Debug Table 0xf.0x0 = 0xc5b,0xffff
0c5c 00db | | Load_Top At_Offset_3
0c5d e001 | | Load 0x0,0x1
0c5e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c5f BODY_0c58:
0c5f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x1 = 0xc5f,0x1
0c60 01db | | Execute Vector,Length
0c61 0c01 | | Execute_Immediate Greater_Equal,0x1
0c62 680c |h | Jump_Zero 0xc6f
0c63 4801 |H | Short_Literal 0x1
0c64 00d9 | | Load_Top At_Offset_1
0c65 01d7 | | Execute Vector,Field_Read
0c66 0f6e | n | Execute_Immediate Equal,0x6e
0c67 7005 |p | Jump_Nonzero 0xc6d
0c68 4801 |H | Short_Literal 0x1
0c69 00d9 | | Load_Top At_Offset_1
0c6a 01d7 | | Execute Vector,Field_Read
0c6b 0f4e | N | Execute_Immediate Equal,0x4e
0c6c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c6d 4801 |H | Short_Literal 0x1
0c6e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c6f 4800 |H | Short_Literal 0x0
0c70 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c71 0000 0000 | | .BLANK 0000[0x7]
0c78 ; --------------------------------------------------------------------------------------
0c78 ; SUBPROGRAM
0c78 ; --------------------------------------------------------------------------------------
0c78 0c86 | | .CONST 0x0c86 ; Address of begin
0c79 0004 | | .CONST 0x0004 ; Address of exception handler
0c7a 0003 | | .CONST 0x0003 ; Number of locals
0c7b INIT_0c78:
0c7b 4800 |H | Short_Literal 0x0 ; Debug Table 0x10 = .DEBUG 0x0c7b,0x167a,0x0804,0x0002,0x004f,0x2f05,0x0000,0x1779
; Debug Table 0x10.0x0 = 0xc7b,0xffff
0c7c 4803 |H | Short_Literal 0x3
0c7d e412 | | Load 0x2,0x12
0c7e 029f 0cc3 | | Declare_Subprogram INIT_0cc0,For_Call
0c80 4801 |H | Short_Literal 0x1
0c81 035d | ] | Declare_Type Array,Defined
0c82 00d8 | | Load_Top At_Offset_0
0c83 0337 | 7 | Declare_Variable Array
0c84 00d8 | | Load_Top At_Offset_0
0c85 1c00 | | Execute_Immediate Run_Utility,0x0
0c86 BODY_0c78:
0c86 00be | | Action Activate_Tasks
0c87 00cf | | Action Mark_Auxiliary
0c88 4803 |H | Short_Literal 0x3 ; Debug Table 0x10.0x1 = 0xc88,0x1
0c89 4800 |H | Short_Literal 0x0
0c8a 0007 | | Action Break_Optional
0c8b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x2 = 0xc8b,0x2
0c8c e004 | | Load 0x0,0x4
0c8d 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c8e 682c |h, | Jump_Zero 0xcbb
0c8f e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0x3 = 0xc8f,0x3
0c90 4800 |H | Short_Literal 0x0
0c91 4808 |H | Short_Literal 0x8
0c92 0261 | a | Execute Discrete,Not_In_Range
0c93 681d |h | Jump_Zero 0xcb1
0c94 0092 0e0a | | Action Push_String_Extended,0xe0a ; "Do you want to see test descriptions? [Y] :"
; Debug Table 0x10.0x4 = 0xc94,0x4
0c96 8415 | | Call 0x2,0x15
0c97 7001 |p | Jump_Nonzero 0xc99
0c98 8414 | | Call 0x2,0x14 ; Debug Table 0x10.0x5 = 0xc98,0x5
0c99 e5fd | | Load 0x2,-0x3 ; Debug Table 0x10.0x6 = 0xc99,0x6
0c9a 00d9 | | Load_Top At_Offset_1
0c9b e402 | | Load 0x2,0x2
0c9c 0092 0e0b | | Action Push_String_Extended,0xe0b ; "Unit "
0c9e e606 | | Load 0x3,0x6
0c9f 00e0 | | Load_Encached Standard_Cache
0ca0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ca1 01cc | | Execute Vector,Catenate
0ca2 0092 0e0c | | Action Push_String_Extended,0xe0c ; ": which test? (0..8) :"
0ca4 01cc | | Execute Vector,Catenate
0ca5 e416 | | Load 0x2,0x16
0ca6 4817 |H | Short_Literal 0x17
0ca7 4802 |H | Short_Literal 0x2
0ca8 0099 | | Action Reference_Dynamic
0ca9 e001 | | Load 0x0,0x1
0caa 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0cab 4803 |H | Short_Literal 0x3
0cac e606 | | Load 0x3,0x6
0cad e603 | | Load 0x3,0x3
0cae 01d7 | | Execute Vector,Field_Read
0caf 170d | | Execute Task,Entry_Call,Field_Number 0xd
0cb0 780a |x | Jump 0xcbb
0cb1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x10.0x7 = 0xcb1,0x7
0cb2 00d9 | | Load_Top At_Offset_1
0cb3 e5fe | | Load 0x2,-0x2
0cb4 e411 | | Load 0x2,0x11
0cb5 025b | [ | Execute Discrete,Check_In_Type
0cb6 4803 |H | Short_Literal 0x3
0cb7 e606 | | Load 0x3,0x6
0cb8 e603 | | Load 0x3,0x3
0cb9 01d7 | | Execute Vector,Field_Read
0cba 170d | | Execute Task,Entry_Call,Field_Number 0xd
0cbb 00c8 | | Action Pop_Auxiliary_Range
0cbc 3fce |? | Loop_Increasing 0xc8b
0cbd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cbe 0000 0000 | | .XXX[0x2]
0cc0 ; --------------------------------------------------------------------------------------
0cc0 ; SUBPROGRAM
0cc0 ; --------------------------------------------------------------------------------------
0cc0 0cc3 | | .CONST 0x0cc3 ; Address of begin
0cc1 0004 | | .CONST 0x0004 ; Address of exception handler
0cc2 0001 | | .CONST 0x0001 ; Number of locals
0cc3 BODY_0cc0:
0cc3 INIT_0cc0:
0cc3 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x11 = .DEBUG 0x0cc3,0x168c,0x0805,0x0002,0x004f,0x2f05,0x0000,0x171f
0cc4 00da | | Load_Top At_Offset_2
0cc5 01dc | | Execute Vector,Last
0cc6 00db | | Load_Top At_Offset_3
0cc7 01dd | | Execute Vector,First
0cc8 0263 | c | Execute Discrete,Above_Bound
0cc9 7006 |p | Jump_Nonzero 0xcd0
0cca 00d8 | | Load_Top At_Offset_0
0ccb e9ff | | Load 0x4,-0x1
0ccc 01d5 | | Execute Vector,Field_Reference
0ccd 036b | k | Declare_Variable Task,As_Component
0cce 0a01 | | Execute_Immediate Plus,0x1
0ccf 7ff8 | | Jump 0xcc8
0cd0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0cd1 0000 0000 | | .XXX[0x3]
0cd3 0000 | |
0cd4 0000 0000 | | .LITERAL {0x00000000, 0x00000401}
0cd8 0000 0000 | | .LITERAL {0x00000000, 0x4f2f0501}
0cdc 0000 0000 | | .BLANK 0000[0x4]
0ce0 0d02 0d4d | M| .XXX[0x3]
0ce2 0015 | |
0ce3 4801 |H | Short_Literal 0x1 ; Debug Table 0x12 = .DEBUG 0x0ce3,0x168e,0x0800,0x0000,0x004f,0x2f05,0x0000,0x14d0
0ce4 00b8 | | Action Set_Priority
0ce5 4803 |H | Short_Literal 0x3
0ce6 02cb | | Declare_Variable Entry
0ce7 00bf | | Action Accept_Activation
0ce8 e001 | | Load 0x0,0x1 ; Debug Table 0x13 = .DEBUG 0x0ce8,0x1690,0x0800,0x0000,0x004f,0x2f05,0x0000,0x14eb
; Debug Table 0x13.0x0 = 0xce8,0xffff
0ce9 0007 | | Action Break_Optional
0cea e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x1 = 0xcea,0xfffe
0ceb 0007 | | Action Break_Optional
0cec e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x2 = 0xcec,0xfffd
0ced 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cee e003 | | Load 0x0,0x3 ; Debug Table 0x13.0x3 = 0xcee,0xfffc
0cef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cf0 02c7 | | Declare_Variable Any
0cf1 00d8 | | Load_Top At_Offset_0
0cf2 1c00 | | Execute_Immediate Run_Utility,0x0
0cf3 e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x4 = 0xcf3,0xfffb
0cf4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0cf5 0322 | " | Declare_Variable Record
0cf6 e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x5 = 0xcf6,0xfffa
0cf7 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0cf8 480d 49ad |H I | Declare_Variable Select 0x000, 0x001,
0cfa 4800 4801 |H H | [0x000]: 0x001 = 0x0008,
0cfc 4800 4801 |H H | [0x00d]: 0x1ad = 0x0d68
0cfe 02cf | |
0cff 029f 0d7b | {| Declare_Subprogram INIT_0d78,For_Call
0d01 00bc | | Action Signal_Activated
0d02 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x6 = 0xd02,0x1
0d03 013f | ? | Execute Select,Rendezvous
0d04 00d1 | | Pop_Control Pop_Count_1
0d05 e210 | | Load 0x1,0x10 ; Debug Table 0x13.0x7 = 0xd05,0x3
0d06 e004 | | Load 0x0,0x4
0d07 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d08 6843 |hC | Jump_Zero 0xd4c
0d09 e20e | | Load 0x1,0xe ; Debug Table 0x13.0x8 = 0xd09,0x4
0d0a 0c01 | | Execute_Immediate Greater_Equal,0x1
0d0b 6803 |h | Jump_Zero 0xd0f
0d0c e20e | | Load 0x1,0xe ; Debug Table 0x13.0x9 = 0xd0c,0x5
0d0d a20f | | Store_Unchecked 0x1,0xf
0d0e 7802 |x | Jump 0xd11
0d0f 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0xa = 0xd0f,0x6
0d10 a20f | | Store_Unchecked 0x1,0xf
0d11 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0xb = 0xd11,0x7
0d12 c005 | | Store 0x0,0x5
0d13 00cf | | Action Mark_Auxiliary
0d14 60d7 |` | Indirect_Literal Discrete,0xdec,{0x00000000, 0x7fffffff} ; Debug Table 0x13.0xc = 0xd14,0x8
0d15 4801 |H | Short_Literal 0x1
0d16 0007 | | Action Break_Optional
0d17 e211 | | Load 0x1,0x11 ; Debug Table 0x13.0xd = 0xd17,0x9
0d18 e003 | | Load 0x0,0x3
0d19 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d1a e003 | | Load 0x0,0x3
0d1b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0d1c 6802 |h | Jump_Zero 0xd1f
0d1d 00d2 | | Pop_Control Pop_Count_2
0d1e 7820 |x | Jump 0xd3f
0d1f 00cf | | Action Mark_Auxiliary
0d20 0007 | | Action Break_Optional ; Debug Table 0x13.0xe = 0xd20,0xa
0d21 8215 | | Call 0x1,0x15 ; Debug Table 0x13.0xf = 0xd21,0xb
0d22 e20e | | Load 0x1,0xe ; Debug Table 0x13.0x10 = 0xd22,0xc
0d23 7008 |p | Jump_Nonzero 0xd2c
0d24 e20f | | Load 0x1,0xf ; Debug Table 0x13.0x11 = 0xd24,0xd
0d25 0f08 | | Execute_Immediate Equal,0x8
0d26 7005 |p | Jump_Nonzero 0xd2c
0d27 e20f | | Load 0x1,0xf ; Debug Table 0x13.0x12 = 0xd27,0xe
0d28 0a01 | | Execute_Immediate Plus,0x1
0d29 c20f | | Store 0x1,0xf
0d2a 00c9 | | Action Pop_Auxiliary_Loop
0d2b 7ff5 | | Jump 0xd21
0d2c 00ce | | Action Pop_Auxiliary
0d2d 0092 0e0d | | Action Push_String_Extended,0xe0d ; "=== End of Pass"
; Debug Table 0x13.0x13 = 0xd2d,0xf
0d2f 00d9 | | Load_Top At_Offset_1
0d30 00e0 | | Load_Encached Standard_Cache
0d31 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d32 01cc | | Execute Vector,Catenate
0d33 0092 0e0e | | Action Push_String_Extended,0xe0e ; " for unit number"
0d35 01cc | | Execute Vector,Catenate
0d36 e210 | | Load 0x1,0x10
0d37 00e0 | | Load_Encached Standard_Cache
0d38 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d39 01cc | | Execute Vector,Catenate
0d3a 8006 | | Call 0x0,0x6
0d3b 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x14 = 0xd3b,0x10
0d3c c005 | | Store 0x0,0x5
0d3d 00c8 | | Action Pop_Auxiliary_Range
0d3e 3fd8 |? | Loop_Increasing 0xd17
0d3f 00ce | | Action Pop_Auxiliary
0d40 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x15 = 0xd40,0x11
0d41 4800 |H | Short_Literal 0x0
0d42 e210 | | Load 0x1,0x10
0d43 e004 | | Load 0x0,0x4
0d44 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0d45 00d1 | | Pop_Control Pop_Count_1
0d46 e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x16 = 0xd46,0x12
0d47 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0d48 e210 | | Load 0x1,0x10
0d49 e004 | | Load 0x0,0x4
0d4a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d4b 005b | [ | Store_Top Discrete,At_Offset_3
0d4c 00bb | | Action Signal_Completion
0d4d 0007 | | .XXX[0x1]
0d4e 0092 0e0f | | Action Push_String_Extended,0xe0f ; "unhandled exception "
; Debug Table 0x13.0x17 = 0xd4e,0x13
0d50 e007 | | Load 0x0,0x7
0d51 180d | | Execute Package,Field_Execute,Field_Number 0xd
0d52 01cc | | Execute Vector,Catenate
0d53 0092 0e10 | | Action Push_String_Extended,0xe10 ; " in test"
0d55 01cc | | Execute Vector,Catenate
0d56 e20f | | Load 0x1,0xf
0d57 00e0 | | Load_Encached Standard_Cache
0d58 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d59 01cc | | Execute Vector,Catenate
0d5a 0092 0e11 | | Action Push_String_Extended,0xe11 ; " for unit"
0d5c 01cc | | Execute Vector,Catenate
0d5d e210 | | Load 0x1,0x10
0d5e 00e0 | | Load_Encached Standard_Cache
0d5f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d60 01cc | | Execute Vector,Catenate
0d61 8006 | | Call 0x0,0x6
0d62 00bb | | Action Signal_Completion
0d63 0000 0000 | | .BLANK 0000[0x5]
0d68 ; --------------------------------------------------------------------------------------
0d68 ; SUBPROGRAM
0d68 ; See instruction 0x02cf at 0xcf8, index=0xd
0d68 ; --------------------------------------------------------------------------------------
0d68 0d6b | k | .CONST 0x0d6b ; Address of begin
0d69 0004 | | .CONST 0x0004 ; Address of exception handler
0d6a 0001 | | .CONST 0x0001 ; Number of locals
0d6b BODY_0d68:
0d6b INIT_0d68:
0d6b 00db | | Load_Top At_Offset_3 ; Debug Table 0x14 = .DEBUG 0x0d6b,0x16c2,0x0003,0x0000,0x004f,0x2f05,0x0000,0x1533
; Debug Table 0x14.0x0 = 0xd6b,0x1
0d6c a20e | | Store_Unchecked 0x1,0xe
0d6d e5fd | | Load 0x2,-0x3 ; Debug Table 0x14.0x1 = 0xd6d,0x2
0d6e a210 | | Store_Unchecked 0x1,0x10
0d6f e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x2 = 0xd6f,0x3
0d70 c211 | | Store 0x1,0x11
0d71 4100 |A | End_Rendezvous 0x0
0d72 0000 0000 | | .BLANK 0000[0x6]
0d78 ; --------------------------------------------------------------------------------------
0d78 ; SUBPROGRAM
0d78 ; --------------------------------------------------------------------------------------
0d78 0d7b | { | .CONST 0x0d7b ; Address of begin
0d79 0dc2 | | .CONST 0x0dc2 ; Address of exception handler
0d7a 0001 | | .CONST 0x0001 ; Number of locals
0d7b BODY_0d78:
0d7b INIT_0d78:
0d7b 0092 0e12 | | Action Push_String_Extended,0xe12 ; "Beginning test"
; Debug Table 0x15 = .DEBUG 0x0d7b,0x16ca,0x0004,0x0000,0x004f,0x2f05,0x0000,0x161b
; Debug Table 0x15.0x0 = 0xd7b,0x1
0d7d e20f | | Load 0x1,0xf
0d7e 00e0 | | Load_Encached Standard_Cache
0d7f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d80 01cc | | Execute Vector,Catenate
0d81 0092 0e13 | | Action Push_String_Extended,0xe13 ; " unit number"
0d83 01cc | | Execute Vector,Catenate
0d84 e210 | | Load 0x1,0x10
0d85 00e0 | | Load_Encached Standard_Cache
0d86 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d87 01cc | | Execute Vector,Catenate
0d88 8006 | | Call 0x0,0x6
0d89 e20f | | Load 0x1,0xf ; Debug Table 0x15.0x1 = 0xd89,0x2
0d8a 4608 |F | Jump_Case 0x9
0d8b 7808 |x | Jump 0xd94 ; case 0x0
0d8c 780c |x | Jump 0xd99 ; case 0x1
0d8d 780e |x | Jump 0xd9c ; case 0x2
0d8e 7810 |x | Jump 0xd9f ; case 0x3
0d8f 7812 |x | Jump 0xda2 ; case 0x4
0d90 7814 |x | Jump 0xda5 ; case 0x5
0d91 7816 |x | Jump 0xda8 ; case 0x6
0d92 7818 |x | Jump 0xdab ; case 0x7
0d93 781a |x | Jump 0xdae ; case 0x8
0d94 0092 0e14 | | Action Push_String_Extended,0xe14 ; "Invalid internal test number: aborting"
; Debug Table 0x15.0x2 = 0xd94,0x3
0d96 8006 | | Call 0x0,0x6
0d97 00cc | | Action Pop_Block ; Debug Table 0x15.0x3 = 0xd97,0x4
0d98 7f93 | | Jump 0xd2c
0d99 e210 | | Load 0x1,0x10 ; Debug Table 0x15.0x4 = 0xd99,0x5
0d9a 8008 | | Call 0x0,0x8
0d9b 7814 |x | Jump 0xdb0
0d9c e210 | | Load 0x1,0x10 ; Debug Table 0x15.0x5 = 0xd9c,0x6
0d9d 8009 | | Call 0x0,0x9
0d9e 7811 |x | Jump 0xdb0
0d9f e210 | | Load 0x1,0x10 ; Debug Table 0x15.0x6 = 0xd9f,0x7
0da0 800a | | Call 0x0,0xa
0da1 780e |x | Jump 0xdb0
0da2 e210 | | Load 0x1,0x10 ; Debug Table 0x15.0x7 = 0xda2,0x8
0da3 800b | | Call 0x0,0xb
0da4 780b |x | Jump 0xdb0
0da5 e210 | | Load 0x1,0x10 ; Debug Table 0x15.0x8 = 0xda5,0x9
0da6 800c | | Call 0x0,0xc
0da7 7808 |x | Jump 0xdb0
0da8 e210 | | Load 0x1,0x10 ; Debug Table 0x15.0x9 = 0xda8,0xa
0da9 800d | | Call 0x0,0xd
0daa 7805 |x | Jump 0xdb0
0dab e210 | | Load 0x1,0x10 ; Debug Table 0x15.0xa = 0xdab,0xb
0dac 800e | | Call 0x0,0xe
0dad 7802 |x | Jump 0xdb0
0dae e210 | | Load 0x1,0x10 ; Debug Table 0x15.0xb = 0xdae,0xc
0daf 800f | | Call 0x0,0xf
0db0 0092 0e15 | | Action Push_String_Extended,0xe15 ; "Test"
; Debug Table 0x15.0xc = 0xdb0,0xd
0db2 e20f | | Load 0x1,0xf
0db3 00e0 | | Load_Encached Standard_Cache
0db4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0db5 01cc | | Execute Vector,Catenate
0db6 0092 0e13 | | Action Push_String_Extended,0xe13 ; " unit number"
0db8 01cc | | Execute Vector,Catenate
0db9 e210 | | Load 0x1,0x10
0dba 00e0 | | Load_Encached Standard_Cache
0dbb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0dbc 01cc | | Execute Vector,Catenate
0dbd 0092 0e16 | | Action Push_String_Extended,0xe16 ; " done."
0dbf 01cc | | Execute Vector,Catenate
0dc0 8006 | | Call 0x0,0x6
0dc1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0dc2 TRAP_0d78:
0dc2 6715 |g | Indirect_Literal Discrete,0xcd8,{0x00000000, 0x4f2f0501}
0dc3 010f | | Execute Exception,Equal
0dc4 6820 |h | Jump_Zero 0xde5
0dc5 0092 0e17 | | Action Push_String_Extended,0xe17 ; "Assert failure in test"
; Debug Table 0x15.0xd = 0xdc5,0xe
0dc7 e20f | | Load 0x1,0xf
0dc8 00e0 | | Load_Encached Standard_Cache
0dc9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0dca 01cc | | Execute Vector,Catenate
0dcb 0092 0e18 | | Action Push_String_Extended,0xe18 ; " for tape unit"
0dcd 01cc | | Execute Vector,Catenate
0dce e210 | | Load 0x1,0x10
0dcf 00e0 | | Load_Encached Standard_Cache
0dd0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0dd1 01cc | | Execute Vector,Catenate
0dd2 8006 | | Call 0x0,0x6
0dd3 0092 0e19 | | Action Push_String_Extended,0xe19 ; "Delaying 5 seconds, then starting next test"
; Debug Table 0x15.0xe = 0xdd3,0xf
0dd5 8006 | | Call 0x0,0x6
0dd6 6011 |` | Indirect_Literal Discrete,0xde8,{0x00000000, 0x00028000} ; Debug Table 0x15.0xf = 0xdd6,0x10
0dd7 00ba | | Action Initiate_Delay
0dd8 e212 | | Load 0x1,0x12 ; Debug Table 0x15.0x10 = 0xdd8,0x11
0dd9 4800 |H | Short_Literal 0x0
0dda e210 | | Load 0x1,0x10
0ddb e004 | | Load 0x0,0x4
0ddc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ddd 00d1 | | Pop_Control Pop_Count_1
0dde e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x11 = 0xdde,0x12
0ddf 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0de0 e210 | | Load 0x1,0x10
0de1 e004 | | Load 0x0,0x4
0de2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0de3 c213 | | Store 0x1,0x13
0de4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0de5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x12 = 0xde5,0x13
0de6 0101 | | Execute Exception,Reraise
0de7 0000 | | .XXX[0x1]
0de8 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0dec 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0df0 ; --------------------------------------------------------------------------------------
0df0 ; STRING TABLE
0df0 ; --------------------------------------------------------------------------------------
0df0 0056 | V | .STRTAB 0x0056->0x0e1b ; "Tape Tester"
0df1 005f | _ | .STRTAB 0x005f->0x0e20 ; "Assertion failure terminated test"
0df2 007e | ~ | .STRTAB 0x007e->0x0e31 ; "Unhandled Exception "
0df3 0090 | | .STRTAB 0x0090->0x0e3b ; " terminated test."
0df4 009f | | .STRTAB 0x009f->0x0e43 ; "Tape"
0df5 00a1 | | .STRTAB 0x00a1->0x0e45 ; " is not on line, will retry."
0df6 00bb | | .STRTAB 0x00bb->0x0e53 ; "Block length read /= block length written"
0df7 00e2 | | .STRTAB 0x00e2->0x0e68 ; "Data read /= data written"
0df8 00f9 | | .STRTAB 0x00f9->0x0e74 ; "Tape positioning failure"
0df9 010f | | .STRTAB 0x010f->0x0e80 ; "Assert Failure"
0dfa 011b | | .STRTAB 0x011b->0x0e87 ; "This program consists of 8 separate tests, 1 through 8."
0dfb 0150 | P | .STRTAB 0x0150->0x0ea3 ; "Test 1 is a start stop R/W test of minimal block length."
0dfc 0186 | | .STRTAB 0x0186->0x0ebf ; "Test 2 is a streaming R/W test of minimal block length."
0dfd 01bb | | .STRTAB 0x01bb->0x0eda ; "Test 3 is a streaming write, start stop read test with"
0dfe 01ef | | .STRTAB 0x01ef->0x0ef5 ; " repositioning, record skipping and reverse reading."
0dff 0227 | ' | .STRTAB 0x0227->0x0f12 ; "Test 4 is a maximum block length streaming R/W test with no checking"
0e00 0269 | i | .STRTAB 0x0269->0x0f34 ; " of data read. This test writes worst case data patterns."
0e01 02a7 | | .STRTAB 0x02a7->0x0f54 ; "Test 5 is a maximum block start stop R/W test."
0e02 02d3 | | .STRTAB 0x02d3->0x0f6b ; "Test 6 is a maximum block length streaming R/W test checking all"
0e03 0311 | | .STRTAB 0x0311->0x0f8b ; " read data for correctness."
0e04 0330 | 0 | .STRTAB 0x0330->0x0f9c ; "Test 7 is a maximum block length streaming R/W test with only"
0e05 036b | k | .STRTAB 0x036b->0x0fba ; " partial data checking."
0e06 0387 | | .STRTAB 0x0387->0x0fc9 ; "Test 8 is a jostle test and takes a very long time."
0e07 03b8 | | .STRTAB 0x03b8->0x0fe3 ; "First pass is abbreviated, subsequent passes will take longer."
0e08 03f4 | | .STRTAB 0x03f4->0x1002 ; " "
0e09 03f3 | | .STRTAB 0x03f3->0x1002 ; "Select the test you want by number, or 0 to run them all in order :"
0e0a 0434 | 4 | .STRTAB 0x0434->0x1024 ; "Do you want to see test descriptions? [Y] :"
0e0b 045d | ] | .STRTAB 0x045d->0x1039 ; "Unit "
0e0c 0460 | ` | .STRTAB 0x0460->0x103c ; ": which test? (0..8) :"
0e0d 0474 | t | .STRTAB 0x0474->0x1047 ; "=== End of Pass"
0e0e 0481 | | .STRTAB 0x0481->0x104e ; " for unit number"
0e0f 048f | | .STRTAB 0x048f->0x1056 ; "unhandled exception "
0e10 04a1 | | .STRTAB 0x04a1->0x1060 ; " in test"
0e11 04a7 | | .STRTAB 0x04a7->0x1064 ; " for unit"
0e12 04ae | | .STRTAB 0x04ae->0x1069 ; "Beginning test"
0e13 04ba | | .STRTAB 0x04ba->0x1070 ; " unit number"
0e14 04c4 | | .STRTAB 0x04c4->0x1076 ; "Invalid internal test number: aborting"
0e15 04e8 | | .STRTAB 0x04e8->0x1089 ; "Test"
0e16 04ea | | .STRTAB 0x04ea->0x108b ; " done."
0e17 04ee | | .STRTAB 0x04ee->0x108e ; "Assert failure in test"
0e18 0502 | | .STRTAB 0x0502->0x1099 ; " for tape unit"
0e19 050e | | .STRTAB 0x050e->0x10a0 ; "Delaying 5 seconds, then starting next test"
0e1a 0537 | 7 | .STREND 0x0537->0x10b5
0e1b 5461 7065 |Tape| .STRTAB_STRINGS
10b6 0000 0000 | | .XXX[0x2]
10b8 ; --------------------------------------------------------------------------------------
10b8 ; Debug Table
10b8 ; --------------------------------------------------------------------------------------
10b8 0003 0016 | | .CONST 0x0003,0x0016
10ba 000b 116a | j| .DEBUG 0x000b,0x116a,0x8000,0x0000,0x004f,0x2ee5,0x0000,0x0005
10c2 001b 116c | l| .DEBUG 0x001b,0x116c,0xa801,0x0002,0x004f,0x2ee5,0x0000,0x0005
10ca 00ab 11a6 | | .DEBUG 0x00ab,0x11a6,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0044
10d2 00b3 11ac | | .DEBUG 0x00b3,0x11ac,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0059
10da 00c3 11b2 | | .DEBUG 0x00c3,0x11b2,0x0801,0x0002,0x004f,0x2f05,0x0000,0x006e
10e2 00cb 11b6 | | .DEBUG 0x00cb,0x11b6,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0081
10ea 00fb 11cc | | .DEBUG 0x00fb,0x11cc,0x0801,0x0002,0x004f,0x2f05,0x0000,0x00d2
10f2 01e3 122c | ,| .DEBUG 0x01e3,0x122c,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0268
10fa 033b 12bc | ; | .DEBUG 0x033b,0x12bc,0x0801,0x0002,0x004f,0x2f05,0x0000,0x04ca
1102 058b 13b6 | | .DEBUG 0x058b,0x13b6,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0905
110a 0683 1420 | | .DEBUG 0x0683,0x1420,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0ad2
1112 0773 1486 | s | .DEBUG 0x0773,0x1486,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0c88
111a 08cb 1518 | | .DEBUG 0x08cb,0x1518,0x0801,0x0002,0x004f,0x2f05,0x0000,0x0efe
1122 0a1b 15a8 | | .DEBUG 0x0a1b,0x15a8,0x0801,0x0002,0x004f,0x2f05,0x0000,0x1177
112a 0c23 1652 | # R| .DEBUG 0x0c23,0x1652,0x0801,0x0002,0x004f,0x2f05,0x0000,0x168f
1132 0c5b 1674 | [ t| .DEBUG 0x0c5b,0x1674,0x0802,0x0002,0x004f,0x2f05,0x0000,0x16d7
113a 0c7b 167a | { z| .DEBUG 0x0c7b,0x167a,0x0804,0x0002,0x004f,0x2f05,0x0000,0x1779
1142 0cc3 168c | | .DEBUG 0x0cc3,0x168c,0x0805,0x0002,0x004f,0x2f05,0x0000,0x171f
114a 0ce3 168e | | .DEBUG 0x0ce3,0x168e,0x0800,0x0000,0x004f,0x2f05,0x0000,0x14d0
1152 0ce8 1690 | | .DEBUG 0x0ce8,0x1690,0x0800,0x0000,0x004f,0x2f05,0x0000,0x14eb
115a 0d6b 16c2 | k | .DEBUG 0x0d6b,0x16c2,0x0003,0x0000,0x004f,0x2f05,0x0000,0x1533
1162 0d7b 16ca | { | .DEBUG 0x0d7b,0x16ca,0x0004,0x0000,0x004f,0x2f05,0x0000,0x161b
116a ; --------------------------------------------------------------------------------------
116a ; Debug3 Subtable 0x0
116a ; --------------------------------------------------------------------------------------
116a 0000 0000 | | .DBG3TAB 0x0000,0x0000
116c ; --------------------------------------------------------------------------------------
116c ; Debug3 Subtable 0x1
116c ; --------------------------------------------------------------------------------------
116c 0018 0004 | | .DBG3TAB 0x0018,0x0004
116e 001b ffff | | .CONST 0x001b,0xffff
1170 0020 fffe | | .CONST 0x0020,0xfffe
1172 0021 fffd | ! | .CONST 0x0021,0xfffd
1174 0022 fffc | " | .CONST 0x0022,0xfffc
1176 0024 fffb | $ | .CONST 0x0024,0xfffb
1178 0026 fffa | & | .CONST 0x0026,0xfffa
117a 0028 fff9 | ( | .CONST 0x0028,0xfff9
117c 002a fff8 | * | .CONST 0x002a,0xfff8
117e 002c fff7 | , | .CONST 0x002c,0xfff7
1180 002e fff6 | . | .CONST 0x002e,0xfff6
1182 0030 fff5 | 0 | .CONST 0x0030,0xfff5
1184 0032 fff4 | 2 | .CONST 0x0032,0xfff4
1186 0034 fff3 | 4 | .CONST 0x0034,0xfff3
1188 0036 fff2 | 6 | .CONST 0x0036,0xfff2
118a 0038 fff1 | 8 | .CONST 0x0038,0xfff1
118c 003a fff0 | : | .CONST 0x003a,0xfff0
118e 003c ffef | < | .CONST 0x003c,0xffef
1190 003e ffee | > | .CONST 0x003e,0xffee
1192 0042 ffed | B | .CONST 0x0042,0xffed
1194 0046 ffec | F | .CONST 0x0046,0xffec
1196 006f ffeb | o | .CONST 0x006f,0xffeb
1198 0074 ffea | t | .CONST 0x0074,0xffea
119a 0076 ffe9 | v | .CONST 0x0076,0xffe9
119c 0078 ffe8 | x | .CONST 0x0078,0xffe8
119e 0081 0001 | | .CONST 0x0081,0x0001
11a0 008d 0002 | | .CONST 0x008d,0x0002
11a2 0092 0003 | | .CONST 0x0092,0x0003
11a4 0098 0004 | | .CONST 0x0098,0x0004
11a6 ; --------------------------------------------------------------------------------------
11a6 ; Debug3 Subtable 0x2
11a6 ; --------------------------------------------------------------------------------------
11a6 0000 0002 | | .DBG3TAB 0x0000,0x0002
11a8 00ab 0001 | | .CONST 0x00ab,0x0001
11aa 00ad 0002 | | .CONST 0x00ad,0x0002
11ac ; --------------------------------------------------------------------------------------
11ac ; Debug3 Subtable 0x3
11ac ; --------------------------------------------------------------------------------------
11ac 0000 0002 | | .DBG3TAB 0x0000,0x0002
11ae 00b3 0001 | | .CONST 0x00b3,0x0001
11b0 00b7 0002 | | .CONST 0x00b7,0x0002
11b2 ; --------------------------------------------------------------------------------------
11b2 ; Debug3 Subtable 0x4
11b2 ; --------------------------------------------------------------------------------------
11b2 0000 0001 | | .DBG3TAB 0x0000,0x0001
11b4 00c3 0001 | | .CONST 0x00c3,0x0001
11b6 ; --------------------------------------------------------------------------------------
11b6 ; Debug3 Subtable 0x5
11b6 ; --------------------------------------------------------------------------------------
11b6 0002 0008 | | .DBG3TAB 0x0002,0x0008
11b8 00cb ffff | | .CONST 0x00cb,0xffff
11ba 00cc fffe | | .CONST 0x00cc,0xfffe
11bc 00cf 0001 | | .CONST 0x00cf,0x0001
11be 00d0 0002 | | .CONST 0x00d0,0x0002
11c0 00d8 0003 | | .CONST 0x00d8,0x0003
11c2 00df 0004 | | .CONST 0x00df,0x0004
11c4 00e9 0005 | | .CONST 0x00e9,0x0005
11c6 00ec 0007 | | .CONST 0x00ec,0x0007
11c8 00f1 0008 | | .CONST 0x00f1,0x0008
11ca 00f3 0009 | | .CONST 0x00f3,0x0009
11cc ; --------------------------------------------------------------------------------------
11cc ; Debug3 Subtable 0x6
11cc ; --------------------------------------------------------------------------------------
11cc 0006 0029 | )| .DBG3TAB 0x0006,0x0029
11ce 00fb ffff | | .CONST 0x00fb,0xffff
11d0 00fd fffe | | .CONST 0x00fd,0xfffe
11d2 0100 fffd | | .CONST 0x0100,0xfffd
11d4 0102 fffc | | .CONST 0x0102,0xfffc
11d6 0104 fffb | | .CONST 0x0104,0xfffb
11d8 0109 fffa | | .CONST 0x0109,0xfffa
11da 010e 0001 | | .CONST 0x010e,0x0001
11dc 0112 0002 | | .CONST 0x0112,0x0002
11de 0113 0003 | | .CONST 0x0113,0x0003
11e0 0126 0004 | & | .CONST 0x0126,0x0004
11e2 012c 0005 | , | .CONST 0x012c,0x0005
11e4 0130 0006 | 0 | .CONST 0x0130,0x0006
11e6 0134 0007 | 4 | .CONST 0x0134,0x0007
11e8 0138 0008 | 8 | .CONST 0x0138,0x0008
11ea 013b 0009 | ; | .CONST 0x013b,0x0009
11ec 0141 000a | A | .CONST 0x0141,0x000a
11ee 0147 000b | G | .CONST 0x0147,0x000b
11f0 014c 000c | L | .CONST 0x014c,0x000c
11f2 0150 000d | P | .CONST 0x0150,0x000d
11f4 0154 000e | T | .CONST 0x0154,0x000e
11f6 0158 000f | X | .CONST 0x0158,0x000f
11f8 015a 0010 | Z | .CONST 0x015a,0x0010
11fa 015d 0011 | ] | .CONST 0x015d,0x0011
11fc 0163 0012 | c | .CONST 0x0163,0x0012
11fe 0167 0013 | g | .CONST 0x0167,0x0013
1200 016b 0014 | k | .CONST 0x016b,0x0014
1202 016f 0015 | o | .CONST 0x016f,0x0015
1204 0174 0016 | t | .CONST 0x0174,0x0016
1206 0175 0017 | u | .CONST 0x0175,0x0017
1208 017b 0018 | { | .CONST 0x017b,0x0018
120a 017f 0019 | | .CONST 0x017f,0x0019
120c 0185 0022 | "| .CONST 0x0185,0x0022
120e 0188 001a | | .CONST 0x0188,0x001a
1210 018c 001b | | .CONST 0x018c,0x001b
1212 018f 001c | | .CONST 0x018f,0x001c
1214 01a3 001d | | .CONST 0x01a3,0x001d
1216 01a6 001e | | .CONST 0x01a6,0x001e
1218 01aa 001f | | .CONST 0x01aa,0x001f
121a 01ae 0020 | | .CONST 0x01ae,0x0020
121c 01b3 0021 | !| .CONST 0x01b3,0x0021
121e 01b9 0023 | #| .CONST 0x01b9,0x0023
1220 01bf 0024 | $| .CONST 0x01bf,0x0024
1222 01c3 0025 | %| .CONST 0x01c3,0x0025
1224 01c7 0026 | &| .CONST 0x01c7,0x0026
1226 01cb 0027 | '| .CONST 0x01cb,0x0027
1228 01cf 0028 | (| .CONST 0x01cf,0x0028
122a 01d5 0029 | )| .CONST 0x01d5,0x0029
122c ; --------------------------------------------------------------------------------------
122c ; Debug3 Subtable 0x7
122c ; --------------------------------------------------------------------------------------
122c 0006 0041 | A| .DBG3TAB 0x0006,0x0041
122e 01e3 ffff | | .CONST 0x01e3,0xffff
1230 01e5 fffe | | .CONST 0x01e5,0xfffe
1232 01e8 fffd | | .CONST 0x01e8,0xfffd
1234 01ea fffc | | .CONST 0x01ea,0xfffc
1236 01ec fffb | | .CONST 0x01ec,0xfffb
1238 01f1 fffa | | .CONST 0x01f1,0xfffa
123a 01f6 0001 | | .CONST 0x01f6,0x0001
123c 01f9 0002 | | .CONST 0x01f9,0x0002
123e 0201 0003 | | .CONST 0x0201,0x0003
1240 0205 0004 | | .CONST 0x0205,0x0004
1242 0209 0005 | | .CONST 0x0209,0x0005
1244 020d 0006 | | .CONST 0x020d,0x0006
1246 0212 0007 | | .CONST 0x0212,0x0007
1248 0213 0008 | | .CONST 0x0213,0x0008
124a 0226 0009 | & | .CONST 0x0226,0x0009
124c 022c 000a | , | .CONST 0x022c,0x000a
124e 0230 000b | 0 | .CONST 0x0230,0x000b
1250 0234 000c | 4 | .CONST 0x0234,0x000c
1252 0238 000d | 8 | .CONST 0x0238,0x000d
1254 023b 000e | ; | .CONST 0x023b,0x000e
1256 0241 000f | A | .CONST 0x0241,0x000f
1258 0247 0010 | G | .CONST 0x0247,0x0010
125a 024c 0011 | L | .CONST 0x024c,0x0011
125c 0250 0012 | P | .CONST 0x0250,0x0012
125e 0254 0013 | T | .CONST 0x0254,0x0013
1260 0258 0014 | X | .CONST 0x0258,0x0014
1262 025a 0015 | Z | .CONST 0x025a,0x0015
1264 025d 0016 | ] | .CONST 0x025d,0x0016
1266 0262 0017 | b | .CONST 0x0262,0x0017
1268 0266 0018 | f | .CONST 0x0266,0x0018
126a 026a 0019 | j | .CONST 0x026a,0x0019
126c 026e 001a | n | .CONST 0x026e,0x001a
126e 0270 001b | p | .CONST 0x0270,0x001b
1270 0273 001c | s | .CONST 0x0273,0x001c
1272 0279 001d | y | .CONST 0x0279,0x001d
1274 027d 001e | } | .CONST 0x027d,0x001e
1276 0281 001f | | .CONST 0x0281,0x001f
1278 0285 0020 | | .CONST 0x0285,0x0020
127a 0289 0021 | !| .CONST 0x0289,0x0021
127c 0291 0022 | "| .CONST 0x0291,0x0022
127e 0295 0023 | #| .CONST 0x0295,0x0023
1280 0299 0024 | $| .CONST 0x0299,0x0024
1282 029d 0025 | %| .CONST 0x029d,0x0025
1284 02a2 0026 | &| .CONST 0x02a2,0x0026
1286 02a3 0027 | '| .CONST 0x02a3,0x0027
1288 02a9 0028 | (| .CONST 0x02a9,0x0028
128a 02ad 0029 | )| .CONST 0x02ad,0x0029
128c 02b3 0032 | 2| .CONST 0x02b3,0x0032
128e 02b6 002a | *| .CONST 0x02b6,0x002a
1290 02ba 002b | +| .CONST 0x02ba,0x002b
1292 02bd 002c | ,| .CONST 0x02bd,0x002c
1294 02d2 002d | -| .CONST 0x02d2,0x002d
1296 02d5 002e | .| .CONST 0x02d5,0x002e
1298 02d9 002f | /| .CONST 0x02d9,0x002f
129a 02dd 0030 | 0| .CONST 0x02dd,0x0030
129c 02e2 0031 | 1| .CONST 0x02e2,0x0031
129e 02e8 0033 | 3| .CONST 0x02e8,0x0033
12a0 02ea 0034 | 4| .CONST 0x02ea,0x0034
12a2 02ed 0035 | 5| .CONST 0x02ed,0x0035
12a4 02f2 0036 | 6| .CONST 0x02f2,0x0036
12a6 02f6 0037 | 7| .CONST 0x02f6,0x0037
12a8 02fa 0038 | 8| .CONST 0x02fa,0x0038
12aa 02fe 0039 | 9| .CONST 0x02fe,0x0039
12ac 0300 003a | :| .CONST 0x0300,0x003a
12ae 0303 003b | ;| .CONST 0x0303,0x003b
12b0 0309 003c | <| .CONST 0x0309,0x003c
12b2 030d 003d | =| .CONST 0x030d,0x003d
12b4 0311 003e | >| .CONST 0x0311,0x003e
12b6 0315 003f | ?| .CONST 0x0315,0x003f
12b8 0319 0040 | @| .CONST 0x0319,0x0040
12ba 031f 0041 | A| .CONST 0x031f,0x0041
12bc ; --------------------------------------------------------------------------------------
12bc ; Debug3 Subtable 0x8
12bc ; --------------------------------------------------------------------------------------
12bc 0007 0075 | u| .DBG3TAB 0x0007,0x0075
12be 033b ffff | ; | .CONST 0x033b,0xffff
12c0 033d fffe | = | .CONST 0x033d,0xfffe
12c2 0340 fffd | @ | .CONST 0x0340,0xfffd
12c4 0342 fffc | B | .CONST 0x0342,0xfffc
12c6 0344 fffb | D | .CONST 0x0344,0xfffb
12c8 0345 fffa | E | .CONST 0x0345,0xfffa
12ca 034a fff9 | J | .CONST 0x034a,0xfff9
12cc 034f 0001 | O | .CONST 0x034f,0x0001
12ce 0353 0002 | S | .CONST 0x0353,0x0002
12d0 0356 0003 | V | .CONST 0x0356,0x0003
12d2 035e 0004 | ^ | .CONST 0x035e,0x0004
12d4 0362 0005 | b | .CONST 0x0362,0x0005
12d6 0366 0006 | f | .CONST 0x0366,0x0006
12d8 036a 0007 | j | .CONST 0x036a,0x0007
12da 036f 0008 | o | .CONST 0x036f,0x0008
12dc 0372 0009 | r | .CONST 0x0372,0x0009
12de 0380 000a | | .CONST 0x0380,0x000a
12e0 0386 000b | | .CONST 0x0386,0x000b
12e2 038a 000c | | .CONST 0x038a,0x000c
12e4 038e 000d | | .CONST 0x038e,0x000d
12e6 0392 000e | | .CONST 0x0392,0x000e
12e8 0399 000f | | .CONST 0x0399,0x000f
12ea 039e 0010 | | .CONST 0x039e,0x0010
12ec 03a2 0011 | | .CONST 0x03a2,0x0011
12ee 03a6 0012 | | .CONST 0x03a6,0x0012
12f0 03aa 0013 | | .CONST 0x03aa,0x0013
12f2 03ae 0014 | | .CONST 0x03ae,0x0014
12f4 03b3 0015 | | .CONST 0x03b3,0x0015
12f6 03b7 0016 | | .CONST 0x03b7,0x0016
12f8 03bb 0017 | | .CONST 0x03bb,0x0017
12fa 03bf 0018 | | .CONST 0x03bf,0x0018
12fc 03c6 0019 | | .CONST 0x03c6,0x0019
12fe 03cb 001a | | .CONST 0x03cb,0x001a
1300 03cf 001b | | .CONST 0x03cf,0x001b
1302 03d3 001c | | .CONST 0x03d3,0x001c
1304 03d7 001d | | .CONST 0x03d7,0x001d
1306 03db 001e | | .CONST 0x03db,0x001e
1308 03e1 001f | | .CONST 0x03e1,0x001f
130a 03e5 0020 | | .CONST 0x03e5,0x0020
130c 03e9 0021 | !| .CONST 0x03e9,0x0021
130e 03ed 0022 | "| .CONST 0x03ed,0x0022
1310 03f1 0023 | #| .CONST 0x03f1,0x0023
1312 03fa 0024 | $| .CONST 0x03fa,0x0024
1314 03fe 0025 | %| .CONST 0x03fe,0x0025
1316 0402 0026 | &| .CONST 0x0402,0x0026
1318 0406 0027 | '| .CONST 0x0406,0x0027
131a 0409 0028 | (| .CONST 0x0409,0x0028
131c 040e 0029 | )| .CONST 0x040e,0x0029
131e 040f 002a | *| .CONST 0x040f,0x002a
1320 0415 002b | +| .CONST 0x0415,0x002b
1322 0419 002c | ,| .CONST 0x0419,0x002c
1324 041d 002d | -| .CONST 0x041d,0x002d
1326 0421 002e | ! .| .CONST 0x0421,0x002e
1328 0430 002f | 0 /| .CONST 0x0430,0x002f
132a 0434 0030 | 4 0| .CONST 0x0434,0x0030
132c 043d 0031 | = 1| .CONST 0x043d,0x0031
132e 0441 0032 | A 2| .CONST 0x0441,0x0032
1330 0445 0033 | E 3| .CONST 0x0445,0x0033
1332 0448 0034 | H 4| .CONST 0x0448,0x0034
1334 044c 0035 | L 5| .CONST 0x044c,0x0035
1336 0450 0036 | P 6| .CONST 0x0450,0x0036
1338 0459 0037 | Y 7| .CONST 0x0459,0x0037
133a 045d 0038 | ] 8| .CONST 0x045d,0x0038
133c 0461 0039 | a 9| .CONST 0x0461,0x0039
133e 0465 003a | e :| .CONST 0x0465,0x003a
1340 046b 003e | k >| .CONST 0x046b,0x003e
1342 046e 003b | n ;| .CONST 0x046e,0x003b
1344 0471 003c | q <| .CONST 0x0471,0x003c
1346 0473 003d | s =| .CONST 0x0473,0x003d
1348 0478 003f | x ?| .CONST 0x0478,0x003f
134a 047d 0040 | } @| .CONST 0x047d,0x0040
134c 0486 0041 | A| .CONST 0x0486,0x0041
134e 048a 0042 | B| .CONST 0x048a,0x0042
1350 048e 0043 | C| .CONST 0x048e,0x0043
1352 0492 0044 | D| .CONST 0x0492,0x0044
1354 0495 0045 | E| .CONST 0x0495,0x0045
1356 0499 0046 | F| .CONST 0x0499,0x0046
1358 04a2 0047 | G| .CONST 0x04a2,0x0047
135a 04a6 0048 | H| .CONST 0x04a6,0x0048
135c 04aa 0049 | I| .CONST 0x04aa,0x0049
135e 04ae 004a | J| .CONST 0x04ae,0x004a
1360 04b1 004b | K| .CONST 0x04b1,0x004b
1362 04b5 004c | L| .CONST 0x04b5,0x004c
1364 04be 004d | M| .CONST 0x04be,0x004d
1366 04c2 004e | N| .CONST 0x04c2,0x004e
1368 04c6 004f | O| .CONST 0x04c6,0x004f
136a 04ca 0050 | P| .CONST 0x04ca,0x0050
136c 04cd 0051 | Q| .CONST 0x04cd,0x0051
136e 04d2 0052 | R| .CONST 0x04d2,0x0052
1370 04d3 0053 | S| .CONST 0x04d3,0x0053
1372 04d9 0054 | T| .CONST 0x04d9,0x0054
1374 04dd 0055 | U| .CONST 0x04dd,0x0055
1376 04e1 0056 | V| .CONST 0x04e1,0x0056
1378 04e5 0057 | W| .CONST 0x04e5,0x0057
137a 04f4 0058 | X| .CONST 0x04f4,0x0058
137c 04f8 0059 | Y| .CONST 0x04f8,0x0059
137e 0501 005a | Z| .CONST 0x0501,0x005a
1380 0505 005b | [| .CONST 0x0505,0x005b
1382 0509 005c | \| .CONST 0x0509,0x005c
1384 050c 005d | ]| .CONST 0x050c,0x005d
1386 0510 005e | ^| .CONST 0x0510,0x005e
1388 0516 0066 | f| .CONST 0x0516,0x0066
138a 0519 005f | _| .CONST 0x0519,0x005f
138c 0522 0060 | " `| .CONST 0x0522,0x0060
138e 0526 0061 | & a| .CONST 0x0526,0x0061
1390 052a 0062 | * b| .CONST 0x052a,0x0062
1392 052d 0063 | - c| .CONST 0x052d,0x0063
1394 0531 0064 | 1 d| .CONST 0x0531,0x0064
1396 0536 0065 | 6 e| .CONST 0x0536,0x0065
1398 053c 0067 | < g| .CONST 0x053c,0x0067
139a 0545 0068 | E h| .CONST 0x0545,0x0068
139c 0549 0069 | I i| .CONST 0x0549,0x0069
139e 054d 006a | M j| .CONST 0x054d,0x006a
13a0 0551 006b | Q k| .CONST 0x0551,0x006b
13a2 0554 006c | T l| .CONST 0x0554,0x006c
13a4 0558 006d | X m| .CONST 0x0558,0x006d
13a6 0561 006e | a n| .CONST 0x0561,0x006e
13a8 0565 006f | e o| .CONST 0x0565,0x006f
13aa 0569 0070 | i p| .CONST 0x0569,0x0070
13ac 056d 0071 | m q| .CONST 0x056d,0x0071
13ae 0570 0072 | p r| .CONST 0x0570,0x0072
13b0 0574 0073 | t s| .CONST 0x0574,0x0073
13b2 057a 0074 | z t| .CONST 0x057a,0x0074
13b4 0581 0075 | u| .CONST 0x0581,0x0075
13b6 ; --------------------------------------------------------------------------------------
13b6 ; Debug3 Subtable 0x9
13b6 ; --------------------------------------------------------------------------------------
13b6 0007 002d | -| .DBG3TAB 0x0007,0x002d
13b8 058b ffff | | .CONST 0x058b,0xffff
13ba 058d fffe | | .CONST 0x058d,0xfffe
13bc 058f fffd | | .CONST 0x058f,0xfffd
13be 0592 fffc | | .CONST 0x0592,0xfffc
13c0 0594 fffb | | .CONST 0x0594,0xfffb
13c2 0595 fffa | | .CONST 0x0595,0xfffa
13c4 059a fff9 | | .CONST 0x059a,0xfff9
13c6 059f 0001 | | .CONST 0x059f,0x0001
13c8 05a3 0002 | | .CONST 0x05a3,0x0002
13ca 05a4 0003 | | .CONST 0x05a4,0x0003
13cc 05b7 0004 | | .CONST 0x05b7,0x0004
13ce 05bd 0005 | | .CONST 0x05bd,0x0005
13d0 05c1 0006 | | .CONST 0x05c1,0x0006
13d2 05c5 0007 | | .CONST 0x05c5,0x0007
13d4 05c9 0008 | | .CONST 0x05c9,0x0008
13d6 05cc 0009 | | .CONST 0x05cc,0x0009
13d8 05d2 000a | | .CONST 0x05d2,0x000a
13da 05d8 000b | | .CONST 0x05d8,0x000b
13dc 05dc 000c | | .CONST 0x05dc,0x000c
13de 05e0 000d | | .CONST 0x05e0,0x000d
13e0 05e4 000e | | .CONST 0x05e4,0x000e
13e2 05e8 000f | | .CONST 0x05e8,0x000f
13e4 05ee 0010 | | .CONST 0x05ee,0x0010
13e6 05f2 0011 | | .CONST 0x05f2,0x0011
13e8 05f6 0012 | | .CONST 0x05f6,0x0012
13ea 05fa 0013 | | .CONST 0x05fa,0x0013
13ec 05fe 0014 | | .CONST 0x05fe,0x0014
13ee 0612 0015 | | .CONST 0x0612,0x0015
13f0 0618 0016 | | .CONST 0x0618,0x0016
13f2 061d 0017 | | .CONST 0x061d,0x0017
13f4 0621 0018 | ! | .CONST 0x0621,0x0018
13f6 0625 0019 | % | .CONST 0x0625,0x0019
13f8 0629 001a | ) | .CONST 0x0629,0x001a
13fa 062b 001b | + | .CONST 0x062b,0x001b
13fc 062e 001c | . | .CONST 0x062e,0x001c
13fe 0634 001d | 4 | .CONST 0x0634,0x001d
1400 0638 001e | 8 | .CONST 0x0638,0x001e
1402 063c 001f | < | .CONST 0x063c,0x001f
1404 0640 0020 | @ | .CONST 0x0640,0x0020
1406 0646 0021 | F !| .CONST 0x0646,0x0021
1408 064a 0022 | J "| .CONST 0x064a,0x0022
140a 064c 0023 | L #| .CONST 0x064c,0x0023
140c 064f 0024 | O $| .CONST 0x064f,0x0024
140e 0653 0025 | S %| .CONST 0x0653,0x0025
1410 0657 0026 | W &| .CONST 0x0657,0x0026
1412 065d 0027 | ] '| .CONST 0x065d,0x0027
1414 0661 0028 | a (| .CONST 0x0661,0x0028
1416 0665 0029 | e )| .CONST 0x0665,0x0029
1418 0669 002a | i *| .CONST 0x0669,0x002a
141a 066d 002b | m +| .CONST 0x066d,0x002b
141c 0673 002c | s ,| .CONST 0x0673,0x002c
141e 067a 002d | z -| .CONST 0x067a,0x002d
1420 ; --------------------------------------------------------------------------------------
1420 ; Debug3 Subtable 0xa
1420 ; --------------------------------------------------------------------------------------
1420 0007 002b | +| .DBG3TAB 0x0007,0x002b
1422 0683 ffff | | .CONST 0x0683,0xffff
1424 0685 fffe | | .CONST 0x0685,0xfffe
1426 0688 fffd | | .CONST 0x0688,0xfffd
1428 068a fffc | | .CONST 0x068a,0xfffc
142a 068c fffb | | .CONST 0x068c,0xfffb
142c 0691 fffa | | .CONST 0x0691,0xfffa
142e 0698 fff9 | | .CONST 0x0698,0xfff9
1430 069f 0001 | | .CONST 0x069f,0x0001
1432 06a3 0002 | | .CONST 0x06a3,0x0002
1434 06a4 0003 | | .CONST 0x06a4,0x0003
1436 06a9 0004 | | .CONST 0x06a9,0x0004
1438 06b8 0005 | | .CONST 0x06b8,0x0005
143a 06be 0006 | | .CONST 0x06be,0x0006
143c 06c2 0007 | | .CONST 0x06c2,0x0007
143e 06c7 0008 | | .CONST 0x06c7,0x0008
1440 06cb 0009 | | .CONST 0x06cb,0x0009
1442 06ce 000a | | .CONST 0x06ce,0x000a
1444 06d4 000b | | .CONST 0x06d4,0x000b
1446 06da 000c | | .CONST 0x06da,0x000c
1448 06df 000d | | .CONST 0x06df,0x000d
144a 06e3 000e | | .CONST 0x06e3,0x000e
144c 06e7 000f | | .CONST 0x06e7,0x000f
144e 06eb 0010 | | .CONST 0x06eb,0x0010
1450 06ed 0011 | | .CONST 0x06ed,0x0011
1452 06f0 0012 | | .CONST 0x06f0,0x0012
1454 06f6 0013 | | .CONST 0x06f6,0x0013
1456 06fa 0014 | | .CONST 0x06fa,0x0014
1458 06fe 0015 | | .CONST 0x06fe,0x0015
145a 0702 0016 | | .CONST 0x0702,0x0016
145c 0707 0017 | | .CONST 0x0707,0x0017
145e 0708 0018 | | .CONST 0x0708,0x0018
1460 070e 0019 | | .CONST 0x070e,0x0019
1462 0712 001a | | .CONST 0x0712,0x001a
1464 0718 0024 | $| .CONST 0x0718,0x0024
1466 071b 001b | | .CONST 0x071b,0x001b
1468 0720 001c | | .CONST 0x0720,0x001c
146a 0724 001d | $ | .CONST 0x0724,0x001d
146c 0729 001e | ) | .CONST 0x0729,0x001e
146e 0737 001f | 7 | .CONST 0x0737,0x001f
1470 073d 0020 | = | .CONST 0x073d,0x0020
1472 0741 0021 | A !| .CONST 0x0741,0x0021
1474 0745 0022 | E "| .CONST 0x0745,0x0022
1476 074a 0023 | J #| .CONST 0x074a,0x0023
1478 0750 0025 | P %| .CONST 0x0750,0x0025
147a 0756 0026 | V &| .CONST 0x0756,0x0026
147c 075a 0027 | Z '| .CONST 0x075a,0x0027
147e 075e 0028 | ^ (| .CONST 0x075e,0x0028
1480 0762 0029 | b )| .CONST 0x0762,0x0029
1482 0766 002a | f *| .CONST 0x0766,0x002a
1484 076c 002b | l +| .CONST 0x076c,0x002b
1486 ; --------------------------------------------------------------------------------------
1486 ; Debug3 Subtable 0xb
1486 ; --------------------------------------------------------------------------------------
1486 0007 0041 | A| .DBG3TAB 0x0007,0x0041
1488 0773 ffff | s | .CONST 0x0773,0xffff
148a 0775 fffe | u | .CONST 0x0775,0xfffe
148c 0778 fffd | x | .CONST 0x0778,0xfffd
148e 077a fffc | z | .CONST 0x077a,0xfffc
1490 077c fffb | | | .CONST 0x077c,0xfffb
1492 0781 fffa | | .CONST 0x0781,0xfffa
1494 0788 fff9 | | .CONST 0x0788,0xfff9
1496 078f 0001 | | .CONST 0x078f,0x0001
1498 0792 0002 | | .CONST 0x0792,0x0002
149a 079d 0003 | | .CONST 0x079d,0x0003
149c 07a1 0004 | | .CONST 0x07a1,0x0004
149e 07a5 0005 | | .CONST 0x07a5,0x0005
14a0 07a9 0006 | | .CONST 0x07a9,0x0006
14a2 07ae 0007 | | .CONST 0x07ae,0x0007
14a4 07af 0008 | | .CONST 0x07af,0x0008
14a6 07b4 0009 | | .CONST 0x07b4,0x0009
14a8 07c3 000a | | .CONST 0x07c3,0x000a
14aa 07c9 000b | | .CONST 0x07c9,0x000b
14ac 07cd 000c | | .CONST 0x07cd,0x000c
14ae 07d2 000d | | .CONST 0x07d2,0x000d
14b0 07d6 000e | | .CONST 0x07d6,0x000e
14b2 07d9 000f | | .CONST 0x07d9,0x000f
14b4 07df 0010 | | .CONST 0x07df,0x0010
14b6 07e5 0011 | | .CONST 0x07e5,0x0011
14b8 07ea 0012 | | .CONST 0x07ea,0x0012
14ba 07ee 0013 | | .CONST 0x07ee,0x0013
14bc 07f2 0014 | | .CONST 0x07f2,0x0014
14be 07f6 0015 | | .CONST 0x07f6,0x0015
14c0 07f8 0016 | | .CONST 0x07f8,0x0016
14c2 07fb 0017 | | .CONST 0x07fb,0x0017
14c4 0800 0018 | | .CONST 0x0800,0x0018
14c6 0804 0019 | | .CONST 0x0804,0x0019
14c8 0808 001a | | .CONST 0x0808,0x001a
14ca 080c 001b | | .CONST 0x080c,0x001b
14cc 080e 001c | | .CONST 0x080e,0x001c
14ce 0811 001d | | .CONST 0x0811,0x001d
14d0 0817 001e | | .CONST 0x0817,0x001e
14d2 081b 001f | | .CONST 0x081b,0x001f
14d4 081f 0020 | | .CONST 0x081f,0x0020
14d6 0823 0021 | # !| .CONST 0x0823,0x0021
14d8 0827 0022 | ' "| .CONST 0x0827,0x0022
14da 0832 0023 | 2 #| .CONST 0x0832,0x0023
14dc 0836 0024 | 6 $| .CONST 0x0836,0x0024
14de 083a 0025 | : %| .CONST 0x083a,0x0025
14e0 083e 0026 | > &| .CONST 0x083e,0x0026
14e2 0843 0027 | C '| .CONST 0x0843,0x0027
14e4 0844 0028 | D (| .CONST 0x0844,0x0028
14e6 084a 0029 | J )| .CONST 0x084a,0x0029
14e8 084e 002a | N *| .CONST 0x084e,0x002a
14ea 0854 0034 | T 4| .CONST 0x0854,0x0034
14ec 0857 002b | W +| .CONST 0x0857,0x002b
14ee 085c 002c | \ ,| .CONST 0x085c,0x002c
14f0 0860 002d | ` -| .CONST 0x0860,0x002d
14f2 0865 002e | e .| .CONST 0x0865,0x002e
14f4 0873 002f | s /| .CONST 0x0873,0x002f
14f6 0879 0030 | y 0| .CONST 0x0879,0x0030
14f8 087d 0031 | } 1| .CONST 0x087d,0x0031
14fa 0881 0032 | 2| .CONST 0x0881,0x0032
14fc 0886 0033 | 3| .CONST 0x0886,0x0033
14fe 088c 0035 | 5| .CONST 0x088c,0x0035
1500 0891 0036 | 6| .CONST 0x0891,0x0036
1502 0895 0037 | 7| .CONST 0x0895,0x0037
1504 0899 0038 | 8| .CONST 0x0899,0x0038
1506 089d 0039 | 9| .CONST 0x089d,0x0039
1508 089f 003a | :| .CONST 0x089f,0x003a
150a 08a2 003b | ;| .CONST 0x08a2,0x003b
150c 08a8 003c | <| .CONST 0x08a8,0x003c
150e 08ac 003d | =| .CONST 0x08ac,0x003d
1510 08b0 003e | >| .CONST 0x08b0,0x003e
1512 08b4 003f | ?| .CONST 0x08b4,0x003f
1514 08b8 0040 | @| .CONST 0x08b8,0x0040
1516 08be 0041 | A| .CONST 0x08be,0x0041
1518 ; --------------------------------------------------------------------------------------
1518 ; Debug3 Subtable 0xc
1518 ; --------------------------------------------------------------------------------------
1518 0007 0040 | @| .DBG3TAB 0x0007,0x0040
151a 08cb ffff | | .CONST 0x08cb,0xffff
151c 08cd fffe | | .CONST 0x08cd,0xfffe
151e 08d0 fffd | | .CONST 0x08d0,0xfffd
1520 08d2 fffc | | .CONST 0x08d2,0xfffc
1522 08d4 fffb | | .CONST 0x08d4,0xfffb
1524 08d9 fffa | | .CONST 0x08d9,0xfffa
1526 08e0 fff9 | | .CONST 0x08e0,0xfff9
1528 08e8 0001 | | .CONST 0x08e8,0x0001
152a 08ed 0002 | | .CONST 0x08ed,0x0002
152c 08f9 0003 | | .CONST 0x08f9,0x0003
152e 08fc 0004 | | .CONST 0x08fc,0x0004
1530 0907 0005 | | .CONST 0x0907,0x0005
1532 090b 0006 | | .CONST 0x090b,0x0006
1534 090f 0007 | | .CONST 0x090f,0x0007
1536 0913 0008 | | .CONST 0x0913,0x0008
1538 0918 0009 | | .CONST 0x0918,0x0009
153a 0919 000a | | .CONST 0x0919,0x000a
153c 0922 000b | " | .CONST 0x0922,0x000b
153e 0928 000c | ( | .CONST 0x0928,0x000c
1540 092c 000d | , | .CONST 0x092c,0x000d
1542 0931 000e | 1 | .CONST 0x0931,0x000e
1544 0935 000f | 5 | .CONST 0x0935,0x000f
1546 0938 0010 | 8 | .CONST 0x0938,0x0010
1548 093e 0011 | > | .CONST 0x093e,0x0011
154a 0944 0012 | D | .CONST 0x0944,0x0012
154c 0949 0013 | I | .CONST 0x0949,0x0013
154e 094d 0014 | M | .CONST 0x094d,0x0014
1550 0951 0015 | Q | .CONST 0x0951,0x0015
1552 0955 0016 | U | .CONST 0x0955,0x0016
1554 0957 0017 | W | .CONST 0x0957,0x0017
1556 095a 0018 | Z | .CONST 0x095a,0x0018
1558 095f 0019 | _ | .CONST 0x095f,0x0019
155a 0963 001a | c | .CONST 0x0963,0x001a
155c 0967 001b | g | .CONST 0x0967,0x001b
155e 096b 001c | k | .CONST 0x096b,0x001c
1560 096d 001d | m | .CONST 0x096d,0x001d
1562 0970 001e | p | .CONST 0x0970,0x001e
1564 0976 001f | v | .CONST 0x0976,0x001f
1566 097a 0020 | z | .CONST 0x097a,0x0020
1568 097e 0021 | ~ !| .CONST 0x097e,0x0021
156a 0982 0022 | "| .CONST 0x0982,0x0022
156c 0986 0023 | #| .CONST 0x0986,0x0023
156e 0991 0024 | $| .CONST 0x0991,0x0024
1570 0995 0025 | %| .CONST 0x0995,0x0025
1572 0999 0026 | &| .CONST 0x0999,0x0026
1574 099d 0027 | '| .CONST 0x099d,0x0027
1576 09a2 0028 | (| .CONST 0x09a2,0x0028
1578 09a3 0029 | )| .CONST 0x09a3,0x0029
157a 09a9 002a | *| .CONST 0x09a9,0x002a
157c 09ad 002b | +| .CONST 0x09ad,0x002b
157e 09b3 0032 | 2| .CONST 0x09b3,0x0032
1580 09b6 002c | ,| .CONST 0x09b6,0x002c
1582 09bb 002d | -| .CONST 0x09bb,0x002d
1584 09c6 002e | .| .CONST 0x09c6,0x002e
1586 09ca 002f | /| .CONST 0x09ca,0x002f
1588 09ce 0030 | 0| .CONST 0x09ce,0x0030
158a 09d3 0031 | 1| .CONST 0x09d3,0x0031
158c 09d9 0033 | 3| .CONST 0x09d9,0x0033
158e 09de 0034 | 4| .CONST 0x09de,0x0034
1590 09e2 0035 | 5| .CONST 0x09e2,0x0035
1592 09e6 0036 | 6| .CONST 0x09e6,0x0036
1594 09ea 0037 | 7| .CONST 0x09ea,0x0037
1596 09ec 0038 | 8| .CONST 0x09ec,0x0038
1598 09ef 0039 | 9| .CONST 0x09ef,0x0039
159a 09f5 003a | :| .CONST 0x09f5,0x003a
159c 09f9 003b | ;| .CONST 0x09f9,0x003b
159e 09fd 003c | <| .CONST 0x09fd,0x003c
15a0 0a01 003d | =| .CONST 0x0a01,0x003d
15a2 0a05 003e | >| .CONST 0x0a05,0x003e
15a4 0a0b 003f | ?| .CONST 0x0a0b,0x003f
15a6 0a12 0040 | @| .CONST 0x0a12,0x0040
15a8 ; --------------------------------------------------------------------------------------
15a8 ; Debug3 Subtable 0xd
15a8 ; --------------------------------------------------------------------------------------
15a8 000e 0046 | F| .DBG3TAB 0x000e,0x0046
15aa 0a1b ffff | | .CONST 0x0a1b,0xffff
15ac 0a1d fffe | | .CONST 0x0a1d,0xfffe
15ae 0a20 fffd | | .CONST 0x0a20,0xfffd
15b0 0a22 fffc | " | .CONST 0x0a22,0xfffc
15b2 0a24 fffb | $ | .CONST 0x0a24,0xfffb
15b4 0a29 fffa | ) | .CONST 0x0a29,0xfffa
15b6 0a2b fff9 | + | .CONST 0x0a2b,0xfff9
15b8 0a2d fff8 | - | .CONST 0x0a2d,0xfff8
15ba 0a32 fff7 | 2 | .CONST 0x0a32,0xfff7
15bc 0a37 fff6 | 7 | .CONST 0x0a37,0xfff6
15be 0a3d fff5 | = | .CONST 0x0a3d,0xfff5
15c0 0a47 fff4 | G | .CONST 0x0a47,0xfff4
15c2 0a53 fff3 | S | .CONST 0x0a53,0xfff3
15c4 0a7f fff2 | | .CONST 0x0a7f,0xfff2
15c6 0aac 0001 | | .CONST 0x0aac,0x0001
15c8 0ab0 0002 | | .CONST 0x0ab0,0x0002
15ca 0ac1 0003 | | .CONST 0x0ac1,0x0003
15cc 0ac9 0004 | | .CONST 0x0ac9,0x0004
15ce 0acc 0005 | | .CONST 0x0acc,0x0005
15d0 0acf 0006 | | .CONST 0x0acf,0x0006
15d2 0ade 0007 | | .CONST 0x0ade,0x0007
15d4 0af1 0008 | | .CONST 0x0af1,0x0008
15d6 0af4 0009 | | .CONST 0x0af4,0x0009
15d8 0b05 000a | | .CONST 0x0b05,0x000a
15da 0b1e 000b | | .CONST 0x0b1e,0x000b
15dc 0b21 000c | ! | .CONST 0x0b21,0x000c
15de 0b28 000d | ( | .CONST 0x0b28,0x000d
15e0 0b2c 000e | , | .CONST 0x0b2c,0x000e
15e2 0b30 000f | 0 | .CONST 0x0b30,0x000f
15e4 0b34 0010 | 4 | .CONST 0x0b34,0x0010
15e6 0b39 0011 | 9 | .CONST 0x0b39,0x0011
15e8 0b3a 0012 | : | .CONST 0x0b3a,0x0012
15ea 0b40 0013 | @ | .CONST 0x0b40,0x0013
15ec 0b44 0014 | D | .CONST 0x0b44,0x0014
15ee 0b49 0015 | I | .CONST 0x0b49,0x0015
15f0 0b4d 0016 | M | .CONST 0x0b4d,0x0016
15f2 0b50 0017 | P | .CONST 0x0b50,0x0017
15f4 0b57 0018 | W | .CONST 0x0b57,0x0018
15f6 0b5d 0019 | ] | .CONST 0x0b5d,0x0019
15f8 0b62 001a | b | .CONST 0x0b62,0x001a
15fa 0b66 001b | f | .CONST 0x0b66,0x001b
15fc 0b6a 001c | j | .CONST 0x0b6a,0x001c
15fe 0b6e 001d | n | .CONST 0x0b6e,0x001d
1600 0b70 001e | p | .CONST 0x0b70,0x001e
1602 0b73 001f | s | .CONST 0x0b73,0x001f
1604 0b78 0020 | x | .CONST 0x0b78,0x0020
1606 0b7c 0021 | | !| .CONST 0x0b7c,0x0021
1608 0b80 0022 | "| .CONST 0x0b80,0x0022
160a 0b84 0023 | #| .CONST 0x0b84,0x0023
160c 0b86 0024 | $| .CONST 0x0b86,0x0024
160e 0b89 0025 | %| .CONST 0x0b89,0x0025
1610 0b8f 0026 | &| .CONST 0x0b8f,0x0026
1612 0b93 0027 | '| .CONST 0x0b93,0x0027
1614 0b97 0028 | (| .CONST 0x0b97,0x0028
1616 0b9b 0029 | )| .CONST 0x0b9b,0x0029
1618 0b9f 002a | *| .CONST 0x0b9f,0x002a
161a 0ba6 002b | +| .CONST 0x0ba6,0x002b
161c 0baa 002c | ,| .CONST 0x0baa,0x002c
161e 0bae 002d | -| .CONST 0x0bae,0x002d
1620 0bb2 002e | .| .CONST 0x0bb2,0x002e
1622 0bb7 002f | /| .CONST 0x0bb7,0x002f
1624 0bb8 0030 | 0| .CONST 0x0bb8,0x0030
1626 0bbe 0031 | 1| .CONST 0x0bbe,0x0031
1628 0bc2 0032 | 2| .CONST 0x0bc2,0x0032
162a 0bc8 0039 | 9| .CONST 0x0bc8,0x0039
162c 0bcb 0033 | 3| .CONST 0x0bcb,0x0033
162e 0bd0 0034 | 4| .CONST 0x0bd0,0x0034
1630 0bd3 0035 | 5| .CONST 0x0bd3,0x0035
1632 0bd7 0036 | 6| .CONST 0x0bd7,0x0036
1634 0bdb 0037 | 7| .CONST 0x0bdb,0x0037
1636 0be0 0038 | 8| .CONST 0x0be0,0x0038
1638 0be6 003a | :| .CONST 0x0be6,0x003a
163a 0beb 003b | ;| .CONST 0x0beb,0x003b
163c 0bef 003c | <| .CONST 0x0bef,0x003c
163e 0bf3 003d | =| .CONST 0x0bf3,0x003d
1640 0bf7 003e | >| .CONST 0x0bf7,0x003e
1642 0bf9 003f | ?| .CONST 0x0bf9,0x003f
1644 0bfc 0040 | @| .CONST 0x0bfc,0x0040
1646 0c02 0041 | A| .CONST 0x0c02,0x0041
1648 0c06 0042 | B| .CONST 0x0c06,0x0042
164a 0c0a 0043 | C| .CONST 0x0c0a,0x0043
164c 0c0e 0044 | D| .CONST 0x0c0e,0x0044
164e 0c12 0045 | E| .CONST 0x0c12,0x0045
1650 0c18 0046 | F| .CONST 0x0c18,0x0046
1652 ; --------------------------------------------------------------------------------------
1652 ; Debug3 Subtable 0xe
1652 ; --------------------------------------------------------------------------------------
1652 0000 0010 | | .DBG3TAB 0x0000,0x0010
1654 0c23 0001 | # | .CONST 0x0c23,0x0001
1656 0c26 0002 | & | .CONST 0x0c26,0x0002
1658 0c29 0003 | ) | .CONST 0x0c29,0x0003
165a 0c2c 0004 | , | .CONST 0x0c2c,0x0004
165c 0c2f 0005 | / | .CONST 0x0c2f,0x0005
165e 0c32 0006 | 2 | .CONST 0x0c32,0x0006
1660 0c35 0007 | 5 | .CONST 0x0c35,0x0007
1662 0c38 0008 | 8 | .CONST 0x0c38,0x0008
1664 0c3b 0009 | ; | .CONST 0x0c3b,0x0009
1666 0c3e 000a | > | .CONST 0x0c3e,0x000a
1668 0c41 000b | A | .CONST 0x0c41,0x000b
166a 0c44 000c | D | .CONST 0x0c44,0x000c
166c 0c47 000d | G | .CONST 0x0c47,0x000d
166e 0c4a 000e | J | .CONST 0x0c4a,0x000e
1670 0c4d 000f | M | .CONST 0x0c4d,0x000f
1672 0c50 0010 | P | .CONST 0x0c50,0x0010
1674 ; --------------------------------------------------------------------------------------
1674 ; Debug3 Subtable 0xf
1674 ; --------------------------------------------------------------------------------------
1674 0001 0001 | | .DBG3TAB 0x0001,0x0001
1676 0c5b ffff | [ | .CONST 0x0c5b,0xffff
1678 0c5f 0001 | _ | .CONST 0x0c5f,0x0001
167a ; --------------------------------------------------------------------------------------
167a ; Debug3 Subtable 0x10
167a ; --------------------------------------------------------------------------------------
167a 0001 0007 | | .DBG3TAB 0x0001,0x0007
167c 0c7b ffff | { | .CONST 0x0c7b,0xffff
167e 0c88 0001 | | .CONST 0x0c88,0x0001
1680 0c8b 0002 | | .CONST 0x0c8b,0x0002
1682 0c8f 0003 | | .CONST 0x0c8f,0x0003
1684 0c94 0004 | | .CONST 0x0c94,0x0004
1686 0c98 0005 | | .CONST 0x0c98,0x0005
1688 0c99 0006 | | .CONST 0x0c99,0x0006
168a 0cb1 0007 | | .CONST 0x0cb1,0x0007
168c ; --------------------------------------------------------------------------------------
168c ; Debug3 Subtable 0x11
168c ; --------------------------------------------------------------------------------------
168c 0000 0000 | | .DBG3TAB 0x0000,0x0000
168e ; --------------------------------------------------------------------------------------
168e ; Debug3 Subtable 0x12
168e ; --------------------------------------------------------------------------------------
168e 0000 0000 | | .DBG3TAB 0x0000,0x0000
1690 ; --------------------------------------------------------------------------------------
1690 ; Debug3 Subtable 0x13
1690 ; --------------------------------------------------------------------------------------
1690 0006 0012 | | .DBG3TAB 0x0006,0x0012
1692 0ce8 ffff | | .CONST 0x0ce8,0xffff
1694 0cea fffe | | .CONST 0x0cea,0xfffe
1696 0cec fffd | | .CONST 0x0cec,0xfffd
1698 0cee fffc | | .CONST 0x0cee,0xfffc
169a 0cf3 fffb | | .CONST 0x0cf3,0xfffb
169c 0cf6 fffa | | .CONST 0x0cf6,0xfffa
169e 0d02 0001 | | .CONST 0x0d02,0x0001
16a0 0d05 0003 | | .CONST 0x0d05,0x0003
16a2 0d09 0004 | | .CONST 0x0d09,0x0004
16a4 0d0c 0005 | | .CONST 0x0d0c,0x0005
16a6 0d0f 0006 | | .CONST 0x0d0f,0x0006
16a8 0d11 0007 | | .CONST 0x0d11,0x0007
16aa 0d14 0008 | | .CONST 0x0d14,0x0008
16ac 0d17 0009 | | .CONST 0x0d17,0x0009
16ae 0d20 000a | | .CONST 0x0d20,0x000a
16b0 0d21 000b | ! | .CONST 0x0d21,0x000b
16b2 0d22 000c | " | .CONST 0x0d22,0x000c
16b4 0d24 000d | $ | .CONST 0x0d24,0x000d
16b6 0d27 000e | ' | .CONST 0x0d27,0x000e
16b8 0d2d 000f | - | .CONST 0x0d2d,0x000f
16ba 0d3b 0010 | ; | .CONST 0x0d3b,0x0010
16bc 0d40 0011 | @ | .CONST 0x0d40,0x0011
16be 0d46 0012 | F | .CONST 0x0d46,0x0012
16c0 0d4e 0013 | N | .CONST 0x0d4e,0x0013
16c2 ; --------------------------------------------------------------------------------------
16c2 ; Debug3 Subtable 0x14
16c2 ; --------------------------------------------------------------------------------------
16c2 0000 0003 | | .DBG3TAB 0x0000,0x0003
16c4 0d6b 0001 | k | .CONST 0x0d6b,0x0001
16c6 0d6d 0002 | m | .CONST 0x0d6d,0x0002
16c8 0d6f 0003 | o | .CONST 0x0d6f,0x0003
16ca ; --------------------------------------------------------------------------------------
16ca ; Debug3 Subtable 0x15
16ca ; --------------------------------------------------------------------------------------
16ca 0000 0013 | | .DBG3TAB 0x0000,0x0013
16cc 0d7b 0001 | { | .CONST 0x0d7b,0x0001
16ce 0d89 0002 | | .CONST 0x0d89,0x0002
16d0 0d94 0003 | | .CONST 0x0d94,0x0003
16d2 0d97 0004 | | .CONST 0x0d97,0x0004
16d4 0d99 0005 | | .CONST 0x0d99,0x0005
16d6 0d9c 0006 | | .CONST 0x0d9c,0x0006
16d8 0d9f 0007 | | .CONST 0x0d9f,0x0007
16da 0da2 0008 | | .CONST 0x0da2,0x0008
16dc 0da5 0009 | | .CONST 0x0da5,0x0009
16de 0da8 000a | | .CONST 0x0da8,0x000a
16e0 0dab 000b | | .CONST 0x0dab,0x000b
16e2 0dae 000c | | .CONST 0x0dae,0x000c
16e4 0db0 000d | | .CONST 0x0db0,0x000d
16e6 0dc5 000e | | .CONST 0x0dc5,0x000e
16e8 0dd3 000f | | .CONST 0x0dd3,0x000f
16ea 0dd6 0010 | | .CONST 0x0dd6,0x0010
16ec 0dd8 0011 | | .CONST 0x0dd8,0x0011
16ee 0dde 0012 | | .CONST 0x0dde,0x0012
16f0 0de5 0013 | | .CONST 0x0de5,0x0013
16f2 0000 0000 | | .BLANK 0000[0x10e]