|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 10240 (0x2800) Types: SEG Notes: 5811_R1K_CODE Names: »462867.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »462867.SEG« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »462867.SEG« └─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288 └─ ⟦this⟧ »462867.SEG« └─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5 └─ ⟦this⟧ »462867.SEG« └─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000 └─ ⟦this⟧ »462867.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0cf8 | | .CONST 0x0cf8 ; 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 0009 | | .CONST 0x0009 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0042 | B | .CONST 0x0042 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0017 | | .CONST 0x0017 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 ; Debug Table 0x0 = .DEBUG 0x000b,0x0e2a,0x8000,0x0000,0x0036,0x56d4,0x0000,0x0009 ; Debug Table 0x0.0x0 = 0xb,0xffff ; Debug Table 0x0.0x1 = 0xb,0xfffe ; Debug Table 0x0.0x2 = 0xb,0xfffd 000c 4801 |H | Short_Literal 0x1 000d 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3 = 0x10,0xfffc 0011 4807 |H | Short_Literal 0x7 0012 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call 0014 03fe | | Declare_Type Discrete,Defined,Visible 0015 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x4 = 0x15,0xfffb 0016 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0017 0129 | ) | Execute Any,Make_Visible 0018 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x5 = 0x18,0xfffa 0019 4803 |H | Short_Literal 0x3 001a e20e | | Load 0x1,0xe 001b 03f9 | | Declare_Type Discrete,Constrained,Visible 001c 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x6 = 0x1c,0xfff9 001d 4803 |H | Short_Literal 0x3 001e e20e | | Load 0x1,0xe 001f 03f9 | | Declare_Type Discrete,Constrained,Visible 0020 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x7 = 0x20,0xfff8 0021 4805 |H | Short_Literal 0x5 0022 e20e | | Load 0x1,0xe 0023 03f9 | | Declare_Type Discrete,Constrained,Visible 0024 4802 |H | Short_Literal 0x2 ; Debug Table 0x0.0x8 = 0x24,0xfff7 0025 4806 |H | Short_Literal 0x6 0026 e20e | | Load 0x1,0xe 0027 03f9 | | Declare_Type Discrete,Constrained,Visible 0028 4802 |H | Short_Literal 0x2 ; Debug Table 0x0.0x9 = 0x28,0xfff6 0029 4805 |H | Short_Literal 0x5 002a e20e | | Load 0x1,0xe 002b 03f9 | | Declare_Type Discrete,Constrained,Visible 002c 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xa = 0x2c,0xfff5 002d 604e |`N | Indirect_Literal Discrete,0x7c,{0x00071013, 0x0000adb0} ; 0x71013 = COMM 002e 02a0 | | Declare_Subprogram Null_Subprogram 002f 038f | | Declare_Type Package,Defined,Visible 0030 0386 | | Declare_Variable Package,Visible 0031 4809 |H | Short_Literal 0x9 ; Debug Table 0x0.0xb = 0x31,0xfff4 0032 6045 |`E | Indirect_Literal Discrete,0x78,{0x00071013, 0x00000830} ; 0x71013 = COMM 0033 02a0 | | Declare_Subprogram Null_Subprogram 0034 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 0035 00bf | | Action Accept_Activation 0036 e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x0036,0x0e44,0x8000,0x0000,0x0036,0x56e4,0x0000,0x0005 ; Debug Table 0x1.0x0 = 0x36,0xffff 0037 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0038 e215 | | Load 0x1,0x15 ; Debug Table 0x1.0x1 = 0x38,0xfffe ; Debug Table 0x1.0x2 = 0x38,0xfffd ; Debug Table 0x1.0x3 = 0x38,0xfffc ; Debug Table 0x1.0x4 = 0x38,0xfffb ; Debug Table 0x1.0x5 = 0x38,0xfffa ; Debug Table 0x1.0x6 = 0x38,0xfff9 ; Debug Table 0x1.0x7 = 0x38,0xfff8 ; Debug Table 0x1.0x8 = 0x38,0xfff7 ; Debug Table 0x1.0x9 = 0x38,0xfff6 ; Debug Table 0x1.0xa = 0x38,0xfff5 0039 020f | | Execute Module,Activate 003a 00b6 | | Action Make_Scope ; Debug Table 0x1.0xb = 0x3a,0xfff4 003b e217 | | Load 0x1,0x17 003c e001 | | Load 0x0,0x1 003d 4803 |H | Short_Literal 0x3 003e e216 | | Load 0x1,0x16 003f 020e | | Execute Module,Augment_Imports 0040 e216 | | Load 0x1,0x16 0041 020d | | Execute Module,Elaborate 0042 BODY_0008: 0042 00bc | | Action Signal_Activated 0043 00bb | | Action Signal_Completion 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x004b,0x0e5e,0x0005,0x0000,0x0036,0x56d4,0x0000,0x0017 004c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 004d 7802 |x | Jump 0x50 ; case 0x1 004e 7805 |x | Jump 0x54 ; case 0x2 004f 7809 |x | Jump 0x59 ; case 0x3 0050 e5ff | | Load 0x2,-0x1 0051 0091 0afc | | Action Push_String_Extended_Indexed,0xafc ; "READ" 0053 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0054 e5fe | | Load 0x2,-0x2 0055 e5ff | | Load 0x2,-0x1 0056 00e0 | | Load_Encached Standard_Cache 0057 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0058 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0059 e5ff | | Load 0x2,-0x1 005a 00e0 | | Load_Encached Standard_Cache 005b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 005c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 005d 0000 0000 | | .XXX[0x3] 005f 0000 | | 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0063 | c | .CONST 0x0063 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0001 | | .CONST 0x0001 ; Number of locals 0063 BODY_0060: 0063 INIT_0060: 0063 4603 |F | Jump_Case 0x4 ; Debug Table 0x3 = .DEBUG 0x0063,0x0e60,0x0005,0x0000,0x0036,0x56d4,0x0000,0x001d 0064 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0065 7802 |x | Jump 0x68 ; case 0x1 0066 7805 |x | Jump 0x6c ; case 0x2 0067 7809 |x | Jump 0x71 ; case 0x3 0068 e5ff | | Load 0x2,-0x1 0069 0091 0afe | | Action Push_String_Extended_Indexed,0xafe ; "CHANNEL_ALREADY_OPEN" 006b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 006c e5fe | | Load 0x2,-0x2 006d e5ff | | Load 0x2,-0x1 006e 00e0 | | Load_Encached Standard_Cache 006f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0070 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0071 e5ff | | Load 0x2,-0x1 0072 00e0 | | Load_Encached Standard_Cache 0073 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0074 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0075 0000 0000 | | .XXX[0x3] 0077 0000 | | 0078 0007 1013 | | .LITERAL {0x00071013, 0x00000830} 007c 0007 1013 | | .LITERAL {0x00071013, 0x0000adb0} 0080 0128 0004 | ( | .XXX[0x3] 0082 0040 | @ | 0083 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4 = .DEBUG 0x0083,0x0e62,0x4000,0x0000,0x0036,0x56d4,0x0000,0x008b ; Debug Table 0x4.0x0 = 0x83,0xffff 0085 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x1 = 0x85,0xfffe 0087 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x2 = 0x87,0xfffd 0089 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x3 = 0x89,0xfffc 008b 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x4 = 0x8b,0xfffb 008d 029a 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x5 = 0x8d,0xfffa 008f 029a 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x6 = 0x8f,0xfff9 0091 029a 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x7 = 0x91,0xfff8 0093 00bf | | Action Accept_Activation 0094 4801 |H | Short_Literal 0x1 ; Debug Table 0x5 = .DEBUG 0x0094,0x0e74,0x4000,0x0000,0x0036,0x56e4,0x0000,0x00d4 ; Debug Table 0x5.0x0 = 0x94,0xffff ; Debug Table 0x5.0x1 = 0x94,0xfffe ; Debug Table 0x5.0x2 = 0x94,0xfffd ; Debug Table 0x5.0x3 = 0x94,0xfffc ; Debug Table 0x5.0x4 = 0x94,0xfffb ; Debug Table 0x5.0x5 = 0x94,0xfffa ; Debug Table 0x5.0x6 = 0x94,0xfff9 ; Debug Table 0x5.0x7 = 0x94,0xfff8 ; Debug Table 0x5.0x8 = 0x94,0xfff7 ; Debug Table 0x5.0x9 = 0x94,0xfff6 0095 4804 |H | Short_Literal 0x4 0096 e001 | | Load 0x0,0x1 0097 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0098 035b | [ | Declare_Type Array,Constrained 0099 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0xa = 0x99,0xfff5 009a 48fb |H | Short_Literal 0xfb 009b e001 | | Load 0x0,0x1 009c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 009d 035b | [ | Declare_Type Array,Constrained 009e e21e | | Load 0x1,0x1e ; Debug Table 0x5.0xb = 0x9e,0xfff4 009f e21f | | Load 0x1,0x1f 00a0 02a0 | | Declare_Subprogram Null_Subprogram 00a1 4802 |H | Short_Literal 0x2 00a2 032d | - | Declare_Type Record,Defined 00a3 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xc = 0xa3,0xfff3 00a4 4809 |H | Short_Literal 0x9 00a5 029f 064b | K| Declare_Subprogram INIT_0648,For_Call 00a7 03fd | | Declare_Type Discrete,Defined 00a8 e221 | ! | Load 0x1,0x21 ; Debug Table 0x5.0xd = 0xa8,0xfff2 00a9 0266 | f | Execute Discrete,Bounds 00aa e002 | | Load 0x0,0x2 00ab 02a0 | | Declare_Subprogram Null_Subprogram 00ac 4801 |H | Short_Literal 0x1 00ad 035d | ] | Declare_Type Array,Defined 00ae e222 | " | Load 0x1,0x22 ; Debug Table 0x5.0xe = 0xae,0xfff1 00af 0337 | 7 | Declare_Variable Array 00b0 e222 | " | Load 0x1,0x22 00b1 0337 | 7 | Declare_Variable Array 00b2 480f |H | Short_Literal 0xf 00b3 4800 |H | Short_Literal 0x0 00b4 e224 | $ | Load 0x1,0x24 00b5 01d6 | | Execute Vector,Field_Write 00b6 481e |H | Short_Literal 0x1e 00b7 4801 |H | Short_Literal 0x1 00b8 e224 | $ | Load 0x1,0x24 00b9 01d6 | | Execute Vector,Field_Write 00ba 482d |H- | Short_Literal 0x2d 00bb 4802 |H | Short_Literal 0x2 00bc e224 | $ | Load 0x1,0x24 00bd 01d6 | | Execute Vector,Field_Write 00be 483c |H< | Short_Literal 0x3c 00bf 4803 |H | Short_Literal 0x3 00c0 e224 | $ | Load 0x1,0x24 00c1 01d6 | | Execute Vector,Field_Write 00c2 484b |HK | Short_Literal 0x4b 00c3 4804 |H | Short_Literal 0x4 00c4 e224 | $ | Load 0x1,0x24 00c5 01d6 | | Execute Vector,Field_Write 00c6 485a |HZ | Short_Literal 0x5a 00c7 4805 |H | Short_Literal 0x5 00c8 e224 | $ | Load 0x1,0x24 00c9 01d6 | | Execute Vector,Field_Write 00ca 4869 |Hi | Short_Literal 0x69 00cb 4806 |H | Short_Literal 0x6 00cc e224 | $ | Load 0x1,0x24 00cd 01d6 | | Execute Vector,Field_Write 00ce 4878 |Hx | Short_Literal 0x78 00cf 4807 |H | Short_Literal 0x7 00d0 e224 | $ | Load 0x1,0x24 00d1 01d6 | | Execute Vector,Field_Write 00d2 4887 |H | Short_Literal 0x87 00d3 4808 |H | Short_Literal 0x8 00d4 e224 | $ | Load 0x1,0x24 00d5 01d6 | | Execute Vector,Field_Write 00d6 48a0 |H | Short_Literal 0xa0 00d7 4809 |H | Short_Literal 0x9 00d8 e224 | $ | Load 0x1,0x24 00d9 01d6 | | Execute Vector,Field_Write 00da e223 | # | Load 0x1,0x23 00db 01d4 | | Execute Vector,Structure_Write 00dc 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xf = 0xdc,0xfff0 00dd 4807 |H | Short_Literal 0x7 00de 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call 00e0 03fd | | Declare_Type Discrete,Defined 00e1 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x10 = 0xe1,0xffef 00e2 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x11 = 0xe2,0xffee 00e3 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x12 = 0xe3,0xffed 00e4 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e6 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x13 = 0xe6,0xffec 00e7 48fb |H | Short_Literal 0xfb 00e8 00e9 | | Load_Encached String_Cache 00e9 0334 | 4 | Declare_Variable Array,With_Constraint 00ea 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x14 = 0xea,0xffeb 00eb 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x15 = 0xeb,0xffea 00ec 48fb |H | Short_Literal 0xfb 00ed e001 | | Load 0x0,0x1 00ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ef 0334 | 4 | Declare_Variable Array,With_Constraint 00f0 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x16 = 0xf0,0xffe9 00f1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x17 = 0xf1,0xffe8 00f2 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x18 = 0xf2,0xffe7 00f3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x19 = 0xf3,0xffe6 00f4 029d 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call ; Debug Table 0x5.0x1a = 0xf4,0xffe5 00f6 029d 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call ; Debug Table 0x5.0x1b = 0xf6,0xffe4 00f8 029d 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call ; Debug Table 0x5.0x1c = 0xf8,0xffe3 00fa 029d 070b | | Declare_Subprogram INIT_0708,For_Outer_Call ; Debug Table 0x5.0x1d = 0xfa,0xffe2 00fc 029d 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call ; Debug Table 0x5.0x1e = 0xfc,0xffe1 00fe 029d 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call ; Debug Table 0x5.0x1f = 0xfe,0xffe0 0100 029d 079b | | Declare_Subprogram INIT_0798,For_Outer_Call ; Debug Table 0x5.0x20 = 0x100,0xffdf 0102 029d 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call ; Debug Table 0x5.0x21 = 0x102,0xffde 0104 029d 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call ; Debug Table 0x5.0x22 = 0x104,0xffdd 0106 029d 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call ; Debug Table 0x5.0x23 = 0x106,0xffdc 0108 029d 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call ; Debug Table 0x5.0x24 = 0x108,0xffdb 010a 029d 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call ; Debug Table 0x5.0x25 = 0x10a,0xffda 010c 029d 091b | | Declare_Subprogram INIT_0918,For_Outer_Call ; Debug Table 0x5.0x26 = 0x10c,0xffd9 010e 029d 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call ; Debug Table 0x5.0x27 = 0x10e,0xffd8 0110 029d 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call ; Debug Table 0x5.0x28 = 0x110,0xffd7 0112 029d 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call ; Debug Table 0x5.0x29 = 0x112,0xffd6 0114 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x5.0x2a = 0x114,0xffd5 0115 00c7 | | Action Elaborate_Subprogram 0116 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x5.0x2b = 0x116,0xffd4 0117 00c7 | | Action Elaborate_Subprogram 0118 029d 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call ; Debug Table 0x5.0x2c = 0x118,0xffd3 011a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x5.0x2d = 0x11a,0xffd2 011b 00c7 | | Action Elaborate_Subprogram 011c 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x5.0x2e = 0x11c,0xffd1 011d 00c7 | | Action Elaborate_Subprogram 011e 029d 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call ; Debug Table 0x5.0x2f = 0x11e,0xffd0 0120 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x5.0x30 = 0x120,0xffcf 0121 00c7 | | Action Elaborate_Subprogram 0122 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x5.0x31 = 0x122,0xffce 0123 00c7 | | Action Elaborate_Subprogram 0124 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x5.0x32 = 0x124,0xffcd 0125 00c7 | | Action Elaborate_Subprogram 0126 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x5.0x33 = 0x126,0xffcc 0127 00c7 | | Action Elaborate_Subprogram 0128 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x34 = 0x128,0x1 0129 a225 | % | Store_Unchecked 0x1,0x25 012a 00bc | | Action Signal_Activated 012b 00bb | | Action Signal_Completion 012c 0000 0000 | | .BLANK 0000[0x4] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0142 | B | .CONST 0x0142 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 000a | | .CONST 0x000a ; Number of locals 0133 INIT_0130: 0133 0092 0b18 | | Action Push_String_Extended,0xb18 ; "Aborted awaiting PUT - OPEN read" ; Debug Table 0x6 = .DEBUG 0x0133,0x0ee0,0x1001,0x0000,0x0036,0x56d4,0x0000,0x00e5 ; Debug Table 0x6.0x0 = 0x133,0xffff 0135 0092 0b19 | | Action Push_String_Extended,0xb19 ; "Aborted awaiting ACK - OPEN write" ; Debug Table 0x6.0x1 = 0x135,0xfffe 0137 0092 0b1a | | Action Push_String_Extended,0xb1a ; "Too many retries on OPEN" ; Debug Table 0x6.0x2 = 0x137,0xfffd 0139 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x3 = 0x139,0xfffc 013a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x4 = 0x13a,0xfffb 013b e224 | $ | Load 0x1,0x24 ; Debug Table 0x6.0x5 = 0x13b,0xfffa 013c e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x6 = 0x13c,0xfff9 013d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 013e e220 | | Load 0x1,0x20 ; Debug Table 0x6.0x7 = 0x13e,0xfff8 013f 0322 | " | Declare_Variable Record 0140 e220 | | Load 0x1,0x20 ; Debug Table 0x6.0x8 = 0x140,0xfff7 0141 0322 | " | Declare_Variable Record 0142 BODY_0130: 0142 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x9 = 0x142,0x1 0143 a226 | & | Store_Unchecked 0x1,0x26 0144 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0xa = 0x144,0x2 0145 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0146 e001 | | Load 0x0,0x1 0147 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0148 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0149 820f | | Call 0x1,0xf 014a c227 | ' | Store 0x1,0x27 014b c408 | | Store 0x2,0x8 014c e408 | | Load 0x2,0x8 ; Debug Table 0x6.0xb = 0x14c,0x3 014d 0e03 | | Execute_Immediate Not_Equal,0x3 014e 6816 |h | Jump_Zero 0x165 014f e408 | | Load 0x2,0x8 ; Debug Table 0x6.0xc = 0x14f,0x4 0150 e001 | | Load 0x0,0x1 0151 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0152 0122 | " | Execute Any,Make_Root_Type 0153 025e | ^ | Execute Discrete,Convert 0154 1c01 | | Execute_Immediate Run_Utility,0x1 0155 8233 | 3 | Call 0x1,0x33 0156 e408 | | Load 0x2,0x8 ; Debug Table 0x6.0xd = 0x156,0x5 0157 4603 |F | Jump_Case 0x4 0158 7803 |x | Jump 0x15c ; case 0x0 0159 7805 |x | Jump 0x15f ; case 0x1 015a 7807 |x | Jump 0x162 ; case 0x2 015b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x3 015c 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xe = 0x15c,0x7 015d a5fd | | Store_Unchecked 0x2,-0x3 015e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 015f 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0xf = 0x15f,0x8 0160 a5fd | | Store_Unchecked 0x2,-0x3 0161 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0162 4802 |H | Short_Literal 0x2 ; Debug Table 0x6.0x10 = 0x162,0x9 0163 a5fd | | Store_Unchecked 0x2,-0x3 0164 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x11 = 0x164,0xa 0165 8231 | 1 | Call 0x1,0x31 ; Debug Table 0x6.0x12 = 0x165,0xb 0166 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x13 = 0x166,0xc 0167 4601 |F | Jump_Case 0x2 0168 7801 |x | Jump 0x16a ; case 0x0 0169 78b0 |x | Jump 0x21a ; case 0x1 016a 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x14 = 0x16a,0xd 016b a22d | - | Store_Unchecked 0x1,0x2d 016c 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x15 = 0x16c,0xe 016d a22b | + | Store_Unchecked 0x1,0x2b 016e 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x16 = 0x16e,0xf 016f a22c | , | Store_Unchecked 0x1,0x2c 0170 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x17 = 0x170,0x10 0171 a22e | . | Store_Unchecked 0x1,0x2e 0172 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x18 = 0x172,0x11 0173 e223 | # | Load 0x1,0x23 0174 01d7 | | Execute Vector,Field_Read 0175 4801 |H | Short_Literal 0x1 0176 e409 | | Load 0x2,0x9 0177 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0178 01d6 | | Execute Vector,Field_Write 0179 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x19 = 0x179,0x12 017a 01db | | Execute Vector,Length 017b 0a0b | | Execute_Immediate Plus,0xb 017c e003 | | Load 0x0,0x3 017d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 017e 025b | [ | Execute Discrete,Check_In_Type 017f 4803 |H | Short_Literal 0x3 0180 e409 | | Load 0x2,0x9 0181 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0182 01d6 | | Execute Vector,Field_Write 0183 48ff |H | Short_Literal 0xff ; Debug Table 0x6.0x1a = 0x183,0x13 0184 4802 |H | Short_Literal 0x2 0185 e409 | | Load 0x2,0x9 0186 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0187 01d6 | | Execute Vector,Field_Write 0188 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x1b = 0x188,0x14 0189 4806 |H | Short_Literal 0x6 018a e003 | | Load 0x0,0x3 018b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 018c 0334 | 4 | Declare_Variable Array,With_Constraint 018d 4806 |H | Short_Literal 0x6 018e 4801 |H | Short_Literal 0x1 018f 4800 |H | Short_Literal 0x0 0190 e40d | | Load 0x2,0xd 0191 e40b | | Load 0x2,0xb 0192 01d6 | | Execute Vector,Field_Write 0193 3ffb |? | Loop_Increasing 0x18f 0194 4801 |H | Short_Literal 0x1 0195 4806 |H | Short_Literal 0x6 0196 e409 | | Load 0x2,0x9 0197 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0198 01ce | | Execute Vector,Slice_Write 0199 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x1c = 0x199,0x15 019a 01db | | Execute Vector,Length 019b e003 | | Load 0x0,0x3 019c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 019d 025b | [ | Execute Discrete,Check_In_Type 019e 4807 |H | Short_Literal 0x7 019f e409 | | Load 0x2,0x9 01a0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 01a1 01d6 | | Execute Vector,Field_Write 01a2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x1d = 0x1a2,0x16 01a3 01db | | Execute Vector,Length 01a4 0aff | | Execute_Immediate Plus,-0x1 01a5 0248 | H | Execute Discrete,Check_In_Integer 01a6 4800 |H | Short_Literal 0x0 01a7 0263 | c | Execute Discrete,Above_Bound 01a8 7011 |p | Jump_Nonzero 0x1ba 01a9 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x1e = 0x1a9,0x17 01aa 01dd | | Execute Vector,First 01ab e40c | | Load 0x2,0xc 01ac 0273 | s | Execute Discrete,Plus 01ad 0248 | H | Execute Discrete,Check_In_Integer 01ae e5ff | | Load 0x2,-0x1 01af 01d7 | | Execute Vector,Field_Read 01b0 e003 | | Load 0x0,0x3 01b1 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01b2 025b | [ | Execute Discrete,Check_In_Type 01b3 e40c | | Load 0x2,0xc 01b4 0a08 | | Execute_Immediate Plus,0x8 01b5 0248 | H | Execute Discrete,Check_In_Integer 01b6 e409 | | Load 0x2,0x9 01b7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 01b8 01d6 | | Execute Vector,Field_Write 01b9 3fef |? | Loop_Increasing 0x1a9 01ba e409 | | Load 0x2,0x9 ; Debug Table 0x6.0x1f = 0x1ba,0x18 01bb 8230 | 0 | Call 0x1,0x30 01bc 00d1 | | Pop_Control Pop_Count_1 01bd 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x20 = 0x1bd,0x19 01be a406 | | Store_Unchecked 0x2,0x6 01bf 7800 |x | Jump 0x1c0 01c0 e225 | % | Load 0x1,0x25 ; Debug Table 0x6.0x21 = 0x1c0,0x1b 01c1 6803 |h | Jump_Zero 0x1c5 01c2 0092 0b1b | | Action Push_String_Extended,0xb1b ; "Comm: sending GET" ; Debug Table 0x6.0x22 = 0x1c2,0x1c 01c4 8215 | | Call 0x1,0x15 01c5 e409 | | Load 0x2,0x9 ; Debug Table 0x6.0x23 = 0x1c5,0x1d 01c6 8236 | 6 | Call 0x1,0x36 01c7 e224 | $ | Load 0x1,0x24 ; Debug Table 0x6.0x24 = 0x1c7,0x1e 01c8 e40a | | Load 0x2,0xa 01c9 8235 | 5 | Call 0x1,0x35 01ca 00d1 | | Pop_Control Pop_Count_1 01cb c407 | | Store 0x2,0x7 01cc 7805 |x | Jump 0x1d2 01cd e224 | $ | Load 0x1,0x24 ; Debug Table 0x6.0x25 = 0x1cd,0x20 01ce e40a | | Load 0x2,0xa 01cf 8235 | 5 | Call 0x1,0x35 01d0 00d1 | | Pop_Control Pop_Count_1 01d1 c407 | | Store 0x2,0x7 01d2 e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x26 = 0x1d2,0x1f 01d3 7009 |p | Jump_Nonzero 0x1dd 01d4 4801 |H | Short_Literal 0x1 01d5 e40a | | Load 0x2,0xa 01d6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 01d7 01d7 | | Execute Vector,Field_Read 01d8 4807 |H | Short_Literal 0x7 01d9 e223 | # | Load 0x1,0x23 01da 01d7 | | Execute Vector,Field_Read 01db 027f | | Execute Discrete,Equal 01dc 77f0 |w | Jump_Nonzero 0x1cd 01dd e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x27 = 0x1dd,0x21 01de 700e |p | Jump_Nonzero 0x1ed 01df 4801 |H | Short_Literal 0x1 01e0 e40a | | Load 0x2,0xa 01e1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 01e2 01d7 | | Execute Vector,Field_Read 01e3 4804 |H | Short_Literal 0x4 01e4 e223 | # | Load 0x1,0x23 01e5 01d7 | | Execute Vector,Field_Read 01e6 027f | | Execute Discrete,Equal 01e7 6805 |h | Jump_Zero 0x1ed 01e8 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x28 = 0x1e8,0x22 01e9 a5fd | | Store_Unchecked 0x2,-0x3 01ea 48ff |H | Short_Literal 0xff ; Debug Table 0x6.0x29 = 0x1ea,0x23 01eb 823c | < | Call 0x1,0x3c 01ec 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x2a = 0x1ec,0x24 01ed e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x2b = 0x1ed,0x25 01ee 0f06 | | Execute_Immediate Equal,0x6 01ef 680c |h | Jump_Zero 0x1fc 01f0 4804 |H | Short_Literal 0x4 ; Debug Table 0x6.0x2c = 0x1f0,0x26 01f1 a5fd | | Store_Unchecked 0x2,-0x3 01f2 e40a | | Load 0x2,0xa ; Debug Table 0x6.0x2d = 0x1f2,0x27 01f3 8234 | 4 | Call 0x1,0x34 01f4 e225 | % | Load 0x1,0x25 ; Debug Table 0x6.0x2e = 0x1f4,0x28 01f5 6802 |h | Jump_Zero 0x1f8 01f6 e40a | | Load 0x2,0xa ; Debug Table 0x6.0x2f = 0x1f6,0x29 01f7 8237 | 7 | Call 0x1,0x37 01f8 e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x30 = 0x1f8,0x2a 01f9 8238 | 8 | Call 0x1,0x38 01fa 8210 | | Call 0x1,0x10 ; Debug Table 0x6.0x31 = 0x1fa,0x2b 01fb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x32 = 0x1fb,0x2c 01fc e406 | | Load 0x2,0x6 ; Debug Table 0x6.0x33 = 0x1fc,0x2d 01fd 0aff | | Execute_Immediate Plus,-0x1 01fe c406 | | Store 0x2,0x6 01ff e225 | % | Load 0x1,0x25 ; Debug Table 0x6.0x34 = 0x1ff,0x2e 0200 6808 |h | Jump_Zero 0x209 0201 0092 0b1c | | Action Push_String_Extended,0xb1c ; "Comm: " ; Debug Table 0x6.0x35 = 0x201,0x2f 0203 e407 | | Load 0x2,0x7 0204 e224 | $ | Load 0x1,0x24 0205 025e | ^ | Execute Discrete,Convert 0206 1c01 | | Execute_Immediate Run_Utility,0x1 0207 01cc | | Execute Vector,Catenate 0208 8215 | | Call 0x1,0x15 0209 e406 | | Load 0x2,0x6 ; Debug Table 0x6.0x36 = 0x209,0x30 020a 77b5 |w | Jump_Nonzero 0x1c0 020b e404 | | Load 0x2,0x4 ; Debug Table 0x6.0x37 = 0x20b,0x31 020c 8239 | 9 | Call 0x1,0x39 020d 4805 |H | Short_Literal 0x5 ; Debug Table 0x6.0x38 = 0x20d,0x32 020e a5fd | | Store_Unchecked 0x2,-0x3 020f e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x39 = 0x20f,0x33 0210 e224 | $ | Load 0x1,0x24 0211 025e | ^ | Execute Discrete,Convert 0212 1c01 | | Execute_Immediate Run_Utility,0x1 0213 8233 | 3 | Call 0x1,0x33 0214 8210 | | Call 0x1,0x10 ; Debug Table 0x6.0x3a = 0x214,0x34 0215 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x3b = 0x215,0x35 0216 0b1d 8233 | 3| .XXX[0x2] 0218 8210 | | Call 0x1,0x10 ; Debug Table 0x6.0x3c = 0x218,0x38 0219 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x3d = 0x219,0x39 021a 4804 |H | Short_Literal 0x4 ; Debug Table 0x6.0x3e = 0x21a,0x3a 021b e223 | # | Load 0x1,0x23 021c 01d7 | | Execute Vector,Field_Read 021d 4801 |H | Short_Literal 0x1 021e e409 | | Load 0x2,0x9 021f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0220 01d6 | | Execute Vector,Field_Write 0221 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x3f = 0x221,0x3b 0222 01db | | Execute Vector,Length 0223 0a0b | | Execute_Immediate Plus,0xb 0224 e003 | | Load 0x0,0x3 0225 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0226 025b | [ | Execute Discrete,Check_In_Type 0227 4803 |H | Short_Literal 0x3 0228 e409 | | Load 0x2,0x9 0229 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 022a 01d6 | | Execute Vector,Field_Write 022b 48ff |H | Short_Literal 0xff ; Debug Table 0x6.0x40 = 0x22b,0x3c 022c 4802 |H | Short_Literal 0x2 022d e409 | | Load 0x2,0x9 022e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 022f 01d6 | | Execute Vector,Field_Write 0230 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x41 = 0x230,0x3d 0231 4805 |H | Short_Literal 0x5 0232 e003 | | Load 0x0,0x3 0233 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0234 0334 | 4 | Declare_Variable Array,With_Constraint 0235 4805 |H | Short_Literal 0x5 0236 4801 |H | Short_Literal 0x1 0237 4800 |H | Short_Literal 0x0 0238 e40d | | Load 0x2,0xd 0239 e40b | | Load 0x2,0xb 023a 01d6 | | Execute Vector,Field_Write 023b 3ffb |? | Loop_Increasing 0x237 023c 4801 |H | Short_Literal 0x1 023d 4805 |H | Short_Literal 0x5 023e e409 | | Load 0x2,0x9 023f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0240 01ce | | Execute Vector,Slice_Write 0241 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x42 = 0x241,0x3e 0242 01db | | Execute Vector,Length 0243 e003 | | Load 0x0,0x3 0244 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0245 025b | [ | Execute Discrete,Check_In_Type 0246 4806 |H | Short_Literal 0x6 0247 e409 | | Load 0x2,0x9 0248 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0249 01d6 | | Execute Vector,Field_Write 024a e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x43 = 0x24a,0x3f 024b 01db | | Execute Vector,Length 024c 0aff | | Execute_Immediate Plus,-0x1 024d 0248 | H | Execute Discrete,Check_In_Integer 024e 4800 |H | Short_Literal 0x0 024f 0263 | c | Execute Discrete,Above_Bound 0250 7011 |p | Jump_Nonzero 0x262 0251 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x44 = 0x251,0x40 0252 01dd | | Execute Vector,First 0253 e40c | | Load 0x2,0xc 0254 0273 | s | Execute Discrete,Plus 0255 0248 | H | Execute Discrete,Check_In_Integer 0256 e5ff | | Load 0x2,-0x1 0257 01d7 | | Execute Vector,Field_Read 0258 e003 | | Load 0x0,0x3 0259 1b11 | | Execute Package,Field_Read,Field_Number 0x11 025a 025b | [ | Execute Discrete,Check_In_Type 025b e40c | | Load 0x2,0xc 025c 0a07 | | Execute_Immediate Plus,0x7 025d 0248 | H | Execute Discrete,Check_In_Integer 025e e409 | | Load 0x2,0x9 025f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0260 01d6 | | Execute Vector,Field_Write 0261 3fef |? | Loop_Increasing 0x251 0262 e409 | | Load 0x2,0x9 ; Debug Table 0x6.0x45 = 0x262,0x41 0263 8230 | 0 | Call 0x1,0x30 0264 00d1 | | Pop_Control Pop_Count_1 0265 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x46 = 0x265,0x42 0266 a406 | | Store_Unchecked 0x2,0x6 0267 7800 |x | Jump 0x268 0268 e225 | % | Load 0x1,0x25 ; Debug Table 0x6.0x47 = 0x268,0x44 0269 6803 |h | Jump_Zero 0x26d 026a 0092 0b1e | | Action Push_String_Extended,0xb1e ; "Comm: sending PUT" ; Debug Table 0x6.0x48 = 0x26a,0x45 026c 8215 | | Call 0x1,0x15 026d e409 | | Load 0x2,0x9 ; Debug Table 0x6.0x49 = 0x26d,0x46 026e 8236 | 6 | Call 0x1,0x36 026f e224 | $ | Load 0x1,0x24 ; Debug Table 0x6.0x4a = 0x26f,0x47 0270 e40a | | Load 0x2,0xa 0271 8235 | 5 | Call 0x1,0x35 0272 00d1 | | Pop_Control Pop_Count_1 0273 c407 | | Store 0x2,0x7 0274 e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x4b = 0x274,0x48 0275 700c |p | Jump_Nonzero 0x282 0276 4801 |H | Short_Literal 0x1 0277 e40a | | Load 0x2,0xa 0278 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0279 01d7 | | Execute Vector,Field_Read 027a 4800 |H | Short_Literal 0x0 027b e223 | # | Load 0x1,0x23 027c 01d7 | | Execute Vector,Field_Read 027d 027f | | Execute Discrete,Equal 027e 6803 |h | Jump_Zero 0x282 027f 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x4c = 0x27f,0x49 0280 a5fd | | Store_Unchecked 0x2,-0x3 0281 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x4d = 0x281,0x4a 0282 e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x4e = 0x282,0x4b 0283 0f06 | | Execute_Immediate Equal,0x6 0284 680c |h | Jump_Zero 0x291 0285 4804 |H | Short_Literal 0x4 ; Debug Table 0x6.0x4f = 0x285,0x4c 0286 a5fd | | Store_Unchecked 0x2,-0x3 0287 e40a | | Load 0x2,0xa ; Debug Table 0x6.0x50 = 0x287,0x4d 0288 8234 | 4 | Call 0x1,0x34 0289 e225 | % | Load 0x1,0x25 ; Debug Table 0x6.0x51 = 0x289,0x4e 028a 6802 |h | Jump_Zero 0x28d 028b e40a | | Load 0x2,0xa ; Debug Table 0x6.0x52 = 0x28b,0x4f 028c 8237 | 7 | Call 0x1,0x37 028d e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x53 = 0x28d,0x50 028e 8238 | 8 | Call 0x1,0x38 028f 8210 | | Call 0x1,0x10 ; Debug Table 0x6.0x54 = 0x28f,0x51 0290 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x55 = 0x290,0x52 0291 e406 | | Load 0x2,0x6 ; Debug Table 0x6.0x56 = 0x291,0x53 0292 0aff | | Execute_Immediate Plus,-0x1 0293 c406 | | Store 0x2,0x6 0294 e225 | % | Load 0x1,0x25 ; Debug Table 0x6.0x57 = 0x294,0x54 0295 6808 |h | Jump_Zero 0x29e 0296 0092 0b1c | | Action Push_String_Extended,0xb1c ; "Comm: " ; Debug Table 0x6.0x58 = 0x296,0x55 0298 e407 | | Load 0x2,0x7 0299 e224 | $ | Load 0x1,0x24 029a 025e | ^ | Execute Discrete,Convert 029b 1c01 | | Execute_Immediate Run_Utility,0x1 029c 01cc | | Execute Vector,Catenate 029d 8215 | | Call 0x1,0x15 029e e406 | | Load 0x2,0x6 ; Debug Table 0x6.0x59 = 0x29e,0x56 029f 77c8 |w | Jump_Nonzero 0x268 02a0 e404 | | Load 0x2,0x4 ; Debug Table 0x6.0x5a = 0x2a0,0x57 02a1 8239 | 9 | Call 0x1,0x39 02a2 4805 |H | Short_Literal 0x5 ; Debug Table 0x6.0x5b = 0x2a2,0x58 02a3 a5fd | | Store_Unchecked 0x2,-0x3 02a4 e407 | | Load 0x2,0x7 ; Debug Table 0x6.0x5c = 0x2a4,0x59 02a5 e224 | $ | Load 0x1,0x24 02a6 025e | ^ | Execute Discrete,Convert 02a7 1c01 | | Execute_Immediate Run_Utility,0x1 02a8 8233 | 3 | Call 0x1,0x33 02a9 8210 | | Call 0x1,0x10 ; Debug Table 0x6.0x5d = 0x2a9,0x5a 02aa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x5e = 0x2aa,0x5b 02ab 0b1f 8233 | 3| .XXX[0x2] 02ad 8210 | | Call 0x1,0x10 ; Debug Table 0x6.0x5f = 0x2ad,0x5e 02ae 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x60 = 0x2ae,0x5f 02af 0000 | | .XXX[0x1] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 8210 | | Call 0x1,0x10 ; Debug Table 0x7 = .DEBUG 0x02b3,0x0fa4,0x1001,0x0000,0x0036,0x56d4,0x0000,0x00f5 ; Debug Table 0x7.0x0 = 0x2b3,0x1 02b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02b5 0000 0000 | | .XXX[0x3] 02b7 0000 | | 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02c1 | | .CONST 0x02c1 ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0005 | | .CONST 0x0005 ; Number of locals 02bb INIT_02b8: 02bb e220 | | Load 0x1,0x20 ; Debug Table 0x8 = .DEBUG 0x02bb,0x0fa8,0x1001,0x0000,0x0036,0x56d4,0x0000,0x00f9 ; Debug Table 0x8.0x0 = 0x2bb,0xffff 02bc 0322 | " | Declare_Variable Record 02bd 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x1 = 0x2bd,0xfffe 02be 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x2 = 0x2be,0xfffd 02bf e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x3 = 0x2bf,0xfffc 02c0 1b13 | | Execute Package,Field_Read,Field_Number 0x13 02c1 BODY_02b8: 02c1 e22d | - | Load 0x1,0x2d ; Debug Table 0x8.0x4 = 0x2c1,0x1 02c2 e5ff | | Load 0x2,-0x1 02c3 01db | | Execute Vector,Length 02c4 027b | { | Execute Discrete,Greater_Equal 02c5 6832 |h2 | Jump_Zero 0x2f8 02c6 e22b | + | Load 0x1,0x2b ; Debug Table 0x8.0x5 = 0x2c6,0x2 02c7 e22b | + | Load 0x1,0x2b 02c8 e5ff | | Load 0x2,-0x1 02c9 01db | | Execute Vector,Length 02ca 0273 | s | Execute Discrete,Plus 02cb 0aff | | Execute_Immediate Plus,-0x1 02cc 0248 | H | Execute Discrete,Check_In_Integer 02cd e22a | * | Load 0x1,0x2a 02ce 01cf | | Execute Vector,Slice_Read 02cf e5ff | | Load 0x2,-0x1 02d0 01d4 | | Execute Vector,Structure_Write 02d1 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x6 = 0x2d1,0x3 02d2 01db | | Execute Vector,Length 02d3 c5fe | | Store 0x2,-0x2 02d4 4803 |H | Short_Literal 0x3 ; Debug Table 0x8.0x7 = 0x2d4,0x4 02d5 a5fc | | Store_Unchecked 0x2,-0x4 02d6 e22d | - | Load 0x1,0x2d ; Debug Table 0x8.0x8 = 0x2d6,0x5 02d7 e5ff | | Load 0x2,-0x1 02d8 01db | | Execute Vector,Length 02d9 027f | | Execute Discrete,Equal 02da 680b |h | Jump_Zero 0x2e6 02db e22e | . | Load 0x1,0x2e ; Debug Table 0x8.0x9 = 0x2db,0x6 02dc a5fd | | Store_Unchecked 0x2,-0x3 02dd 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xa = 0x2dd,0x7 02de a22d | - | Store_Unchecked 0x1,0x2d 02df 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xb = 0x2df,0x8 02e0 a22b | + | Store_Unchecked 0x1,0x2b 02e1 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xc = 0x2e1,0x9 02e2 a22c | , | Store_Unchecked 0x1,0x2c 02e3 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xd = 0x2e3,0xa 02e4 a22e | . | Store_Unchecked 0x1,0x2e 02e5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02e6 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xe = 0x2e6,0xb 02e7 a5fd | | Store_Unchecked 0x2,-0x3 02e8 e22d | - | Load 0x1,0x2d ; Debug Table 0x8.0xf = 0x2e8,0xc 02e9 e5ff | | Load 0x2,-0x1 02ea 01db | | Execute Vector,Length 02eb 0272 | r | Execute Discrete,Minus 02ec c22d | - | Store 0x1,0x2d 02ed e22b | + | Load 0x1,0x2b ; Debug Table 0x8.0x10 = 0x2ed,0xd 02ee e5ff | | Load 0x2,-0x1 02ef 01db | | Execute Vector,Length 02f0 0273 | s | Execute Discrete,Plus 02f1 c22b | + | Store 0x1,0x2b 02f2 e22c | , | Load 0x1,0x2c ; Debug Table 0x8.0x11 = 0x2f2,0xe 02f3 e5ff | | Load 0x2,-0x1 02f4 01db | | Execute Vector,Length 02f5 0273 | s | Execute Discrete,Plus 02f6 c22c | , | Store 0x1,0x2c 02f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x12 = 0x2f7,0xf 02f8 e22d | - | Load 0x1,0x2d ; Debug Table 0x8.0x13 = 0x2f8,0x10 02f9 0c01 | | Execute_Immediate Greater_Equal,0x1 02fa 6821 |h! | Jump_Zero 0x31c 02fb e22b | + | Load 0x1,0x2b ; Debug Table 0x8.0x14 = 0x2fb,0x11 02fc e22c | , | Load 0x1,0x2c 02fd e22a | * | Load 0x1,0x2a 02fe 01cf | | Execute Vector,Slice_Read 02ff e5ff | | Load 0x2,-0x1 0300 01dd | | Execute Vector,First 0301 e5ff | | Load 0x2,-0x1 0302 01dd | | Execute Vector,First 0303 e22d | - | Load 0x1,0x2d 0304 0273 | s | Execute Discrete,Plus 0305 0aff | | Execute_Immediate Plus,-0x1 0306 0248 | H | Execute Discrete,Check_In_Integer 0307 e5ff | | Load 0x2,-0x1 0308 01ce | | Execute Vector,Slice_Write 0309 e22d | - | Load 0x1,0x2d ; Debug Table 0x8.0x15 = 0x309,0x12 030a a404 | | Store_Unchecked 0x2,0x4 030b 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x16 = 0x30b,0x13 030c a22d | - | Store_Unchecked 0x1,0x2d 030d 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x17 = 0x30d,0x14 030e a22b | + | Store_Unchecked 0x1,0x2b 030f 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x18 = 0x30f,0x15 0310 a22c | , | Store_Unchecked 0x1,0x2c 0311 e22e | . | Load 0x1,0x2e ; Debug Table 0x8.0x19 = 0x311,0x16 0312 680c |h | Jump_Zero 0x31f 0313 4803 |H | Short_Literal 0x3 ; Debug Table 0x8.0x1a = 0x313,0x17 0314 a5fc | | Store_Unchecked 0x2,-0x4 0315 e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x1b = 0x315,0x18 0316 a5fe | | Store_Unchecked 0x2,-0x2 0317 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x1c = 0x317,0x19 0318 a5fd | | Store_Unchecked 0x2,-0x3 0319 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x1d = 0x319,0x1a 031a a22e | . | Store_Unchecked 0x1,0x2e 031b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x1e = 0x31b,0x1b 031c 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x1f = 0x31c,0x1c 031d a404 | | Store_Unchecked 0x2,0x4 031e 7800 |x | Jump 0x31f 031f e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x20 = 0x31f,0x1e 0320 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0321 e402 | | Load 0x2,0x2 0322 823f | ? | Call 0x1,0x3f 0323 00d1 | | Pop_Control Pop_Count_1 0324 c405 | | Store 0x2,0x5 0325 e405 | | Load 0x2,0x5 ; Debug Table 0x8.0x21 = 0x325,0x1f 0326 a5fc | | Store_Unchecked 0x2,-0x4 0327 e405 | | Load 0x2,0x5 ; Debug Table 0x8.0x22 = 0x327,0x20 0328 0e03 | | Execute_Immediate Not_Equal,0x3 0329 6809 |h | Jump_Zero 0x333 032a 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x23 = 0x32a,0x21 032b 4801 |H | Short_Literal 0x1 032c e5ff | | Load 0x2,-0x1 032d 01d6 | | Execute Vector,Field_Write 032e 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x24 = 0x32e,0x22 032f a5fe | | Store_Unchecked 0x2,-0x2 0330 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x25 = 0x330,0x23 0331 a5fd | | Store_Unchecked 0x2,-0x3 0332 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x26 = 0x332,0x24 0333 4803 |H | Short_Literal 0x3 ; Debug Table 0x8.0x27 = 0x333,0x25 0334 e402 | | Load 0x2,0x2 0335 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0336 01d7 | | Execute Vector,Field_Read 0337 0afc | | Execute_Immediate Plus,-0x4 0338 0248 | H | Execute Discrete,Check_In_Integer 0339 a403 | | Store_Unchecked 0x2,0x3 033a e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x28 = 0x33a,0x26 033b 7015 |p | Jump_Nonzero 0x351 033c e403 | | Load 0x2,0x3 033d e5ff | | Load 0x2,-0x1 033e 01db | | Execute Vector,Length 033f 027f | | Execute Discrete,Equal 0340 6810 |h | Jump_Zero 0x351 0341 e402 | | Load 0x2,0x2 ; Debug Table 0x8.0x29 = 0x341,0x27 0342 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0343 e5ff | | Load 0x2,-0x1 0344 01d4 | | Execute Vector,Structure_Write 0345 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x2a = 0x345,0x28 0346 a5fe | | Store_Unchecked 0x2,-0x2 0347 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x2b = 0x347,0x29 0348 e402 | | Load 0x2,0x2 0349 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 034a 01d7 | | Execute Vector,Field_Read 034b 4806 |H | Short_Literal 0x6 034c e223 | # | Load 0x1,0x23 034d 01d7 | | Execute Vector,Field_Read 034e 027f | | Execute Discrete,Equal 034f a5fd | | Store_Unchecked 0x2,-0x3 0350 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x2c = 0x350,0x2a 0351 e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x2d = 0x351,0x2b 0352 e403 | | Load 0x2,0x3 0353 0273 | s | Execute Discrete,Plus 0354 e5ff | | Load 0x2,-0x1 0355 01db | | Execute Vector,Length 0356 027a | z | Execute Discrete,Less_Equal 0357 6827 |h' | Jump_Zero 0x37f 0358 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x2e = 0x358,0x2c 0359 e403 | | Load 0x2,0x3 035a e402 | | Load 0x2,0x2 035b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 035c 01cf | | Execute Vector,Slice_Read 035d e5ff | | Load 0x2,-0x1 035e 01dd | | Execute Vector,First 035f e404 | | Load 0x2,0x4 0360 0273 | s | Execute Discrete,Plus 0361 0248 | H | Execute Discrete,Check_In_Integer 0362 e5ff | | Load 0x2,-0x1 0363 01dd | | Execute Vector,First 0364 e404 | | Load 0x2,0x4 0365 0273 | s | Execute Discrete,Plus 0366 0248 | H | Execute Discrete,Check_In_Integer 0367 e403 | | Load 0x2,0x3 0368 0273 | s | Execute Discrete,Plus 0369 0aff | | Execute_Immediate Plus,-0x1 036a 0248 | H | Execute Discrete,Check_In_Integer 036b e5ff | | Load 0x2,-0x1 036c 01ce | | Execute Vector,Slice_Write 036d e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x2f = 0x36d,0x2d 036e e403 | | Load 0x2,0x3 036f 0273 | s | Execute Discrete,Plus 0370 c404 | | Store 0x2,0x4 0371 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x30 = 0x371,0x2e 0372 e402 | | Load 0x2,0x2 0373 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0374 01d7 | | Execute Vector,Field_Read 0375 4806 |H | Short_Literal 0x6 0376 e223 | # | Load 0x1,0x23 0377 01d7 | | Execute Vector,Field_Read 0378 027f | | Execute Discrete,Equal 0379 6fa5 |o | Jump_Zero 0x31f 037a e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x31 = 0x37a,0x2f 037b a5fe | | Store_Unchecked 0x2,-0x2 037c 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x32 = 0x37c,0x30 037d a5fd | | Store_Unchecked 0x2,-0x3 037e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x33 = 0x37e,0x31 037f 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x34 = 0x37f,0x32 0380 e5ff | | Load 0x2,-0x1 0381 01db | | Execute Vector,Length 0382 e404 | | Load 0x2,0x4 0383 0272 | r | Execute Discrete,Minus 0384 0248 | H | Execute Discrete,Check_In_Integer 0385 e402 | | Load 0x2,0x2 0386 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0387 01cf | | Execute Vector,Slice_Read 0388 e5ff | | Load 0x2,-0x1 0389 01dd | | Execute Vector,First 038a e404 | | Load 0x2,0x4 038b 0273 | s | Execute Discrete,Plus 038c 0248 | H | Execute Discrete,Check_In_Integer 038d e5ff | | Load 0x2,-0x1 038e 01dc | | Execute Vector,Last 038f e5ff | | Load 0x2,-0x1 0390 01ce | | Execute Vector,Slice_Write 0391 e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x35 = 0x391,0x33 0392 e403 | | Load 0x2,0x3 0393 0273 | s | Execute Discrete,Plus 0394 0248 | H | Execute Discrete,Check_In_Integer 0395 e5ff | | Load 0x2,-0x1 0396 01db | | Execute Vector,Length 0397 0272 | r | Execute Discrete,Minus 0398 c22d | - | Store 0x1,0x2d 0399 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x36 = 0x399,0x34 039a a22b | + | Store_Unchecked 0x1,0x2b 039b e22d | - | Load 0x1,0x2d ; Debug Table 0x8.0x37 = 0x39b,0x35 039c a22c | , | Store_Unchecked 0x1,0x2c 039d 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x38 = 0x39d,0x36 039e e402 | | Load 0x2,0x2 039f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03a0 01d7 | | Execute Vector,Field_Read 03a1 4806 |H | Short_Literal 0x6 03a2 e223 | # | Load 0x1,0x23 03a3 01d7 | | Execute Vector,Field_Read 03a4 027f | | Execute Discrete,Equal 03a5 a22e | . | Store_Unchecked 0x1,0x2e 03a6 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x39 = 0x3a6,0x37 03a7 e22d | - | Load 0x1,0x2d 03a8 0272 | r | Execute Discrete,Minus 03a9 0a01 | | Execute_Immediate Plus,0x1 03aa 0248 | H | Execute Discrete,Check_In_Integer 03ab e403 | | Load 0x2,0x3 03ac e402 | | Load 0x2,0x2 03ad 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03ae 01cf | | Execute Vector,Slice_Read 03af e22b | + | Load 0x1,0x2b 03b0 e22c | , | Load 0x1,0x2c 03b1 e22a | * | Load 0x1,0x2a 03b2 01ce | | Execute Vector,Slice_Write 03b3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x3a = 0x3b3,0x38 03b4 01db | | Execute Vector,Length 03b5 c5fe | | Store 0x2,-0x2 03b6 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x3b = 0x3b6,0x39 03b7 a5fd | | Store_Unchecked 0x2,-0x3 03b8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x3c = 0x3b8,0x3a 03b9 0000 0000 | | .BLANK 0000[0x7] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c9 | | .CONST 0x03c9 ; Address of begin 03c1 0501 | | .CONST 0x0501 ; Address of exception handler 03c2 0005 | | .CONST 0x0005 ; Number of locals 03c3 INIT_03c0: 03c3 e220 | | Load 0x1,0x20 ; Debug Table 0x9 = .DEBUG 0x03c3,0x1024,0x1001,0x0000,0x0036,0x56d4,0x0000,0x010d ; Debug Table 0x9.0x0 = 0x3c3,0xffff 03c4 0322 | " | Declare_Variable Record 03c5 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x9.0x1 = 0x3c5,0xfffe 03c6 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x9.0x2 = 0x3c6,0xfffd 03c7 e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x3 = 0x3c7,0xfffc 03c8 1b13 | | Execute Package,Field_Read,Field_Number 0x13 03c9 BODY_03c0: 03c9 e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x4 = 0x3c9,0x1 03ca e5ff | | Load 0x2,-0x1 03cb 01db | | Execute Vector,Length 03cc 027b | { | Execute Discrete,Greater_Equal 03cd 6842 |hB | Jump_Zero 0x410 03ce e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x5 = 0x3ce,0x2 03cf 01db | | Execute Vector,Length 03d0 0aff | | Execute_Immediate Plus,-0x1 03d1 0248 | H | Execute Discrete,Check_In_Integer 03d2 4800 |H | Short_Literal 0x0 03d3 0263 | c | Execute Discrete,Above_Bound 03d4 7014 |p | Jump_Nonzero 0x3e9 03d5 e22b | + | Load 0x1,0x2b ; Debug Table 0x9.0x6 = 0x3d5,0x3 03d6 e407 | | Load 0x2,0x7 03d7 0273 | s | Execute Discrete,Plus 03d8 0248 | H | Execute Discrete,Check_In_Integer 03d9 e22a | * | Load 0x1,0x2a 03da 01d7 | | Execute Vector,Field_Read 03db 00d8 | | Load_Top At_Offset_0 03dc 00e8 | | Load_Encached Character_Cache 03dd 0260 | ` | Execute Discrete,In_Type 03de 7002 |p | Jump_Nonzero 0x3e1 03df 48e0 |H | Short_Literal 0xe0 03e0 0257 | W | Execute Discrete,Raise 03e1 e5ff | | Load 0x2,-0x1 03e2 01dd | | Execute Vector,First 03e3 e407 | | Load 0x2,0x7 03e4 0273 | s | Execute Discrete,Plus 03e5 0248 | H | Execute Discrete,Check_In_Integer 03e6 e5ff | | Load 0x2,-0x1 03e7 01d6 | | Execute Vector,Field_Write 03e8 3fec |? | Loop_Increasing 0x3d5 03e9 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x7 = 0x3e9,0x4 03ea 01db | | Execute Vector,Length 03eb c5fe | | Store 0x2,-0x2 03ec 4803 |H | Short_Literal 0x3 ; Debug Table 0x9.0x8 = 0x3ec,0x5 03ed a5fc | | Store_Unchecked 0x2,-0x4 03ee e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x9 = 0x3ee,0x6 03ef e5ff | | Load 0x2,-0x1 03f0 01db | | Execute Vector,Length 03f1 027f | | Execute Discrete,Equal 03f2 680b |h | Jump_Zero 0x3fe 03f3 e22e | . | Load 0x1,0x2e ; Debug Table 0x9.0xa = 0x3f3,0x7 03f4 a5fd | | Store_Unchecked 0x2,-0x3 03f5 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xb = 0x3f5,0x8 03f6 a22d | - | Store_Unchecked 0x1,0x2d 03f7 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0xc = 0x3f7,0x9 03f8 a22b | + | Store_Unchecked 0x1,0x2b 03f9 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xd = 0x3f9,0xa 03fa a22c | , | Store_Unchecked 0x1,0x2c 03fb 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xe = 0x3fb,0xb 03fc a22e | . | Store_Unchecked 0x1,0x2e 03fd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xf = 0x3fe,0xc 03ff a5fd | | Store_Unchecked 0x2,-0x3 0400 e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x10 = 0x400,0xd 0401 e5ff | | Load 0x2,-0x1 0402 01db | | Execute Vector,Length 0403 0272 | r | Execute Discrete,Minus 0404 c22d | - | Store 0x1,0x2d 0405 e22b | + | Load 0x1,0x2b ; Debug Table 0x9.0x11 = 0x405,0xe 0406 e5ff | | Load 0x2,-0x1 0407 01db | | Execute Vector,Length 0408 0273 | s | Execute Discrete,Plus 0409 c22b | + | Store 0x1,0x2b 040a e22c | , | Load 0x1,0x2c ; Debug Table 0x9.0x12 = 0x40a,0xf 040b e5ff | | Load 0x2,-0x1 040c 01db | | Execute Vector,Length 040d 0273 | s | Execute Discrete,Plus 040e c22c | , | Store 0x1,0x2c 040f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0x13 = 0x40f,0x10 0410 e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x14 = 0x410,0x11 0411 0c01 | | Execute_Immediate Greater_Equal,0x1 0412 682d |h- | Jump_Zero 0x440 0413 e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x15 = 0x413,0x12 0414 0aff | | Execute_Immediate Plus,-0x1 0415 0248 | H | Execute Discrete,Check_In_Integer 0416 4800 |H | Short_Literal 0x0 0417 0263 | c | Execute Discrete,Above_Bound 0418 7014 |p | Jump_Nonzero 0x42d 0419 e22b | + | Load 0x1,0x2b ; Debug Table 0x9.0x16 = 0x419,0x13 041a e407 | | Load 0x2,0x7 041b 0273 | s | Execute Discrete,Plus 041c 0248 | H | Execute Discrete,Check_In_Integer 041d e22a | * | Load 0x1,0x2a 041e 01d7 | | Execute Vector,Field_Read 041f 00d8 | | Load_Top At_Offset_0 0420 00e8 | | Load_Encached Character_Cache 0421 0260 | ` | Execute Discrete,In_Type 0422 7002 |p | Jump_Nonzero 0x425 0423 48e0 |H | Short_Literal 0xe0 0424 0257 | W | Execute Discrete,Raise 0425 e5ff | | Load 0x2,-0x1 0426 01dd | | Execute Vector,First 0427 e407 | | Load 0x2,0x7 0428 0273 | s | Execute Discrete,Plus 0429 0248 | H | Execute Discrete,Check_In_Integer 042a e5ff | | Load 0x2,-0x1 042b 01d6 | | Execute Vector,Field_Write 042c 3fec |? | Loop_Increasing 0x419 042d e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x17 = 0x42d,0x14 042e a404 | | Store_Unchecked 0x2,0x4 042f 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x18 = 0x42f,0x15 0430 a22d | - | Store_Unchecked 0x1,0x2d 0431 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x19 = 0x431,0x16 0432 a22b | + | Store_Unchecked 0x1,0x2b 0433 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x1a = 0x433,0x17 0434 a22c | , | Store_Unchecked 0x1,0x2c 0435 e22e | . | Load 0x1,0x2e ; Debug Table 0x9.0x1b = 0x435,0x18 0436 680c |h | Jump_Zero 0x443 0437 4803 |H | Short_Literal 0x3 ; Debug Table 0x9.0x1c = 0x437,0x19 0438 a5fc | | Store_Unchecked 0x2,-0x4 0439 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x1d = 0x439,0x1a 043a a5fe | | Store_Unchecked 0x2,-0x2 043b 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x1e = 0x43b,0x1b 043c a5fd | | Store_Unchecked 0x2,-0x3 043d 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x1f = 0x43d,0x1c 043e a22e | . | Store_Unchecked 0x1,0x2e 043f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0x20 = 0x43f,0x1d 0440 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x21 = 0x440,0x1e 0441 a404 | | Store_Unchecked 0x2,0x4 0442 7800 |x | Jump 0x443 0443 e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x22 = 0x443,0x20 0444 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0445 e402 | | Load 0x2,0x2 0446 823f | ? | Call 0x1,0x3f 0447 00d1 | | Pop_Control Pop_Count_1 0448 c405 | | Store 0x2,0x5 0449 e405 | | Load 0x2,0x5 ; Debug Table 0x9.0x23 = 0x449,0x21 044a a5fc | | Store_Unchecked 0x2,-0x4 044b e405 | | Load 0x2,0x5 ; Debug Table 0x9.0x24 = 0x44b,0x22 044c 0e03 | | Execute_Immediate Not_Equal,0x3 044d 6809 |h | Jump_Zero 0x457 044e 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x25 = 0x44e,0x23 044f 4801 |H | Short_Literal 0x1 0450 e5ff | | Load 0x2,-0x1 0451 01d6 | | Execute Vector,Field_Write 0452 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x26 = 0x452,0x24 0453 a5fe | | Store_Unchecked 0x2,-0x2 0454 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x27 = 0x454,0x25 0455 a5fd | | Store_Unchecked 0x2,-0x3 0456 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0x28 = 0x456,0x26 0457 4803 |H | Short_Literal 0x3 ; Debug Table 0x9.0x29 = 0x457,0x27 0458 e402 | | Load 0x2,0x2 0459 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 045a 01d7 | | Execute Vector,Field_Read 045b 0afc | | Execute_Immediate Plus,-0x4 045c 0248 | H | Execute Discrete,Check_In_Integer 045d a403 | | Store_Unchecked 0x2,0x3 045e e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x2a = 0x45e,0x28 045f 7028 |p( | Jump_Nonzero 0x488 0460 e403 | | Load 0x2,0x3 0461 e5ff | | Load 0x2,-0x1 0462 01db | | Execute Vector,Length 0463 027f | | Execute Discrete,Equal 0464 6823 |h# | Jump_Zero 0x488 0465 e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x2b = 0x465,0x29 0466 4801 |H | Short_Literal 0x1 0467 0263 | c | Execute Discrete,Above_Bound 0468 7013 |p | Jump_Nonzero 0x47c 0469 e407 | | Load 0x2,0x7 ; Debug Table 0x9.0x2c = 0x469,0x2a 046a e402 | | Load 0x2,0x2 046b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 046c 01d7 | | Execute Vector,Field_Read 046d 00d8 | | Load_Top At_Offset_0 046e 00e8 | | Load_Encached Character_Cache 046f 0260 | ` | Execute Discrete,In_Type 0470 7002 |p | Jump_Nonzero 0x473 0471 48e0 |H | Short_Literal 0xe0 0472 0257 | W | Execute Discrete,Raise 0473 e5ff | | Load 0x2,-0x1 0474 01dd | | Execute Vector,First 0475 e407 | | Load 0x2,0x7 0476 0273 | s | Execute Discrete,Plus 0477 0aff | | Execute_Immediate Plus,-0x1 0478 0248 | H | Execute Discrete,Check_In_Integer 0479 e5ff | | Load 0x2,-0x1 047a 01d6 | | Execute Vector,Field_Write 047b 3fed |? | Loop_Increasing 0x469 047c e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x2d = 0x47c,0x2b 047d a5fe | | Store_Unchecked 0x2,-0x2 047e 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x2e = 0x47e,0x2c 047f e402 | | Load 0x2,0x2 0480 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0481 01d7 | | Execute Vector,Field_Read 0482 4806 |H | Short_Literal 0x6 0483 e223 | # | Load 0x1,0x23 0484 01d7 | | Execute Vector,Field_Read 0485 027f | | Execute Discrete,Equal 0486 a5fd | | Store_Unchecked 0x2,-0x3 0487 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0x2f = 0x487,0x2d 0488 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x30 = 0x488,0x2e 0489 e403 | | Load 0x2,0x3 048a 0273 | s | Execute Discrete,Plus 048b e5ff | | Load 0x2,-0x1 048c 01db | | Execute Vector,Length 048d 027a | z | Execute Discrete,Less_Equal 048e 682c |h, | Jump_Zero 0x4bb 048f e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x31 = 0x48f,0x2f 0490 4801 |H | Short_Literal 0x1 0491 0263 | c | Execute Discrete,Above_Bound 0492 7016 |p | Jump_Nonzero 0x4a9 0493 e407 | | Load 0x2,0x7 ; Debug Table 0x9.0x32 = 0x493,0x30 0494 e402 | | Load 0x2,0x2 0495 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0496 01d7 | | Execute Vector,Field_Read 0497 00d8 | | Load_Top At_Offset_0 0498 00e8 | | Load_Encached Character_Cache 0499 0260 | ` | Execute Discrete,In_Type 049a 7002 |p | Jump_Nonzero 0x49d 049b 48e0 |H | Short_Literal 0xe0 049c 0257 | W | Execute Discrete,Raise 049d e5ff | | Load 0x2,-0x1 049e 01dd | | Execute Vector,First 049f e404 | | Load 0x2,0x4 04a0 0273 | s | Execute Discrete,Plus 04a1 0248 | H | Execute Discrete,Check_In_Integer 04a2 e407 | | Load 0x2,0x7 04a3 0273 | s | Execute Discrete,Plus 04a4 0aff | | Execute_Immediate Plus,-0x1 04a5 0248 | H | Execute Discrete,Check_In_Integer 04a6 e5ff | | Load 0x2,-0x1 04a7 01d6 | | Execute Vector,Field_Write 04a8 3fea |? | Loop_Increasing 0x493 04a9 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x33 = 0x4a9,0x31 04aa e403 | | Load 0x2,0x3 04ab 0273 | s | Execute Discrete,Plus 04ac c404 | | Store 0x2,0x4 04ad 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x34 = 0x4ad,0x32 04ae e402 | | Load 0x2,0x2 04af 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 04b0 01d7 | | Execute Vector,Field_Read 04b1 4806 |H | Short_Literal 0x6 04b2 e223 | # | Load 0x1,0x23 04b3 01d7 | | Execute Vector,Field_Read 04b4 027f | | Execute Discrete,Equal 04b5 6f8d |o | Jump_Zero 0x443 04b6 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x35 = 0x4b6,0x33 04b7 a5fe | | Store_Unchecked 0x2,-0x2 04b8 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x36 = 0x4b8,0x34 04b9 a5fd | | Store_Unchecked 0x2,-0x3 04ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0x37 = 0x4ba,0x35 04bb e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x38 = 0x4bb,0x36 04bc 01db | | Execute Vector,Length 04bd e404 | | Load 0x2,0x4 04be 0272 | r | Execute Discrete,Minus 04bf 0248 | H | Execute Discrete,Check_In_Integer 04c0 4801 |H | Short_Literal 0x1 04c1 0263 | c | Execute Discrete,Above_Bound 04c2 7016 |p | Jump_Nonzero 0x4d9 04c3 e407 | | Load 0x2,0x7 ; Debug Table 0x9.0x39 = 0x4c3,0x37 04c4 e402 | | Load 0x2,0x2 04c5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 04c6 01d7 | | Execute Vector,Field_Read 04c7 00d8 | | Load_Top At_Offset_0 04c8 00e8 | | Load_Encached Character_Cache 04c9 0260 | ` | Execute Discrete,In_Type 04ca 7002 |p | Jump_Nonzero 0x4cd 04cb 48e0 |H | Short_Literal 0xe0 04cc 0257 | W | Execute Discrete,Raise 04cd e5ff | | Load 0x2,-0x1 04ce 01dd | | Execute Vector,First 04cf e404 | | Load 0x2,0x4 04d0 0273 | s | Execute Discrete,Plus 04d1 0248 | H | Execute Discrete,Check_In_Integer 04d2 e407 | | Load 0x2,0x7 04d3 0273 | s | Execute Discrete,Plus 04d4 0aff | | Execute_Immediate Plus,-0x1 04d5 0248 | H | Execute Discrete,Check_In_Integer 04d6 e5ff | | Load 0x2,-0x1 04d7 01d6 | | Execute Vector,Field_Write 04d8 3fea |? | Loop_Increasing 0x4c3 04d9 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x3a = 0x4d9,0x38 04da e403 | | Load 0x2,0x3 04db 0273 | s | Execute Discrete,Plus 04dc 0248 | H | Execute Discrete,Check_In_Integer 04dd e5ff | | Load 0x2,-0x1 04de 01db | | Execute Vector,Length 04df 0272 | r | Execute Discrete,Minus 04e0 c22d | - | Store 0x1,0x2d 04e1 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x3b = 0x4e1,0x39 04e2 a22b | + | Store_Unchecked 0x1,0x2b 04e3 e22d | - | Load 0x1,0x2d ; Debug Table 0x9.0x3c = 0x4e3,0x3a 04e4 a22c | , | Store_Unchecked 0x1,0x2c 04e5 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x3d = 0x4e5,0x3b 04e6 e402 | | Load 0x2,0x2 04e7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 04e8 01d7 | | Execute Vector,Field_Read 04e9 4806 |H | Short_Literal 0x6 04ea e223 | # | Load 0x1,0x23 04eb 01d7 | | Execute Vector,Field_Read 04ec 027f | | Execute Discrete,Equal 04ed a22e | . | Store_Unchecked 0x1,0x2e 04ee e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x3e = 0x4ee,0x3c 04ef e22d | - | Load 0x1,0x2d 04f0 0272 | r | Execute Discrete,Minus 04f1 0a01 | | Execute_Immediate Plus,0x1 04f2 0248 | H | Execute Discrete,Check_In_Integer 04f3 e403 | | Load 0x2,0x3 04f4 e402 | | Load 0x2,0x2 04f5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 04f6 01cf | | Execute Vector,Slice_Read 04f7 e22b | + | Load 0x1,0x2b 04f8 e22c | , | Load 0x1,0x2c 04f9 e22a | * | Load 0x1,0x2a 04fa 01ce | | Execute Vector,Slice_Write 04fb e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x3f = 0x4fb,0x3d 04fc 01db | | Execute Vector,Length 04fd c5fe | | Store 0x2,-0x2 04fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x40 = 0x4fe,0x3e 04ff a5fd | | Store_Unchecked 0x2,-0x3 0500 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0x41 = 0x500,0x3f 0501 TRAP_03c0: 0501 010e | | Execute Exception,Is_Constraint_Error 0502 6803 |h | Jump_Zero 0x506 0503 4806 |H | Short_Literal 0x6 ; Debug Table 0x9.0x42 = 0x503,0x40 0504 a5fc | | Store_Unchecked 0x2,-0x4 0505 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0506 0100 | | Execute Exception,Raise 0507 0000 | | .XXX[0x1] 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 0510 | | .CONST 0x0510 ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0004 | | .CONST 0x0004 ; Number of locals 050b INIT_0508: 050b e220 | | Load 0x1,0x20 ; Debug Table 0xa = .DEBUG 0x050b,0x10ac,0x1001,0x0000,0x0036,0x56d4,0x0000,0x0121 ; Debug Table 0xa.0x0 = 0x50b,0xffff 050c 0322 | " | Declare_Variable Record 050d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x1 = 0x50d,0xfffe 050e e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x2 = 0x50e,0xfffd 050f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0510 BODY_0508: 0510 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x3 = 0x510,0x1 0511 a403 | | Store_Unchecked 0x2,0x3 0512 7835 |x5 | Jump 0x548 0513 4805 |H | Short_Literal 0x5 ; Debug Table 0xa.0x4 = 0x513,0x3 0514 e223 | # | Load 0x1,0x23 0515 01d7 | | Execute Vector,Field_Read 0516 4801 |H | Short_Literal 0x1 0517 e402 | | Load 0x2,0x2 0518 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0519 01d6 | | Execute Vector,Field_Write 051a e226 | & | Load 0x1,0x26 ; Debug Table 0xa.0x5 = 0x51a,0x4 051b 4802 |H | Short_Literal 0x2 051c e402 | | Load 0x2,0x2 051d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 051e 01d6 | | Execute Vector,Field_Write 051f 48ff |H | Short_Literal 0xff ; Debug Table 0xa.0x6 = 0x51f,0x5 0520 4803 |H | Short_Literal 0x3 0521 e402 | | Load 0x2,0x2 0522 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0523 01d6 | | Execute Vector,Field_Write 0524 48fb |H | Short_Literal 0xfb ; Debug Table 0xa.0x7 = 0x524,0x6 0525 4801 |H | Short_Literal 0x1 0526 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x8 = 0x526,0x7 0527 01dd | | Execute Vector,First 0528 e403 | | Load 0x2,0x3 0529 0273 | s | Execute Discrete,Plus 052a 0248 | H | Execute Discrete,Check_In_Integer 052b e406 | | Load 0x2,0x6 052c 0273 | s | Execute Discrete,Plus 052d 0aff | | Execute_Immediate Plus,-0x1 052e 0248 | H | Execute Discrete,Check_In_Integer 052f e5ff | | Load 0x2,-0x1 0530 01d7 | | Execute Vector,Field_Read 0531 e406 | | Load 0x2,0x6 0532 e402 | | Load 0x2,0x2 0533 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0534 01d6 | | Execute Vector,Field_Write 0535 3ff0 |? | Loop_Increasing 0x526 0536 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x9 = 0x536,0x8 0537 8230 | 0 | Call 0x1,0x30 0538 00d1 | | Pop_Control Pop_Count_1 0539 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0xa = 0x539,0x9 053a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 053b e402 | | Load 0x2,0x2 053c 8240 | @ | Call 0x1,0x40 053d c404 | | Store 0x2,0x4 053e e404 | | Load 0x2,0x4 ; Debug Table 0xa.0xb = 0x53e,0xa 053f a5fd | | Store_Unchecked 0x2,-0x3 0540 e404 | | Load 0x2,0x4 ; Debug Table 0xa.0xc = 0x540,0xb 0541 0e03 | | Execute_Immediate Not_Equal,0x3 0542 6801 |h | Jump_Zero 0x544 0543 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xa.0xd = 0x543,0xc 0544 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0xe = 0x544,0xd 0545 48fb |H | Short_Literal 0xfb 0546 0273 | s | Execute Discrete,Plus 0547 c403 | | Store 0x2,0x3 0548 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0xf = 0x548,0x2 0549 01db | | Execute Vector,Length 054a e403 | | Load 0x2,0x3 054b 0272 | r | Execute Discrete,Minus 054c 0cfc | | Execute_Immediate Greater_Equal,-0x4 054d 77c5 |w | Jump_Nonzero 0x513 054e e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x10 = 0x54e,0xe 054f 6808 |h | Jump_Zero 0x558 0550 4806 |H | Short_Literal 0x6 ; Debug Table 0xa.0x11 = 0x550,0xf 0551 e223 | # | Load 0x1,0x23 0552 01d7 | | Execute Vector,Field_Read 0553 4801 |H | Short_Literal 0x1 0554 e402 | | Load 0x2,0x2 0555 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0556 01d6 | | Execute Vector,Field_Write 0557 7807 |x | Jump 0x55f 0558 4805 |H | Short_Literal 0x5 ; Debug Table 0xa.0x12 = 0x558,0x10 0559 e223 | # | Load 0x1,0x23 055a 01d7 | | Execute Vector,Field_Read 055b 4801 |H | Short_Literal 0x1 055c e402 | | Load 0x2,0x2 055d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 055e 01d6 | | Execute Vector,Field_Write 055f e226 | & | Load 0x1,0x26 ; Debug Table 0xa.0x13 = 0x55f,0x11 0560 4802 |H | Short_Literal 0x2 0561 e402 | | Load 0x2,0x2 0562 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0563 01d6 | | Execute Vector,Field_Write 0564 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x14 = 0x564,0x12 0565 01db | | Execute Vector,Length 0566 0a04 | | Execute_Immediate Plus,0x4 0567 0248 | H | Execute Discrete,Check_In_Integer 0568 e403 | | Load 0x2,0x3 0569 0272 | r | Execute Discrete,Minus 056a e003 | | Load 0x0,0x3 056b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 056c 025b | [ | Execute Discrete,Check_In_Type 056d 4803 |H | Short_Literal 0x3 056e e402 | | Load 0x2,0x2 056f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0570 01d6 | | Execute Vector,Field_Write 0571 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x15 = 0x571,0x13 0572 01db | | Execute Vector,Length 0573 e403 | | Load 0x2,0x3 0574 0272 | r | Execute Discrete,Minus 0575 0248 | H | Execute Discrete,Check_In_Integer 0576 4801 |H | Short_Literal 0x1 0577 0263 | c | Execute Discrete,Above_Bound 0578 7010 |p | Jump_Nonzero 0x589 0579 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x16 = 0x579,0x14 057a 01dd | | Execute Vector,First 057b e403 | | Load 0x2,0x3 057c 0273 | s | Execute Discrete,Plus 057d 0248 | H | Execute Discrete,Check_In_Integer 057e e406 | | Load 0x2,0x6 057f 0273 | s | Execute Discrete,Plus 0580 0aff | | Execute_Immediate Plus,-0x1 0581 0248 | H | Execute Discrete,Check_In_Integer 0582 e5ff | | Load 0x2,-0x1 0583 01d7 | | Execute Vector,Field_Read 0584 e406 | | Load 0x2,0x6 0585 e402 | | Load 0x2,0x2 0586 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0587 01d6 | | Execute Vector,Field_Write 0588 3ff0 |? | Loop_Increasing 0x579 0589 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x17 = 0x589,0x15 058a 8230 | 0 | Call 0x1,0x30 058b 00d1 | | Pop_Control Pop_Count_1 058c e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x18 = 0x58c,0x16 058d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 058e e402 | | Load 0x2,0x2 058f 8240 | @ | Call 0x1,0x40 0590 c5fd | | Store 0x2,-0x3 0591 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0592 0000 0000 | | .BLANK 0000[0x6] 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 05a0 | | .CONST 0x05a0 ; Address of begin 0599 0004 | | .CONST 0x0004 ; Address of exception handler 059a 0004 | | .CONST 0x0004 ; Number of locals 059b INIT_0598: 059b e220 | | Load 0x1,0x20 ; Debug Table 0xb = .DEBUG 0x059b,0x10e0,0x1001,0x0000,0x0036,0x56d4,0x0000,0x0131 ; Debug Table 0xb.0x0 = 0x59b,0xffff 059c 0322 | " | Declare_Variable Record 059d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x1 = 0x59d,0xfffe 059e e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x2 = 0x59e,0xfffd 059f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 05a0 BODY_0598: 05a0 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x3 = 0x5a0,0x1 05a1 a403 | | Store_Unchecked 0x2,0x3 05a2 7838 |x8 | Jump 0x5db 05a3 4805 |H | Short_Literal 0x5 ; Debug Table 0xb.0x4 = 0x5a3,0x3 05a4 e223 | # | Load 0x1,0x23 05a5 01d7 | | Execute Vector,Field_Read 05a6 4801 |H | Short_Literal 0x1 05a7 e402 | | Load 0x2,0x2 05a8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05a9 01d6 | | Execute Vector,Field_Write 05aa e226 | & | Load 0x1,0x26 ; Debug Table 0xb.0x5 = 0x5aa,0x4 05ab 4802 |H | Short_Literal 0x2 05ac e402 | | Load 0x2,0x2 05ad 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05ae 01d6 | | Execute Vector,Field_Write 05af 48ff |H | Short_Literal 0xff ; Debug Table 0xb.0x6 = 0x5af,0x5 05b0 4803 |H | Short_Literal 0x3 05b1 e402 | | Load 0x2,0x2 05b2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05b3 01d6 | | Execute Vector,Field_Write 05b4 48fb |H | Short_Literal 0xfb ; Debug Table 0xb.0x7 = 0x5b4,0x6 05b5 4801 |H | Short_Literal 0x1 05b6 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x8 = 0x5b6,0x7 05b7 01dd | | Execute Vector,First 05b8 e403 | | Load 0x2,0x3 05b9 0273 | s | Execute Discrete,Plus 05ba 0248 | H | Execute Discrete,Check_In_Integer 05bb e406 | | Load 0x2,0x6 05bc 0273 | s | Execute Discrete,Plus 05bd 0aff | | Execute_Immediate Plus,-0x1 05be 0248 | H | Execute Discrete,Check_In_Integer 05bf e5ff | | Load 0x2,-0x1 05c0 01d7 | | Execute Vector,Field_Read 05c1 e003 | | Load 0x0,0x3 05c2 1b11 | | Execute Package,Field_Read,Field_Number 0x11 05c3 025b | [ | Execute Discrete,Check_In_Type 05c4 e406 | | Load 0x2,0x6 05c5 e402 | | Load 0x2,0x2 05c6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05c7 01d6 | | Execute Vector,Field_Write 05c8 3fed |? | Loop_Increasing 0x5b6 05c9 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x9 = 0x5c9,0x8 05ca 8230 | 0 | Call 0x1,0x30 05cb 00d1 | | Pop_Control Pop_Count_1 05cc e001 | | Load 0x0,0x1 ; Debug Table 0xb.0xa = 0x5cc,0x9 05cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 05ce e402 | | Load 0x2,0x2 05cf 8240 | @ | Call 0x1,0x40 05d0 c404 | | Store 0x2,0x4 05d1 e404 | | Load 0x2,0x4 ; Debug Table 0xb.0xb = 0x5d1,0xa 05d2 a5fd | | Store_Unchecked 0x2,-0x3 05d3 e404 | | Load 0x2,0x4 ; Debug Table 0xb.0xc = 0x5d3,0xb 05d4 0e03 | | Execute_Immediate Not_Equal,0x3 05d5 6801 |h | Jump_Zero 0x5d7 05d6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xb.0xd = 0x5d6,0xc 05d7 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0xe = 0x5d7,0xd 05d8 48fb |H | Short_Literal 0xfb 05d9 0273 | s | Execute Discrete,Plus 05da c403 | | Store 0x2,0x3 05db e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0xf = 0x5db,0x2 05dc 01db | | Execute Vector,Length 05dd e403 | | Load 0x2,0x3 05de 0272 | r | Execute Discrete,Minus 05df 0cfc | | Execute_Immediate Greater_Equal,-0x4 05e0 77c2 |w | Jump_Nonzero 0x5a3 05e1 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x10 = 0x5e1,0xe 05e2 6808 |h | Jump_Zero 0x5eb 05e3 4806 |H | Short_Literal 0x6 ; Debug Table 0xb.0x11 = 0x5e3,0xf 05e4 e223 | # | Load 0x1,0x23 05e5 01d7 | | Execute Vector,Field_Read 05e6 4801 |H | Short_Literal 0x1 05e7 e402 | | Load 0x2,0x2 05e8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05e9 01d6 | | Execute Vector,Field_Write 05ea 7807 |x | Jump 0x5f2 05eb 4805 |H | Short_Literal 0x5 ; Debug Table 0xb.0x12 = 0x5eb,0x10 05ec e223 | # | Load 0x1,0x23 05ed 01d7 | | Execute Vector,Field_Read 05ee 4801 |H | Short_Literal 0x1 05ef e402 | | Load 0x2,0x2 05f0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05f1 01d6 | | Execute Vector,Field_Write 05f2 e226 | & | Load 0x1,0x26 ; Debug Table 0xb.0x13 = 0x5f2,0x11 05f3 4802 |H | Short_Literal 0x2 05f4 e402 | | Load 0x2,0x2 05f5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05f6 01d6 | | Execute Vector,Field_Write 05f7 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x14 = 0x5f7,0x12 05f8 01db | | Execute Vector,Length 05f9 0a04 | | Execute_Immediate Plus,0x4 05fa 0248 | H | Execute Discrete,Check_In_Integer 05fb e403 | | Load 0x2,0x3 05fc 0272 | r | Execute Discrete,Minus 05fd e003 | | Load 0x0,0x3 05fe 1b11 | | Execute Package,Field_Read,Field_Number 0x11 05ff 025b | [ | Execute Discrete,Check_In_Type 0600 4803 |H | Short_Literal 0x3 0601 e402 | | Load 0x2,0x2 0602 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0603 01d6 | | Execute Vector,Field_Write 0604 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x15 = 0x604,0x13 0605 01db | | Execute Vector,Length 0606 e403 | | Load 0x2,0x3 0607 0272 | r | Execute Discrete,Minus 0608 0248 | H | Execute Discrete,Check_In_Integer 0609 4801 |H | Short_Literal 0x1 060a 0263 | c | Execute Discrete,Above_Bound 060b 7013 |p | Jump_Nonzero 0x61f 060c e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x16 = 0x60c,0x14 060d 01dd | | Execute Vector,First 060e e403 | | Load 0x2,0x3 060f 0273 | s | Execute Discrete,Plus 0610 0248 | H | Execute Discrete,Check_In_Integer 0611 e406 | | Load 0x2,0x6 0612 0273 | s | Execute Discrete,Plus 0613 0aff | | Execute_Immediate Plus,-0x1 0614 0248 | H | Execute Discrete,Check_In_Integer 0615 e5ff | | Load 0x2,-0x1 0616 01d7 | | Execute Vector,Field_Read 0617 e003 | | Load 0x0,0x3 0618 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0619 025b | [ | Execute Discrete,Check_In_Type 061a e406 | | Load 0x2,0x6 061b e402 | | Load 0x2,0x2 061c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 061d 01d6 | | Execute Vector,Field_Write 061e 3fed |? | Loop_Increasing 0x60c 061f e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x17 = 0x61f,0x15 0620 8230 | 0 | Call 0x1,0x30 0621 00d1 | | Pop_Control Pop_Count_1 0622 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x18 = 0x622,0x16 0623 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0624 e402 | | Load 0x2,0x2 0625 8240 | @ | Call 0x1,0x40 0626 c5fd | | Store 0x2,-0x3 0627 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 062b | + | .CONST 0x062b ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0001 | | .CONST 0x0001 ; Number of locals 062b BODY_0628: 062b INIT_0628: 062b 4801 |H | Short_Literal 0x1 ; Debug Table 0xc = .DEBUG 0x062b,0x1114,0x1002,0x0000,0x0036,0x56d4,0x0000,0x0141 ; Debug Table 0xc.0x0 = 0x62b,0x1 062c e229 | ) | Load 0x1,0x29 062d e228 | ( | Load 0x1,0x28 062e 01cf | | Execute Vector,Slice_Read 062f 0335 | 5 | Declare_Variable Array,Duplicate 0630 00ca | | Action Exit_Nullary_Function 0631 0000 0000 | | .BLANK 0000[0x7] 0638 ; -------------------------------------------------------------------------------------- 0638 ; SUBPROGRAM 0638 ; -------------------------------------------------------------------------------------- 0638 063b | ; | .CONST 0x063b ; Address of begin 0639 0004 | | .CONST 0x0004 ; Address of exception handler 063a 0001 | | .CONST 0x0001 ; Number of locals 063b BODY_0638: 063b INIT_0638: 063b e5ff | | Load 0x2,-0x1 ; Debug Table 0xd = .DEBUG 0x063b,0x1118,0x1001,0x0000,0x0036,0x56d4,0x0000,0x0146 ; Debug Table 0xd.0x0 = 0x63b,0x1 063c a225 | % | Store_Unchecked 0x1,0x25 063d e225 | % | Load 0x1,0x25 ; Debug Table 0xd.0x1 = 0x63d,0x2 063e 6804 |h | Jump_Zero 0x643 063f 0092 0b20 | | Action Push_String_Extended,0xb20 ; "Comm: tracing" ; Debug Table 0xd.0x2 = 0x63f,0x3 0641 8215 | | Call 0x1,0x15 0642 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0643 0092 0b21 | !| Action Push_String_Extended,0xb21 ; "Comm: not tracing" ; Debug Table 0xd.0x3 = 0x643,0x4 0645 8215 | | Call 0x1,0x15 0646 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0647 0000 | | .XXX[0x1] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 4603 |F | Jump_Case 0x4 ; Debug Table 0xe = .DEBUG 0x064b,0x1122,0x1005,0x0000,0x0036,0x56e4,0x0000,0x0129 064c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 064d 7802 |x | Jump 0x650 ; case 0x1 064e 7805 |x | Jump 0x654 ; case 0x2 064f 7809 |x | Jump 0x659 ; case 0x3 0650 e5ff | | Load 0x2,-0x1 0651 0091 0b06 | | Action Push_String_Extended_Indexed,0xb06 ; "CC_ACK" 0653 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0654 e5fe | | Load 0x2,-0x2 0655 e5ff | | Load 0x2,-0x1 0656 00e0 | | Load_Encached Standard_Cache 0657 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0658 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0659 e5ff | | Load 0x2,-0x1 065a 00e0 | | Load_Encached Standard_Cache 065b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 065c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 065d 0000 0000 | | .XXX[0x3] 065f 0000 | | 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 0663 | c | .CONST 0x0663 ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0001 | | .CONST 0x0001 ; Number of locals 0663 BODY_0660: 0663 INIT_0660: 0663 4603 |F | Jump_Case 0x4 ; Debug Table 0xf = .DEBUG 0x0663,0x1124,0x1005,0x0000,0x0036,0x56e4,0x0000,0x016e 0664 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0665 7802 |x | Jump 0x668 ; case 0x1 0666 7805 |x | Jump 0x66c ; case 0x2 0667 7809 |x | Jump 0x671 ; case 0x3 0668 e5ff | | Load 0x2,-0x1 0669 0091 0b10 | | Action Push_String_Extended_Indexed,0xb10 ; "PS_SUCCESSFUL" 066b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 066c e5fe | | Load 0x2,-0x2 066d e5ff | | Load 0x2,-0x1 066e 00e0 | | Load_Encached Standard_Cache 066f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0670 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0671 e5ff | | Load 0x2,-0x1 0672 00e0 | | Load_Encached Standard_Cache 0673 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0674 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0675 0000 0000 | | .XXX[0x3] 0677 0000 | | 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 0680 | | .CONST 0x0680 ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0006 | | .CONST 0x0006 ; Number of locals 067b INIT_0678: 067b e002 | | Load 0x0,0x2 ; Debug Table 0x10 = .DEBUG 0x067b,0x1126,0x1001,0x0000,0x0036,0x56e4,0x0000,0x01b6 ; Debug Table 0x10.0x0 = 0x67b,0xffff 067c e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x1 = 0x67c,0xfffe 067d e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x2 = 0x67d,0xfffd 067e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x3 = 0x67e,0xfffc 067f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x4 = 0x67f,0xfffb 0680 BODY_0678: 0680 e5ff | | Load 0x2,-0x1 ; Debug Table 0x10.0x5 = 0x680,0x1 0681 a402 | | Store_Unchecked 0x2,0x2 0682 e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0x6 = 0x682,0x2 0683 a403 | | Store_Unchecked 0x2,0x3 0684 4800 |H | Short_Literal 0x0 ; Debug Table 0x10.0x7 = 0x684,0x3 0685 a5fe | | Store_Unchecked 0x2,-0x2 0686 4800 |H | Short_Literal 0x0 ; Debug Table 0x10.0x8 = 0x686,0x4 0687 4807 |H | Short_Literal 0x7 0688 4802 |H | Short_Literal 0x2 ; Debug Table 0x10.0x9 = 0x688,0x5 0689 e408 | | Load 0x2,0x8 068a 026d | m | Execute Discrete,Exponentiate 068b 0248 | H | Execute Discrete,Check_In_Integer 068c a404 | | Store_Unchecked 0x2,0x4 068d e403 | | Load 0x2,0x3 ; Debug Table 0x10.0xa = 0x68d,0x6 068e e404 | | Load 0x2,0x4 068f 027b | { | Execute Discrete,Greater_Equal 0690 a406 | | Store_Unchecked 0x2,0x6 0691 e402 | | Load 0x2,0x2 ; Debug Table 0x10.0xb = 0x691,0x7 0692 e404 | | Load 0x2,0x4 0693 027b | { | Execute Discrete,Greater_Equal 0694 a405 | | Store_Unchecked 0x2,0x5 0695 e405 | | Load 0x2,0x5 ; Debug Table 0x10.0xc = 0x695,0x8 0696 e406 | | Load 0x2,0x6 0697 0277 | w | Execute Discrete,Xor 0698 6805 |h | Jump_Zero 0x69e 0699 e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0xd = 0x699,0x9 069a e404 | | Load 0x2,0x4 069b 0273 | s | Execute Discrete,Plus 069c 0248 | H | Execute Discrete,Check_In_Integer 069d a5fe | | Store_Unchecked 0x2,-0x2 069e e406 | | Load 0x2,0x6 ; Debug Table 0x10.0xe = 0x69e,0xa 069f 6805 |h | Jump_Zero 0x6a5 06a0 e403 | | Load 0x2,0x3 ; Debug Table 0x10.0xf = 0x6a0,0xb 06a1 e404 | | Load 0x2,0x4 06a2 0272 | r | Execute Discrete,Minus 06a3 0248 | H | Execute Discrete,Check_In_Integer 06a4 a403 | | Store_Unchecked 0x2,0x3 06a5 e405 | | Load 0x2,0x5 ; Debug Table 0x10.0x10 = 0x6a5,0xc 06a6 6805 |h | Jump_Zero 0x6ac 06a7 e402 | | Load 0x2,0x2 ; Debug Table 0x10.0x11 = 0x6a7,0xd 06a8 e404 | | Load 0x2,0x4 06a9 0272 | r | Execute Discrete,Minus 06aa 0248 | H | Execute Discrete,Check_In_Integer 06ab a402 | | Store_Unchecked 0x2,0x2 06ac 37db |7 | Loop_Decreasing 0x688 06ad 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06ae 0000 0000 | | .XXX[0x2] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b4 | | .CONST 0x06b4 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0002 | | .CONST 0x0002 ; Number of locals 06b3 INIT_06b0: 06b3 e002 | | Load 0x0,0x2 ; Debug Table 0x11 = .DEBUG 0x06b3,0x114c,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0229 ; Debug Table 0x11.0x0 = 0x6b3,0xffff 06b4 BODY_06b0: 06b4 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x1 = 0x6b4,0x1 06b5 e5ff | | Load 0x2,-0x1 06b6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06b7 01d7 | | Execute Vector,Field_Read 06b8 a402 | | Store_Unchecked 0x2,0x2 06b9 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x2 = 0x6b9,0x2 06ba 4803 |H | Short_Literal 0x3 06bb e5ff | | Load 0x2,-0x1 06bc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06bd 01d7 | | Execute Vector,Field_Read 06be 822f | / | Call 0x1,0x2f 06bf c402 | | Store 0x2,0x2 06c0 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x3 = 0x6c0,0x3 06c1 4802 |H | Short_Literal 0x2 06c2 e5ff | | Load 0x2,-0x1 06c3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06c4 01d7 | | Execute Vector,Field_Read 06c5 822f | / | Call 0x1,0x2f 06c6 c402 | | Store 0x2,0x2 06c7 4803 |H | Short_Literal 0x3 ; Debug Table 0x11.0x4 = 0x6c7,0x4 06c8 e5ff | | Load 0x2,-0x1 06c9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06ca 01d7 | | Execute Vector,Field_Read 06cb 0afc | | Execute_Immediate Plus,-0x4 06cc 0248 | H | Execute Discrete,Check_In_Integer 06cd 4801 |H | Short_Literal 0x1 06ce 0263 | c | Execute Discrete,Above_Bound 06cf 7008 |p | Jump_Nonzero 0x6d8 06d0 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x5 = 0x6d0,0x5 06d1 e404 | | Load 0x2,0x4 06d2 e5ff | | Load 0x2,-0x1 06d3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06d4 01d7 | | Execute Vector,Field_Read 06d5 822f | / | Call 0x1,0x2f 06d6 c402 | | Store 0x2,0x2 06d7 3ff8 |? | Loop_Increasing 0x6d0 06d8 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x6 = 0x6d8,0x6 06d9 4804 |H | Short_Literal 0x4 06da e5ff | | Load 0x2,-0x1 06db 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06dc 01d6 | | Execute Vector,Field_Write 06dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06de 0000 0000 | | .XXX[0x2] 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06f0 | | .CONST 0x06f0 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0006 | | .CONST 0x0006 ; Number of locals 06e3 INIT_06e0: 06e3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12 = .DEBUG 0x06e3,0x115c,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0287 ; Debug Table 0x12.0x0 = 0x6e3,0xffff 06e4 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x12.0x1 = 0x6e4,0xfffe 06e5 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 06e6 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x2 = 0x6e6,0xfffd 06e7 4801 |H | Short_Literal 0x1 06e8 e001 | | Load 0x0,0x1 06e9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06ea 0334 | 4 | Declare_Variable Array,With_Constraint 06eb 62b8 |b | Indirect_Literal Discrete,0x9a4,{0x00000000, 0x00008000} ; Debug Table 0x12.0x3 = 0x6eb,0xfffc 06ec 00e7 | | Load_Encached Duration_Cache 06ed 03f1 | | Declare_Variable Discrete,With_Value 06ee 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x12.0x4 = 0x6ee,0xfffb 06ef 061e | | Execute_Immediate Set_Value_Unchecked,0x1e 06f0 BODY_06e0: 06f0 780e |x | Jump 0x6ff 06f1 e227 | ' | Load 0x1,0x27 ; Debug Table 0x12.0x5 = 0x6f1,0x2 06f2 8214 | | Call 0x1,0x14 06f3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12.0x6 = 0x6f3,0x3 06f4 e404 | | Load 0x2,0x4 06f5 00e3 | | Load_Encached Natural_Cache 06f6 e405 | | Load 0x2,0x5 06f7 e227 | ' | Load 0x1,0x27 06f8 8212 | | Call 0x1,0x12 06f9 c403 | | Store 0x2,0x3 06fa 00d1 | | Pop_Control Pop_Count_1 06fb c402 | | Store 0x2,0x2 06fc e406 | | Load 0x2,0x6 ; Debug Table 0x12.0x7 = 0x6fc,0x4 06fd 0aff | | Execute_Immediate Plus,-0x1 06fe c406 | | Store 0x2,0x6 06ff e403 | | Load 0x2,0x3 ; Debug Table 0x12.0x8 = 0x6ff,0x1 0700 0c01 | | Execute_Immediate Greater_Equal,0x1 0701 6803 |h | Jump_Zero 0x705 0702 e406 | | Load 0x2,0x6 0703 0c01 | | Execute_Immediate Greater_Equal,0x1 0704 77ec |w | Jump_Nonzero 0x6f1 0705 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0706 0000 0000 | | .XXX[0x2] 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 070e | | .CONST 0x070e ; Address of begin 0709 0004 | | .CONST 0x0004 ; Address of exception handler 070a 0004 | | .CONST 0x0004 ; Number of locals 070b INIT_0708: 070b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x13 = .DEBUG 0x070b,0x1170,0x1001,0x0000,0x0036,0x56e4,0x0000,0x02db ; Debug Table 0x13.0x0 = 0x70b,0xffff 070c 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x13.0x1 = 0x70c,0xfffe 070d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x13.0x2 = 0x70d,0xfffd 070e BODY_0708: 070e 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x3 = 0x70e,0x1 070f a5fd | | Store_Unchecked 0x2,-0x3 0710 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x4 = 0x710,0x2 0711 a5fe | | Store_Unchecked 0x2,-0x2 0712 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x5 = 0x712,0x3 0713 a404 | | Store_Unchecked 0x2,0x4 0714 781f |x | Jump 0x734 0715 e5ff | | Load 0x2,-0x1 ; Debug Table 0x13.0x6 = 0x715,0x5 0716 e404 | | Load 0x2,0x4 0717 4804 |H | Short_Literal 0x4 0718 e405 | | Load 0x2,0x5 0719 035b | [ | Declare_Type Array,Constrained 071a 00d0 | | Action Swap_Control 071b 01cd | | Execute Vector,Slice_Reference 071c 00e1 | | Load_Encached Boolean_Cache 071d e405 | | Load 0x2,0x5 071e 00e3 | | Load_Encached Natural_Cache 071f 6280 |b | Indirect_Literal Discrete,0x9a0,{0x00000000, 0x000a0000} 0720 e227 | ' | Load 0x1,0x27 0721 8212 | | Call 0x1,0x12 0722 c403 | | Store 0x2,0x3 0723 00d1 | | Pop_Control Pop_Count_1 0724 c402 | | Store 0x2,0x2 0725 00d1 | | Pop_Control Pop_Count_1 0726 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0x7 = 0x726,0x6 0727 e403 | | Load 0x2,0x3 0728 0273 | s | Execute Discrete,Plus 0729 c404 | | Store 0x2,0x4 072a e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x8 = 0x72a,0x7 072b 6803 |h | Jump_Zero 0x72f 072c 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x9 = 0x72c,0x8 072d a5fd | | Store_Unchecked 0x2,-0x3 072e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0xa = 0x72e,0x9 072f e403 | | Load 0x2,0x3 ; Debug Table 0x13.0xb = 0x72f,0xa 0730 7003 |p | Jump_Nonzero 0x734 0731 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0xc = 0x731,0xb 0732 a5fe | | Store_Unchecked 0x2,-0x2 0733 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0xd = 0x733,0xc 0734 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0xe = 0x734,0x4 0735 0d05 | | Execute_Immediate Less,0x5 0736 77de |w | Jump_Nonzero 0x715 0737 e225 | % | Load 0x1,0x25 ; Debug Table 0x13.0xf = 0x737,0xd 0738 6824 |h$ | Jump_Zero 0x75d 0739 0092 0b22 | "| Action Push_String_Extended,0xb22 ; "Comm: received header: Cmd : " ; Debug Table 0x13.0x10 = 0x739,0xe 073b 4801 |H | Short_Literal 0x1 073c e5ff | | Load 0x2,-0x1 073d 01d7 | | Execute Vector,Field_Read 073e 00e0 | | Load_Encached Standard_Cache 073f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0740 01cc | | Execute Vector,Catenate 0741 0092 0b23 | #| Action Push_String_Extended,0xb23 ; " Seq : " 0743 01cc | | Execute Vector,Catenate 0744 4802 |H | Short_Literal 0x2 0745 e5ff | | Load 0x2,-0x1 0746 01d7 | | Execute Vector,Field_Read 0747 00e0 | | Load_Encached Standard_Cache 0748 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0749 01cc | | Execute Vector,Catenate 074a 0092 0b24 | $| Action Push_String_Extended,0xb24 ; " Len : " 074c 01cc | | Execute Vector,Catenate 074d 4803 |H | Short_Literal 0x3 074e e5ff | | Load 0x2,-0x1 074f 01d7 | | Execute Vector,Field_Read 0750 00e0 | | Load_Encached Standard_Cache 0751 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0752 01cc | | Execute Vector,Catenate 0753 0092 0b25 | %| Action Push_String_Extended,0xb25 ; " Chk : " 0755 01cc | | Execute Vector,Catenate 0756 4804 |H | Short_Literal 0x4 0757 e5ff | | Load 0x2,-0x1 0758 01d7 | | Execute Vector,Field_Read 0759 00e0 | | Load_Encached Standard_Cache 075a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 075b 01cc | | Execute Vector,Catenate 075c 8215 | | Call 0x1,0x15 075d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 075e 0000 0000 | | .XXX[0x2] 0760 ; -------------------------------------------------------------------------------------- 0760 ; SUBPROGRAM 0760 ; -------------------------------------------------------------------------------------- 0760 0763 | c | .CONST 0x0763 ; Address of begin 0761 0004 | | .CONST 0x0004 ; Address of exception handler 0762 0001 | | .CONST 0x0001 ; Number of locals 0763 BODY_0760: 0763 INIT_0760: 0763 e5ff | | Load 0x2,-0x1 ; Debug Table 0x14 = .DEBUG 0x0763,0x1194,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0383 ; Debug Table 0x14.0x0 = 0x763,0x1 0764 01db | | Execute Vector,Length 0765 c229 | ) | Store 0x1,0x29 0766 e5ff | | Load 0x2,-0x1 ; Debug Table 0x14.0x1 = 0x766,0x2 0767 4801 |H | Short_Literal 0x1 0768 e229 | ) | Load 0x1,0x29 0769 e228 | ( | Load 0x1,0x28 076a 01ce | | Execute Vector,Slice_Write 076b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 076c 0000 0000 | | .BLANK 0000[0x4] 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 0777 | w | .CONST 0x0777 ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0002 | | .CONST 0x0002 ; Number of locals 0773 INIT_0770: 0773 4801 |H | Short_Literal 0x1 ; Debug Table 0x15 = .DEBUG 0x0773,0x119a,0x1001,0x0000,0x0036,0x56e4,0x0000,0x039b ; Debug Table 0x15.0x0 = 0x773,0xffff 0774 48fb |H | Short_Literal 0xfb 0775 00e9 | | Load_Encached String_Cache 0776 0334 | 4 | Declare_Variable Array,With_Constraint 0777 BODY_0770: 0777 4803 |H | Short_Literal 0x3 ; Debug Table 0x15.0x1 = 0x777,0x1 0778 e5ff | | Load 0x2,-0x1 0779 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 077a 01d7 | | Execute Vector,Field_Read 077b 0afc | | Execute_Immediate Plus,-0x4 077c 0248 | H | Execute Discrete,Check_In_Integer 077d a229 | ) | Store_Unchecked 0x1,0x29 077e e229 | ) | Load 0x1,0x29 ; Debug Table 0x15.0x2 = 0x77e,0x2 077f 4801 |H | Short_Literal 0x1 0780 0263 | c | Execute Discrete,Above_Bound 0781 700e |p | Jump_Nonzero 0x790 0782 e404 | | Load 0x2,0x4 ; Debug Table 0x15.0x3 = 0x782,0x3 0783 e5ff | | Load 0x2,-0x1 0784 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0785 01d7 | | Execute Vector,Field_Read 0786 00d8 | | Load_Top At_Offset_0 0787 00e8 | | Load_Encached Character_Cache 0788 0260 | ` | Execute Discrete,In_Type 0789 7002 |p | Jump_Nonzero 0x78c 078a 48e0 |H | Short_Literal 0xe0 078b 0257 | W | Execute Discrete,Raise 078c e404 | | Load 0x2,0x4 078d e228 | ( | Load 0x1,0x28 078e 01d6 | | Execute Vector,Field_Write 078f 3ff2 |? | Loop_Increasing 0x782 0790 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0791 0000 0000 | | .BLANK 0000[0x7] 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 07a2 | | .CONST 0x07a2 ; Address of begin 0799 0004 | | .CONST 0x0004 ; Address of exception handler 079a 0008 | | .CONST 0x0008 ; Number of locals 079b INIT_0798: 079b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16 = .DEBUG 0x079b,0x11a4,0x1001,0x0000,0x0036,0x56e4,0x0000,0x03d8 ; Debug Table 0x16.0x0 = 0x79b,0xffff 079c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16.0x1 = 0x79c,0xfffe 079d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x16.0x2 = 0x79d,0xfffd 079e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x16.0x3 = 0x79e,0xfffc 079f e002 | | Load 0x0,0x2 ; Debug Table 0x16.0x4 = 0x79f,0xfffb 07a0 e002 | | Load 0x0,0x2 ; Debug Table 0x16.0x5 = 0x7a0,0xfffa 07a1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x16.0x6 = 0x7a1,0xfff9 07a2 BODY_0798: 07a2 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16.0x7 = 0x7a2,0x1 07a3 00e1 | | Load_Encached Boolean_Cache 07a4 e5ff | | Load 0x2,-0x1 07a5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07a6 8232 | 2 | Call 0x1,0x32 07a7 00d1 | | Pop_Control Pop_Count_1 07a8 c402 | | Store 0x2,0x2 07a9 c403 | | Store 0x2,0x3 07aa e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x8 = 0x7aa,0x2 07ab 6803 |h | Jump_Zero 0x7af 07ac 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x9 = 0x7ac,0x3 07ad a5fe | | Store_Unchecked 0x2,-0x2 07ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07af e403 | | Load 0x2,0x3 ; Debug Table 0x16.0xa = 0x7af,0x4 07b0 6803 |h | Jump_Zero 0x7b4 07b1 4807 |H | Short_Literal 0x7 ; Debug Table 0x16.0xb = 0x7b1,0x5 07b2 a5fe | | Store_Unchecked 0x2,-0x2 07b3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07b4 4803 |H | Short_Literal 0x3 ; Debug Table 0x16.0xc = 0x7b4,0x6 07b5 e5ff | | Load 0x2,-0x1 07b6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07b7 01d7 | | Execute Vector,Field_Read 07b8 0d04 | | Execute_Immediate Less,0x4 07b9 6803 |h | Jump_Zero 0x7bd 07ba 4803 |H | Short_Literal 0x3 ; Debug Table 0x16.0xd = 0x7ba,0x7 07bb a5fe | | Store_Unchecked 0x2,-0x2 07bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07bd 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0xe = 0x7bd,0x8 07be a405 | | Store_Unchecked 0x2,0x5 07bf 4803 |H | Short_Literal 0x3 ; Debug Table 0x16.0xf = 0x7bf,0x9 07c0 e5ff | | Load 0x2,-0x1 07c1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07c2 01d7 | | Execute Vector,Field_Read 07c3 0afc | | Execute_Immediate Plus,-0x4 07c4 0248 | H | Execute Discrete,Check_In_Integer 07c5 a408 | | Store_Unchecked 0x2,0x8 07c6 7820 |x | Jump 0x7e7 07c7 e5ff | | Load 0x2,-0x1 ; Debug Table 0x16.0x10 = 0x7c7,0xb 07c8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07c9 e405 | | Load 0x2,0x5 07ca e408 | | Load 0x2,0x8 07cb e409 | | Load 0x2,0x9 07cc 035b | [ | Declare_Type Array,Constrained 07cd 00d0 | | Action Swap_Control 07ce 01cd | | Execute Vector,Slice_Reference 07cf 00e1 | | Load_Encached Boolean_Cache 07d0 e409 | | Load 0x2,0x9 07d1 00e3 | | Load_Encached Natural_Cache 07d2 61cd |a | Indirect_Literal Discrete,0x9a0,{0x00000000, 0x000a0000} 07d3 e227 | ' | Load 0x1,0x27 07d4 8212 | | Call 0x1,0x12 07d5 c404 | | Store 0x2,0x4 07d6 00d1 | | Pop_Control Pop_Count_1 07d7 c403 | | Store 0x2,0x3 07d8 00d1 | | Pop_Control Pop_Count_1 07d9 e403 | | Load 0x2,0x3 ; Debug Table 0x16.0x11 = 0x7d9,0xc 07da 6803 |h | Jump_Zero 0x7de 07db 4807 |H | Short_Literal 0x7 ; Debug Table 0x16.0x12 = 0x7db,0xd 07dc a5fe | | Store_Unchecked 0x2,-0x2 07dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x16.0x13 = 0x7dd,0xe 07de e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x14 = 0x7de,0xf 07df 6803 |h | Jump_Zero 0x7e3 07e0 4804 |H | Short_Literal 0x4 ; Debug Table 0x16.0x15 = 0x7e0,0x10 07e1 a5fe | | Store_Unchecked 0x2,-0x2 07e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x16.0x16 = 0x7e2,0x11 07e3 e405 | | Load 0x2,0x5 ; Debug Table 0x16.0x17 = 0x7e3,0x12 07e4 e404 | | Load 0x2,0x4 07e5 0273 | s | Execute Discrete,Plus 07e6 c405 | | Store 0x2,0x5 07e7 e405 | | Load 0x2,0x5 ; Debug Table 0x16.0x18 = 0x7e7,0xa 07e8 e408 | | Load 0x2,0x8 07e9 027a | z | Execute Discrete,Less_Equal 07ea 77dc |w | Jump_Nonzero 0x7c7 07eb 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x19 = 0x7eb,0x13 07ec e5ff | | Load 0x2,-0x1 07ed 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07ee 01d7 | | Execute Vector,Field_Read 07ef a407 | | Store_Unchecked 0x2,0x7 07f0 e407 | | Load 0x2,0x7 ; Debug Table 0x16.0x1a = 0x7f0,0x14 07f1 4803 |H | Short_Literal 0x3 07f2 e5ff | | Load 0x2,-0x1 07f3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07f4 01d7 | | Execute Vector,Field_Read 07f5 822f | / | Call 0x1,0x2f 07f6 c407 | | Store 0x2,0x7 07f7 e407 | | Load 0x2,0x7 ; Debug Table 0x16.0x1b = 0x7f7,0x15 07f8 4802 |H | Short_Literal 0x2 07f9 e5ff | | Load 0x2,-0x1 07fa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07fb 01d7 | | Execute Vector,Field_Read 07fc 822f | / | Call 0x1,0x2f 07fd c407 | | Store 0x2,0x7 07fe e408 | | Load 0x2,0x8 ; Debug Table 0x16.0x1c = 0x7fe,0x16 07ff 4801 |H | Short_Literal 0x1 0800 0263 | c | Execute Discrete,Above_Bound 0801 7008 |p | Jump_Nonzero 0x80a 0802 e407 | | Load 0x2,0x7 ; Debug Table 0x16.0x1d = 0x802,0x17 0803 e40a | | Load 0x2,0xa 0804 e5ff | | Load 0x2,-0x1 0805 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0806 01d7 | | Execute Vector,Field_Read 0807 822f | / | Call 0x1,0x2f 0808 c407 | | Store 0x2,0x7 0809 3ff8 |? | Loop_Increasing 0x802 080a e407 | | Load 0x2,0x7 ; Debug Table 0x16.0x1e = 0x80a,0x18 080b 4804 |H | Short_Literal 0x4 080c e5ff | | Load 0x2,-0x1 080d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 080e 01d7 | | Execute Vector,Field_Read 080f 027f | | Execute Discrete,Equal 0810 7003 |p | Jump_Nonzero 0x814 0811 4805 |H | Short_Literal 0x5 ; Debug Table 0x16.0x1f = 0x811,0x19 0812 a5fe | | Store_Unchecked 0x2,-0x2 0813 7802 |x | Jump 0x816 0814 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x20 = 0x814,0x1a 0815 a5fe | | Store_Unchecked 0x2,-0x2 0816 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x21 = 0x816,0x1b 0817 e5ff | | Load 0x2,-0x1 0818 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0819 01d7 | | Execute Vector,Field_Read 081a 4802 |H | Short_Literal 0x2 081b e223 | # | Load 0x1,0x23 081c 01d7 | | Execute Vector,Field_Read 081d 027f | | Execute Discrete,Equal 081e 6802 |h | Jump_Zero 0x821 081f 4806 |H | Short_Literal 0x6 ; Debug Table 0x16.0x22 = 0x81f,0x1c 0820 a5fe | | Store_Unchecked 0x2,-0x2 0821 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0822 0000 0000 | | .BLANK 0000[0x6] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 082b | + | .CONST 0x082b ; Address of begin 0829 0004 | | .CONST 0x0004 ; Address of exception handler 082a 0001 | | .CONST 0x0001 ; Number of locals 082b BODY_0828: 082b INIT_0828: 082b 4801 |H | Short_Literal 0x1 ; Debug Table 0x17 = .DEBUG 0x082b,0x11ec,0x1001,0x0000,0x0036,0x56e4,0x0000,0x04e5 ; Debug Table 0x17.0x0 = 0x82b,0x1 082c 4804 |H | Short_Literal 0x4 082d e5ff | | Load 0x2,-0x1 082e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 082f 01cf | | Execute Vector,Slice_Read 0830 e227 | ' | Load 0x1,0x27 0831 8213 | | Call 0x1,0x13 0832 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x1 = 0x832,0x2 0833 4803 |H | Short_Literal 0x3 0834 e5ff | | Load 0x2,-0x1 0835 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0836 01d7 | | Execute Vector,Field_Read 0837 0afc | | Execute_Immediate Plus,-0x4 0838 0248 | H | Execute Discrete,Check_In_Integer 0839 e5ff | | Load 0x2,-0x1 083a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 083b 01cf | | Execute Vector,Slice_Read 083c e227 | ' | Load 0x1,0x27 083d 8213 | | Call 0x1,0x13 083e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 083f 0000 | | .XXX[0x1] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0847 | G | .CONST 0x0847 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0002 | | .CONST 0x0002 ; Number of locals 0843 INIT_0840: 0843 4801 |H | Short_Literal 0x1 ; Debug Table 0x18 = .DEBUG 0x0843,0x11f2,0x1001,0x0000,0x0036,0x56e4,0x0000,0x051b ; Debug Table 0x18.0x0 = 0x843,0xffff 0844 48fb |H | Short_Literal 0xfb 0845 00e9 | | Load_Encached String_Cache 0846 0334 | 4 | Declare_Variable Array,With_Constraint 0847 BODY_0840: 0847 4803 |H | Short_Literal 0x3 ; Debug Table 0x18.0x1 = 0x847,0x1 0848 e5ff | | Load 0x2,-0x1 0849 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 084a 01d7 | | Execute Vector,Field_Read 084b 0afc | | Execute_Immediate Plus,-0x4 084c 0248 | H | Execute Discrete,Check_In_Integer 084d 4801 |H | Short_Literal 0x1 084e 0263 | c | Execute Discrete,Above_Bound 084f 700e |p | Jump_Nonzero 0x85e 0850 e404 | | Load 0x2,0x4 ; Debug Table 0x18.0x2 = 0x850,0x2 0851 e5ff | | Load 0x2,-0x1 0852 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0853 01d7 | | Execute Vector,Field_Read 0854 00d8 | | Load_Top At_Offset_0 0855 00e8 | | Load_Encached Character_Cache 0856 0260 | ` | Execute Discrete,In_Type 0857 7002 |p | Jump_Nonzero 0x85a 0858 48e0 |H | Short_Literal 0xe0 0859 0257 | W | Execute Discrete,Raise 085a e404 | | Load 0x2,0x4 085b e402 | | Load 0x2,0x2 085c 01d6 | | Execute Vector,Field_Write 085d 3ff2 |? | Loop_Increasing 0x850 085e 0092 0b26 | &| Action Push_String_Extended,0xb26 ; "Host: " ; Debug Table 0x18.0x3 = 0x85e,0x3 0860 4801 |H | Short_Literal 0x1 0861 4803 |H | Short_Literal 0x3 0862 e5ff | | Load 0x2,-0x1 0863 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0864 01d7 | | Execute Vector,Field_Read 0865 0afc | | Execute_Immediate Plus,-0x4 0866 0248 | H | Execute Discrete,Check_In_Integer 0867 e402 | | Load 0x2,0x2 0868 01cf | | Execute Vector,Slice_Read 0869 01cc | | Execute Vector,Catenate 086a 8215 | | Call 0x1,0x15 086b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 086c 0000 0000 | | .BLANK 0000[0x4] 0870 ; -------------------------------------------------------------------------------------- 0870 ; SUBPROGRAM 0870 ; -------------------------------------------------------------------------------------- 0870 0875 | u | .CONST 0x0875 ; Address of begin 0871 0004 | | .CONST 0x0004 ; Address of exception handler 0872 0002 | | .CONST 0x0002 ; Number of locals 0873 INIT_0870: 0873 e220 | | Load 0x1,0x20 ; Debug Table 0x19 = .DEBUG 0x0873,0x11fc,0x1001,0x0000,0x0036,0x56e4,0x0000,0x056e ; Debug Table 0x19.0x0 = 0x873,0xffff 0874 0322 | " | Declare_Variable Record 0875 BODY_0870: 0875 e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x1 = 0x875,0x1 0876 01db | | Execute Vector,Length 0877 0a04 | | Execute_Immediate Plus,0x4 0878 e003 | | Load 0x0,0x3 0879 1b11 | | Execute Package,Field_Read,Field_Number 0x11 087a 025b | [ | Execute Discrete,Check_In_Type 087b 4803 |H | Short_Literal 0x3 087c e402 | | Load 0x2,0x2 087d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 087e 01d6 | | Execute Vector,Field_Write 087f 48ff |H | Short_Literal 0xff ; Debug Table 0x19.0x2 = 0x87f,0x2 0880 4802 |H | Short_Literal 0x2 0881 e402 | | Load 0x2,0x2 0882 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0883 01d6 | | Execute Vector,Field_Write 0884 4802 |H | Short_Literal 0x2 ; Debug Table 0x19.0x3 = 0x884,0x3 0885 e223 | # | Load 0x1,0x23 0886 01d7 | | Execute Vector,Field_Read 0887 4801 |H | Short_Literal 0x1 0888 e402 | | Load 0x2,0x2 0889 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 088a 01d6 | | Execute Vector,Field_Write 088b e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x4 = 0x88b,0x4 088c 01db | | Execute Vector,Length 088d 4801 |H | Short_Literal 0x1 088e 0263 | c | Execute Discrete,Above_Bound 088f 700b |p | Jump_Nonzero 0x89b 0890 e404 | | Load 0x2,0x4 ; Debug Table 0x19.0x5 = 0x890,0x5 0891 e5ff | | Load 0x2,-0x1 0892 01d7 | | Execute Vector,Field_Read 0893 e003 | | Load 0x0,0x3 0894 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0895 025b | [ | Execute Discrete,Check_In_Type 0896 e404 | | Load 0x2,0x4 0897 e402 | | Load 0x2,0x2 0898 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0899 01d6 | | Execute Vector,Field_Write 089a 3ff5 |? | Loop_Increasing 0x890 089b e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x6 = 0x89b,0x6 089c 8230 | 0 | Call 0x1,0x30 089d 00d1 | | Pop_Control Pop_Count_1 089e e225 | % | Load 0x1,0x25 ; Debug Table 0x19.0x7 = 0x89e,0x7 089f 6805 |h | Jump_Zero 0x8a5 08a0 0092 0b27 | '| Action Push_String_Extended,0xb27 ; "Comm: sending ABORT with message: " ; Debug Table 0x19.0x8 = 0x8a0,0x8 08a2 e5ff | | Load 0x2,-0x1 08a3 01cc | | Execute Vector,Catenate 08a4 8215 | | Call 0x1,0x15 08a5 e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x9 = 0x8a5,0x9 08a6 8236 | 6 | Call 0x1,0x36 08a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 08a8 ; -------------------------------------------------------------------------------------- 08a8 ; SUBPROGRAM 08a8 ; -------------------------------------------------------------------------------------- 08a8 08b6 | | .CONST 0x08b6 ; Address of begin 08a9 0004 | | .CONST 0x0004 ; Address of exception handler 08aa 0007 | | .CONST 0x0007 ; Number of locals 08ab INIT_08a8: 08ab 0092 0b28 | (| Action Push_String_Extended,0xb28 ; "Aborting" ; Debug Table 0x1a = .DEBUG 0x08ab,0x1212,0x1001,0x0000,0x0036,0x56e4,0x0000,0x05d6 ; Debug Table 0x1a.0x0 = 0x8ab,0xffff 08ad 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0x1 = 0x8ad,0xfffe 08ae 48fb |H | Short_Literal 0xfb 08af 00e9 | | Load_Encached String_Cache 08b0 0334 | 4 | Declare_Variable Array,With_Constraint 08b1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1a.0x2 = 0x8b1,0xfffd 08b2 e224 | $ | Load 0x1,0x24 ; Debug Table 0x1a.0x3 = 0x8b2,0xfffc 08b3 e220 | | Load 0x1,0x20 ; Debug Table 0x1a.0x4 = 0x8b3,0xfffb 08b4 0322 | " | Declare_Variable Record 08b5 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1a.0x5 = 0x8b5,0xfffa 08b6 BODY_08a8: 08b6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1a.0x6 = 0x8b6,0x1 08b7 01db | | Execute Vector,Length 08b8 c404 | | Store 0x2,0x4 08b9 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1a.0x7 = 0x8b9,0x2 08ba 4801 |H | Short_Literal 0x1 08bb e404 | | Load 0x2,0x4 08bc e403 | | Load 0x2,0x3 08bd 01ce | | Execute Vector,Slice_Write 08be 4803 |H | Short_Literal 0x3 ; Debug Table 0x1a.0x8 = 0x8be,0x3 08bf a407 | | Store_Unchecked 0x2,0x7 08c0 7800 |x | Jump 0x8c1 08c1 8231 | 1 | Call 0x1,0x31 ; Debug Table 0x1a.0x9 = 0x8c1,0x5 08c2 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0xa = 0x8c2,0x6 08c3 e404 | | Load 0x2,0x4 08c4 e403 | | Load 0x2,0x3 08c5 01cf | | Execute Vector,Slice_Read 08c6 8238 | 8 | Call 0x1,0x38 08c7 e224 | $ | Load 0x1,0x24 ; Debug Table 0x1a.0xb = 0x8c7,0x7 08c8 e406 | | Load 0x2,0x6 08c9 8235 | 5 | Call 0x1,0x35 08ca 00d1 | | Pop_Control Pop_Count_1 08cb c405 | | Store 0x2,0x5 08cc e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0xc = 0x8cc,0x8 08cd 0f06 | | Execute_Immediate Equal,0x6 08ce 6805 |h | Jump_Zero 0x8d4 08cf e225 | % | Load 0x1,0x25 ; Debug Table 0x1a.0xd = 0x8cf,0x9 08d0 6802 |h | Jump_Zero 0x8d3 08d1 e406 | | Load 0x2,0x6 ; Debug Table 0x1a.0xe = 0x8d1,0xa 08d2 8237 | 7 | Call 0x1,0x37 08d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x1a.0xf = 0x8d3,0xb 08d4 4808 |H | Short_Literal 0x8 ; Debug Table 0x1a.0x10 = 0x8d4,0xc 08d5 a404 | | Store_Unchecked 0x2,0x4 08d6 e402 | | Load 0x2,0x2 ; Debug Table 0x1a.0x11 = 0x8d6,0xd 08d7 4801 |H | Short_Literal 0x1 08d8 e404 | | Load 0x2,0x4 08d9 e403 | | Load 0x2,0x3 08da 01ce | | Execute Vector,Slice_Write 08db e407 | | Load 0x2,0x7 ; Debug Table 0x1a.0x12 = 0x8db,0xe 08dc 0aff | | Execute_Immediate Plus,-0x1 08dd c407 | | Store 0x2,0x7 08de e407 | | Load 0x2,0x7 ; Debug Table 0x1a.0x13 = 0x8de,0xf 08df 77e1 |w | Jump_Nonzero 0x8c1 08e0 8210 | | Call 0x1,0x10 ; Debug Table 0x1a.0x14 = 0x8e0,0x10 08e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x1a.0x15 = 0x8e1,0x11 08e2 0000 0000 | | .BLANK 0000[0x6] 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; SUBPROGRAM 08e8 ; -------------------------------------------------------------------------------------- 08e8 0908 | | .CONST 0x0908 ; Address of begin 08e9 0004 | | .CONST 0x0004 ; Address of exception handler 08ea 0003 | | .CONST 0x0003 ; Number of locals 08eb INIT_08e8: 08eb e220 | | Load 0x1,0x20 ; Debug Table 0x1b = .DEBUG 0x08eb,0x1240,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0661 ; Debug Table 0x1b.0x0 = 0x8eb,0xffff 08ec 0322 | " | Declare_Variable Record 08ed e21e | | Load 0x1,0x1e ; Debug Table 0x1b.0x1 = 0x8ed,0xfffe 08ee 0337 | 7 | Declare_Variable Array 08ef 4801 |H | Short_Literal 0x1 08f0 4804 |H | Short_Literal 0x4 08f1 e003 | | Load 0x0,0x3 08f2 1b12 | | Execute Package,Field_Read,Field_Number 0x12 08f3 0334 | 4 | Declare_Variable Array,With_Constraint 08f4 4809 |H | Short_Literal 0x9 08f5 e223 | # | Load 0x1,0x23 08f6 01d7 | | Execute Vector,Field_Read 08f7 4801 |H | Short_Literal 0x1 08f8 e404 | | Load 0x2,0x4 08f9 01d6 | | Execute Vector,Field_Write 08fa 48ff |H | Short_Literal 0xff 08fb 4802 |H | Short_Literal 0x2 08fc e404 | | Load 0x2,0x4 08fd 01d6 | | Execute Vector,Field_Write 08fe 4804 |H | Short_Literal 0x4 08ff 4803 |H | Short_Literal 0x3 0900 e404 | | Load 0x2,0x4 0901 01d6 | | Execute Vector,Field_Write 0902 486d |Hm | Short_Literal 0x6d 0903 4804 |H | Short_Literal 0x4 0904 e404 | | Load 0x2,0x4 0905 01d6 | | Execute Vector,Field_Write 0906 e403 | | Load 0x2,0x3 0907 01d4 | | Execute Vector,Structure_Write 0908 BODY_08e8: 0908 e403 | | Load 0x2,0x3 ; Debug Table 0x1b.0x2 = 0x908,0x1 0909 e402 | | Load 0x2,0x2 090a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 090b e225 | % | Load 0x1,0x25 ; Debug Table 0x1b.0x3 = 0x90b,0x2 090c 6803 |h | Jump_Zero 0x910 090d 0092 0b29 | )| Action Push_String_Extended,0xb29 ; "Comm: ending IREJ" ; Debug Table 0x1b.0x4 = 0x90d,0x3 090f 8215 | | Call 0x1,0x15 0910 e402 | | Load 0x2,0x2 ; Debug Table 0x1b.0x5 = 0x910,0x4 0911 8236 | 6 | Call 0x1,0x36 0912 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0913 0000 0000 | | .BLANK 0000[0x5] 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 0939 | 9 | .CONST 0x0939 ; Address of begin 0919 0004 | | .CONST 0x0004 ; Address of exception handler 091a 0003 | | .CONST 0x0003 ; Number of locals 091b INIT_0918: 091b e220 | | Load 0x1,0x20 ; Debug Table 0x1c = .DEBUG 0x091b,0x124e,0x1001,0x0000,0x0036,0x56e4,0x0000,0x069d ; Debug Table 0x1c.0x0 = 0x91b,0xffff 091c 0322 | " | Declare_Variable Record 091d e21e | | Load 0x1,0x1e ; Debug Table 0x1c.0x1 = 0x91d,0xfffe 091e 0337 | 7 | Declare_Variable Array 091f 4801 |H | Short_Literal 0x1 0920 4804 |H | Short_Literal 0x4 0921 e003 | | Load 0x0,0x3 0922 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0923 035b | [ | Declare_Type Array,Constrained 0924 0337 | 7 | Declare_Variable Array 0925 4807 |H | Short_Literal 0x7 0926 e223 | # | Load 0x1,0x23 0927 01d7 | | Execute Vector,Field_Read 0928 4801 |H | Short_Literal 0x1 0929 e404 | | Load 0x2,0x4 092a 01d6 | | Execute Vector,Field_Write 092b 48ff |H | Short_Literal 0xff 092c 4802 |H | Short_Literal 0x2 092d e404 | | Load 0x2,0x4 092e 01d6 | | Execute Vector,Field_Write 092f 4804 |H | Short_Literal 0x4 0930 4803 |H | Short_Literal 0x3 0931 e404 | | Load 0x2,0x4 0932 01d6 | | Execute Vector,Field_Write 0933 4883 |H | Short_Literal 0x83 0934 4804 |H | Short_Literal 0x4 0935 e404 | | Load 0x2,0x4 0936 01d6 | | Execute Vector,Field_Write 0937 e403 | | Load 0x2,0x3 0938 01d4 | | Execute Vector,Structure_Write 0939 BODY_0918: 0939 e403 | | Load 0x2,0x3 ; Debug Table 0x1c.0x2 = 0x939,0x1 093a e402 | | Load 0x2,0x2 093b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 093c e225 | % | Load 0x1,0x25 ; Debug Table 0x1c.0x3 = 0x93c,0x2 093d 6803 |h | Jump_Zero 0x941 093e 0092 0b2a | *| Action Push_String_Extended,0xb2a ; "Comm: sending IDLE" ; Debug Table 0x1c.0x4 = 0x93e,0x3 0940 8215 | | Call 0x1,0x15 0941 e402 | | Load 0x2,0x2 ; Debug Table 0x1c.0x5 = 0x941,0x4 0942 8236 | 6 | Call 0x1,0x36 0943 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0944 0000 0000 | | .BLANK 0000[0x4] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 094d | M | .CONST 0x094d ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0002 | | .CONST 0x0002 ; Number of locals 094b INIT_0948: 094b e220 | | Load 0x1,0x20 ; Debug Table 0x1d = .DEBUG 0x094b,0x125c,0x1001,0x0000,0x0036,0x56e4,0x0000,0x06d9 ; Debug Table 0x1d.0x0 = 0x94b,0xffff 094c 0322 | " | Declare_Variable Record 094d BODY_0948: 094d 4804 |H | Short_Literal 0x4 ; Debug Table 0x1d.0x1 = 0x94d,0x1 094e 4803 |H | Short_Literal 0x3 094f e402 | | Load 0x2,0x2 0950 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0951 01d6 | | Execute Vector,Field_Write 0952 4800 |H | Short_Literal 0x0 ; Debug Table 0x1d.0x2 = 0x952,0x2 0953 e223 | # | Load 0x1,0x23 0954 01d7 | | Execute Vector,Field_Read 0955 4801 |H | Short_Literal 0x1 0956 e402 | | Load 0x2,0x2 0957 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0958 01d6 | | Execute Vector,Field_Write 0959 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1d.0x3 = 0x959,0x3 095a 4802 |H | Short_Literal 0x2 095b e402 | | Load 0x2,0x2 095c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 095d 01d6 | | Execute Vector,Field_Write 095e e402 | | Load 0x2,0x2 ; Debug Table 0x1d.0x4 = 0x95e,0x4 095f 8230 | 0 | Call 0x1,0x30 0960 00d1 | | Pop_Control Pop_Count_1 0961 e225 | % | Load 0x1,0x25 ; Debug Table 0x1d.0x5 = 0x961,0x5 0962 6803 |h | Jump_Zero 0x966 0963 0092 0b2b | +| Action Push_String_Extended,0xb2b ; "Comm: sending ACK" ; Debug Table 0x1d.0x6 = 0x963,0x6 0965 8215 | | Call 0x1,0x15 0966 e402 | | Load 0x2,0x2 ; Debug Table 0x1d.0x7 = 0x966,0x7 0967 8236 | 6 | Call 0x1,0x36 0968 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0969 0000 0000 | | .BLANK 0000[0x7] 0970 ; -------------------------------------------------------------------------------------- 0970 ; SUBPROGRAM 0970 ; -------------------------------------------------------------------------------------- 0970 0991 | | .CONST 0x0991 ; Address of begin 0971 0004 | | .CONST 0x0004 ; Address of exception handler 0972 0003 | | .CONST 0x0003 ; Number of locals 0973 INIT_0970: 0973 e220 | | Load 0x1,0x20 ; Debug Table 0x1e = .DEBUG 0x0973,0x126e,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0715 ; Debug Table 0x1e.0x0 = 0x973,0xffff 0974 0322 | " | Declare_Variable Record 0975 e21e | | Load 0x1,0x1e ; Debug Table 0x1e.0x1 = 0x975,0xfffe 0976 0337 | 7 | Declare_Variable Array 0977 4801 |H | Short_Literal 0x1 0978 4804 |H | Short_Literal 0x4 0979 e003 | | Load 0x0,0x3 097a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 097b 035b | [ | Declare_Type Array,Constrained 097c 0337 | 7 | Declare_Variable Array 097d 4801 |H | Short_Literal 0x1 097e e223 | # | Load 0x1,0x23 097f 01d7 | | Execute Vector,Field_Read 0980 4801 |H | Short_Literal 0x1 0981 e404 | | Load 0x2,0x4 0982 01d6 | | Execute Vector,Field_Write 0983 48ff |H | Short_Literal 0xff 0984 4802 |H | Short_Literal 0x2 0985 e404 | | Load 0x2,0x4 0986 01d6 | | Execute Vector,Field_Write 0987 4804 |H | Short_Literal 0x4 0988 4803 |H | Short_Literal 0x3 0989 e404 | | Load 0x2,0x4 098a 01d6 | | Execute Vector,Field_Write 098b 48e5 |H | Short_Literal 0xe5 098c 4804 |H | Short_Literal 0x4 098d e404 | | Load 0x2,0x4 098e 01d6 | | Execute Vector,Field_Write 098f e403 | | Load 0x2,0x3 0990 01d4 | | Execute Vector,Structure_Write 0991 BODY_0970: 0991 8231 | 1 | Call 0x1,0x31 ; Debug Table 0x1e.0x2 = 0x991,0x1 0992 e403 | | Load 0x2,0x3 ; Debug Table 0x1e.0x3 = 0x992,0x2 0993 e402 | | Load 0x2,0x2 0994 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0995 e225 | % | Load 0x1,0x25 ; Debug Table 0x1e.0x4 = 0x995,0x3 0996 6803 |h | Jump_Zero 0x99a 0997 0092 0b2c | ,| Action Push_String_Extended,0xb2c ; "Comm: sending NAK" ; Debug Table 0x1e.0x5 = 0x997,0x4 0999 8215 | | Call 0x1,0x15 099a e402 | | Load 0x2,0x2 ; Debug Table 0x1e.0x6 = 0x99a,0x5 099b 8236 | 6 | Call 0x1,0x36 099c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 099d 0000 0000 | | .XXX[0x3] 099f 0000 | | 09a0 0000 0000 | | .LITERAL {0x00000000, 0x000a0000} 09a4 0000 0000 | | .LITERAL {0x00000000, 0x00008000} 09a8 ; -------------------------------------------------------------------------------------- 09a8 ; SUBPROGRAM 09a8 ; -------------------------------------------------------------------------------------- 09a8 09ab | | .CONST 0x09ab ; Address of begin 09a9 0004 | | .CONST 0x0004 ; Address of exception handler 09aa 0001 | | .CONST 0x0001 ; Number of locals 09ab BODY_09a8: 09ab INIT_09a8: 09ab e226 | & | Load 0x1,0x26 ; Debug Table 0x1f = .DEBUG 0x09ab,0x127e,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0754 ; Debug Table 0x1f.0x0 = 0x9ab,0x1 09ac 0fff | | Execute_Immediate Equal,-0x1 09ad 6803 |h | Jump_Zero 0x9b1 09ae 4800 |H | Short_Literal 0x0 ; Debug Table 0x1f.0x1 = 0x9ae,0x2 09af a226 | & | Store_Unchecked 0x1,0x26 09b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09b1 e226 | & | Load 0x1,0x26 ; Debug Table 0x1f.0x2 = 0x9b1,0x3 09b2 0a01 | | Execute_Immediate Plus,0x1 09b3 0248 | H | Execute Discrete,Check_In_Integer 09b4 a226 | & | Store_Unchecked 0x1,0x26 09b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09b6 0000 0000 | | .XXX[0x2] 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; SUBPROGRAM 09b8 ; -------------------------------------------------------------------------------------- 09b8 09c1 | | .CONST 0x09c1 ; Address of begin 09b9 0004 | | .CONST 0x0004 ; Address of exception handler 09ba 0005 | | .CONST 0x0005 ; Number of locals 09bb INIT_09b8: 09bb 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x20 = .DEBUG 0x09bb,0x1286,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0a5b ; Debug Table 0x20.0x0 = 0x9bb,0xffff 09bc e224 | $ | Load 0x1,0x24 ; Debug Table 0x20.0x1 = 0x9bc,0xfffe 09bd 0092 0b2d | -| Action Push_String_Extended,0xb2d ; "Aborted awaiting packet in READ" ; Debug Table 0x20.0x2 = 0x9bd,0xfffd 09bf 0092 0b2e | .| Action Push_String_Extended,0xb2e ; "Too many retries in READ" ; Debug Table 0x20.0x3 = 0x9bf,0xfffc 09c1 BODY_09b8: 09c1 4803 |H | Short_Literal 0x3 ; Debug Table 0x20.0x4 = 0x9c1,0x1 09c2 a402 | | Store_Unchecked 0x2,0x2 09c3 7800 |x | Jump 0x9c4 09c4 e224 | $ | Load 0x1,0x24 ; Debug Table 0x20.0x5 = 0x9c4,0x3 09c5 e5ff | | Load 0x2,-0x1 09c6 8235 | 5 | Call 0x1,0x35 09c7 00d1 | | Pop_Control Pop_Count_1 09c8 c403 | | Store 0x2,0x3 09c9 e403 | | Load 0x2,0x3 ; Debug Table 0x20.0x6 = 0x9c9,0x4 09ca 0f06 | | Execute_Immediate Equal,0x6 09cb 680c |h | Jump_Zero 0x9d8 09cc e225 | % | Load 0x1,0x25 ; Debug Table 0x20.0x7 = 0x9cc,0x5 09cd 6802 |h | Jump_Zero 0x9d0 09ce e5ff | | Load 0x2,-0x1 ; Debug Table 0x20.0x8 = 0x9ce,0x6 09cf 8237 | 7 | Call 0x1,0x37 09d0 4804 |H | Short_Literal 0x4 ; Debug Table 0x20.0x9 = 0x9d0,0x7 09d1 a5fe | | Store_Unchecked 0x2,-0x2 09d2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x20.0xa = 0x9d2,0x8 09d3 8234 | 4 | Call 0x1,0x34 09d4 e404 | | Load 0x2,0x4 ; Debug Table 0x20.0xb = 0x9d4,0x9 09d5 8238 | 8 | Call 0x1,0x38 09d6 8210 | | Call 0x1,0x10 ; Debug Table 0x20.0xc = 0x9d6,0xa 09d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x20.0xd = 0x9d7,0xb 09d8 e226 | & | Load 0x1,0x26 ; Debug Table 0x20.0xe = 0x9d8,0xc 09d9 700e |p | Jump_Nonzero 0x9e8 09da e403 | | Load 0x2,0x3 09db 700c |p | Jump_Nonzero 0x9e8 09dc 4801 |H | Short_Literal 0x1 09dd e5ff | | Load 0x2,-0x1 09de 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 09df 01d7 | | Execute Vector,Field_Read 09e0 4804 |H | Short_Literal 0x4 09e1 e223 | # | Load 0x1,0x23 09e2 01d7 | | Execute Vector,Field_Read 09e3 027f | | Execute Discrete,Equal 09e4 6803 |h | Jump_Zero 0x9e8 09e5 48ff |H | Short_Literal 0xff ; Debug Table 0x20.0xf = 0x9e5,0xd 09e6 823c | < | Call 0x1,0x3c 09e7 7fdc | | Jump 0x9c4 09e8 e403 | | Load 0x2,0x3 ; Debug Table 0x20.0x10 = 0x9e8,0xe 09e9 0e00 | | Execute_Immediate Not_Equal,0x0 09ea 4801 |H | Short_Literal 0x1 09eb e5ff | | Load 0x2,-0x1 09ec 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 09ed 01d7 | | Execute Vector,Field_Read 09ee 4806 |H | Short_Literal 0x6 09ef e223 | # | Load 0x1,0x23 09f0 01d7 | | Execute Vector,Field_Read 09f1 027f | | Execute Discrete,Equal 09f2 700a |p | Jump_Nonzero 0x9fd 09f3 4801 |H | Short_Literal 0x1 09f4 e5ff | | Load 0x2,-0x1 09f5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 09f6 01d7 | | Execute Vector,Field_Read 09f7 4805 |H | Short_Literal 0x5 09f8 e223 | # | Load 0x1,0x23 09f9 01d7 | | Execute Vector,Field_Read 09fa 027f | | Execute Discrete,Equal 09fb 0f00 | | Execute_Immediate Equal,0x0 09fc 7801 |x | Jump 0x9fe 09fd 4800 |H | Short_Literal 0x0 09fe 0278 | x | Execute Discrete,Or 09ff 681c |h | Jump_Zero 0xa1c 0a00 e402 | | Load 0x2,0x2 ; Debug Table 0x20.0x11 = 0xa00,0xf 0a01 0aff | | Execute_Immediate Plus,-0x1 0a02 c402 | | Store 0x2,0x2 0a03 e225 | % | Load 0x1,0x25 ; Debug Table 0x20.0x12 = 0xa03,0x10 0a04 6808 |h | Jump_Zero 0xa0d 0a05 0092 0b1c | | Action Push_String_Extended,0xb1c ; "Comm: " ; Debug Table 0x20.0x13 = 0xa05,0x11 0a07 e403 | | Load 0x2,0x3 0a08 e224 | $ | Load 0x1,0x24 0a09 025e | ^ | Execute Discrete,Convert 0a0a 1c01 | | Execute_Immediate Run_Utility,0x1 0a0b 01cc | | Execute Vector,Catenate 0a0c 8215 | | Call 0x1,0x15 0a0d e402 | | Load 0x2,0x2 ; Debug Table 0x20.0x14 = 0xa0d,0x12 0a0e 6802 |h | Jump_Zero 0xa11 0a0f 823d | = | Call 0x1,0x3d ; Debug Table 0x20.0x15 = 0xa0f,0x13 0a10 7fb3 | | Jump 0x9c4 0a11 4805 |H | Short_Literal 0x5 ; Debug Table 0x20.0x16 = 0xa11,0x14 0a12 a5fe | | Store_Unchecked 0x2,-0x2 0a13 e403 | | Load 0x2,0x3 ; Debug Table 0x20.0x17 = 0xa13,0x15 0a14 e224 | $ | Load 0x1,0x24 0a15 025e | ^ | Execute Discrete,Convert 0a16 1c01 | | Execute_Immediate Run_Utility,0x1 0a17 8233 | 3 | Call 0x1,0x33 0a18 e405 | | Load 0x2,0x5 ; Debug Table 0x20.0x18 = 0xa18,0x16 0a19 8239 | 9 | Call 0x1,0x39 0a1a 8210 | | Call 0x1,0x10 ; Debug Table 0x20.0x19 = 0xa1a,0x17 0a1b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x20.0x1a = 0xa1b,0x18 0a1c 4802 |H | Short_Literal 0x2 ; Debug Table 0x20.0x1b = 0xa1c,0x19 0a1d e5ff | | Load 0x2,-0x1 0a1e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a1f 01d7 | | Execute Vector,Field_Read 0a20 823c | < | Call 0x1,0x3c 0a21 4802 |H | Short_Literal 0x2 ; Debug Table 0x20.0x1c = 0xa21,0x1a 0a22 e5ff | | Load 0x2,-0x1 0a23 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a24 01d7 | | Execute Vector,Field_Read 0a25 e226 | & | Load 0x1,0x26 0a26 027f | | Execute Discrete,Equal 0a27 4801 |H | Short_Literal 0x1 0a28 e5ff | | Load 0x2,-0x1 0a29 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a2a 01d7 | | Execute Vector,Field_Read 0a2b 4806 |H | Short_Literal 0x6 0a2c e223 | # | Load 0x1,0x23 0a2d 01d7 | | Execute Vector,Field_Read 0a2e 027f | | Execute Discrete,Equal 0a2f 0278 | x | Execute Discrete,Or 0a30 6f93 |o | Jump_Zero 0x9c4 0a31 4803 |H | Short_Literal 0x3 ; Debug Table 0x20.0x1d = 0xa31,0x1b 0a32 a5fe | | Store_Unchecked 0x2,-0x2 0a33 823e | > | Call 0x1,0x3e ; Debug Table 0x20.0x1e = 0xa33,0x1c 0a34 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x20.0x1f = 0xa34,0x1d 0a35 0b2f 8233 | / 3| .XXX[0x2] 0a37 8210 | | Call 0x1,0x10 ; Debug Table 0x20.0x20 = 0xa37,0x20 0a38 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x20.0x21 = 0xa38,0x21 0a39 0000 0000 | | .BLANK 0000[0x7] 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; SUBPROGRAM 0a40 ; -------------------------------------------------------------------------------------- 0a40 0a4b | K | .CONST 0x0a4b ; Address of begin 0a41 0004 | | .CONST 0x0004 ; Address of exception handler 0a42 0006 | | .CONST 0x0006 ; Number of locals 0a43 INIT_0a40: 0a43 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x21 = .DEBUG 0x0a43,0x12cc,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0f8b ; Debug Table 0x21.0x0 = 0xa43,0xffff 0a44 e224 | $ | Load 0x1,0x24 ; Debug Table 0x21.0x1 = 0xa44,0xfffe 0a45 e220 | | Load 0x1,0x20 ; Debug Table 0x21.0x2 = 0xa45,0xfffd 0a46 0322 | " | Declare_Variable Record 0a47 0092 0b30 | 0| Action Push_String_Extended,0xb30 ; "Aborted awaiting ACK in WRITE" ; Debug Table 0x21.0x3 = 0xa47,0xfffc 0a49 0092 0b31 | 1| Action Push_String_Extended,0xb31 ; "Too many retries in WRITE" ; Debug Table 0x21.0x4 = 0xa49,0xfffb 0a4b BODY_0a40: 0a4b 4803 |H | Short_Literal 0x3 ; Debug Table 0x21.0x5 = 0xa4b,0x1 0a4c a402 | | Store_Unchecked 0x2,0x2 0a4d 7800 |x | Jump 0xa4e 0a4e e225 | % | Load 0x1,0x25 ; Debug Table 0x21.0x6 = 0xa4e,0x3 0a4f 6828 |h( | Jump_Zero 0xa78 0a50 0092 0b32 | 2| Action Push_String_Extended,0xb32 ; "Comm: transmitting packet: Cmd : " ; Debug Table 0x21.0x7 = 0xa50,0x4 0a52 4801 |H | Short_Literal 0x1 0a53 e5ff | | Load 0x2,-0x1 0a54 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a55 01d7 | | Execute Vector,Field_Read 0a56 00e0 | | Load_Encached Standard_Cache 0a57 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a58 01cc | | Execute Vector,Catenate 0a59 0092 0b23 | #| Action Push_String_Extended,0xb23 ; " Seq : " 0a5b 01cc | | Execute Vector,Catenate 0a5c 4802 |H | Short_Literal 0x2 0a5d e5ff | | Load 0x2,-0x1 0a5e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a5f 01d7 | | Execute Vector,Field_Read 0a60 00e0 | | Load_Encached Standard_Cache 0a61 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a62 01cc | | Execute Vector,Catenate 0a63 0092 0b24 | $| Action Push_String_Extended,0xb24 ; " Len : " 0a65 01cc | | Execute Vector,Catenate 0a66 4803 |H | Short_Literal 0x3 0a67 e5ff | | Load 0x2,-0x1 0a68 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a69 01d7 | | Execute Vector,Field_Read 0a6a 00e0 | | Load_Encached Standard_Cache 0a6b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a6c 01cc | | Execute Vector,Catenate 0a6d 0092 0b25 | %| Action Push_String_Extended,0xb25 ; " Chk : " 0a6f 01cc | | Execute Vector,Catenate 0a70 4804 |H | Short_Literal 0x4 0a71 e5ff | | Load 0x2,-0x1 0a72 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a73 01d7 | | Execute Vector,Field_Read 0a74 00e0 | | Load_Encached Standard_Cache 0a75 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a76 01cc | | Execute Vector,Catenate 0a77 8215 | | Call 0x1,0x15 0a78 e5ff | | Load 0x2,-0x1 ; Debug Table 0x21.0x8 = 0xa78,0x5 0a79 8236 | 6 | Call 0x1,0x36 0a7a e224 | $ | Load 0x1,0x24 ; Debug Table 0x21.0x9 = 0xa7a,0x6 0a7b e404 | | Load 0x2,0x4 0a7c 8235 | 5 | Call 0x1,0x35 0a7d 00d1 | | Pop_Control Pop_Count_1 0a7e c403 | | Store 0x2,0x3 0a7f e403 | | Load 0x2,0x3 ; Debug Table 0x21.0xa = 0xa7f,0x7 0a80 0f06 | | Execute_Immediate Equal,0x6 0a81 680c |h | Jump_Zero 0xa8e 0a82 e225 | % | Load 0x1,0x25 ; Debug Table 0x21.0xb = 0xa82,0x8 0a83 6802 |h | Jump_Zero 0xa86 0a84 e5ff | | Load 0x2,-0x1 ; Debug Table 0x21.0xc = 0xa84,0x9 0a85 8237 | 7 | Call 0x1,0x37 0a86 4804 |H | Short_Literal 0x4 ; Debug Table 0x21.0xd = 0xa86,0xa 0a87 a5fe | | Store_Unchecked 0x2,-0x2 0a88 e404 | | Load 0x2,0x4 ; Debug Table 0x21.0xe = 0xa88,0xb 0a89 8234 | 4 | Call 0x1,0x34 0a8a e405 | | Load 0x2,0x5 ; Debug Table 0x21.0xf = 0xa8a,0xc 0a8b 8238 | 8 | Call 0x1,0x38 0a8c 8210 | | Call 0x1,0x10 ; Debug Table 0x21.0x10 = 0xa8c,0xd 0a8d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x21.0x11 = 0xa8d,0xe 0a8e e403 | | Load 0x2,0x3 ; Debug Table 0x21.0x12 = 0xa8e,0xf 0a8f 0e00 | | Execute_Immediate Not_Equal,0x0 0a90 4801 |H | Short_Literal 0x1 0a91 e404 | | Load 0x2,0x4 0a92 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a93 01d7 | | Execute Vector,Field_Read 0a94 4800 |H | Short_Literal 0x0 0a95 e223 | # | Load 0x1,0x23 0a96 01d7 | | Execute Vector,Field_Read 0a97 027f | | Execute Discrete,Equal 0a98 0f00 | | Execute_Immediate Equal,0x0 0a99 0278 | x | Execute Discrete,Or 0a9a 681a |h | Jump_Zero 0xab5 0a9b e402 | | Load 0x2,0x2 ; Debug Table 0x21.0x13 = 0xa9b,0x10 0a9c 0aff | | Execute_Immediate Plus,-0x1 0a9d c402 | | Store 0x2,0x2 0a9e e402 | | Load 0x2,0x2 ; Debug Table 0x21.0x14 = 0xa9e,0x11 0a9f 77ae |w | Jump_Nonzero 0xa4e 0aa0 e225 | % | Load 0x1,0x25 ; Debug Table 0x21.0x15 = 0xaa0,0x12 0aa1 6808 |h | Jump_Zero 0xaaa 0aa2 0092 0b1c | | Action Push_String_Extended,0xb1c ; "Comm: " ; Debug Table 0x21.0x16 = 0xaa2,0x13 0aa4 e403 | | Load 0x2,0x3 0aa5 e224 | $ | Load 0x1,0x24 0aa6 025e | ^ | Execute Discrete,Convert 0aa7 1c01 | | Execute_Immediate Run_Utility,0x1 0aa8 01cc | | Execute Vector,Catenate 0aa9 8215 | | Call 0x1,0x15 0aaa 4805 |H | Short_Literal 0x5 ; Debug Table 0x21.0x17 = 0xaaa,0x14 0aab a5fe | | Store_Unchecked 0x2,-0x2 0aac e403 | | Load 0x2,0x3 ; Debug Table 0x21.0x18 = 0xaac,0x15 0aad e224 | $ | Load 0x1,0x24 0aae 025e | ^ | Execute Discrete,Convert 0aaf 1c01 | | Execute_Immediate Run_Utility,0x1 0ab0 8233 | 3 | Call 0x1,0x33 0ab1 e406 | | Load 0x2,0x6 ; Debug Table 0x21.0x19 = 0xab1,0x16 0ab2 8239 | 9 | Call 0x1,0x39 0ab3 8210 | | Call 0x1,0x10 ; Debug Table 0x21.0x1a = 0xab3,0x17 0ab4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x21.0x1b = 0xab4,0x18 0ab5 4801 |H | Short_Literal 0x1 ; Debug Table 0x21.0x1c = 0xab5,0x19 0ab6 e5ff | | Load 0x2,-0x1 0ab7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0ab8 01d7 | | Execute Vector,Field_Read 0ab9 4806 |H | Short_Literal 0x6 0aba e223 | # | Load 0x1,0x23 0abb 01d7 | | Execute Vector,Field_Read 0abc 027f | | Execute Discrete,Equal 0abd 6803 |h | Jump_Zero 0xac1 0abe 4803 |H | Short_Literal 0x3 ; Debug Table 0x21.0x1d = 0xabe,0x1a 0abf a5fe | | Store_Unchecked 0x2,-0x2 0ac0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x21.0x1e = 0xac0,0x1b 0ac1 4802 |H | Short_Literal 0x2 ; Debug Table 0x21.0x1f = 0xac1,0x1c 0ac2 e404 | | Load 0x2,0x4 0ac3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0ac4 01d7 | | Execute Vector,Field_Read 0ac5 4802 |H | Short_Literal 0x2 0ac6 e5ff | | Load 0x2,-0x1 0ac7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0ac8 01d7 | | Execute Vector,Field_Read 0ac9 027f | | Execute Discrete,Equal 0aca 7001 |p | Jump_Nonzero 0xacc 0acb 7fae | | Jump 0xa7a ; Debug Table 0x21.0x20 = 0xacb,0x1d 0acc 4803 |H | Short_Literal 0x3 ; Debug Table 0x21.0x21 = 0xacc,0x1e 0acd a5fe | | Store_Unchecked 0x2,-0x2 0ace 823e | > | Call 0x1,0x3e ; Debug Table 0x21.0x22 = 0xace,0x1f 0acf 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x21.0x23 = 0xacf,0x20 0ad0 0b33 8233 | 3 3| .XXX[0x2] 0ad2 8210 | | Call 0x1,0x10 ; Debug Table 0x21.0x24 = 0xad2,0x23 0ad3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x21.0x25 = 0xad3,0x24 0ad4 0000 0000 | | .BLANK 0000[0x4] 0ad8 0aea 0004 | | .XXX[0x3] 0ada 0010 | | 0adb 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x22 = .DEBUG 0x0adb,0x131a,0x0000,0x0000,0x0036,0x56d4,0x0000,0x0052 ; Debug Table 0x22.0x0 = 0xadb,0xffff 0adc 0129 | ) | Execute Any,Make_Visible 0add 00c4 | | Action Make_Default ; Debug Table 0x22.0x1 = 0xadd,0xfffe 0ade 029a 0af3 | | Declare_Subprogram INIT_0af0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x22.0x2 = 0xade,0xfffd 0ae0 029a 0afb | | Declare_Subprogram INIT_0af8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x22.0x3 = 0xae0,0xfffc 0ae2 e20d | | Load 0x1,0xd ; Debug Table 0x22.0x4 = 0xae2,0xfffb ; Debug Table 0x22.0x5 = 0xae2,0xfffa 0ae3 0400 | | Execute_Immediate Set_Value_Visible_Unchecked,0x0 0ae4 c20e | | Store 0x1,0xe 0ae5 00bf | | Action Accept_Activation 0ae6 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x23 = .DEBUG 0x0ae6,0x1328,0x0000,0x0000,0x0036,0x56e4,0x0000,0x009f ; Debug Table 0x23.0x0 = 0xae6,0xffff 0ae7 00c7 | | Action Elaborate_Subprogram 0ae8 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x23.0x1 = 0xae8,0xfffe 0ae9 00c7 | | Action Elaborate_Subprogram 0aea 00bc | | Action Signal_Activated 0aeb 00bb | | Action Signal_Completion 0aec 0000 0000 | | .BLANK 0000[0x4] 0af0 ; -------------------------------------------------------------------------------------- 0af0 ; SUBPROGRAM 0af0 ; -------------------------------------------------------------------------------------- 0af0 0af3 | | .CONST 0x0af3 ; Address of begin 0af1 0004 | | .CONST 0x0004 ; Address of exception handler 0af2 0001 | | .CONST 0x0001 ; Number of locals 0af3 BODY_0af0: 0af3 INIT_0af0: 0af3 4801 |H | Short_Literal 0x1 ; Debug Table 0x24 = .DEBUG 0x0af3,0x132e,0x0001,0x0000,0x0036,0x56d4,0x0000,0x005b ; Debug Table 0x24.0x0 = 0xaf3,0x1 0af4 a5fe | | Store_Unchecked 0x2,-0x2 0af5 4803 |H | Short_Literal 0x3 ; Debug Table 0x24.0x1 = 0xaf5,0x2 0af6 a5fd | | Store_Unchecked 0x2,-0x3 0af7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0af8 ; -------------------------------------------------------------------------------------- 0af8 ; SUBPROGRAM 0af8 ; -------------------------------------------------------------------------------------- 0af8 0afb | | .CONST 0x0afb ; Address of begin 0af9 0004 | | .CONST 0x0004 ; Address of exception handler 0afa 0001 | | .CONST 0x0001 ; Number of locals 0afb BODY_0af8: 0afb INIT_0af8: 0afb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x25 = .DEBUG 0x0afb,0x1334,0x0001,0x0000,0x0036,0x56d4,0x0000,0x006d ; Debug Table 0x25.0x0 = 0xafb,0x1 0afc ; -------------------------------------------------------------------------------------- 0afc ; STRING TABLE 0afc ; -------------------------------------------------------------------------------------- 0afc 0072 | r | .STRTAB 0x0072->0x0b35 ; "READ" 0afd 0074 | t | .STRTAB 0x0074->0x0b37 ; "WRITE" 0afe 0077 | w | .STRTAB 0x0077->0x0b39 ; "CHANNEL_ALREADY_OPEN" 0aff 0089 | | .STRTAB 0x0089->0x0b43 ; "CHANNEL_NOT_AVAILABLE" 0b00 009c | | .STRTAB 0x009c->0x0b4e ; "INTERNAL_ERROR" 0b01 00a8 | | .STRTAB 0x00a8->0x0b55 ; "OK" 0b02 00a8 | | .STRTAB 0x00a8->0x0b56 ; "REMOTE_ERROR" 0b03 00b2 | | .STRTAB 0x00b2->0x0b5c ; "LINK_ERROR" 0b04 00ba | | .STRTAB 0x00ba->0x0b61 ; "STRING_ERROR" 0b05 00c4 | | .STRTAB 0x00c4->0x0b67 ; "LOCAL_ERROR" 0b06 00cd | | .STRTAB 0x00cd->0x0b6c ; "CC_ACK" 0b07 00d1 | | .STRTAB 0x00d1->0x0b6f ; "CC_NAK" 0b08 00d5 | | .STRTAB 0x00d5->0x0b72 ; "CC_ABORT" 0b09 00db | | .STRTAB 0x00db->0x0b76 ; "CC_GET_FILE" 0b0a 00e4 | | .STRTAB 0x00e4->0x0b7c ; "CC_PUT_FILE" 0b0b 00ed | | .STRTAB 0x00ed->0x0b81 ; "CC_DATA" 0b0c 00f2 | | .STRTAB 0x00f2->0x0b85 ; "CC_EOF" 0b0d 00f6 | | .STRTAB 0x00f6->0x0b88 ; "CC_IDLE" 0b0e 00fb | | .STRTAB 0x00fb->0x0b8b ; "CC_IPUT_FILE" 0b0f 0105 | | .STRTAB 0x0105->0x0b91 ; "CC_IREJ" 0b10 010a | | .STRTAB 0x010a->0x0b95 ; "PS_SUCCESSFUL" 0b11 0115 | | .STRTAB 0x0115->0x0b9b ; "PS_HEADER_TIMEOUT" 0b12 0124 | $ | .STRTAB 0x0124->0x0ba4 ; "PS_NO_HEADER" 0b13 012e | . | .STRTAB 0x012e->0x0baa ; "PS_LENGTH_TOO_SHORT" 0b14 013f | ? | .STRTAB 0x013f->0x0bb3 ; "PS_DATA_TIMEOUT" 0b15 014c | L | .STRTAB 0x014c->0x0bbb ; "PS_CHECKSUM_ERROR" 0b16 015b | [ | .STRTAB 0x015b->0x0bc3 ; "PS_ABORT" 0b17 0161 | a | .STRTAB 0x0161->0x0bc7 ; "PS_DATA_ERROR" 0b18 016c | l | .STRTAB 0x016c->0x0bce ; "Aborted awaiting PUT - OPEN read" 0b19 018a | | .STRTAB 0x018a->0x0bde ; "Aborted awaiting ACK - OPEN write" 0b1a 01a9 | | .STRTAB 0x01a9->0x0bee ; "Too many retries on OPEN" 0b1b 01bf | | .STRTAB 0x01bf->0x0bfa ; "Comm: sending GET" 0b1c 01ce | | .STRTAB 0x01ce->0x0c03 ; "Comm: " 0b1d 01d2 | | .STRTAB 0x01d2->0x0c06 ; "OPEN for read retry loop overun" 0b1e 01ef | | .STRTAB 0x01ef->0x0c15 ; "Comm: sending PUT" 0b1f 01fe | | .STRTAB 0x01fe->0x0c1e ; "OPEN for write retry loop overun" 0b20 021c | | .STRTAB 0x021c->0x0c2e ; "Comm: tracing" 0b21 0227 | ' | .STRTAB 0x0227->0x0c34 ; "Comm: not tracing" 0b22 0236 | 6 | .STRTAB 0x0236->0x0c3d ; "Comm: received header: Cmd : " 0b23 0251 | Q | .STRTAB 0x0251->0x0c4b ; " Seq : " 0b24 0256 | V | .STRTAB 0x0256->0x0c4f ; " Len : " 0b25 025b | [ | .STRTAB 0x025b->0x0c52 ; " Chk : " 0b26 0260 | ` | .STRTAB 0x0260->0x0c56 ; "Host: " 0b27 0264 | d | .STRTAB 0x0264->0x0c59 ; "Comm: sending ABORT with message: " 0b28 0284 | | .STRTAB 0x0284->0x0c6a ; "Aborting" 0b29 028a | | .STRTAB 0x028a->0x0c6e ; "Comm: ending IREJ" 0b2a 0299 | | .STRTAB 0x0299->0x0c76 ; "Comm: sending IDLE" 0b2b 02a9 | | .STRTAB 0x02a9->0x0c7f ; "Comm: sending ACK" 0b2c 02b8 | | .STRTAB 0x02b8->0x0c88 ; "Comm: sending NAK" 0b2d 02c7 | | .STRTAB 0x02c7->0x0c90 ; "Aborted awaiting packet in READ" 0b2e 02e4 | | .STRTAB 0x02e4->0x0ca0 ; "Too many retries in READ" 0b2f 02fa | | .STRTAB 0x02fa->0x0cac ; "READ_PACKET retry loop overun" 0b30 0315 | | .STRTAB 0x0315->0x0cba ; "Aborted awaiting ACK in WRITE" 0b31 0330 | 0 | .STRTAB 0x0330->0x0cc9 ; "Too many retries in WRITE" 0b32 0347 | G | .STRTAB 0x0347->0x0cd5 ; "Comm: transmitting packet: Cmd : " 0b33 0366 | f | .STRTAB 0x0366->0x0ce6 ; "WRITE_PACKET retry loop overun" 0b34 0382 | | .STREND 0x0382->0x0cf5 0b35 5245 4144 |READ| .STRTAB_STRINGS 0cf5 0000 0000 | | .XXX[0x3] 0cf7 0000 | | 0cf8 ; -------------------------------------------------------------------------------------- 0cf8 ; Debug Table 0cf8 ; -------------------------------------------------------------------------------------- 0cf8 0003 0026 | &| .CONST 0x0003,0x0026 0cfa 000b 0e2a | *| .DEBUG 0x000b,0x0e2a,0x8000,0x0000,0x0036,0x56d4,0x0000,0x0009 0d02 0036 0e44 | 6 D| .DEBUG 0x0036,0x0e44,0x8000,0x0000,0x0036,0x56e4,0x0000,0x0005 0d0a 004b 0e5e | K ^| .DEBUG 0x004b,0x0e5e,0x0005,0x0000,0x0036,0x56d4,0x0000,0x0017 0d12 0063 0e60 | c `| .DEBUG 0x0063,0x0e60,0x0005,0x0000,0x0036,0x56d4,0x0000,0x001d 0d1a 0083 0e62 | b| .DEBUG 0x0083,0x0e62,0x4000,0x0000,0x0036,0x56d4,0x0000,0x008b 0d22 0094 0e74 | t| .DEBUG 0x0094,0x0e74,0x4000,0x0000,0x0036,0x56e4,0x0000,0x00d4 0d2a 0133 0ee0 | 3 | .DEBUG 0x0133,0x0ee0,0x1001,0x0000,0x0036,0x56d4,0x0000,0x00e5 0d32 02b3 0fa4 | | .DEBUG 0x02b3,0x0fa4,0x1001,0x0000,0x0036,0x56d4,0x0000,0x00f5 0d3a 02bb 0fa8 | | .DEBUG 0x02bb,0x0fa8,0x1001,0x0000,0x0036,0x56d4,0x0000,0x00f9 0d42 03c3 1024 | $| .DEBUG 0x03c3,0x1024,0x1001,0x0000,0x0036,0x56d4,0x0000,0x010d 0d4a 050b 10ac | | .DEBUG 0x050b,0x10ac,0x1001,0x0000,0x0036,0x56d4,0x0000,0x0121 0d52 059b 10e0 | | .DEBUG 0x059b,0x10e0,0x1001,0x0000,0x0036,0x56d4,0x0000,0x0131 0d5a 062b 1114 | + | .DEBUG 0x062b,0x1114,0x1002,0x0000,0x0036,0x56d4,0x0000,0x0141 0d62 063b 1118 | ; | .DEBUG 0x063b,0x1118,0x1001,0x0000,0x0036,0x56d4,0x0000,0x0146 0d6a 064b 1122 | K "| .DEBUG 0x064b,0x1122,0x1005,0x0000,0x0036,0x56e4,0x0000,0x0129 0d72 0663 1124 | c $| .DEBUG 0x0663,0x1124,0x1005,0x0000,0x0036,0x56e4,0x0000,0x016e 0d7a 067b 1126 | { &| .DEBUG 0x067b,0x1126,0x1001,0x0000,0x0036,0x56e4,0x0000,0x01b6 0d82 06b3 114c | L| .DEBUG 0x06b3,0x114c,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0229 0d8a 06e3 115c | \| .DEBUG 0x06e3,0x115c,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0287 0d92 070b 1170 | p| .DEBUG 0x070b,0x1170,0x1001,0x0000,0x0036,0x56e4,0x0000,0x02db 0d9a 0763 1194 | c | .DEBUG 0x0763,0x1194,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0383 0da2 0773 119a | s | .DEBUG 0x0773,0x119a,0x1001,0x0000,0x0036,0x56e4,0x0000,0x039b 0daa 079b 11a4 | | .DEBUG 0x079b,0x11a4,0x1001,0x0000,0x0036,0x56e4,0x0000,0x03d8 0db2 082b 11ec | + | .DEBUG 0x082b,0x11ec,0x1001,0x0000,0x0036,0x56e4,0x0000,0x04e5 0dba 0843 11f2 | C | .DEBUG 0x0843,0x11f2,0x1001,0x0000,0x0036,0x56e4,0x0000,0x051b 0dc2 0873 11fc | s | .DEBUG 0x0873,0x11fc,0x1001,0x0000,0x0036,0x56e4,0x0000,0x056e 0dca 08ab 1212 | | .DEBUG 0x08ab,0x1212,0x1001,0x0000,0x0036,0x56e4,0x0000,0x05d6 0dd2 08eb 1240 | @| .DEBUG 0x08eb,0x1240,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0661 0dda 091b 124e | N| .DEBUG 0x091b,0x124e,0x1001,0x0000,0x0036,0x56e4,0x0000,0x069d 0de2 094b 125c | K \| .DEBUG 0x094b,0x125c,0x1001,0x0000,0x0036,0x56e4,0x0000,0x06d9 0dea 0973 126e | s n| .DEBUG 0x0973,0x126e,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0715 0df2 09ab 127e | ~| .DEBUG 0x09ab,0x127e,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0754 0dfa 09bb 1286 | | .DEBUG 0x09bb,0x1286,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0a5b 0e02 0a43 12cc | C | .DEBUG 0x0a43,0x12cc,0x1001,0x0000,0x0036,0x56e4,0x0000,0x0f8b 0e0a 0adb 131a | | .DEBUG 0x0adb,0x131a,0x0000,0x0000,0x0036,0x56d4,0x0000,0x0052 0e12 0ae6 1328 | (| .DEBUG 0x0ae6,0x1328,0x0000,0x0000,0x0036,0x56e4,0x0000,0x009f 0e1a 0af3 132e | .| .DEBUG 0x0af3,0x132e,0x0001,0x0000,0x0036,0x56d4,0x0000,0x005b 0e22 0afb 1334 | 4| .DEBUG 0x0afb,0x1334,0x0001,0x0000,0x0036,0x56d4,0x0000,0x006d 0e2a ; -------------------------------------------------------------------------------------- 0e2a ; Debug3 Subtable 0x0 0e2a ; -------------------------------------------------------------------------------------- 0e2a 000c 0000 | | .DBG3TAB 0x000c,0x0000 0e2c 000b ffff | | .CONST 0x000b,0xffff 0e2e 000b fffe | | .CONST 0x000b,0xfffe 0e30 000b fffd | | .CONST 0x000b,0xfffd 0e32 0010 fffc | | .CONST 0x0010,0xfffc 0e34 0015 fffb | | .CONST 0x0015,0xfffb 0e36 0018 fffa | | .CONST 0x0018,0xfffa 0e38 001c fff9 | | .CONST 0x001c,0xfff9 0e3a 0020 fff8 | | .CONST 0x0020,0xfff8 0e3c 0024 fff7 | $ | .CONST 0x0024,0xfff7 0e3e 0028 fff6 | ( | .CONST 0x0028,0xfff6 0e40 002c fff5 | , | .CONST 0x002c,0xfff5 0e42 0031 fff4 | 1 | .CONST 0x0031,0xfff4 0e44 ; -------------------------------------------------------------------------------------- 0e44 ; Debug3 Subtable 0x1 0e44 ; -------------------------------------------------------------------------------------- 0e44 000c 0000 | | .DBG3TAB 0x000c,0x0000 0e46 0036 ffff | 6 | .CONST 0x0036,0xffff 0e48 0038 fffe | 8 | .CONST 0x0038,0xfffe 0e4a 0038 fffd | 8 | .CONST 0x0038,0xfffd 0e4c 0038 fffc | 8 | .CONST 0x0038,0xfffc 0e4e 0038 fffb | 8 | .CONST 0x0038,0xfffb 0e50 0038 fffa | 8 | .CONST 0x0038,0xfffa 0e52 0038 fff9 | 8 | .CONST 0x0038,0xfff9 0e54 0038 fff8 | 8 | .CONST 0x0038,0xfff8 0e56 0038 fff7 | 8 | .CONST 0x0038,0xfff7 0e58 0038 fff6 | 8 | .CONST 0x0038,0xfff6 0e5a 0038 fff5 | 8 | .CONST 0x0038,0xfff5 0e5c 003a fff4 | : | .CONST 0x003a,0xfff4 0e5e ; -------------------------------------------------------------------------------------- 0e5e ; Debug3 Subtable 0x2 0e5e ; -------------------------------------------------------------------------------------- 0e5e 0000 0000 | | .DBG3TAB 0x0000,0x0000 0e60 ; -------------------------------------------------------------------------------------- 0e60 ; Debug3 Subtable 0x3 0e60 ; -------------------------------------------------------------------------------------- 0e60 0000 0000 | | .DBG3TAB 0x0000,0x0000 0e62 ; -------------------------------------------------------------------------------------- 0e62 ; Debug3 Subtable 0x4 0e62 ; -------------------------------------------------------------------------------------- 0e62 0008 0000 | | .DBG3TAB 0x0008,0x0000 0e64 0083 ffff | | .CONST 0x0083,0xffff 0e66 0085 fffe | | .CONST 0x0085,0xfffe 0e68 0087 fffd | | .CONST 0x0087,0xfffd 0e6a 0089 fffc | | .CONST 0x0089,0xfffc 0e6c 008b fffb | | .CONST 0x008b,0xfffb 0e6e 008d fffa | | .CONST 0x008d,0xfffa 0e70 008f fff9 | | .CONST 0x008f,0xfff9 0e72 0091 fff8 | | .CONST 0x0091,0xfff8 0e74 ; -------------------------------------------------------------------------------------- 0e74 ; Debug3 Subtable 0x5 0e74 ; -------------------------------------------------------------------------------------- 0e74 0034 0001 | 4 | .DBG3TAB 0x0034,0x0001 0e76 0094 ffff | | .CONST 0x0094,0xffff 0e78 0094 fffe | | .CONST 0x0094,0xfffe 0e7a 0094 fffd | | .CONST 0x0094,0xfffd 0e7c 0094 fffc | | .CONST 0x0094,0xfffc 0e7e 0094 fffb | | .CONST 0x0094,0xfffb 0e80 0094 fffa | | .CONST 0x0094,0xfffa 0e82 0094 fff9 | | .CONST 0x0094,0xfff9 0e84 0094 fff8 | | .CONST 0x0094,0xfff8 0e86 0094 fff7 | | .CONST 0x0094,0xfff7 0e88 0094 fff6 | | .CONST 0x0094,0xfff6 0e8a 0099 fff5 | | .CONST 0x0099,0xfff5 0e8c 009e fff4 | | .CONST 0x009e,0xfff4 0e8e 00a3 fff3 | | .CONST 0x00a3,0xfff3 0e90 00a8 fff2 | | .CONST 0x00a8,0xfff2 0e92 00ae fff1 | | .CONST 0x00ae,0xfff1 0e94 00dc fff0 | | .CONST 0x00dc,0xfff0 0e96 00e1 ffef | | .CONST 0x00e1,0xffef 0e98 00e2 ffee | | .CONST 0x00e2,0xffee 0e9a 00e3 ffed | | .CONST 0x00e3,0xffed 0e9c 00e6 ffec | | .CONST 0x00e6,0xffec 0e9e 00ea ffeb | | .CONST 0x00ea,0xffeb 0ea0 00eb ffea | | .CONST 0x00eb,0xffea 0ea2 00f0 ffe9 | | .CONST 0x00f0,0xffe9 0ea4 00f1 ffe8 | | .CONST 0x00f1,0xffe8 0ea6 00f2 ffe7 | | .CONST 0x00f2,0xffe7 0ea8 00f3 ffe6 | | .CONST 0x00f3,0xffe6 0eaa 00f4 ffe5 | | .CONST 0x00f4,0xffe5 0eac 00f6 ffe4 | | .CONST 0x00f6,0xffe4 0eae 00f8 ffe3 | | .CONST 0x00f8,0xffe3 0eb0 00fa ffe2 | | .CONST 0x00fa,0xffe2 0eb2 00fc ffe1 | | .CONST 0x00fc,0xffe1 0eb4 00fe ffe0 | | .CONST 0x00fe,0xffe0 0eb6 0100 ffdf | | .CONST 0x0100,0xffdf 0eb8 0102 ffde | | .CONST 0x0102,0xffde 0eba 0104 ffdd | | .CONST 0x0104,0xffdd 0ebc 0106 ffdc | | .CONST 0x0106,0xffdc 0ebe 0108 ffdb | | .CONST 0x0108,0xffdb 0ec0 010a ffda | | .CONST 0x010a,0xffda 0ec2 010c ffd9 | | .CONST 0x010c,0xffd9 0ec4 010e ffd8 | | .CONST 0x010e,0xffd8 0ec6 0110 ffd7 | | .CONST 0x0110,0xffd7 0ec8 0112 ffd6 | | .CONST 0x0112,0xffd6 0eca 0114 ffd5 | | .CONST 0x0114,0xffd5 0ecc 0116 ffd4 | | .CONST 0x0116,0xffd4 0ece 0118 ffd3 | | .CONST 0x0118,0xffd3 0ed0 011a ffd2 | | .CONST 0x011a,0xffd2 0ed2 011c ffd1 | | .CONST 0x011c,0xffd1 0ed4 011e ffd0 | | .CONST 0x011e,0xffd0 0ed6 0120 ffcf | | .CONST 0x0120,0xffcf 0ed8 0122 ffce | " | .CONST 0x0122,0xffce 0eda 0124 ffcd | $ | .CONST 0x0124,0xffcd 0edc 0126 ffcc | & | .CONST 0x0126,0xffcc 0ede 0128 0001 | ( | .CONST 0x0128,0x0001 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 ; Debug3 Subtable 0x6 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 0009 0058 | X| .DBG3TAB 0x0009,0x0058 0ee2 0133 ffff | 3 | .CONST 0x0133,0xffff 0ee4 0135 fffe | 5 | .CONST 0x0135,0xfffe 0ee6 0137 fffd | 7 | .CONST 0x0137,0xfffd 0ee8 0139 fffc | 9 | .CONST 0x0139,0xfffc 0eea 013a fffb | : | .CONST 0x013a,0xfffb 0eec 013b fffa | ; | .CONST 0x013b,0xfffa 0eee 013c fff9 | < | .CONST 0x013c,0xfff9 0ef0 013e fff8 | > | .CONST 0x013e,0xfff8 0ef2 0140 fff7 | @ | .CONST 0x0140,0xfff7 0ef4 0142 0001 | B | .CONST 0x0142,0x0001 0ef6 0144 0002 | D | .CONST 0x0144,0x0002 0ef8 014c 0003 | L | .CONST 0x014c,0x0003 0efa 014f 0004 | O | .CONST 0x014f,0x0004 0efc 0156 0005 | V | .CONST 0x0156,0x0005 0efe 015c 0007 | \ | .CONST 0x015c,0x0007 0f00 015f 0008 | _ | .CONST 0x015f,0x0008 0f02 0162 0009 | b | .CONST 0x0162,0x0009 0f04 0164 000a | d | .CONST 0x0164,0x000a 0f06 0165 000b | e | .CONST 0x0165,0x000b 0f08 0166 000c | f | .CONST 0x0166,0x000c 0f0a 016a 000d | j | .CONST 0x016a,0x000d 0f0c 016c 000e | l | .CONST 0x016c,0x000e 0f0e 016e 000f | n | .CONST 0x016e,0x000f 0f10 0170 0010 | p | .CONST 0x0170,0x0010 0f12 0172 0011 | r | .CONST 0x0172,0x0011 0f14 0179 0012 | y | .CONST 0x0179,0x0012 0f16 0183 0013 | | .CONST 0x0183,0x0013 0f18 0188 0014 | | .CONST 0x0188,0x0014 0f1a 0199 0015 | | .CONST 0x0199,0x0015 0f1c 01a2 0016 | | .CONST 0x01a2,0x0016 0f1e 01a9 0017 | | .CONST 0x01a9,0x0017 0f20 01ba 0018 | | .CONST 0x01ba,0x0018 0f22 01bd 0019 | | .CONST 0x01bd,0x0019 0f24 01c0 001b | | .CONST 0x01c0,0x001b 0f26 01c2 001c | | .CONST 0x01c2,0x001c 0f28 01c5 001d | | .CONST 0x01c5,0x001d 0f2a 01c7 001e | | .CONST 0x01c7,0x001e 0f2c 01cd 0020 | | .CONST 0x01cd,0x0020 0f2e 01d2 001f | | .CONST 0x01d2,0x001f 0f30 01dd 0021 | !| .CONST 0x01dd,0x0021 0f32 01e8 0022 | "| .CONST 0x01e8,0x0022 0f34 01ea 0023 | #| .CONST 0x01ea,0x0023 0f36 01ec 0024 | $| .CONST 0x01ec,0x0024 0f38 01ed 0025 | %| .CONST 0x01ed,0x0025 0f3a 01f0 0026 | &| .CONST 0x01f0,0x0026 0f3c 01f2 0027 | '| .CONST 0x01f2,0x0027 0f3e 01f4 0028 | (| .CONST 0x01f4,0x0028 0f40 01f6 0029 | )| .CONST 0x01f6,0x0029 0f42 01f8 002a | *| .CONST 0x01f8,0x002a 0f44 01fa 002b | +| .CONST 0x01fa,0x002b 0f46 01fb 002c | ,| .CONST 0x01fb,0x002c 0f48 01fc 002d | -| .CONST 0x01fc,0x002d 0f4a 01ff 002e | .| .CONST 0x01ff,0x002e 0f4c 0201 002f | /| .CONST 0x0201,0x002f 0f4e 0209 0030 | 0| .CONST 0x0209,0x0030 0f50 020b 0031 | 1| .CONST 0x020b,0x0031 0f52 020d 0032 | 2| .CONST 0x020d,0x0032 0f54 020f 0033 | 3| .CONST 0x020f,0x0033 0f56 0214 0034 | 4| .CONST 0x0214,0x0034 0f58 0215 0035 | 5| .CONST 0x0215,0x0035 0f5a 0218 0038 | 8| .CONST 0x0218,0x0038 0f5c 0219 0039 | 9| .CONST 0x0219,0x0039 0f5e 021a 003a | :| .CONST 0x021a,0x003a 0f60 0221 003b | ! ;| .CONST 0x0221,0x003b 0f62 022b 003c | + <| .CONST 0x022b,0x003c 0f64 0230 003d | 0 =| .CONST 0x0230,0x003d 0f66 0241 003e | A >| .CONST 0x0241,0x003e 0f68 024a 003f | J ?| .CONST 0x024a,0x003f 0f6a 0251 0040 | Q @| .CONST 0x0251,0x0040 0f6c 0262 0041 | b A| .CONST 0x0262,0x0041 0f6e 0265 0042 | e B| .CONST 0x0265,0x0042 0f70 0268 0044 | h D| .CONST 0x0268,0x0044 0f72 026a 0045 | j E| .CONST 0x026a,0x0045 0f74 026d 0046 | m F| .CONST 0x026d,0x0046 0f76 026f 0047 | o G| .CONST 0x026f,0x0047 0f78 0274 0048 | t H| .CONST 0x0274,0x0048 0f7a 027f 0049 | I| .CONST 0x027f,0x0049 0f7c 0281 004a | J| .CONST 0x0281,0x004a 0f7e 0282 004b | K| .CONST 0x0282,0x004b 0f80 0285 004c | L| .CONST 0x0285,0x004c 0f82 0287 004d | M| .CONST 0x0287,0x004d 0f84 0289 004e | N| .CONST 0x0289,0x004e 0f86 028b 004f | O| .CONST 0x028b,0x004f 0f88 028d 0050 | P| .CONST 0x028d,0x0050 0f8a 028f 0051 | Q| .CONST 0x028f,0x0051 0f8c 0290 0052 | R| .CONST 0x0290,0x0052 0f8e 0291 0053 | S| .CONST 0x0291,0x0053 0f90 0294 0054 | T| .CONST 0x0294,0x0054 0f92 0296 0055 | U| .CONST 0x0296,0x0055 0f94 029e 0056 | V| .CONST 0x029e,0x0056 0f96 02a0 0057 | W| .CONST 0x02a0,0x0057 0f98 02a2 0058 | X| .CONST 0x02a2,0x0058 0f9a 02a4 0059 | Y| .CONST 0x02a4,0x0059 0f9c 02a9 005a | Z| .CONST 0x02a9,0x005a 0f9e 02aa 005b | [| .CONST 0x02aa,0x005b 0fa0 02ad 005e | ^| .CONST 0x02ad,0x005e 0fa2 02ae 005f | _| .CONST 0x02ae,0x005f 0fa4 ; -------------------------------------------------------------------------------------- 0fa4 ; Debug3 Subtable 0x7 0fa4 ; -------------------------------------------------------------------------------------- 0fa4 0000 0001 | | .DBG3TAB 0x0000,0x0001 0fa6 02b3 0001 | | .CONST 0x02b3,0x0001 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 ; Debug3 Subtable 0x8 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 0004 0039 | 9| .DBG3TAB 0x0004,0x0039 0faa 02bb ffff | | .CONST 0x02bb,0xffff 0fac 02bd fffe | | .CONST 0x02bd,0xfffe 0fae 02be fffd | | .CONST 0x02be,0xfffd 0fb0 02bf fffc | | .CONST 0x02bf,0xfffc 0fb2 02c1 0001 | | .CONST 0x02c1,0x0001 0fb4 02c6 0002 | | .CONST 0x02c6,0x0002 0fb6 02d1 0003 | | .CONST 0x02d1,0x0003 0fb8 02d4 0004 | | .CONST 0x02d4,0x0004 0fba 02d6 0005 | | .CONST 0x02d6,0x0005 0fbc 02db 0006 | | .CONST 0x02db,0x0006 0fbe 02dd 0007 | | .CONST 0x02dd,0x0007 0fc0 02df 0008 | | .CONST 0x02df,0x0008 0fc2 02e1 0009 | | .CONST 0x02e1,0x0009 0fc4 02e3 000a | | .CONST 0x02e3,0x000a 0fc6 02e6 000b | | .CONST 0x02e6,0x000b 0fc8 02e8 000c | | .CONST 0x02e8,0x000c 0fca 02ed 000d | | .CONST 0x02ed,0x000d 0fcc 02f2 000e | | .CONST 0x02f2,0x000e 0fce 02f7 000f | | .CONST 0x02f7,0x000f 0fd0 02f8 0010 | | .CONST 0x02f8,0x0010 0fd2 02fb 0011 | | .CONST 0x02fb,0x0011 0fd4 0309 0012 | | .CONST 0x0309,0x0012 0fd6 030b 0013 | | .CONST 0x030b,0x0013 0fd8 030d 0014 | | .CONST 0x030d,0x0014 0fda 030f 0015 | | .CONST 0x030f,0x0015 0fdc 0311 0016 | | .CONST 0x0311,0x0016 0fde 0313 0017 | | .CONST 0x0313,0x0017 0fe0 0315 0018 | | .CONST 0x0315,0x0018 0fe2 0317 0019 | | .CONST 0x0317,0x0019 0fe4 0319 001a | | .CONST 0x0319,0x001a 0fe6 031b 001b | | .CONST 0x031b,0x001b 0fe8 031c 001c | | .CONST 0x031c,0x001c 0fea 031f 001e | | .CONST 0x031f,0x001e 0fec 0325 001f | % | .CONST 0x0325,0x001f 0fee 0327 0020 | ' | .CONST 0x0327,0x0020 0ff0 032a 0021 | * !| .CONST 0x032a,0x0021 0ff2 032e 0022 | . "| .CONST 0x032e,0x0022 0ff4 0330 0023 | 0 #| .CONST 0x0330,0x0023 0ff6 0332 0024 | 2 $| .CONST 0x0332,0x0024 0ff8 0333 0025 | 3 %| .CONST 0x0333,0x0025 0ffa 033a 0026 | : &| .CONST 0x033a,0x0026 0ffc 0341 0027 | A '| .CONST 0x0341,0x0027 0ffe 0345 0028 | E (| .CONST 0x0345,0x0028 1000 0347 0029 | G )| .CONST 0x0347,0x0029 1002 0350 002a | P *| .CONST 0x0350,0x002a 1004 0351 002b | Q +| .CONST 0x0351,0x002b 1006 0358 002c | X ,| .CONST 0x0358,0x002c 1008 036d 002d | m -| .CONST 0x036d,0x002d 100a 0371 002e | q .| .CONST 0x0371,0x002e 100c 037a 002f | z /| .CONST 0x037a,0x002f 100e 037c 0030 | | 0| .CONST 0x037c,0x0030 1010 037e 0031 | ~ 1| .CONST 0x037e,0x0031 1012 037f 0032 | 2| .CONST 0x037f,0x0032 1014 0391 0033 | 3| .CONST 0x0391,0x0033 1016 0399 0034 | 4| .CONST 0x0399,0x0034 1018 039b 0035 | 5| .CONST 0x039b,0x0035 101a 039d 0036 | 6| .CONST 0x039d,0x0036 101c 03a6 0037 | 7| .CONST 0x03a6,0x0037 101e 03b3 0038 | 8| .CONST 0x03b3,0x0038 1020 03b6 0039 | 9| .CONST 0x03b6,0x0039 1022 03b8 003a | :| .CONST 0x03b8,0x003a 1024 ; -------------------------------------------------------------------------------------- 1024 ; Debug3 Subtable 0x9 1024 ; -------------------------------------------------------------------------------------- 1024 0004 003f | ?| .DBG3TAB 0x0004,0x003f 1026 03c3 ffff | | .CONST 0x03c3,0xffff 1028 03c5 fffe | | .CONST 0x03c5,0xfffe 102a 03c6 fffd | | .CONST 0x03c6,0xfffd 102c 03c7 fffc | | .CONST 0x03c7,0xfffc 102e 03c9 0001 | | .CONST 0x03c9,0x0001 1030 03ce 0002 | | .CONST 0x03ce,0x0002 1032 03d5 0003 | | .CONST 0x03d5,0x0003 1034 03e9 0004 | | .CONST 0x03e9,0x0004 1036 03ec 0005 | | .CONST 0x03ec,0x0005 1038 03ee 0006 | | .CONST 0x03ee,0x0006 103a 03f3 0007 | | .CONST 0x03f3,0x0007 103c 03f5 0008 | | .CONST 0x03f5,0x0008 103e 03f7 0009 | | .CONST 0x03f7,0x0009 1040 03f9 000a | | .CONST 0x03f9,0x000a 1042 03fb 000b | | .CONST 0x03fb,0x000b 1044 03fe 000c | | .CONST 0x03fe,0x000c 1046 0400 000d | | .CONST 0x0400,0x000d 1048 0405 000e | | .CONST 0x0405,0x000e 104a 040a 000f | | .CONST 0x040a,0x000f 104c 040f 0010 | | .CONST 0x040f,0x0010 104e 0410 0011 | | .CONST 0x0410,0x0011 1050 0413 0012 | | .CONST 0x0413,0x0012 1052 0419 0013 | | .CONST 0x0419,0x0013 1054 042d 0014 | - | .CONST 0x042d,0x0014 1056 042f 0015 | / | .CONST 0x042f,0x0015 1058 0431 0016 | 1 | .CONST 0x0431,0x0016 105a 0433 0017 | 3 | .CONST 0x0433,0x0017 105c 0435 0018 | 5 | .CONST 0x0435,0x0018 105e 0437 0019 | 7 | .CONST 0x0437,0x0019 1060 0439 001a | 9 | .CONST 0x0439,0x001a 1062 043b 001b | ; | .CONST 0x043b,0x001b 1064 043d 001c | = | .CONST 0x043d,0x001c 1066 043f 001d | ? | .CONST 0x043f,0x001d 1068 0440 001e | @ | .CONST 0x0440,0x001e 106a 0443 0020 | C | .CONST 0x0443,0x0020 106c 0449 0021 | I !| .CONST 0x0449,0x0021 106e 044b 0022 | K "| .CONST 0x044b,0x0022 1070 044e 0023 | N #| .CONST 0x044e,0x0023 1072 0452 0024 | R $| .CONST 0x0452,0x0024 1074 0454 0025 | T %| .CONST 0x0454,0x0025 1076 0456 0026 | V &| .CONST 0x0456,0x0026 1078 0457 0027 | W '| .CONST 0x0457,0x0027 107a 045e 0028 | ^ (| .CONST 0x045e,0x0028 107c 0465 0029 | e )| .CONST 0x0465,0x0029 107e 0469 002a | i *| .CONST 0x0469,0x002a 1080 047c 002b | | +| .CONST 0x047c,0x002b 1082 047e 002c | ~ ,| .CONST 0x047e,0x002c 1084 0487 002d | -| .CONST 0x0487,0x002d 1086 0488 002e | .| .CONST 0x0488,0x002e 1088 048f 002f | /| .CONST 0x048f,0x002f 108a 0493 0030 | 0| .CONST 0x0493,0x0030 108c 04a9 0031 | 1| .CONST 0x04a9,0x0031 108e 04ad 0032 | 2| .CONST 0x04ad,0x0032 1090 04b6 0033 | 3| .CONST 0x04b6,0x0033 1092 04b8 0034 | 4| .CONST 0x04b8,0x0034 1094 04ba 0035 | 5| .CONST 0x04ba,0x0035 1096 04bb 0036 | 6| .CONST 0x04bb,0x0036 1098 04c3 0037 | 7| .CONST 0x04c3,0x0037 109a 04d9 0038 | 8| .CONST 0x04d9,0x0038 109c 04e1 0039 | 9| .CONST 0x04e1,0x0039 109e 04e3 003a | :| .CONST 0x04e3,0x003a 10a0 04e5 003b | ;| .CONST 0x04e5,0x003b 10a2 04ee 003c | <| .CONST 0x04ee,0x003c 10a4 04fb 003d | =| .CONST 0x04fb,0x003d 10a6 04fe 003e | >| .CONST 0x04fe,0x003e 10a8 0500 003f | ?| .CONST 0x0500,0x003f 10aa 0503 0040 | @| .CONST 0x0503,0x0040 10ac ; -------------------------------------------------------------------------------------- 10ac ; Debug3 Subtable 0xa 10ac ; -------------------------------------------------------------------------------------- 10ac 0003 0016 | | .DBG3TAB 0x0003,0x0016 10ae 050b ffff | | .CONST 0x050b,0xffff 10b0 050d fffe | | .CONST 0x050d,0xfffe 10b2 050e fffd | | .CONST 0x050e,0xfffd 10b4 0510 0001 | | .CONST 0x0510,0x0001 10b6 0513 0003 | | .CONST 0x0513,0x0003 10b8 051a 0004 | | .CONST 0x051a,0x0004 10ba 051f 0005 | | .CONST 0x051f,0x0005 10bc 0524 0006 | $ | .CONST 0x0524,0x0006 10be 0526 0007 | & | .CONST 0x0526,0x0007 10c0 0536 0008 | 6 | .CONST 0x0536,0x0008 10c2 0539 0009 | 9 | .CONST 0x0539,0x0009 10c4 053e 000a | > | .CONST 0x053e,0x000a 10c6 0540 000b | @ | .CONST 0x0540,0x000b 10c8 0543 000c | C | .CONST 0x0543,0x000c 10ca 0544 000d | D | .CONST 0x0544,0x000d 10cc 0548 0002 | H | .CONST 0x0548,0x0002 10ce 054e 000e | N | .CONST 0x054e,0x000e 10d0 0550 000f | P | .CONST 0x0550,0x000f 10d2 0558 0010 | X | .CONST 0x0558,0x0010 10d4 055f 0011 | _ | .CONST 0x055f,0x0011 10d6 0564 0012 | d | .CONST 0x0564,0x0012 10d8 0571 0013 | q | .CONST 0x0571,0x0013 10da 0579 0014 | y | .CONST 0x0579,0x0014 10dc 0589 0015 | | .CONST 0x0589,0x0015 10de 058c 0016 | | .CONST 0x058c,0x0016 10e0 ; -------------------------------------------------------------------------------------- 10e0 ; Debug3 Subtable 0xb 10e0 ; -------------------------------------------------------------------------------------- 10e0 0003 0016 | | .DBG3TAB 0x0003,0x0016 10e2 059b ffff | | .CONST 0x059b,0xffff 10e4 059d fffe | | .CONST 0x059d,0xfffe 10e6 059e fffd | | .CONST 0x059e,0xfffd 10e8 05a0 0001 | | .CONST 0x05a0,0x0001 10ea 05a3 0003 | | .CONST 0x05a3,0x0003 10ec 05aa 0004 | | .CONST 0x05aa,0x0004 10ee 05af 0005 | | .CONST 0x05af,0x0005 10f0 05b4 0006 | | .CONST 0x05b4,0x0006 10f2 05b6 0007 | | .CONST 0x05b6,0x0007 10f4 05c9 0008 | | .CONST 0x05c9,0x0008 10f6 05cc 0009 | | .CONST 0x05cc,0x0009 10f8 05d1 000a | | .CONST 0x05d1,0x000a 10fa 05d3 000b | | .CONST 0x05d3,0x000b 10fc 05d6 000c | | .CONST 0x05d6,0x000c 10fe 05d7 000d | | .CONST 0x05d7,0x000d 1100 05db 0002 | | .CONST 0x05db,0x0002 1102 05e1 000e | | .CONST 0x05e1,0x000e 1104 05e3 000f | | .CONST 0x05e3,0x000f 1106 05eb 0010 | | .CONST 0x05eb,0x0010 1108 05f2 0011 | | .CONST 0x05f2,0x0011 110a 05f7 0012 | | .CONST 0x05f7,0x0012 110c 0604 0013 | | .CONST 0x0604,0x0013 110e 060c 0014 | | .CONST 0x060c,0x0014 1110 061f 0015 | | .CONST 0x061f,0x0015 1112 0622 0016 | " | .CONST 0x0622,0x0016 1114 ; -------------------------------------------------------------------------------------- 1114 ; Debug3 Subtable 0xc 1114 ; -------------------------------------------------------------------------------------- 1114 0000 0001 | | .DBG3TAB 0x0000,0x0001 1116 062b 0001 | + | .CONST 0x062b,0x0001 1118 ; -------------------------------------------------------------------------------------- 1118 ; Debug3 Subtable 0xd 1118 ; -------------------------------------------------------------------------------------- 1118 0000 0004 | | .DBG3TAB 0x0000,0x0004 111a 063b 0001 | ; | .CONST 0x063b,0x0001 111c 063d 0002 | = | .CONST 0x063d,0x0002 111e 063f 0003 | ? | .CONST 0x063f,0x0003 1120 0643 0004 | C | .CONST 0x0643,0x0004 1122 ; -------------------------------------------------------------------------------------- 1122 ; Debug3 Subtable 0xe 1122 ; -------------------------------------------------------------------------------------- 1122 0000 0000 | | .DBG3TAB 0x0000,0x0000 1124 ; -------------------------------------------------------------------------------------- 1124 ; Debug3 Subtable 0xf 1124 ; -------------------------------------------------------------------------------------- 1124 0000 0000 | | .DBG3TAB 0x0000,0x0000 1126 ; -------------------------------------------------------------------------------------- 1126 ; Debug3 Subtable 0x10 1126 ; -------------------------------------------------------------------------------------- 1126 0005 000d | | .DBG3TAB 0x0005,0x000d 1128 067b ffff | { | .CONST 0x067b,0xffff 112a 067c fffe | | | .CONST 0x067c,0xfffe 112c 067d fffd | } | .CONST 0x067d,0xfffd 112e 067e fffc | ~ | .CONST 0x067e,0xfffc 1130 067f fffb | | .CONST 0x067f,0xfffb 1132 0680 0001 | | .CONST 0x0680,0x0001 1134 0682 0002 | | .CONST 0x0682,0x0002 1136 0684 0003 | | .CONST 0x0684,0x0003 1138 0686 0004 | | .CONST 0x0686,0x0004 113a 0688 0005 | | .CONST 0x0688,0x0005 113c 068d 0006 | | .CONST 0x068d,0x0006 113e 0691 0007 | | .CONST 0x0691,0x0007 1140 0695 0008 | | .CONST 0x0695,0x0008 1142 0699 0009 | | .CONST 0x0699,0x0009 1144 069e 000a | | .CONST 0x069e,0x000a 1146 06a0 000b | | .CONST 0x06a0,0x000b 1148 06a5 000c | | .CONST 0x06a5,0x000c 114a 06a7 000d | | .CONST 0x06a7,0x000d 114c ; -------------------------------------------------------------------------------------- 114c ; Debug3 Subtable 0x11 114c ; -------------------------------------------------------------------------------------- 114c 0001 0006 | | .DBG3TAB 0x0001,0x0006 114e 06b3 ffff | | .CONST 0x06b3,0xffff 1150 06b4 0001 | | .CONST 0x06b4,0x0001 1152 06b9 0002 | | .CONST 0x06b9,0x0002 1154 06c0 0003 | | .CONST 0x06c0,0x0003 1156 06c7 0004 | | .CONST 0x06c7,0x0004 1158 06d0 0005 | | .CONST 0x06d0,0x0005 115a 06d8 0006 | | .CONST 0x06d8,0x0006 115c ; -------------------------------------------------------------------------------------- 115c ; Debug3 Subtable 0x12 115c ; -------------------------------------------------------------------------------------- 115c 0005 0004 | | .DBG3TAB 0x0005,0x0004 115e 06e3 ffff | | .CONST 0x06e3,0xffff 1160 06e4 fffe | | .CONST 0x06e4,0xfffe 1162 06e6 fffd | | .CONST 0x06e6,0xfffd 1164 06eb fffc | | .CONST 0x06eb,0xfffc 1166 06ee fffb | | .CONST 0x06ee,0xfffb 1168 06f1 0002 | | .CONST 0x06f1,0x0002 116a 06f3 0003 | | .CONST 0x06f3,0x0003 116c 06fc 0004 | | .CONST 0x06fc,0x0004 116e 06ff 0001 | | .CONST 0x06ff,0x0001 1170 ; -------------------------------------------------------------------------------------- 1170 ; Debug3 Subtable 0x13 1170 ; -------------------------------------------------------------------------------------- 1170 0003 000e | | .DBG3TAB 0x0003,0x000e 1172 070b ffff | | .CONST 0x070b,0xffff 1174 070c fffe | | .CONST 0x070c,0xfffe 1176 070d fffd | | .CONST 0x070d,0xfffd 1178 070e 0001 | | .CONST 0x070e,0x0001 117a 0710 0002 | | .CONST 0x0710,0x0002 117c 0712 0003 | | .CONST 0x0712,0x0003 117e 0715 0005 | | .CONST 0x0715,0x0005 1180 0726 0006 | & | .CONST 0x0726,0x0006 1182 072a 0007 | * | .CONST 0x072a,0x0007 1184 072c 0008 | , | .CONST 0x072c,0x0008 1186 072e 0009 | . | .CONST 0x072e,0x0009 1188 072f 000a | / | .CONST 0x072f,0x000a 118a 0731 000b | 1 | .CONST 0x0731,0x000b 118c 0733 000c | 3 | .CONST 0x0733,0x000c 118e 0734 0004 | 4 | .CONST 0x0734,0x0004 1190 0737 000d | 7 | .CONST 0x0737,0x000d 1192 0739 000e | 9 | .CONST 0x0739,0x000e 1194 ; -------------------------------------------------------------------------------------- 1194 ; Debug3 Subtable 0x14 1194 ; -------------------------------------------------------------------------------------- 1194 0000 0002 | | .DBG3TAB 0x0000,0x0002 1196 0763 0001 | c | .CONST 0x0763,0x0001 1198 0766 0002 | f | .CONST 0x0766,0x0002 119a ; -------------------------------------------------------------------------------------- 119a ; Debug3 Subtable 0x15 119a ; -------------------------------------------------------------------------------------- 119a 0001 0003 | | .DBG3TAB 0x0001,0x0003 119c 0773 ffff | s | .CONST 0x0773,0xffff 119e 0777 0001 | w | .CONST 0x0777,0x0001 11a0 077e 0002 | ~ | .CONST 0x077e,0x0002 11a2 0782 0003 | | .CONST 0x0782,0x0003 11a4 ; -------------------------------------------------------------------------------------- 11a4 ; Debug3 Subtable 0x16 11a4 ; -------------------------------------------------------------------------------------- 11a4 0007 001c | | .DBG3TAB 0x0007,0x001c 11a6 079b ffff | | .CONST 0x079b,0xffff 11a8 079c fffe | | .CONST 0x079c,0xfffe 11aa 079d fffd | | .CONST 0x079d,0xfffd 11ac 079e fffc | | .CONST 0x079e,0xfffc 11ae 079f fffb | | .CONST 0x079f,0xfffb 11b0 07a0 fffa | | .CONST 0x07a0,0xfffa 11b2 07a1 fff9 | | .CONST 0x07a1,0xfff9 11b4 07a2 0001 | | .CONST 0x07a2,0x0001 11b6 07aa 0002 | | .CONST 0x07aa,0x0002 11b8 07ac 0003 | | .CONST 0x07ac,0x0003 11ba 07af 0004 | | .CONST 0x07af,0x0004 11bc 07b1 0005 | | .CONST 0x07b1,0x0005 11be 07b4 0006 | | .CONST 0x07b4,0x0006 11c0 07ba 0007 | | .CONST 0x07ba,0x0007 11c2 07bd 0008 | | .CONST 0x07bd,0x0008 11c4 07bf 0009 | | .CONST 0x07bf,0x0009 11c6 07c7 000b | | .CONST 0x07c7,0x000b 11c8 07d9 000c | | .CONST 0x07d9,0x000c 11ca 07db 000d | | .CONST 0x07db,0x000d 11cc 07dd 000e | | .CONST 0x07dd,0x000e 11ce 07de 000f | | .CONST 0x07de,0x000f 11d0 07e0 0010 | | .CONST 0x07e0,0x0010 11d2 07e2 0011 | | .CONST 0x07e2,0x0011 11d4 07e3 0012 | | .CONST 0x07e3,0x0012 11d6 07e7 000a | | .CONST 0x07e7,0x000a 11d8 07eb 0013 | | .CONST 0x07eb,0x0013 11da 07f0 0014 | | .CONST 0x07f0,0x0014 11dc 07f7 0015 | | .CONST 0x07f7,0x0015 11de 07fe 0016 | | .CONST 0x07fe,0x0016 11e0 0802 0017 | | .CONST 0x0802,0x0017 11e2 080a 0018 | | .CONST 0x080a,0x0018 11e4 0811 0019 | | .CONST 0x0811,0x0019 11e6 0814 001a | | .CONST 0x0814,0x001a 11e8 0816 001b | | .CONST 0x0816,0x001b 11ea 081f 001c | | .CONST 0x081f,0x001c 11ec ; -------------------------------------------------------------------------------------- 11ec ; Debug3 Subtable 0x17 11ec ; -------------------------------------------------------------------------------------- 11ec 0000 0002 | | .DBG3TAB 0x0000,0x0002 11ee 082b 0001 | + | .CONST 0x082b,0x0001 11f0 0832 0002 | 2 | .CONST 0x0832,0x0002 11f2 ; -------------------------------------------------------------------------------------- 11f2 ; Debug3 Subtable 0x18 11f2 ; -------------------------------------------------------------------------------------- 11f2 0001 0003 | | .DBG3TAB 0x0001,0x0003 11f4 0843 ffff | C | .CONST 0x0843,0xffff 11f6 0847 0001 | G | .CONST 0x0847,0x0001 11f8 0850 0002 | P | .CONST 0x0850,0x0002 11fa 085e 0003 | ^ | .CONST 0x085e,0x0003 11fc ; -------------------------------------------------------------------------------------- 11fc ; Debug3 Subtable 0x19 11fc ; -------------------------------------------------------------------------------------- 11fc 0001 0009 | | .DBG3TAB 0x0001,0x0009 11fe 0873 ffff | s | .CONST 0x0873,0xffff 1200 0875 0001 | u | .CONST 0x0875,0x0001 1202 087f 0002 | | .CONST 0x087f,0x0002 1204 0884 0003 | | .CONST 0x0884,0x0003 1206 088b 0004 | | .CONST 0x088b,0x0004 1208 0890 0005 | | .CONST 0x0890,0x0005 120a 089b 0006 | | .CONST 0x089b,0x0006 120c 089e 0007 | | .CONST 0x089e,0x0007 120e 08a0 0008 | | .CONST 0x08a0,0x0008 1210 08a5 0009 | | .CONST 0x08a5,0x0009 1212 ; -------------------------------------------------------------------------------------- 1212 ; Debug3 Subtable 0x1a 1212 ; -------------------------------------------------------------------------------------- 1212 0006 0010 | | .DBG3TAB 0x0006,0x0010 1214 08ab ffff | | .CONST 0x08ab,0xffff 1216 08ad fffe | | .CONST 0x08ad,0xfffe 1218 08b1 fffd | | .CONST 0x08b1,0xfffd 121a 08b2 fffc | | .CONST 0x08b2,0xfffc 121c 08b3 fffb | | .CONST 0x08b3,0xfffb 121e 08b5 fffa | | .CONST 0x08b5,0xfffa 1220 08b6 0001 | | .CONST 0x08b6,0x0001 1222 08b9 0002 | | .CONST 0x08b9,0x0002 1224 08be 0003 | | .CONST 0x08be,0x0003 1226 08c1 0005 | | .CONST 0x08c1,0x0005 1228 08c2 0006 | | .CONST 0x08c2,0x0006 122a 08c7 0007 | | .CONST 0x08c7,0x0007 122c 08cc 0008 | | .CONST 0x08cc,0x0008 122e 08cf 0009 | | .CONST 0x08cf,0x0009 1230 08d1 000a | | .CONST 0x08d1,0x000a 1232 08d3 000b | | .CONST 0x08d3,0x000b 1234 08d4 000c | | .CONST 0x08d4,0x000c 1236 08d6 000d | | .CONST 0x08d6,0x000d 1238 08db 000e | | .CONST 0x08db,0x000e 123a 08de 000f | | .CONST 0x08de,0x000f 123c 08e0 0010 | | .CONST 0x08e0,0x0010 123e 08e1 0011 | | .CONST 0x08e1,0x0011 1240 ; -------------------------------------------------------------------------------------- 1240 ; Debug3 Subtable 0x1b 1240 ; -------------------------------------------------------------------------------------- 1240 0002 0004 | | .DBG3TAB 0x0002,0x0004 1242 08eb ffff | | .CONST 0x08eb,0xffff 1244 08ed fffe | | .CONST 0x08ed,0xfffe 1246 0908 0001 | | .CONST 0x0908,0x0001 1248 090b 0002 | | .CONST 0x090b,0x0002 124a 090d 0003 | | .CONST 0x090d,0x0003 124c 0910 0004 | | .CONST 0x0910,0x0004 124e ; -------------------------------------------------------------------------------------- 124e ; Debug3 Subtable 0x1c 124e ; -------------------------------------------------------------------------------------- 124e 0002 0004 | | .DBG3TAB 0x0002,0x0004 1250 091b ffff | | .CONST 0x091b,0xffff 1252 091d fffe | | .CONST 0x091d,0xfffe 1254 0939 0001 | 9 | .CONST 0x0939,0x0001 1256 093c 0002 | < | .CONST 0x093c,0x0002 1258 093e 0003 | > | .CONST 0x093e,0x0003 125a 0941 0004 | A | .CONST 0x0941,0x0004 125c ; -------------------------------------------------------------------------------------- 125c ; Debug3 Subtable 0x1d 125c ; -------------------------------------------------------------------------------------- 125c 0001 0007 | | .DBG3TAB 0x0001,0x0007 125e 094b ffff | K | .CONST 0x094b,0xffff 1260 094d 0001 | M | .CONST 0x094d,0x0001 1262 0952 0002 | R | .CONST 0x0952,0x0002 1264 0959 0003 | Y | .CONST 0x0959,0x0003 1266 095e 0004 | ^ | .CONST 0x095e,0x0004 1268 0961 0005 | a | .CONST 0x0961,0x0005 126a 0963 0006 | c | .CONST 0x0963,0x0006 126c 0966 0007 | f | .CONST 0x0966,0x0007 126e ; -------------------------------------------------------------------------------------- 126e ; Debug3 Subtable 0x1e 126e ; -------------------------------------------------------------------------------------- 126e 0002 0005 | | .DBG3TAB 0x0002,0x0005 1270 0973 ffff | s | .CONST 0x0973,0xffff 1272 0975 fffe | u | .CONST 0x0975,0xfffe 1274 0991 0001 | | .CONST 0x0991,0x0001 1276 0992 0002 | | .CONST 0x0992,0x0002 1278 0995 0003 | | .CONST 0x0995,0x0003 127a 0997 0004 | | .CONST 0x0997,0x0004 127c 099a 0005 | | .CONST 0x099a,0x0005 127e ; -------------------------------------------------------------------------------------- 127e ; Debug3 Subtable 0x1f 127e ; -------------------------------------------------------------------------------------- 127e 0000 0003 | | .DBG3TAB 0x0000,0x0003 1280 09ab 0001 | | .CONST 0x09ab,0x0001 1282 09ae 0002 | | .CONST 0x09ae,0x0002 1284 09b1 0003 | | .CONST 0x09b1,0x0003 1286 ; -------------------------------------------------------------------------------------- 1286 ; Debug3 Subtable 0x20 1286 ; -------------------------------------------------------------------------------------- 1286 0004 001e | | .DBG3TAB 0x0004,0x001e 1288 09bb ffff | | .CONST 0x09bb,0xffff 128a 09bc fffe | | .CONST 0x09bc,0xfffe 128c 09bd fffd | | .CONST 0x09bd,0xfffd 128e 09bf fffc | | .CONST 0x09bf,0xfffc 1290 09c1 0001 | | .CONST 0x09c1,0x0001 1292 09c4 0003 | | .CONST 0x09c4,0x0003 1294 09c9 0004 | | .CONST 0x09c9,0x0004 1296 09cc 0005 | | .CONST 0x09cc,0x0005 1298 09ce 0006 | | .CONST 0x09ce,0x0006 129a 09d0 0007 | | .CONST 0x09d0,0x0007 129c 09d2 0008 | | .CONST 0x09d2,0x0008 129e 09d4 0009 | | .CONST 0x09d4,0x0009 12a0 09d6 000a | | .CONST 0x09d6,0x000a 12a2 09d7 000b | | .CONST 0x09d7,0x000b 12a4 09d8 000c | | .CONST 0x09d8,0x000c 12a6 09e5 000d | | .CONST 0x09e5,0x000d 12a8 09e8 000e | | .CONST 0x09e8,0x000e 12aa 0a00 000f | | .CONST 0x0a00,0x000f 12ac 0a03 0010 | | .CONST 0x0a03,0x0010 12ae 0a05 0011 | | .CONST 0x0a05,0x0011 12b0 0a0d 0012 | | .CONST 0x0a0d,0x0012 12b2 0a0f 0013 | | .CONST 0x0a0f,0x0013 12b4 0a11 0014 | | .CONST 0x0a11,0x0014 12b6 0a13 0015 | | .CONST 0x0a13,0x0015 12b8 0a18 0016 | | .CONST 0x0a18,0x0016 12ba 0a1a 0017 | | .CONST 0x0a1a,0x0017 12bc 0a1b 0018 | | .CONST 0x0a1b,0x0018 12be 0a1c 0019 | | .CONST 0x0a1c,0x0019 12c0 0a21 001a | ! | .CONST 0x0a21,0x001a 12c2 0a31 001b | 1 | .CONST 0x0a31,0x001b 12c4 0a33 001c | 3 | .CONST 0x0a33,0x001c 12c6 0a34 001d | 4 | .CONST 0x0a34,0x001d 12c8 0a37 0020 | 7 | .CONST 0x0a37,0x0020 12ca 0a38 0021 | 8 !| .CONST 0x0a38,0x0021 12cc ; -------------------------------------------------------------------------------------- 12cc ; Debug3 Subtable 0x21 12cc ; -------------------------------------------------------------------------------------- 12cc 0005 0021 | !| .DBG3TAB 0x0005,0x0021 12ce 0a43 ffff | C | .CONST 0x0a43,0xffff 12d0 0a44 fffe | D | .CONST 0x0a44,0xfffe 12d2 0a45 fffd | E | .CONST 0x0a45,0xfffd 12d4 0a47 fffc | G | .CONST 0x0a47,0xfffc 12d6 0a49 fffb | I | .CONST 0x0a49,0xfffb 12d8 0a4b 0001 | K | .CONST 0x0a4b,0x0001 12da 0a4e 0003 | N | .CONST 0x0a4e,0x0003 12dc 0a50 0004 | P | .CONST 0x0a50,0x0004 12de 0a78 0005 | x | .CONST 0x0a78,0x0005 12e0 0a7a 0006 | z | .CONST 0x0a7a,0x0006 12e2 0a7f 0007 | | .CONST 0x0a7f,0x0007 12e4 0a82 0008 | | .CONST 0x0a82,0x0008 12e6 0a84 0009 | | .CONST 0x0a84,0x0009 12e8 0a86 000a | | .CONST 0x0a86,0x000a 12ea 0a88 000b | | .CONST 0x0a88,0x000b 12ec 0a8a 000c | | .CONST 0x0a8a,0x000c 12ee 0a8c 000d | | .CONST 0x0a8c,0x000d 12f0 0a8d 000e | | .CONST 0x0a8d,0x000e 12f2 0a8e 000f | | .CONST 0x0a8e,0x000f 12f4 0a9b 0010 | | .CONST 0x0a9b,0x0010 12f6 0a9e 0011 | | .CONST 0x0a9e,0x0011 12f8 0aa0 0012 | | .CONST 0x0aa0,0x0012 12fa 0aa2 0013 | | .CONST 0x0aa2,0x0013 12fc 0aaa 0014 | | .CONST 0x0aaa,0x0014 12fe 0aac 0015 | | .CONST 0x0aac,0x0015 1300 0ab1 0016 | | .CONST 0x0ab1,0x0016 1302 0ab3 0017 | | .CONST 0x0ab3,0x0017 1304 0ab4 0018 | | .CONST 0x0ab4,0x0018 1306 0ab5 0019 | | .CONST 0x0ab5,0x0019 1308 0abe 001a | | .CONST 0x0abe,0x001a 130a 0ac0 001b | | .CONST 0x0ac0,0x001b 130c 0ac1 001c | | .CONST 0x0ac1,0x001c 130e 0acb 001d | | .CONST 0x0acb,0x001d 1310 0acc 001e | | .CONST 0x0acc,0x001e 1312 0ace 001f | | .CONST 0x0ace,0x001f 1314 0acf 0020 | | .CONST 0x0acf,0x0020 1316 0ad2 0023 | #| .CONST 0x0ad2,0x0023 1318 0ad3 0024 | $| .CONST 0x0ad3,0x0024 131a ; -------------------------------------------------------------------------------------- 131a ; Debug3 Subtable 0x22 131a ; -------------------------------------------------------------------------------------- 131a 0006 0000 | | .DBG3TAB 0x0006,0x0000 131c 0adb ffff | | .CONST 0x0adb,0xffff 131e 0add fffe | | .CONST 0x0add,0xfffe 1320 0ade fffd | | .CONST 0x0ade,0xfffd 1322 0ae0 fffc | | .CONST 0x0ae0,0xfffc 1324 0ae2 fffb | | .CONST 0x0ae2,0xfffb 1326 0ae2 fffa | | .CONST 0x0ae2,0xfffa 1328 ; -------------------------------------------------------------------------------------- 1328 ; Debug3 Subtable 0x23 1328 ; -------------------------------------------------------------------------------------- 1328 0002 0000 | | .DBG3TAB 0x0002,0x0000 132a 0ae6 ffff | | .CONST 0x0ae6,0xffff 132c 0ae8 fffe | | .CONST 0x0ae8,0xfffe 132e ; -------------------------------------------------------------------------------------- 132e ; Debug3 Subtable 0x24 132e ; -------------------------------------------------------------------------------------- 132e 0000 0002 | | .DBG3TAB 0x0000,0x0002 1330 0af3 0001 | | .CONST 0x0af3,0x0001 1332 0af5 0002 | | .CONST 0x0af5,0x0002 1334 ; -------------------------------------------------------------------------------------- 1334 ; Debug3 Subtable 0x25 1334 ; -------------------------------------------------------------------------------------- 1334 0000 0001 | | .DBG3TAB 0x0000,0x0001 1336 0afb 0001 | | .CONST 0x0afb,0x0001 1338 0000 0000 | | .BLANK 0000[0xc8]