|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 18432 (0x4800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_2a54d7
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 2208 |" | .CONST 0x2208 ; 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 8014 | | .CONST 0x8014 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0074 | t | .CONST 0x0074 ; Address of begin 0019 00dc | | .CONST 0x00dc ; Address of exception handler 001a 001c | | .CONST 0x001c ; Number of locals 001b INIT_0018: 001b 4801 |H | Short_Literal 0x1 001c 4806 |H | Short_Literal 0x6 001d e001 | | Load 0x0,0x1 001e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 001f 035b | [ | Declare_Type Array,Constrained 0020 0337 | 7 | Declare_Variable Array 0021 00d8 | | Load_Top At_Offset_0 0022 0335 | 5 | Declare_Variable Array,Duplicate 0023 00cd | | Action Spare6_Action 0024 4806 |H | Short_Literal 0x6 0025 4801 |H | Short_Literal 0x1 0026 4800 |H | Short_Literal 0x0 0027 00d9 | | Load_Top At_Offset_1 0028 e403 | | Load 0x2,0x3 0029 01d6 | | Execute Vector,Field_Write 002a 3ffb |? | Loop_Increasing 0x26 002b 00d9 | | Load_Top At_Offset_1 002c 01d4 | | Execute Vector,Structure_Write 002d 4801 |H | Short_Literal 0x1 002e 4806 |H | Short_Literal 0x6 002f e001 | | Load 0x0,0x1 0030 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0031 035b | [ | Declare_Type Array,Constrained 0032 0337 | 7 | Declare_Variable Array 0033 00d9 | | Load_Top At_Offset_1 0034 00d9 | | Load_Top At_Offset_1 0035 01d4 | | Execute Vector,Structure_Write 0036 e002 | | Load 0x0,0x2 0037 180e | | Execute Package,Field_Execute,Field_Number 0xe 0038 e003 | | Load 0x0,0x3 0039 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003a 0337 | 7 | Declare_Variable Array 003b e003 | | Load 0x0,0x3 003c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 003d 00e1 | | Load_Encached Boolean_Cache 003e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 003f 0092 1c70 | p| Action Push_String_Extended,0x1c70 ; "Tcp_Ip_Boot" 0041 029e 00fb | | Declare_Subprogram INIT_00f8,For_Call,Unelaborated 0043 029f 020b | | Declare_Subprogram INIT_0208,For_Call 0045 029f 021b | | Declare_Subprogram INIT_0218,For_Call 0047 029f 029b | | Declare_Subprogram INIT_0298,For_Call 0049 029f 02d3 | | Declare_Subprogram INIT_02d0,For_Call 004b e004 | | Load 0x0,0x4 004c e005 | | Load 0x0,0x5 004d e002 | | Load 0x0,0x2 004e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004f e006 | | Load 0x0,0x6 0050 1b50 | P | Execute Package,Field_Read,Field_Number 0x50 0051 0387 | | Declare_Variable Package 0052 00d8 | | Load_Top At_Offset_0 0053 020f | | Execute Module,Activate 0054 029f 02e3 | | Declare_Subprogram INIT_02e0,For_Call 0056 029f 030b | | Declare_Subprogram INIT_0308,For_Call 0058 029f 0393 | | Declare_Subprogram INIT_0390,For_Call 005a 029f 040b | | Declare_Subprogram INIT_0408,For_Call 005c 029f 0523 | #| Declare_Subprogram INIT_0520,For_Call 005e 029f 053b | ;| Declare_Subprogram INIT_0538,For_Call 0060 029f 0553 | S| Declare_Subprogram INIT_0550,For_Call 0062 4809 |H | Short_Literal 0x9 0063 4802 |H | Short_Literal 0x2 0064 0099 | | Action Reference_Dynamic 0065 00c7 | | Action Elaborate_Subprogram 0066 029f 0593 | | Declare_Subprogram INIT_0590,For_Call 0068 029f 05ab | | Declare_Subprogram INIT_05a8,For_Call 006a 029f 05d3 | | Declare_Subprogram INIT_05d0,For_Call 006c 029f 05eb | | Declare_Subprogram INIT_05e8,For_Call 006e 029f 064b | K| Declare_Subprogram INIT_0648,For_Call 0070 029f 065b | [| Declare_Subprogram INIT_0658,For_Call 0072 029f 066b | k| Declare_Subprogram INIT_0668,For_Call 0074 BODY_0018: 0074 4802 |H | Short_Literal 0x2 0075 0092 1c71 | q| Action Push_String_Extended,0x1c71 ; "[Tcp_Ip_Boot]" 0077 840a | | Call 0x2,0xa 0078 e5fc | | Load 0x2,-0x4 0079 8416 | | Call 0x2,0x16 007a e5fb | | Load 0x2,-0x5 007b 8417 | | Call 0x2,0x17 007c e5f9 | | Load 0x2,-0x7 007d 6809 |h | Jump_Zero 0x87 007e 4802 |H | Short_Literal 0x2 007f 0092 1c72 | r| Action Push_String_Extended,0x1c72 ; "Local_Host_Id => " 0081 e405 | | Load 0x2,0x5 0082 e007 | | Load 0x0,0x7 0083 180f | | Execute Package,Field_Execute,Field_Number 0xf 0084 01cc | | Execute Vector,Catenate 0085 840a | | Call 0x2,0xa 0086 7803 |x | Jump 0x8a 0087 e405 | | Load 0x2,0x5 0088 e003 | | Load 0x0,0x3 0089 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 008a 841a | | Call 0x2,0x1a 008b e5f9 | | Load 0x2,-0x7 008c 680b |h | Jump_Zero 0x98 008d 6062 |`b | Indirect_Literal Discrete,0xf0,{0x00000000, 0x0001ffff} 008e a406 | | Store_Unchecked 0x2,0x6 008f 4802 |H | Short_Literal 0x2 0090 0092 1c73 | s| Action Push_String_Extended,0x1c73 ; "Last_Address =>" 0092 e406 | | Load 0x2,0x6 0093 00e0 | | Load_Encached Standard_Cache 0094 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0095 01cc | | Execute Vector,Catenate 0096 840a | | Call 0x2,0xa 0097 7804 |x | Jump 0x9c 0098 e003 | | Load 0x0,0x3 0099 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 009a 840f | | Call 0x2,0xf 009b c406 | | Store 0x2,0x6 009c 4802 |H | Short_Literal 0x2 009d 0092 1c74 | t| Action Push_String_Extended,0x1c74 ; "Downloading code to EXOS controller." 009f 840a | | Call 0x2,0xa 00a0 4801 |H | Short_Literal 0x1 00a1 0092 1c75 | u| Action Push_String_Extended,0x1c75 ; "Exos_8000_4_Ia" 00a3 8418 | | Call 0x2,0x18 00a4 4800 |H | Short_Literal 0x0 00a5 0092 1c76 | v| Action Push_String_Extended,0x1c76 ; "Exos_8000_4_Hb" 00a7 8418 | | Call 0x2,0x18 00a8 4800 |H | Short_Literal 0x0 00a9 0092 1c77 | w| Action Push_String_Extended,0x1c77 ; "Exos_8000_4_Aa" 00ab 8418 | | Call 0x2,0x18 00ac 4800 |H | Short_Literal 0x0 00ad 0092 1c78 | x| Action Push_String_Extended,0x1c78 ; "EXOS_8010_3_Sd" 00af 8418 | | Call 0x2,0x18 00b0 4800 |H | Short_Literal 0x0 00b1 0092 1c79 | y| Action Push_String_Extended,0x1c79 ; "EXOS_8010_3_P" 00b3 8418 | | Call 0x2,0x18 00b4 4800 |H | Short_Literal 0x0 00b5 0092 1c7a | z| Action Push_String_Extended,0x1c7a ; "EXOS_8010_3_3h" 00b7 8418 | | Call 0x2,0x18 00b8 4800 |H | Short_Literal 0x0 00b9 0092 1c7b | {| Action Push_String_Extended,0x1c7b ; "EXOS_8010_3_3" 00bb 8418 | | Call 0x2,0x18 00bc 4800 |H | Short_Literal 0x0 00bd 0092 1c7c | || Action Push_String_Extended,0x1c7c ; "EXOS_8010_3_2" 00bf 8418 | | Call 0x2,0x18 00c0 e407 | | Load 0x2,0x7 00c1 7009 |p | Jump_Nonzero 0xcb 00c2 00e1 | | Load_Encached Boolean_Cache 00c3 e5f9 | | Load 0x2,-0x7 00c4 e5ff | | Load 0x2,-0x1 00c5 e5fd | | Load 0x2,-0x3 00c6 0092 1c7d | }| Action Push_String_Extended,0x1c7d ; "EXOS_8010_3_1" 00c8 01cc | | Execute Vector,Catenate 00c9 8411 | | Call 0x2,0x11 00ca c407 | | Store 0x2,0x7 00cb e407 | | Load 0x2,0x7 00cc 6809 |h | Jump_Zero 0xd6 00cd 4803 |H | Short_Literal 0x3 00ce 0092 1c7e | ~| Action Push_String_Extended,0x1c7e ; "Tcp_Ip_Boot succeeded." 00d0 840a | | Call 0x2,0xa 00d1 e5ff | | Load 0x2,-0x1 00d2 6801 |h | Jump_Zero 0xd4 00d3 8419 | | Call 0x2,0x19 00d4 8415 | | Call 0x2,0x15 00d5 450a |E | Exit_Suprogram New_Top_Offset 0xa 00d6 4807 |H | Short_Literal 0x7 00d7 0092 1c7f | | Action Push_String_Extended,0x1c7f ; "Unable to find an EXOS controller code file." 00d9 840a | | Call 0x2,0xa 00da e008 | | Load 0x0,0x8 00db 0257 | W | Execute Discrete,Raise 00dc TRAP_0018: 00dc e009 | | Load 0x0,0x9 00dd 010f | | Execute Exception,Equal 00de 6805 |h | Jump_Zero 0xe4 00df 4805 |H | Short_Literal 0x5 00e0 0092 1c80 | | Action Push_String_Extended,0x1c80 ; "Tcp_Ip_Boot failed." 00e2 840a | | Call 0x2,0xa 00e3 450a |E | Exit_Suprogram New_Top_Offset 0xa 00e4 e008 | | Load 0x0,0x8 00e5 010f | | Execute Exception,Equal 00e6 6802 |h | Jump_Zero 0xe9 00e7 841b | | Call 0x2,0x1b 00e8 450a |E | Exit_Suprogram New_Top_Offset 0xa 00e9 4808 |H | Short_Literal 0x8 00ea 0092 1c81 | | Action Push_String_Extended,0x1c81 ; "Tcp_Ip_Boot caught an unexpected exception." 00ec 840a | | Call 0x2,0xa 00ed 841c | | Call 0x2,0x1c 00ee 450a |E | Exit_Suprogram New_Top_Offset 0xa 00ef 0000 | | .XXX[0x1] 00f0 0000 0000 | | .LITERAL {0x00000000, 0x0001ffff} 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 01b4 | | .CONST 0x01b4 ; Address of begin 00f9 01f0 | | .CONST 0x01f0 ; Address of exception handler 00fa 0028 | ( | .CONST 0x0028 ; Number of locals 00fb INIT_00f8: 00fb 4800 |H | Short_Literal 0x0 00fc 4807 |H | Short_Literal 0x7 00fd 029f 067b | {| Declare_Subprogram INIT_0678,For_Call 00ff 03fd | | Declare_Type Discrete,Defined 0100 e5fc | | Load 0x2,-0x4 0101 0092 1c82 | | Action Push_String_Extended,0x1c82 ; "$TCP_IP_Subnet_Mask" 0103 01cc | | Execute Vector,Catenate 0104 0007 | | Action Break_Optional 0105 e408 | | Load 0x2,0x8 0106 0092 1c83 | | Action Push_String_Extended,0x1c83 ; ".ENP_Boot" 0108 01cc | | Execute Vector,Catenate 0109 0007 | | Action Break_Optional 010a 4800 |H | Short_Literal 0x0 010b 0092 1c84 | | Action Push_String_Extended,0x1c84 ; "CMC" 010d e00a | | Load 0x0,0xa 010e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 010f e00a | | Load 0x0,0xa 0110 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0111 011e | | Execute Any,Convert 0112 4802 |H | Short_Literal 0x2 0113 0092 1c84 | | Action Push_String_Extended,0x1c84 ; "CMC" 0115 e00a | | Load 0x0,0xa 0116 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0117 e00a | | Load 0x0,0xa 0118 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0119 011e | | Execute Any,Convert 011a e001 | | Load 0x0,0x1 011b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 011c e001 | | Load 0x0,0x1 011d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 011e e00b | | Load 0x0,0xb 011f 191f | | Execute Package,Field_Reference,Field_Number 0x1f 0120 0007 | | Action Break_Optional 0121 e00b | | Load 0x0,0xb 0122 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0123 0007 | | Action Break_Optional 0124 4800 |H | Short_Literal 0x0 0125 0093 162b | +| push_full_address INIT_1628 0127 02a0 | | Declare_Subprogram Null_Subprogram 0128 038e | | Declare_Type Package,Defined 0129 e00c | | Load 0x0,0xc 012a 4801 |H | Short_Literal 0x1 012b 00da | | Load_Top At_Offset_2 012c 020e | | Execute Module,Augment_Imports 012d 0387 | | Declare_Variable Package 012e 00e1 | | Load_Encached Boolean_Cache 012f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0130 00e3 | | Load_Encached Natural_Cache 0131 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0132 e602 | | Load 0x3,0x2 0133 0007 | | Action Break_Optional 0134 e00c | | Load 0x0,0xc 0135 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0136 00e5 | | Load_Encached Long_Integer_Cache 0137 e403 | | Load 0x2,0x3 0138 e00d | | Load 0x0,0xd 0139 1b0f | | Execute Package,Field_Read,Field_Number 0xf 013a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 013b 01c7 | | Execute Vector,Convert 013c 0335 | 5 | Declare_Variable Array,Duplicate 013d 00cd | | Action Spare6_Action 013e e405 | | Load 0x2,0x5 013f e00d | | Load 0x0,0xd 0140 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0141 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0142 01c7 | | Execute Vector,Convert 0143 0335 | 5 | Declare_Variable Array,Duplicate 0144 00cd | | Action Spare6_Action 0145 4800 |H | Short_Literal 0x0 0146 4803 |H | Short_Literal 0x3 0147 e001 | | Load 0x0,0x1 0148 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0149 035b | [ | Declare_Type Array,Constrained 014a 0337 | 7 | Declare_Variable Array 014b 4800 |H | Short_Literal 0x0 014c 4800 |H | Short_Literal 0x0 014d 00da | | Load_Top At_Offset_2 014e 01d6 | | Execute Vector,Field_Write 014f 4800 |H | Short_Literal 0x0 0150 4801 |H | Short_Literal 0x1 0151 00da | | Load_Top At_Offset_2 0152 01d6 | | Execute Vector,Field_Write 0153 4800 |H | Short_Literal 0x0 0154 4802 |H | Short_Literal 0x2 0155 00da | | Load_Top At_Offset_2 0156 01d6 | | Execute Vector,Field_Write 0157 4800 |H | Short_Literal 0x0 0158 4803 |H | Short_Literal 0x3 0159 00da | | Load_Top At_Offset_2 015a 01d6 | | Execute Vector,Field_Write 015b 4800 |H | Short_Literal 0x0 015c 0093 133b | ;| push_full_address INIT_1338 015e 02a0 | | Declare_Subprogram Null_Subprogram 015f 038e | | Declare_Type Package,Defined 0160 0387 | | Declare_Variable Package 0161 e00e | | Load 0x0,0xe 0162 e00f | | Load 0x0,0xf 0163 e001 | | Load 0x0,0x1 0164 e607 | | Load 0x3,0x7 0165 4804 |H | Short_Literal 0x4 0166 e614 | | Load 0x3,0x14 0167 020e | | Execute Module,Augment_Imports 0168 00d8 | | Load_Top At_Offset_0 0169 020f | | Execute Module,Activate 016a 029f 06a3 | | Declare_Subprogram INIT_06a0,For_Call 016c 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call 016e 029f 06c3 | | Declare_Subprogram INIT_06c0,For_Call 0170 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call 0172 029f 0713 | | Declare_Subprogram INIT_0710,For_Call 0174 029f 074b | K| Declare_Subprogram INIT_0748,For_Call 0176 029f 0753 | S| Declare_Subprogram INIT_0750,For_Call 0178 029f 0773 | s| Declare_Subprogram INIT_0770,For_Call 017a 029f 077b | {| Declare_Subprogram INIT_0778,For_Call 017c 029f 0793 | | Declare_Subprogram INIT_0790,For_Call 017e 029f 07d3 | | Declare_Subprogram INIT_07d0,For_Call 0180 029f 07f3 | | Declare_Subprogram INIT_07f0,For_Call 0182 e607 | | Load 0x3,0x7 0183 e5f9 | | Load 0x2,-0x7 0184 480a |H | Short_Literal 0xa 0185 4802 |H | Short_Literal 0x2 0186 0099 | | Action Reference_Dynamic 0187 e008 | | Load 0x0,0x8 0188 e00b | | Load 0x0,0xb 0189 480a |H | Short_Literal 0xa 018a 4803 |H | Short_Literal 0x3 018b 0099 | | Action Reference_Dynamic 018c e001 | | Load 0x0,0x1 018d 4809 |H | Short_Literal 0x9 018e 4803 |H | Short_Literal 0x3 018f 0099 | | Action Reference_Dynamic 0190 e604 | | Load 0x3,0x4 0191 481b |H | Short_Literal 0x1b 0192 4803 |H | Short_Literal 0x3 0193 0099 | | Action Reference_Dynamic 0194 e5f8 | | Load 0x2,-0x8 0195 481c |H | Short_Literal 0x1c 0196 4803 |H | Short_Literal 0x3 0197 0099 | | Action Reference_Dynamic 0198 4818 |H | Short_Literal 0x18 0199 4803 |H | Short_Literal 0x3 019a 0099 | | Action Reference_Dynamic 019b e606 | | Load 0x3,0x6 019c 4820 |H | Short_Literal 0x20 019d 4803 |H | Short_Literal 0x3 019e 0099 | | Action Reference_Dynamic 019f 480f |H | Short_Literal 0xf 01a0 e60b | | Load 0x3,0xb 01a1 020e | | Execute Module,Augment_Imports 01a2 e60b | | Load 0x3,0xb 01a3 020f | | Execute Module,Activate 01a4 029f 081b | | Declare_Subprogram INIT_0818,For_Call 01a6 029f 089b | | Declare_Subprogram INIT_0898,For_Call 01a8 029f 08f3 | | Declare_Subprogram INIT_08f0,For_Call 01aa 029f 0a4b | K| Declare_Subprogram INIT_0a48,For_Call 01ac 029f 0af3 | | Declare_Subprogram INIT_0af0,For_Call 01ae 029f 0c4b | K| Declare_Subprogram INIT_0c48,For_Call 01b0 029f 0cbb | | Declare_Subprogram INIT_0cb8,For_Call 01b2 029f 0ccb | | Declare_Subprogram INIT_0cc8,For_Call 01b4 BODY_00f8: 01b4 4802 |H | Short_Literal 0x2 01b5 0092 1c85 | | Action Push_String_Extended,0x1c85 ; "[" 01b7 e604 | | Load 0x3,0x4 01b8 01cc | | Execute Vector,Catenate 01b9 0092 1c86 | | Action Push_String_Extended,0x1c86 ; "]" 01bb 01cc | | Execute Vector,Catenate 01bc 840a | | Call 0x2,0xa 01bd e5f9 | | Load 0x2,-0x7 01be 7001 |p | Jump_Nonzero 0x1c0 01bf 8415 | | Call 0x2,0x15 01c0 e60b | | Load 0x3,0xb 01c1 180d | | Execute Package,Field_Execute,Field_Number 0xd 01c2 00cf | | Action Mark_Auxiliary 01c3 e602 | | Load 0x3,0x2 01c4 0266 | f | Execute Discrete,Bounds 01c5 0007 | | Action Break_Optional 01c6 00d8 | | Load_Top At_Offset_0 01c7 8621 | ! | Call 0x3,0x21 01c8 e60c | | Load 0x3,0xc 01c9 6802 |h | Jump_Zero 0x1cc 01ca 00d2 | | Pop_Control Pop_Count_2 01cb 7802 |x | Jump 0x1ce 01cc 00c8 | | Action Pop_Auxiliary_Range 01cd 37f8 |7 | Loop_Decreasing 0x1c6 01ce 00ce | | Action Pop_Auxiliary 01cf e60c | | Load 0x3,0xc 01d0 7006 |p | Jump_Nonzero 0x1d7 01d1 4807 |H | Short_Literal 0x7 01d2 0092 1c87 | | Action Push_String_Extended,0x1c87 ; "Unable to find an ENP code file." 01d4 840a | | Call 0x2,0xa 01d5 e008 | | Load 0x0,0x8 01d6 0257 | W | Execute Discrete,Raise 01d7 8623 | # | Call 0x3,0x23 01d8 e60b | | Load 0x3,0xb 01d9 180e | | Execute Package,Field_Execute,Field_Number 0xe 01da e00c | | Load 0x0,0xc 01db 1b17 | | Execute Package,Field_Read,Field_Number 0x17 01dc 8624 | $ | Call 0x3,0x24 01dd c60f | | Store 0x3,0xf 01de e60f | | Load 0x3,0xf 01df e60b | | Load 0x3,0xb 01e0 180f | | Execute Package,Field_Execute,Field_Number 0xf 01e1 e60f | | Load 0x3,0xf 01e2 8625 | % | Call 0x3,0x25 01e3 e5f9 | | Load 0x2,-0x7 01e4 700a |p | Jump_Nonzero 0x1ef 01e5 8626 | & | Call 0x3,0x26 01e6 8627 | ' | Call 0x3,0x27 01e7 8628 | ( | Call 0x3,0x28 01e8 4803 |H | Short_Literal 0x3 01e9 e604 | | Load 0x3,0x4 01ea 0092 1c88 | | Action Push_String_Extended,0x1c88 ; " succeeded." 01ec 01cc | | Execute Vector,Catenate 01ed 840a | | Call 0x2,0xa 01ee 8415 | | Call 0x2,0x15 01ef 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01f0 TRAP_00f8: 01f0 e008 | | Load 0x0,0x8 01f1 010f | | Execute Exception,Equal 01f2 6808 |h | Jump_Zero 0x1fb 01f3 4805 |H | Short_Literal 0x5 01f4 e604 | | Load 0x3,0x4 01f5 0092 1c89 | | Action Push_String_Extended,0x1c89 ; " failed." 01f7 01cc | | Execute Vector,Catenate 01f8 840a | | Call 0x2,0xa 01f9 00d8 | | Load_Top At_Offset_0 01fa 0101 | | Execute Exception,Reraise 01fb 4808 |H | Short_Literal 0x8 01fc e604 | | Load 0x3,0x4 01fd 0092 1c89 | | Action Push_String_Extended,0x1c89 ; " failed." 01ff 01cc | | Execute Vector,Catenate 0200 840a | | Call 0x2,0xa 0201 e008 | | Load 0x0,0x8 0202 0257 | W | Execute Discrete,Raise 0203 0000 0000 | | .BLANK 0000[0x5] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0212 | | .CONST 0x0212 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b e010 | | Load 0x0,0x10 020c 180e | | Execute Package,Field_Execute,Field_Number 0xe 020d e7fe | | Load 0x3,-0x2 020e e7ff | | Load 0x3,-0x1 020f e011 | | Load 0x0,0x11 0210 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0211 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0212 TRAP_0208: 0212 0007 | | Action Break_Optional 0213 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0214 0000 0000 | | .BLANK 0000[0x4] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 027f | | .CONST 0x027f ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 000b | | .CONST 0x000b ; Number of locals 021b INIT_0218: 021b 4801 |H | Short_Literal 0x1 021c 4850 |HP | Short_Literal 0x50 021d 00e9 | | Load_Encached String_Cache 021e 035b | [ | Declare_Type Array,Constrained 021f 0337 | 7 | Declare_Variable Array 0220 00e3 | | Load_Encached Natural_Cache 0221 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0222 4801 |H | Short_Literal 0x1 0223 4810 |H | Short_Literal 0x10 0224 e001 | | Load 0x0,0x1 0225 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0226 035b | [ | Declare_Type Array,Constrained 0227 0337 | 7 | Declare_Variable Array 0228 00e3 | | Load_Encached Natural_Cache 0229 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 022a 4800 |H | Short_Literal 0x0 022b 480f |H | Short_Literal 0xf 022c 00e8 | | Load_Encached Character_Cache 022d 02a0 | | Declare_Subprogram Null_Subprogram 022e 4801 |H | Short_Literal 0x1 022f 035d | ] | Declare_Type Array,Defined 0230 00d8 | | Load_Top At_Offset_0 0231 0337 | 7 | Declare_Variable Array 0232 00d8 | | Load_Top At_Offset_0 0233 0335 | 5 | Declare_Variable Array,Duplicate 0234 00cd | | Action Spare6_Action 0235 4830 |H0 | Short_Literal 0x30 0236 4800 |H | Short_Literal 0x0 0237 00da | | Load_Top At_Offset_2 0238 01d6 | | Execute Vector,Field_Write 0239 4831 |H1 | Short_Literal 0x31 023a 4801 |H | Short_Literal 0x1 023b 00da | | Load_Top At_Offset_2 023c 01d6 | | Execute Vector,Field_Write 023d 4832 |H2 | Short_Literal 0x32 023e 4802 |H | Short_Literal 0x2 023f 00da | | Load_Top At_Offset_2 0240 01d6 | | Execute Vector,Field_Write 0241 4833 |H3 | Short_Literal 0x33 0242 4803 |H | Short_Literal 0x3 0243 00da | | Load_Top At_Offset_2 0244 01d6 | | Execute Vector,Field_Write 0245 4834 |H4 | Short_Literal 0x34 0246 4804 |H | Short_Literal 0x4 0247 00da | | Load_Top At_Offset_2 0248 01d6 | | Execute Vector,Field_Write 0249 4835 |H5 | Short_Literal 0x35 024a 4805 |H | Short_Literal 0x5 024b 00da | | Load_Top At_Offset_2 024c 01d6 | | Execute Vector,Field_Write 024d 4836 |H6 | Short_Literal 0x36 024e 4806 |H | Short_Literal 0x6 024f 00da | | Load_Top At_Offset_2 0250 01d6 | | Execute Vector,Field_Write 0251 4837 |H7 | Short_Literal 0x37 0252 4807 |H | Short_Literal 0x7 0253 00da | | Load_Top At_Offset_2 0254 01d6 | | Execute Vector,Field_Write 0255 4838 |H8 | Short_Literal 0x38 0256 4808 |H | Short_Literal 0x8 0257 00da | | Load_Top At_Offset_2 0258 01d6 | | Execute Vector,Field_Write 0259 4839 |H9 | Short_Literal 0x39 025a 4809 |H | Short_Literal 0x9 025b 00da | | Load_Top At_Offset_2 025c 01d6 | | Execute Vector,Field_Write 025d 4841 |HA | Short_Literal 0x41 025e 480a |H | Short_Literal 0xa 025f 00da | | Load_Top At_Offset_2 0260 01d6 | | Execute Vector,Field_Write 0261 4842 |HB | Short_Literal 0x42 0262 480b |H | Short_Literal 0xb 0263 00da | | Load_Top At_Offset_2 0264 01d6 | | Execute Vector,Field_Write 0265 4843 |HC | Short_Literal 0x43 0266 480c |H | Short_Literal 0xc 0267 00da | | Load_Top At_Offset_2 0268 01d6 | | Execute Vector,Field_Write 0269 4844 |HD | Short_Literal 0x44 026a 480d |H | Short_Literal 0xd 026b 00da | | Load_Top At_Offset_2 026c 01d6 | | Execute Vector,Field_Write 026d 4845 |HE | Short_Literal 0x45 026e 480e |H | Short_Literal 0xe 026f 00da | | Load_Top At_Offset_2 0270 01d6 | | Execute Vector,Field_Write 0271 4846 |HF | Short_Literal 0x46 0272 480f |H | Short_Literal 0xf 0273 00da | | Load_Top At_Offset_2 0274 01d6 | | Execute Vector,Field_Write 0275 00d9 | | Load_Top At_Offset_1 0276 01d4 | | Execute Vector,Structure_Write 0277 029f 0cdb | | Declare_Subprogram INIT_0cd8,For_Call 0279 029f 0ceb | | Declare_Subprogram INIT_0ce8,For_Call 027b 029f 0d03 | | Declare_Subprogram INIT_0d00,For_Call 027d 029f 0d33 | 3| Declare_Subprogram INIT_0d30,For_Call 027f BODY_0218: 027f e7ff | | Load 0x3,-0x1 0280 01db | | Execute Vector,Length 0281 0d01 | | Execute_Immediate Less,0x1 0282 6804 |h | Jump_Zero 0x287 0283 00ea | | Load_Encached Null_String_Cache 0284 e006 | | Load 0x0,0x6 0285 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0286 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0287 00cf | | Action Mark_Auxiliary 0288 e7ff | | Load 0x3,-0x1 0289 01d9 | | Execute Vector,Reverse_Bounds 028a 0263 | c | Execute Discrete,Above_Bound 028b 7006 |p | Jump_Nonzero 0x292 028c 00d8 | | Load_Top At_Offset_0 028d e7ff | | Load 0x3,-0x1 028e 01d7 | | Execute Vector,Field_Read 028f 860b | | Call 0x3,0xb 0290 00c8 | | Action Pop_Auxiliary_Range 0291 3ffa |? | Loop_Increasing 0x28c 0292 00ce | | Action Pop_Auxiliary 0293 860a | | Call 0x3,0xa 0294 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0295 0000 0000 | | .XXX[0x3] 0297 0000 | | 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 02a3 | | .CONST 0x02a3 ; Address of begin 0299 02ab | | .CONST 0x02ab ; Address of exception handler 029a 0002 | | .CONST 0x0002 ; Number of locals 029b INIT_0298: 029b 0092 1c8a | | Action Push_String_Extended,0x1c8a ; "Text_Io.Open (\x22" 029d e7fe | | Load 0x3,-0x2 029e 01cc | | Execute Vector,Catenate 029f 0092 1c8b | | Action Push_String_Extended,0x1c8b ; "\x22)" 02a1 01cc | | Execute Vector,Catenate 02a2 0007 | | Action Break_Optional 02a3 BODY_0298: 02a3 e7fc | | Load 0x3,-0x4 02a4 00ea | | Load_Encached Null_String_Cache 02a5 e7fe | | Load 0x3,-0x2 02a6 e7ff | | Load 0x3,-0x1 02a7 e006 | | Load 0x0,0x6 02a8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02a9 c7fc | | Store 0x3,-0x4 02aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02ab TRAP_0298: 02ab 00d8 | | Load_Top At_Offset_0 02ac 0107 | | Execute Exception,Get_Name 02ad 4920 |I | Short_Literal 0x120 02ae 492f |I/ | Short_Literal 0x12f 02af 0262 | b | Execute Discrete,In_Range 02b0 680d |h | Jump_Zero 0x2be 02b1 e7fd | | Load 0x3,-0x3 02b2 7009 |p | Jump_Nonzero 0x2bc 02b3 4807 |H | Short_Literal 0x7 02b4 00da | | Load_Top At_Offset_2 02b5 0092 1c8c | | Action Push_String_Extended,0x1c8c ; " raised Io_Exceptions.Name_Error." 02b7 01cc | | Execute Vector,Catenate 02b8 0092 1c8d | | Action Push_String_Extended,0x1c8d ; " Does this file exist?" 02ba 01cc | | Execute Vector,Catenate 02bb 840a | | Call 0x2,0xa 02bc 00d8 | | Load_Top At_Offset_0 02bd 0101 | | Execute Exception,Reraise 02be 00d8 | | Load_Top At_Offset_0 02bf 0107 | | Execute Exception,Get_Name 02c0 4930 |I0 | Short_Literal 0x130 02c1 493f |I? | Short_Literal 0x13f 02c2 0262 | b | Execute Discrete,In_Range 02c3 680b |h | Jump_Zero 0x2cf 02c4 4807 |H | Short_Literal 0x7 02c5 00da | | Load_Top At_Offset_2 02c6 0092 1c8e | | Action Push_String_Extended,0x1c8e ; " raised Io_Exceptions.Use_Error." 02c8 01cc | | Execute Vector,Catenate 02c9 0092 1c8f | | Action Push_String_Extended,0x1c8f ; " Is this file already open?" 02cb 01cc | | Execute Vector,Catenate 02cc 840a | | Call 0x2,0xa 02cd 00d8 | | Load_Top At_Offset_0 02ce 0101 | | Execute Exception,Reraise 02cf 0100 | | Execute Exception,Raise 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 02d8 | | .CONST 0x02d8 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 00da | | Load_Top At_Offset_2 02d4 e006 | | Load 0x0,0x6 02d5 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02d6 c7ff | | Store 0x3,-0x1 02d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02d8 TRAP_02d0: 02d8 0007 | | Action Break_Optional 02d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02da 0000 0000 | | .BLANK 0000[0x6] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e7 | | .CONST 0x02e7 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0003 | | .CONST 0x0003 ; Number of locals 02e3 INIT_02e0: 02e3 e003 | | Load 0x0,0x3 02e4 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02e5 e003 | | Load 0x0,0x3 02e6 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 02e7 BODY_02e0: 02e7 e003 | | Load 0x0,0x3 02e8 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 02e9 e003 | | Load 0x0,0x3 02ea 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02eb e003 | | Load 0x0,0x3 02ec 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 02ed 005b | [ | Store_Top Discrete,At_Offset_3 02ee 0059 | Y | Store_Top Discrete,At_Offset_1 02ef 00d8 | | Load_Top At_Offset_0 02f0 a7ff | | Store_Unchecked 0x3,-0x1 02f1 4802 |H | Short_Literal 0x2 02f2 0092 1c90 | | Action Push_String_Extended,0x1c90 ; "EXOS reset status => " 02f4 00db | | Load_Top At_Offset_3 02f5 e003 | | Load 0x0,0x3 02f6 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02f7 011c | | Execute Any,Convert_Unchecked 02f8 1c01 | | Execute_Immediate Run_Utility,0x1 02f9 01cc | | Execute Vector,Catenate 02fa 840a | | Call 0x2,0xa 02fb 00d9 | | Load_Top At_Offset_1 02fc 6802 |h | Jump_Zero 0x2ff 02fd e008 | | Load 0x0,0x8 02fe 0257 | W | Execute Discrete,Raise 02ff 4802 |H | Short_Literal 0x2 0300 0092 1c91 | | Action Push_String_Extended,0x1c91 ; "EXOS last address =>" 0302 00da | | Load_Top At_Offset_2 0303 00e0 | | Load_Encached Standard_Cache 0304 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0305 01cc | | Execute Vector,Catenate 0306 840a | | Call 0x2,0xa 0307 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 0314 | | .CONST 0x0314 ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0004 | | .CONST 0x0004 ; Number of locals 030b INIT_0308: 030b 00e3 | | Load_Encached Natural_Cache 030c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 030d 00e3 | | Load_Encached Natural_Cache 030e 4801 |H | Short_Literal 0x1 030f 6078 |`x | Indirect_Literal Discrete,0x388,{0x00000000, 0x00000400} 0310 e012 | | Load 0x0,0x12 0311 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0312 035b | [ | Declare_Type Array,Constrained 0313 0337 | 7 | Declare_Variable Array 0314 BODY_0308: 0314 4802 |H | Short_Literal 0x2 0315 0092 1c92 | | Action Push_String_Extended,0x1c92 ; "Downloading" 0317 e7fe | | Load 0x3,-0x2 0318 00e0 | | Load_Encached Standard_Cache 0319 1818 | | Execute Package,Field_Execute,Field_Number 0x18 031a 01cc | | Execute Vector,Catenate 031b 0092 1c93 | | Action Push_String_Extended,0x1c93 ; " bytes to address" 031d 01cc | | Execute Vector,Catenate 031e e7ff | | Load 0x3,-0x1 031f 00e0 | | Load_Encached Standard_Cache 0320 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0321 01cc | | Execute Vector,Catenate 0322 840a | | Call 0x2,0xa 0323 00cf | | Action Mark_Auxiliary 0324 784f |xO | Jump 0x374 0325 e7fe | | Load 0x3,-0x2 0326 e602 | | Load 0x3,0x2 0327 0272 | r | Execute Discrete,Minus 0328 605f |`_ | Indirect_Literal Discrete,0x388,{0x00000000, 0x00000400} 0329 027b | { | Execute Discrete,Greater_Equal 032a 6808 |h | Jump_Zero 0x333 032b 00e3 | | Load_Encached Natural_Cache 032c 00da | | Load_Top At_Offset_2 032d e7fc | | Load 0x3,-0x4 032e e012 | | Load 0x0,0x12 032f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0330 00d1 | | Pop_Control Pop_Count_1 0331 005b | [ | Store_Top Discrete,At_Offset_3 0332 7811 |x | Jump 0x344 0333 00d9 | | Load_Top At_Offset_1 0334 4801 |H | Short_Literal 0x1 0335 e7fe | | Load 0x3,-0x2 0336 e602 | | Load 0x3,0x2 0337 0272 | r | Execute Discrete,Minus 0338 00da | | Load_Top At_Offset_2 0339 035b | [ | Declare_Type Array,Constrained 033a 00d0 | | Action Swap_Control 033b 01cd | | Execute Vector,Slice_Reference 033c 00e3 | | Load_Encached Natural_Cache 033d 00d9 | | Load_Top At_Offset_1 033e e7fc | | Load 0x3,-0x4 033f e012 | | Load 0x0,0x12 0340 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0341 00d1 | | Pop_Control Pop_Count_1 0342 c603 | | Store 0x3,0x3 0343 00d1 | | Pop_Control Pop_Count_1 0344 e7fd | | Load 0x3,-0x3 0345 6815 |h | Jump_Zero 0x35b 0346 00db | | Load_Top At_Offset_3 0347 7027 |p' | Jump_Nonzero 0x36f 0348 00da | | Load_Top At_Offset_2 0349 0c21 | ! | Execute_Immediate Greater_Equal,0x21 034a 680a |h | Jump_Zero 0x355 034b 4802 |H | Short_Literal 0x2 034c 0092 1c94 | | Action Push_String_Extended,0x1c94 ; " first 32 bytes =>" 034e 840a | | Call 0x2,0xa 034f 4801 |H | Short_Literal 0x1 0350 4820 |H | Short_Literal 0x20 0351 00db | | Load_Top At_Offset_3 0352 01cf | | Execute Vector,Slice_Read 0353 840b | | Call 0x2,0xb 0354 781a |x | Jump 0x36f 0355 4801 |H | Short_Literal 0x1 0356 00db | | Load_Top At_Offset_3 0357 00db | | Load_Top At_Offset_3 0358 01cf | | Execute Vector,Slice_Read 0359 840b | | Call 0x2,0xb 035a 7814 |x | Jump 0x36f 035b 4801 |H | Short_Literal 0x1 035c 00db | | Load_Top At_Offset_3 035d 00db | | Load_Top At_Offset_3 035e 01cf | | Execute Vector,Slice_Read 035f e7ff | | Load 0x3,-0x1 0360 00d8 | | Load_Top At_Offset_0 0361 00e3 | | Load_Encached Natural_Cache 0362 0260 | ` | Execute Discrete,In_Type 0363 7001 |p | Jump_Nonzero 0x365 0364 0801 | | Execute_Immediate Raise,0x1 0365 e602 | | Load 0x3,0x2 0366 0273 | s | Execute Discrete,Plus 0367 00d8 | | Load_Top At_Offset_0 0368 e003 | | Load 0x0,0x3 0369 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 036a 0260 | ` | Execute Discrete,In_Type 036b 7001 |p | Jump_Nonzero 0x36d 036c 0801 | | Execute_Immediate Raise,0x1 036d e003 | | Load 0x0,0x3 036e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 036f 00db | | Load_Top At_Offset_3 0370 00db | | Load_Top At_Offset_3 0371 0273 | s | Execute Discrete,Plus 0372 c602 | | Store 0x3,0x2 0373 00c9 | | Action Pop_Auxiliary_Loop 0374 e7fc | | Load 0x3,-0x4 0375 e012 | | Load 0x0,0x12 0376 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0377 7004 |p | Jump_Nonzero 0x37c 0378 00db | | Load_Top At_Offset_3 0379 e7fe | | Load 0x3,-0x2 037a 027c | | | Execute Discrete,Less 037b 77a9 |w | Jump_Nonzero 0x325 037c 00ce | | Action Pop_Auxiliary 037d e7fd | | Load 0x3,-0x3 037e 6808 |h | Jump_Zero 0x387 037f 4802 |H | Short_Literal 0x2 0380 0092 1c95 | | Action Push_String_Extended,0x1c95 ; " bytes downloaded =>" 0382 e602 | | Load 0x3,0x2 0383 00e0 | | Load_Encached Standard_Cache 0384 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0385 01cc | | Execute Vector,Catenate 0386 840a | | Call 0x2,0xa 0387 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0388 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 038c 0000 0000 | | .BLANK 0000[0x4] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 03ae | | .CONST 0x03ae ; Address of begin 0391 03ed | | .CONST 0x03ed ; Address of exception handler 0392 000c | | .CONST 0x000c ; Number of locals 0393 INIT_0390: 0393 e012 | | Load 0x0,0x12 0394 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0395 02c7 | | Declare_Variable Any 0396 00d8 | | Load_Top At_Offset_0 0397 1c00 | | Execute_Immediate Run_Utility,0x0 0398 4801 |H | Short_Literal 0x1 0399 67ee |g | Indirect_Literal Discrete,0x388,{0x00000000, 0x00000400} 039a e012 | | Load 0x0,0x12 039b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 039c 035b | [ | Declare_Type Array,Constrained 039d 0337 | 7 | Declare_Variable Array 039e 00e2 | | Load_Encached Integer_Cache 039f 00e3 | | Load_Encached Natural_Cache 03a0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 03a1 0092 1c96 | | Action Push_String_Extended,0x1c96 ; "Tcp_Ip_Boot.Load_3_1" 03a3 e003 | | Load 0x0,0x3 03a4 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 03a5 e003 | | Load 0x0,0x3 03a6 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 03a7 00e3 | | Load_Encached Natural_Cache 03a8 029f 0d43 | C| Declare_Subprogram INIT_0d40,For_Call 03aa 029f 0d9b | | Declare_Subprogram INIT_0d98,For_Call 03ac 029f 0db3 | | Declare_Subprogram INIT_0db0,For_Call 03ae BODY_0390: 03ae 4800 |H | Short_Literal 0x0 03af a7fc | | Store_Unchecked 0x3,-0x4 03b0 604f |`O | Indirect_Literal Discrete,0x400,{0x00000000, 0x00010000} 03b1 a607 | | Store_Unchecked 0x3,0x7 03b2 604d |`M | Indirect_Literal Discrete,0x400,{0x00000000, 0x00010000} 03b3 a608 | | Store_Unchecked 0x3,0x8 03b4 6047 |`G | Indirect_Literal Discrete,0x3fc,{0x00000000, 0x7fffffff} 03b5 a609 | | Store_Unchecked 0x3,0x9 03b6 e602 | | Load 0x3,0x2 03b7 e013 | | Load 0x0,0x13 03b8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03b9 e014 | | Load 0x0,0x14 03ba 181e | | Execute Package,Field_Execute,Field_Number 0x1e 03bb 00ea | | Load_Encached Null_String_Cache 03bc e7ff | | Load 0x3,-0x1 03bd 4800 |H | Short_Literal 0x0 03be e012 | | Load 0x0,0x12 03bf 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03c0 c602 | | Store 0x3,0x2 03c1 e7fd | | Load 0x3,-0x3 03c2 6808 |h | Jump_Zero 0x3cb 03c3 4802 |H | Short_Literal 0x2 03c4 4822 |H" | Short_Literal 0x22 03c5 0092 1c97 | | Action Push_String_Extended,0x1c97 ; "Reading code file \x22" 03c7 e7ff | | Load 0x3,-0x1 03c8 01cc | | Execute Vector,Catenate 03c9 01cb | | Execute Vector,Append 03ca 840a | | Call 0x2,0xa 03cb e608 | | Load 0x3,0x8 03cc 860a | | Call 0x3,0xa 03cd e608 | | Load 0x3,0x8 03ce 0a08 | | Execute_Immediate Plus,0x8 03cf c608 | | Store 0x3,0x8 03d0 00db | | Load_Top At_Offset_3 03d1 0af8 | | Execute_Immediate Plus,-0x8 03d2 c609 | | Store 0x3,0x9 03d3 e602 | | Load 0x3,0x2 03d4 e7fd | | Load 0x3,-0x3 03d5 e609 | | Load 0x3,0x9 03d6 e608 | | Load 0x3,0x8 03d7 8410 | | Call 0x2,0x10 03d8 c602 | | Store 0x3,0x2 03d9 e602 | | Load 0x3,0x2 03da e012 | | Load 0x0,0x12 03db 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03dc c602 | | Store 0x3,0x2 03dd 4802 |H | Short_Literal 0x2 03de 0092 1c98 | | Action Push_String_Extended,0x1c98 ; "Starting execution at address" 03e0 e607 | | Load 0x3,0x7 03e1 00e0 | | Load_Encached Standard_Cache 03e2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03e3 01cc | | Execute Vector,Catenate 03e4 840a | | Call 0x2,0xa 03e5 e7fd | | Load 0x3,-0x3 03e6 7003 |p | Jump_Nonzero 0x3ea 03e7 e607 | | Load 0x3,0x7 03e8 e003 | | Load 0x0,0x3 03e9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 03ea 4801 |H | Short_Literal 0x1 03eb a7fc | | Store_Unchecked 0x3,-0x4 03ec 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03ed TRAP_0390: 03ed 00d8 | | Load_Top At_Offset_0 03ee 0107 | | Execute Exception,Get_Name 03ef 4920 |I | Short_Literal 0x120 03f0 492f |I/ | Short_Literal 0x12f 03f1 0262 | b | Execute Discrete,In_Range 03f2 6802 |h | Jump_Zero 0x3f5 03f3 860b | | Call 0x3,0xb 03f4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03f5 860c | | Call 0x3,0xc 03f6 4800 |H | Short_Literal 0x0 03f7 a7fc | | Store_Unchecked 0x3,-0x4 03f8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03f9 0000 0000 | | .XXX[0x3] 03fb 0000 | | 03fc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0400 0000 0000 | | .LITERAL {0x00000000, 0x00010000} 0404 0000 0000 | | .BLANK 0000[0x4] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 043d | = | .CONST 0x043d ; Address of begin 0409 0505 | | .CONST 0x0505 ; Address of exception handler 040a 0017 | | .CONST 0x0017 ; Number of locals 040b INIT_0408: 040b e012 | | Load 0x0,0x12 040c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 040d 02c7 | | Declare_Variable Any 040e 00d8 | | Load_Top At_Offset_0 040f 1c00 | | Execute_Immediate Run_Utility,0x0 0410 4801 |H | Short_Literal 0x1 0411 610a |a | Indirect_Literal Discrete,0x51c,{0x00000000, 0x00000400} 0412 e001 | | Load 0x0,0x1 0413 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0414 035b | [ | Declare_Type Array,Constrained 0415 0337 | 7 | Declare_Variable Array 0416 00e2 | | Load_Encached Integer_Cache 0417 00e3 | | Load_Encached Natural_Cache 0418 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0419 0092 1c99 | | Action Push_String_Extended,0x1c99 ; "Tcp_Ip_Boot.Load_3_2" 041b 4800 |H | Short_Literal 0x0 041c 60fb |` | Indirect_Literal Discrete,0x518,{0x00000000, 0x0000ffff} 041d 00e5 | | Load_Encached Long_Integer_Cache 041e 03f8 | | Declare_Type Discrete,Constrained 041f 00d8 | | Load_Top At_Offset_0 0420 0007 | | Action Break_Optional 0421 00d9 | | Load_Top At_Offset_1 0422 0007 | | Action Break_Optional 0423 00da | | Load_Top At_Offset_2 0424 0007 | | Action Break_Optional 0425 00db | | Load_Top At_Offset_3 0426 0007 | | Action Break_Optional 0427 e607 | | Load 0x3,0x7 0428 0007 | | Action Break_Optional 0429 00d8 | | Load_Top At_Offset_0 042a 0007 | | Action Break_Optional 042b e607 | | Load 0x3,0x7 042c 0007 | | Action Break_Optional 042d 00d8 | | Load_Top At_Offset_0 042e 0007 | | Action Break_Optional 042f e003 | | Load 0x0,0x3 0430 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0431 e003 | | Load 0x0,0x3 0432 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0433 00e3 | | Load_Encached Natural_Cache 0434 00e3 | | Load_Encached Natural_Cache 0435 029f 0dc3 | | Declare_Subprogram INIT_0dc0,For_Call 0437 029f 0df3 | | Declare_Subprogram INIT_0df0,For_Call 0439 029f 0e83 | | Declare_Subprogram INIT_0e80,For_Call 043b 029f 0e9b | | Declare_Subprogram INIT_0e98,For_Call 043d BODY_0408: 043d 4800 |H | Short_Literal 0x0 043e a7f7 | | Store_Unchecked 0x3,-0x9 043f e602 | | Load 0x3,0x2 0440 e013 | | Load 0x0,0x13 0441 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0442 e014 | | Load 0x0,0x14 0443 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0444 00ea | | Load_Encached Null_String_Cache 0445 e7ff | | Load 0x3,-0x1 0446 4800 |H | Short_Literal 0x0 0447 e012 | | Load 0x0,0x12 0448 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0449 c602 | | Store 0x3,0x2 044a e7f8 | | Load 0x3,-0x8 044b 6808 |h | Jump_Zero 0x454 044c 4802 |H | Short_Literal 0x2 044d 4822 |H" | Short_Literal 0x22 044e 0092 1c97 | | Action Push_String_Extended,0x1c97 ; "Reading code file \x22" 0450 e7ff | | Load 0x3,-0x1 0451 01cc | | Execute Vector,Catenate 0452 01cb | | Execute Vector,Append 0453 840a | | Call 0x2,0xa 0454 e607 | | Load 0x3,0x7 0455 e7fe | | Load 0x3,-0x2 0456 8614 | | Call 0x3,0x14 0457 c608 | | Store 0x3,0x8 0458 e607 | | Load 0x3,0x7 0459 e7fe | | Load 0x3,-0x2 045a 8614 | | Call 0x3,0x14 045b c609 | | Store 0x3,0x9 045c e607 | | Load 0x3,0x7 045d e7fe | | Load 0x3,-0x2 045e 8614 | | Call 0x3,0x14 045f c60a | | Store 0x3,0xa 0460 e607 | | Load 0x3,0x7 0461 e7fe | | Load 0x3,-0x2 0462 8614 | | Call 0x3,0x14 0463 c60b | | Store 0x3,0xb 0464 e607 | | Load 0x3,0x7 0465 e7fe | | Load 0x3,-0x2 0466 8614 | | Call 0x3,0x14 0467 c60c | | Store 0x3,0xc 0468 e607 | | Load 0x3,0x7 0469 e7fe | | Load 0x3,-0x2 046a 8614 | | Call 0x3,0x14 046b c60d | | Store 0x3,0xd 046c e607 | | Load 0x3,0x7 046d e7fe | | Load 0x3,-0x2 046e 8614 | | Call 0x3,0x14 046f c60e | | Store 0x3,0xe 0470 e607 | | Load 0x3,0x7 0471 e7fe | | Load 0x3,-0x2 0472 8614 | | Call 0x3,0x14 0473 c60f | | Store 0x3,0xf 0474 e7f8 | | Load 0x3,-0x8 0475 6834 |h4 | Jump_Zero 0x4aa 0476 4802 |H | Short_Literal 0x2 0477 0092 1c9a | | Action Push_String_Extended,0x1c9a ; "Reading code file header:" 0479 840a | | Call 0x2,0xa 047a 4802 |H | Short_Literal 0x2 047b 0092 1c9b | | Action Push_String_Extended,0x1c9b ; " X7_Magic =>" 047d e608 | | Load 0x3,0x8 047e 00e0 | | Load_Encached Standard_Cache 047f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0480 01cc | | Execute Vector,Catenate 0481 840a | | Call 0x2,0xa 0482 4802 |H | Short_Literal 0x2 0483 0092 1c9c | | Action Push_String_Extended,0x1c9c ; " X7_Textsiz =>" 0485 e609 | | Load 0x3,0x9 0486 00e0 | | Load_Encached Standard_Cache 0487 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0488 01cc | | Execute Vector,Catenate 0489 840a | | Call 0x2,0xa 048a 4802 |H | Short_Literal 0x2 048b 0092 1c9d | | Action Push_String_Extended,0x1c9d ; " X7_Datasiz =>" 048d e60a | | Load 0x3,0xa 048e 00e0 | | Load_Encached Standard_Cache 048f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0490 01cc | | Execute Vector,Catenate 0491 840a | | Call 0x2,0xa 0492 4802 |H | Short_Literal 0x2 0493 0092 1c9e | | Action Push_String_Extended,0x1c9e ; " X7_Bsssiz =>" 0495 e60b | | Load 0x3,0xb 0496 00e0 | | Load_Encached Standard_Cache 0497 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0498 01cc | | Execute Vector,Catenate 0499 840a | | Call 0x2,0xa 049a 4802 |H | Short_Literal 0x2 049b 0092 1c9f | | Action Push_String_Extended,0x1c9f ; " X7_Symsiz =>" 049d e60c | | Load 0x3,0xc 049e 00e0 | | Load_Encached Standard_Cache 049f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04a0 01cc | | Execute Vector,Catenate 04a1 840a | | Call 0x2,0xa 04a2 4802 |H | Short_Literal 0x2 04a3 0092 1ca0 | | Action Push_String_Extended,0x1ca0 ; " X7_Reloc =>" 04a5 e60f | | Load 0x3,0xf 04a6 00e0 | | Load_Encached Standard_Cache 04a7 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04a8 01cc | | Execute Vector,Catenate 04a9 840a | | Call 0x2,0xa 04aa e608 | | Load 0x3,0x8 04ab 4909 |I | Short_Literal 0x109 04ac 027e | ~ | Execute Discrete,Not_Equal 04ad 6805 |h | Jump_Zero 0x4b3 04ae 4807 |H | Short_Literal 0x7 04af 0092 1ca1 | | Action Push_String_Extended,0x1ca1 ; "Error: Tcp_Ip_Boot.Load_3_2: first word in code file /= 8#411#" 04b1 840a | | Call 0x2,0xa 04b2 08e0 | | Execute_Immediate Raise,0xe0 04b3 e609 | | Load 0x3,0x9 04b4 a612 | | Store_Unchecked 0x3,0x12 04b5 e60a | | Load 0x3,0xa 04b6 a613 | | Store_Unchecked 0x3,0x13 04b7 e7fc | | Load 0x3,-0x4 04b8 00d8 | | Load_Top At_Offset_0 04b9 00e3 | | Load_Encached Natural_Cache 04ba 0260 | ` | Execute Discrete,In_Type 04bb 7001 |p | Jump_Nonzero 0x4bd 04bc 0801 | | Execute_Immediate Raise,0x1 04bd e612 | | Load 0x3,0x12 04be 0272 | r | Execute Discrete,Minus 04bf 0a01 | | Execute_Immediate Plus,0x1 04c0 09fb | | Execute_Immediate Binary_Scale,-0x5 04c1 0905 | | Execute_Immediate Binary_Scale,0x5 04c2 00d8 | | Load_Top At_Offset_0 04c3 e003 | | Load 0x0,0x3 04c4 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 04c5 0260 | ` | Execute Discrete,In_Type 04c6 7001 |p | Jump_Nonzero 0x4c8 04c7 0801 | | Execute_Immediate Raise,0x1 04c8 a610 | | Store_Unchecked 0x3,0x10 04c9 604a |`J | Indirect_Literal Discrete,0x514,{0x00000000, 0x00001000} 04ca a611 | | Store_Unchecked 0x3,0x11 04cb e7f8 | | Load 0x3,-0x8 04cc 6810 |h | Jump_Zero 0x4dd 04cd 4802 |H | Short_Literal 0x2 04ce 0092 1ca2 | | Action Push_String_Extended,0x1ca2 ; "Code_Address =>" 04d0 e610 | | Load 0x3,0x10 04d1 00e0 | | Load_Encached Standard_Cache 04d2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04d3 01cc | | Execute Vector,Catenate 04d4 840a | | Call 0x2,0xa 04d5 4802 |H | Short_Literal 0x2 04d6 0092 1ca3 | | Action Push_String_Extended,0x1ca3 ; "Data_Address =>" 04d8 e611 | | Load 0x3,0x11 04d9 00e0 | | Load_Encached Standard_Cache 04da 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04db 01cc | | Execute Vector,Catenate 04dc 840a | | Call 0x2,0xa 04dd e602 | | Load 0x3,0x2 04de e7f8 | | Load 0x3,-0x8 04df e612 | | Load 0x3,0x12 04e0 e610 | | Load 0x3,0x10 04e1 8410 | | Call 0x2,0x10 04e2 c602 | | Store 0x3,0x2 04e3 e611 | | Load 0x3,0x11 04e4 8615 | | Call 0x3,0x15 04e5 e611 | | Load 0x3,0x11 04e6 0a15 | | Execute_Immediate Plus,0x15 04e7 c611 | | Store 0x3,0x11 04e8 e613 | | Load 0x3,0x13 04e9 0aeb | | Execute_Immediate Plus,-0x15 04ea c613 | | Store 0x3,0x13 04eb e602 | | Load 0x3,0x2 04ec e7f8 | | Load 0x3,-0x8 04ed e613 | | Load 0x3,0x13 04ee e611 | | Load 0x3,0x11 04ef 8410 | | Call 0x2,0x10 04f0 c602 | | Store 0x3,0x2 04f1 e602 | | Load 0x3,0x2 04f2 e012 | | Load 0x0,0x12 04f3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04f4 c602 | | Store 0x3,0x2 04f5 4802 |H | Short_Literal 0x2 04f6 0092 1c98 | | Action Push_String_Extended,0x1c98 ; "Starting execution at address" 04f8 e610 | | Load 0x3,0x10 04f9 00e0 | | Load_Encached Standard_Cache 04fa 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04fb 01cc | | Execute Vector,Catenate 04fc 840a | | Call 0x2,0xa 04fd e7f8 | | Load 0x3,-0x8 04fe 7003 |p | Jump_Nonzero 0x502 04ff e610 | | Load 0x3,0x10 0500 e003 | | Load 0x0,0x3 0501 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0502 4801 |H | Short_Literal 0x1 0503 a7f7 | | Store_Unchecked 0x3,-0x9 0504 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0505 TRAP_0408: 0505 00d8 | | Load_Top At_Offset_0 0506 0107 | | Execute Exception,Get_Name 0507 4920 |I | Short_Literal 0x120 0508 492f |I/ | Short_Literal 0x12f 0509 0262 | b | Execute Discrete,In_Range 050a 6802 |h | Jump_Zero 0x50d 050b 8616 | | Call 0x3,0x16 050c 4509 |E | Exit_Suprogram New_Top_Offset 0x9 050d 8617 | | Call 0x3,0x17 050e 4800 |H | Short_Literal 0x0 050f a7f7 | | Store_Unchecked 0x3,-0x9 0510 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0511 0000 0000 | | .XXX[0x3] 0513 0000 | | 0514 0000 0000 | | .LITERAL {0x00000000, 0x00001000} 0518 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 051c 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0529 | ) | .CONST 0x0529 ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0004 | | .CONST 0x0004 ; Number of locals 0523 INIT_0520: 0523 e002 | | Load 0x0,0x2 0524 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0525 029f 0eab | | Declare_Subprogram INIT_0ea8,For_Call 0527 029f 0ebb | | Declare_Subprogram INIT_0eb8,For_Call 0529 BODY_0520: 0529 8603 | | Call 0x3,0x3 052a 00da | | Load_Top At_Offset_2 052b e404 | | Load 0x2,0x4 052c 027f | | Execute Discrete,Equal 052d 7003 |p | Jump_Nonzero 0x531 052e 8604 | | Call 0x3,0x4 052f e008 | | Load 0x0,0x8 0530 0257 | W | Execute Discrete,Raise 0531 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0532 0000 0000 | | .BLANK 0000[0x6] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 0542 | B | .CONST 0x0542 ; Address of begin 0539 054a | J | .CONST 0x054a ; Address of exception handler 053a 0003 | | .CONST 0x0003 ; Number of locals 053b INIT_0538: 053b e006 | | Load 0x0,0x6 053c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 053d 02c7 | | Declare_Variable Any 053e 00d8 | | Load_Top At_Offset_0 053f 1c00 | | Execute_Immediate Run_Utility,0x0 0540 029f 0edb | | Declare_Subprogram INIT_0ed8,For_Call 0542 BODY_0538: 0542 00d9 | | Load_Top At_Offset_1 0543 e7fe | | Load 0x3,-0x2 0544 e7ff | | Load 0x3,-0x1 0545 4800 |H | Short_Literal 0x0 0546 840c | | Call 0x2,0xc 0547 c602 | | Store 0x3,0x2 0548 8603 | | Call 0x3,0x3 0549 0831 | 1 | Execute_Immediate Raise,0x31 054a TRAP_0538: 054a 0007 | | Action Break_Optional 054b 00da | | Load_Top At_Offset_2 054c 840d | | Call 0x2,0xd 054d c602 | | Store 0x3,0x2 054e 00d8 | | Load_Top At_Offset_0 054f 0101 | | Execute Exception,Reraise 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0562 | b | .CONST 0x0562 ; Address of begin 0551 0584 | | .CONST 0x0584 ; Address of exception handler 0552 0003 | | .CONST 0x0003 ; Number of locals 0553 INIT_0550: 0553 e010 | | Load 0x0,0x10 0554 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0555 0337 | 7 | Declare_Variable Array 0556 e010 | | Load 0x0,0x10 0557 180e | | Execute Package,Field_Execute,Field_Number 0xe 0558 e010 | | Load 0x0,0x10 0559 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 055a 00d9 | | Load_Top At_Offset_1 055b 01d4 | | Execute Vector,Structure_Write 055c e010 | | Load 0x0,0x10 055d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 055e 0337 | 7 | Declare_Variable Array 055f 00d9 | | Load_Top At_Offset_1 0560 00d9 | | Load_Top At_Offset_1 0561 01d4 | | Execute Vector,Structure_Write 0562 BODY_0550: 0562 4805 |H | Short_Literal 0x5 0563 00da | | Load_Top At_Offset_2 0564 01d7 | | Execute Vector,Field_Read 0565 4801 |H | Short_Literal 0x1 0566 00db | | Load_Top At_Offset_3 0567 01d7 | | Execute Vector,Field_Read 0568 0279 | y | Execute Discrete,And 0569 4805 |H | Short_Literal 0x5 056a 00da | | Load_Top At_Offset_2 056b 01d6 | | Execute Vector,Field_Write 056c 4807 |H | Short_Literal 0x7 056d 00da | | Load_Top At_Offset_2 056e 01d7 | | Execute Vector,Field_Read 056f 4801 |H | Short_Literal 0x1 0570 00db | | Load_Top At_Offset_3 0571 01d7 | | Execute Vector,Field_Read 0572 0279 | y | Execute Discrete,And 0573 4807 |H | Short_Literal 0x7 0574 00da | | Load_Top At_Offset_2 0575 01d6 | | Execute Vector,Field_Write 0576 00d8 | | Load_Top At_Offset_0 0577 e010 | | Load 0x0,0x10 0578 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0579 0092 1ca4 | | Action Push_String_Extended,0x1ca4 ; "<PROFILE>" 057b 00ea | | Load_Encached Null_String_Cache 057c 0092 1ca5 | | Action Push_String_Extended,0x1ca5 ; "!machine.transport_routes" 057e e015 | | Load 0x0,0x15 057f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0580 00d9 | | Load_Top At_Offset_1 0581 e010 | | Load 0x0,0x10 0582 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0583 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0584 TRAP_0550: 0584 0007 | | Action Break_Optional 0585 00da | | Load_Top At_Offset_2 0586 e010 | | Load 0x0,0x10 0587 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0588 00d8 | | Load_Top At_Offset_0 0589 0101 | | Execute Exception,Reraise 058a 0000 0000 | | .BLANK 0000[0x6] 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 059c | | .CONST 0x059c ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 4800 |H | Short_Literal 0x0 0594 00db | | Load_Top At_Offset_3 0595 8414 | | Call 0x2,0x14 0596 e003 | | Load 0x0,0x3 0597 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0598 01c7 | | Execute Vector,Convert 0599 e405 | | Load 0x2,0x5 059a 01d4 | | Execute Vector,Structure_Write 059b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 059c TRAP_0590: 059c 0007 | | Action Break_Optional 059d 4807 |H | Short_Literal 0x7 059e 0092 1ca6 | | Action Push_String_Extended,0x1ca6 ; "Cannot read Internet address from \x22" 05a0 e7ff | | Load 0x3,-0x1 05a1 01cc | | Execute Vector,Catenate 05a2 0092 1ca7 | | Action Push_String_Extended,0x1ca7 ; "\x22." 05a4 01cc | | Execute Vector,Catenate 05a5 840a | | Call 0x2,0xa 05a6 e009 | | Load 0x0,0x9 05a7 0257 | W | Execute Discrete,Raise 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 05b1 | | .CONST 0x05b1 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab 4801 |H | Short_Literal 0x1 05ac 00db | | Load_Top At_Offset_3 05ad 8414 | | Call 0x2,0x14 05ae e403 | | Load 0x2,0x3 05af 01d4 | | Execute Vector,Structure_Write 05b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b1 TRAP_05a8: 05b1 00d8 | | Load_Top At_Offset_0 05b2 0107 | | Execute Exception,Get_Name 05b3 4920 |I | Short_Literal 0x120 05b4 492f |I/ | Short_Literal 0x12f 05b5 0262 | b | Execute Discrete,In_Range 05b6 6804 |h | Jump_Zero 0x5bb 05b7 e402 | | Load 0x2,0x2 05b8 e403 | | Load 0x2,0x3 05b9 01d4 | | Execute Vector,Structure_Write 05ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05bb e402 | | Load 0x2,0x2 05bc e403 | | Load 0x2,0x3 05bd 01d4 | | Execute Vector,Structure_Write 05be 4806 |H | Short_Literal 0x6 05bf 0092 1ca8 | | Action Push_String_Extended,0x1ca8 ; "Cannot read Ethernet address from \x22" 05c1 e7ff | | Load 0x3,-0x1 05c2 01cc | | Execute Vector,Catenate 05c3 0092 1ca7 | | Action Push_String_Extended,0x1ca7 ; "\x22." 05c5 01cc | | Execute Vector,Catenate 05c6 840a | | Call 0x2,0xa 05c7 4806 |H | Short_Literal 0x6 05c8 0092 1ca9 | | Action Push_String_Extended,0x1ca9 ; "Ethernet address will be taken from controller PROM." 05ca 840a | | Call 0x2,0xa 05cb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05cc 0000 0000 | | .BLANK 0000[0x4] 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d3 | | .CONST 0x05d3 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0001 | | .CONST 0x0001 ; Number of locals 05d3 BODY_05d0: 05d3 INIT_05d0: 05d3 e407 | | Load 0x2,0x7 05d4 700d |p | Jump_Nonzero 0x5e2 05d5 00e1 | | Load_Encached Boolean_Cache 05d6 e5f9 | | Load 0x2,-0x7 05d7 e5fa | | Load 0x2,-0x6 05d8 e5fe | | Load 0x2,-0x2 05d9 e5ff | | Load 0x2,-0x1 05da e406 | | Load 0x2,0x6 05db e405 | | Load 0x2,0x5 05dc e7fe | | Load 0x3,-0x2 05dd e5fd | | Load 0x2,-0x3 05de e7ff | | Load 0x3,-0x1 05df 01cc | | Execute Vector,Catenate 05e0 8412 | | Call 0x2,0x12 05e1 c407 | | Store 0x2,0x7 05e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05e3 0000 0000 | | .BLANK 0000[0x5] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 060e | | .CONST 0x060e ; Address of begin 05e9 063d | = | .CONST 0x063d ; Address of exception handler 05ea 0007 | | .CONST 0x0007 ; Number of locals 05eb INIT_05e8: 05eb e016 | | Load 0x0,0x16 05ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05ed 02c7 | | Declare_Variable Any 05ee 00d8 | | Load_Top At_Offset_0 05ef 1c00 | | Execute_Immediate Run_Utility,0x0 05f0 e017 | | Load 0x0,0x17 05f1 1b19 | | Execute Package,Field_Read,Field_Number 0x19 05f2 4800 |H | Short_Literal 0x0 05f3 4801 |H | Short_Literal 0x1 05f4 e001 | | Load 0x0,0x1 05f5 1b12 | | Execute Package,Field_Read,Field_Number 0x12 05f6 035b | [ | Declare_Type Array,Constrained 05f7 0337 | 7 | Declare_Variable Array 05f8 4800 |H | Short_Literal 0x0 05f9 4800 |H | Short_Literal 0x0 05fa 00da | | Load_Top At_Offset_2 05fb 01d6 | | Execute Vector,Field_Write 05fc 4809 |H | Short_Literal 0x9 05fd 4801 |H | Short_Literal 0x1 05fe 00da | | Load_Top At_Offset_2 05ff 01d6 | | Execute Vector,Field_Write 0600 4801 |H | Short_Literal 0x1 0601 4800 |H | Short_Literal 0x0 0602 e00e | | Load 0x0,0xe 0603 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0604 035b | [ | Declare_Type Array,Constrained 0605 0337 | 7 | Declare_Variable Array 0606 00d8 | | Load_Top At_Offset_0 0607 0335 | 5 | Declare_Variable Array,Duplicate 0608 00cd | | Action Spare6_Action 0609 00d9 | | Load_Top At_Offset_1 060a 01d4 | | Execute Vector,Structure_Write 060b 00e3 | | Load_Encached Natural_Cache 060c 029f 0eeb | | Declare_Subprogram INIT_0ee8,For_Call 060e BODY_05e8: 060e e017 | | Load 0x0,0x17 060f 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0610 e602 | | Load 0x3,0x2 0611 0120 | | Execute Any,Is_Value 0612 6803 |h | Jump_Zero 0x616 0613 e016 | | Load 0x0,0x16 0614 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0615 7801 |x | Jump 0x617 0616 e602 | | Load 0x3,0x2 0617 e017 | | Load 0x0,0x17 0618 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0619 4801 |H | Short_Literal 0x1 061a 4806 |H | Short_Literal 0x6 061b 00e9 | | Load_Encached String_Cache 061c 0334 | 4 | Declare_Variable Array,With_Constraint 061d 5026 |P& | Indirect_Literal Any,0x644,{0x5544502f, 0x49502020} 061e e016 | | Load 0x0,0x16 061f 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0620 c602 | | Store 0x3,0x2 0621 c603 | | Store 0x3,0x3 0622 e017 | | Load 0x0,0x17 0623 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0624 601b |` | Indirect_Literal Discrete,0x640,{0x00007fff, 0xffffffff} 0625 e604 | | Load 0x3,0x4 0626 e602 | | Load 0x3,0x2 0627 e016 | | Load 0x0,0x16 0628 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0629 8607 | | Call 0x3,0x7 062a e602 | | Load 0x3,0x2 062b e016 | | Load 0x0,0x16 062c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 062d c603 | | Store 0x3,0x3 062e 00e3 | | Load_Encached Natural_Cache 062f e017 | | Load 0x0,0x17 0630 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0631 4800 |H | Short_Literal 0x0 0632 600d |` | Indirect_Literal Discrete,0x640,{0x00007fff, 0xffffffff} 0633 e605 | | Load 0x3,0x5 0634 e602 | | Load 0x3,0x2 0635 e016 | | Load 0x0,0x16 0636 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0637 c603 | | Store 0x3,0x3 0638 005a | Z | Store_Top Discrete,At_Offset_2 0639 e602 | | Load 0x3,0x2 063a e016 | | Load 0x0,0x16 063b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 063c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 063d TRAP_05e8: 063d 0007 | | Action Break_Optional 063e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 063f 0000 | | .XXX[0x1] 0640 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff} 0644 5544 502f |UDP/| .LITERAL {0x5544502f, 0x49502020} 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0651 | Q | .CONST 0x0651 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b e5fd | | Load 0x2,-0x3 064c 0092 1caa | | Action Push_String_Extended,0x1caa ; "dump_file" 064e 01cc | | Execute Vector,Catenate 064f 8018 | | Call 0x0,0x18 0650 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0651 TRAP_0648: 0651 0007 | | Action Break_Optional 0652 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0653 0000 0000 | | .BLANK 0000[0x5] 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 065d | ] | .CONST 0x065d ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b 8409 | | Call 0x2,0x9 065c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 065d TRAP_0658: 065d 0007 | | Action Break_Optional 065e 4805 |H | Short_Literal 0x5 065f 0092 1c80 | | Action Push_String_Extended,0x1c80 ; "Tcp_Ip_Boot failed." 0661 840a | | Call 0x2,0xa 0662 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0663 0000 0000 | | .BLANK 0000[0x5] 0668 ; -------------------------------------------------------------------------------------- 0668 ; SUBPROGRAM 0668 ; -------------------------------------------------------------------------------------- 0668 066b | k | .CONST 0x066b ; Address of begin 0669 066d | m | .CONST 0x066d ; Address of exception handler 066a 0001 | | .CONST 0x0001 ; Number of locals 066b BODY_0668: 066b INIT_0668: 066b 8409 | | Call 0x2,0x9 066c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 066d TRAP_0668: 066d 0007 | | Action Break_Optional 066e 4805 |H | Short_Literal 0x5 066f 0092 1c80 | | Action Push_String_Extended,0x1c80 ; "Tcp_Ip_Boot failed." 0671 840a | | Call 0x2,0xa 0672 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0673 0000 0000 | | .BLANK 0000[0x5] 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067b | { | .CONST 0x067b ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0001 | | .CONST 0x0001 ; Number of locals 067b BODY_0678: 067b INIT_0678: 067b 4607 |F | Jump_Case 0x8 067c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 067d 7806 |x | Jump 0x684 ; case 0x1 067e 7809 |x | Jump 0x688 ; case 0x2 067f 780d |x | Jump 0x68d ; case 0x3 0680 7810 |x | Jump 0x691 ; case 0x4 0681 7811 |x | Jump 0x693 ; case 0x5 0682 7812 |x | Jump 0x695 ; case 0x6 0683 7815 |x | Jump 0x699 ; case 0x7 0684 00da | | Load_Top At_Offset_2 0685 0091 1c60 | `| Action Push_String_Extended_Indexed,0x1c60 ; "CMC_TCP_IP_2_5_1" 0687 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0688 00db | | Load_Top At_Offset_3 0689 00db | | Load_Top At_Offset_3 068a 00e0 | | Load_Encached Standard_Cache 068b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 068c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 068d 00da | | Load_Top At_Offset_2 068e 00e0 | | Load_Encached Standard_Cache 068f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0690 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0691 00db | | Load_Top At_Offset_3 0692 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0693 00db | | Load_Top At_Offset_3 0694 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0695 e602 | | Load 0x3,0x2 0696 00dc | | Load_Top At_Offset_4 0697 0267 | g | Execute Discrete,Predecessor 0698 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0699 e602 | | Load 0x3,0x2 069a 00dc | | Load_Top At_Offset_4 069b 0268 | h | Execute Discrete,Successor 069c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 069d 0000 0000 | | .XXX[0x3] 069f 0000 | | 06a0 ; -------------------------------------------------------------------------------------- 06a0 ; SUBPROGRAM 06a0 ; -------------------------------------------------------------------------------------- 06a0 06a3 | | .CONST 0x06a3 ; Address of begin 06a1 0004 | | .CONST 0x0004 ; Address of exception handler 06a2 0001 | | .CONST 0x0001 ; Number of locals 06a3 BODY_06a0: 06a3 INIT_06a0: 06a3 00da | | Load_Top At_Offset_2 06a4 e9fe | | Load 0x4,-0x2 06a5 027d | } | Execute Discrete,Greater 06a6 6802 |h | Jump_Zero 0x6a9 06a7 00da | | Load_Top At_Offset_2 06a8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06a9 00db | | Load_Top At_Offset_3 06aa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06ab 0000 0000 | | .BLANK 0000[0x5] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b3 | | .CONST 0x06b3 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0001 | | .CONST 0x0001 ; Number of locals 06b3 BODY_06b0: 06b3 INIT_06b0: 06b3 00da | | Load_Top At_Offset_2 06b4 e9fe | | Load 0x4,-0x2 06b5 027c | | | Execute Discrete,Less 06b6 6802 |h | Jump_Zero 0x6b9 06b7 00da | | Load_Top At_Offset_2 06b8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06b9 00db | | Load_Top At_Offset_3 06ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06bb 0000 0000 | | .BLANK 0000[0x5] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06cb | | .CONST 0x06cb ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0003 | | .CONST 0x0003 ; Number of locals 06c3 INIT_06c0: 06c3 00da | | Load_Top At_Offset_2 06c4 00e5 | | Load_Encached Long_Integer_Cache 06c5 03f1 | | Declare_Variable Discrete,With_Value 06c6 4801 |H | Short_Literal 0x1 06c7 e9fe | | Load 0x4,-0x2 06c8 e607 | | Load 0x3,0x7 06c9 035b | [ | Declare_Type Array,Constrained 06ca 0337 | 7 | Declare_Variable Array 06cb BODY_06c0: 06cb 00cf | | Action Mark_Auxiliary 06cc 00d9 | | Load_Top At_Offset_1 06cd 01da | | Execute Vector,Bounds 06ce 0264 | d | Execute Discrete,Below_Bound 06cf 7011 |p | Jump_Nonzero 0x6e1 06d0 e802 | | Load 0x4,0x2 06d1 48ff |H | Short_Literal 0xff 06d2 0279 | y | Execute Discrete,And 06d3 00d8 | | Load_Top At_Offset_0 06d4 e001 | | Load 0x0,0x1 06d5 1b11 | | Execute Package,Field_Read,Field_Number 0x11 06d6 0260 | ` | Execute Discrete,In_Type 06d7 7001 |p | Jump_Nonzero 0x6d9 06d8 0801 | | Execute_Immediate Raise,0x1 06d9 00d9 | | Load_Top At_Offset_1 06da e803 | | Load 0x4,0x3 06db 01d6 | | Execute Vector,Field_Write 06dc e802 | | Load 0x4,0x2 06dd 09f8 | | Execute_Immediate Binary_Scale,-0x8 06de a802 | | Store_Unchecked 0x4,0x2 06df 00c8 | | Action Pop_Auxiliary_Range 06e0 37ef |7 | Loop_Decreasing 0x6d0 06e1 00ce | | Action Pop_Auxiliary 06e2 00d9 | | Load_Top At_Offset_1 06e3 680a |h | Jump_Zero 0x6ee 06e4 00d9 | | Load_Top At_Offset_1 06e5 00d8 | | Load_Top At_Offset_0 06e6 e001 | | Load 0x0,0x1 06e7 1b11 | | Execute Package,Field_Read,Field_Number 0x11 06e8 0260 | ` | Execute Discrete,In_Type 06e9 7001 |p | Jump_Nonzero 0x6eb 06ea 0801 | | Execute_Immediate Raise,0x1 06eb 4800 |H | Short_Literal 0x0 06ec 00da | | Load_Top At_Offset_2 06ed 01d6 | | Execute Vector,Field_Write 06ee 00d8 | | Load_Top At_Offset_0 06ef e001 | | Load 0x0,0x1 06f0 1b12 | | Execute Package,Field_Read,Field_Number 0x12 06f1 01c6 | | Execute Vector,Convert_To_Formal 06f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06f3 0000 0000 | | .BLANK 0000[0x5] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fd | | .CONST 0x06fd ; Address of begin 06f9 0004 | | .CONST 0x0004 ; Address of exception handler 06fa 0002 | | .CONST 0x0002 ; Number of locals 06fb INIT_06f8: 06fb 00e5 | | Load_Encached Long_Integer_Cache 06fc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06fd BODY_06f8: 06fd 00cf | | Action Mark_Auxiliary 06fe e9ff | | Load 0x4,-0x1 06ff 01d9 | | Execute Vector,Reverse_Bounds 0700 0263 | c | Execute Discrete,Above_Bound 0701 7009 |p | Jump_Nonzero 0x70b 0702 00db | | Load_Top At_Offset_3 0703 0908 | | Execute_Immediate Binary_Scale,0x8 0704 00d9 | | Load_Top At_Offset_1 0705 e9ff | | Load 0x4,-0x1 0706 01d7 | | Execute Vector,Field_Read 0707 0273 | s | Execute Discrete,Plus 0708 a802 | | Store_Unchecked 0x4,0x2 0709 00c8 | | Action Pop_Auxiliary_Range 070a 3ff7 |? | Loop_Increasing 0x702 070b 00ce | | Action Pop_Auxiliary 070c 00d8 | | Load_Top At_Offset_0 070d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 070e 0000 0000 | | .XXX[0x2] 0710 ; -------------------------------------------------------------------------------------- 0710 ; SUBPROGRAM 0710 ; -------------------------------------------------------------------------------------- 0710 0713 | | .CONST 0x0713 ; Address of begin 0711 0004 | | .CONST 0x0004 ; Address of exception handler 0712 0001 | | .CONST 0x0001 ; Number of locals 0713 BODY_0710: 0713 INIT_0710: 0713 482d |H- | Short_Literal 0x2d 0714 482d |H- | Short_Literal 0x2d 0715 482d |H- | Short_Literal 0x2d 0716 482d |H- | Short_Literal 0x2d 0717 482d |H- | Short_Literal 0x2d 0718 4801 |H | Short_Literal 0x1 0719 4801 |H | Short_Literal 0x1 071a e9ff | | Load 0x4,-0x1 071b 01cf | | Execute Vector,Slice_Read 071c e614 | | Load 0x3,0x14 071d 180d | | Execute Package,Field_Execute,Field_Number 0xd 071e 01cb | | Execute Vector,Append 071f 4802 |H | Short_Literal 0x2 0720 4802 |H | Short_Literal 0x2 0721 e9ff | | Load 0x4,-0x1 0722 01cf | | Execute Vector,Slice_Read 0723 e614 | | Load 0x3,0x14 0724 180d | | Execute Package,Field_Execute,Field_Number 0xd 0725 01cc | | Execute Vector,Catenate 0726 01cb | | Execute Vector,Append 0727 4803 |H | Short_Literal 0x3 0728 4803 |H | Short_Literal 0x3 0729 e9ff | | Load 0x4,-0x1 072a 01cf | | Execute Vector,Slice_Read 072b e614 | | Load 0x3,0x14 072c 180d | | Execute Package,Field_Execute,Field_Number 0xd 072d 01cc | | Execute Vector,Catenate 072e 01cb | | Execute Vector,Append 072f 4804 |H | Short_Literal 0x4 0730 4804 |H | Short_Literal 0x4 0731 e9ff | | Load 0x4,-0x1 0732 01cf | | Execute Vector,Slice_Read 0733 e614 | | Load 0x3,0x14 0734 180d | | Execute Package,Field_Execute,Field_Number 0xd 0735 01cc | | Execute Vector,Catenate 0736 01cb | | Execute Vector,Append 0737 4805 |H | Short_Literal 0x5 0738 4805 |H | Short_Literal 0x5 0739 e9ff | | Load 0x4,-0x1 073a 01cf | | Execute Vector,Slice_Read 073b e614 | | Load 0x3,0x14 073c 180d | | Execute Package,Field_Execute,Field_Number 0xd 073d 01cc | | Execute Vector,Catenate 073e 01cb | | Execute Vector,Append 073f 4806 |H | Short_Literal 0x6 0740 4806 |H | Short_Literal 0x6 0741 e9ff | | Load 0x4,-0x1 0742 01cf | | Execute Vector,Slice_Read 0743 e614 | | Load 0x3,0x14 0744 180d | | Execute Package,Field_Execute,Field_Number 0xd 0745 01cc | | Execute Vector,Catenate 0746 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0747 0000 | | .XXX[0x1] 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 074b | K | .CONST 0x074b ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0001 | | .CONST 0x0001 ; Number of locals 074b BODY_0748: 074b INIT_0748: 074b 00da | | Load_Top At_Offset_2 074c e007 | | Load 0x0,0x7 074d 180f | | Execute Package,Field_Execute,Field_Number 0xf 074e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 074f 0000 | | .XXX[0x1] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 075f | _ | .CONST 0x075f ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0002 | | .CONST 0x0002 ; Number of locals 0753 INIT_0750: 0753 4801 |H | Short_Literal 0x1 0754 00db | | Load_Top At_Offset_3 0755 01db | | Execute Vector,Length 0756 0901 | | Execute_Immediate Binary_Scale,0x1 0757 00d8 | | Load_Top At_Offset_0 0758 00e2 | | Load_Encached Integer_Cache 0759 0260 | ` | Execute Discrete,In_Type 075a 7001 |p | Jump_Nonzero 0x75c 075b 0801 | | Execute_Immediate Raise,0x1 075c 00e9 | | Load_Encached String_Cache 075d 035b | [ | Declare_Type Array,Constrained 075e 0337 | 7 | Declare_Variable Array 075f BODY_0750: 075f 0092 1cab | | Action Push_String_Extended,0x1cab ; "16#" 0761 e9ff | | Load 0x4,-0x1 0762 e614 | | Load 0x3,0x14 0763 180d | | Execute Package,Field_Execute,Field_Number 0xd 0764 01cc | | Execute Vector,Catenate 0765 0092 1cac | | Action Push_String_Extended,0x1cac ; "#" 0767 01cc | | Execute Vector,Catenate 0768 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0769 0000 0000 | | .BLANK 0000[0x7] 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 0773 | s | .CONST 0x0773 ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0001 | | .CONST 0x0001 ; Number of locals 0773 BODY_0770: 0773 INIT_0770: 0773 4804 |H | Short_Literal 0x4 0774 00db | | Load_Top At_Offset_3 0775 8617 | | Call 0x3,0x17 0776 861b | | Call 0x3,0x1b 0777 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0778 ; -------------------------------------------------------------------------------------- 0778 ; SUBPROGRAM 0778 ; -------------------------------------------------------------------------------------- 0778 077b | { | .CONST 0x077b ; Address of begin 0779 0004 | | .CONST 0x0004 ; Address of exception handler 077a 0001 | | .CONST 0x0001 ; Number of locals 077b BODY_0778: 077b INIT_0778: 077b 00da | | Load_Top At_Offset_2 077c 4801 |H | Short_Literal 0x1 077d 0279 | y | Execute Discrete,And 077e 7002 |p | Jump_Nonzero 0x781 077f 00da | | Load_Top At_Offset_2 0780 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0781 00da | | Load_Top At_Offset_2 0782 0a01 | | Execute_Immediate Plus,0x1 0783 e00c | | Load 0x0,0xc 0784 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0785 00d9 | | Load_Top At_Offset_1 0786 00d0 | | Action Swap_Control 0787 0260 | ` | Execute Discrete,In_Type 0788 7001 |p | Jump_Nonzero 0x78a 0789 0801 | | Execute_Immediate Raise,0x1 078a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 078b 0000 0000 | | .BLANK 0000[0x5] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 079e | | .CONST 0x079e ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0002 | | .CONST 0x0002 ; Number of locals 0793 INIT_0790: 0793 4801 |H | Short_Literal 0x1 0794 00db | | Load_Top At_Offset_3 0795 01db | | Execute Vector,Length 0796 00d8 | | Load_Top At_Offset_0 0797 00e2 | | Load_Encached Integer_Cache 0798 0260 | ` | Execute Discrete,In_Type 0799 7001 |p | Jump_Nonzero 0x79b 079a 0801 | | Execute_Immediate Raise,0x1 079b 00e9 | | Load_Encached String_Cache 079c 035b | [ | Declare_Type Array,Constrained 079d 0337 | 7 | Declare_Variable Array 079e BODY_0790: 079e 00cf | | Action Mark_Auxiliary 079f 00d9 | | Load_Top At_Offset_1 07a0 01d9 | | Execute Vector,Reverse_Bounds 07a1 0263 | c | Execute Discrete,Above_Bound 07a2 7023 |p# | Jump_Nonzero 0x7c6 07a3 e9ff | | Load 0x4,-0x1 07a4 01dd | | Execute Vector,First 07a5 00d9 | | Load_Top At_Offset_1 07a6 0273 | s | Execute Discrete,Plus 07a7 0aff | | Execute_Immediate Plus,-0x1 07a8 e9ff | | Load 0x4,-0x1 07a9 01d7 | | Execute Vector,Field_Read 07aa 7008 |p | Jump_Nonzero 0x7b3 07ab 4801 |H | Short_Literal 0x1 07ac 00d9 | | Load_Top At_Offset_1 07ad 0aff | | Execute_Immediate Plus,-0x1 07ae e802 | | Load 0x4,0x2 07af 01cf | | Execute Vector,Slice_Read 07b0 00e9 | | Load_Encached String_Cache 07b1 01c6 | | Execute Vector,Convert_To_Formal 07b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07b3 e9ff | | Load 0x4,-0x1 07b4 01dd | | Execute Vector,First 07b5 00d9 | | Load_Top At_Offset_1 07b6 0273 | s | Execute Discrete,Plus 07b7 0aff | | Execute_Immediate Plus,-0x1 07b8 e9ff | | Load 0x4,-0x1 07b9 01d7 | | Execute Vector,Field_Read 07ba 487f |H | Short_Literal 0x7f 07bb 0279 | y | Execute Discrete,And 07bc 00d8 | | Load_Top At_Offset_0 07bd 00e8 | | Load_Encached Character_Cache 07be 0260 | ` | Execute Discrete,In_Type 07bf 7001 |p | Jump_Nonzero 0x7c1 07c0 0801 | | Execute_Immediate Raise,0x1 07c1 00d9 | | Load_Top At_Offset_1 07c2 e802 | | Load 0x4,0x2 07c3 01d6 | | Execute Vector,Field_Write 07c4 00c8 | | Action Pop_Auxiliary_Range 07c5 3fdd |? | Loop_Increasing 0x7a3 07c6 00ce | | Action Pop_Auxiliary 07c7 00d8 | | Load_Top At_Offset_0 07c8 00e9 | | Load_Encached String_Cache 07c9 01c6 | | Execute Vector,Convert_To_Formal 07ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07cb 0000 0000 | | .BLANK 0000[0x5] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d5 | | .CONST 0x07d5 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0002 | | .CONST 0x0002 ; Number of locals 07d3 INIT_07d0: 07d3 00e5 | | Load_Encached Long_Integer_Cache 07d4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 07d5 BODY_07d0: 07d5 00cf | | Action Mark_Auxiliary 07d6 e9ff | | Load 0x4,-0x1 07d7 01d9 | | Execute Vector,Reverse_Bounds 07d8 0263 | c | Execute Discrete,Above_Bound 07d9 7009 |p | Jump_Nonzero 0x7e3 07da 00db | | Load_Top At_Offset_3 07db 0908 | | Execute_Immediate Binary_Scale,0x8 07dc 00d9 | | Load_Top At_Offset_1 07dd e9ff | | Load 0x4,-0x1 07de 01d7 | | Execute Vector,Field_Read 07df 0273 | s | Execute Discrete,Plus 07e0 a802 | | Store_Unchecked 0x4,0x2 07e1 00c8 | | Action Pop_Auxiliary_Range 07e2 3ff7 |? | Loop_Increasing 0x7da 07e3 00ce | | Action Pop_Auxiliary 07e4 00d8 | | Load_Top At_Offset_0 07e5 e60b | | Load 0x3,0xb 07e6 1b11 | | Execute Package,Field_Read,Field_Number 0x11 07e7 0272 | r | Execute Discrete,Minus 07e8 00d8 | | Load_Top At_Offset_0 07e9 e00c | | Load 0x0,0xc 07ea 1b14 | | Execute Package,Field_Read,Field_Number 0x14 07eb 0260 | ` | Execute Discrete,In_Type 07ec 7001 |p | Jump_Nonzero 0x7ee 07ed 0801 | | Execute_Immediate Raise,0x1 07ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ef 0000 | | .XXX[0x1] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f9 | | .CONST 0x07f9 ; Address of begin 07f1 0004 | | .CONST 0x0004 ; Address of exception handler 07f2 0003 | | .CONST 0x0003 ; Number of locals 07f3 INIT_07f0: 07f3 00da | | Load_Top At_Offset_2 07f4 01dd | | Execute Vector,First 07f5 00e4 | | Load_Encached Positive_Cache 07f6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 07f7 029f 0f13 | | Declare_Subprogram INIT_0f10,For_Call 07f9 BODY_07f0: 07f9 00cf | | Action Mark_Auxiliary 07fa e9ff | | Load 0x4,-0x1 07fb 01d9 | | Execute Vector,Reverse_Bounds 07fc 0263 | c | Execute Discrete,Above_Bound 07fd 7010 |p | Jump_Nonzero 0x80e 07fe 00d8 | | Load_Top At_Offset_0 07ff e9ff | | Load 0x4,-0x1 0800 01d7 | | Execute Vector,Field_Read 0801 0f0a | | Execute_Immediate Equal,0xa 0802 6809 |h | Jump_Zero 0x80c 0803 e802 | | Load 0x4,0x2 0804 00d9 | | Load_Top At_Offset_1 0805 0aff | | Execute_Immediate Plus,-0x1 0806 e9ff | | Load 0x4,-0x1 0807 01cf | | Execute Vector,Slice_Read 0808 8803 | | Call 0x4,0x3 0809 00d8 | | Load_Top At_Offset_0 080a 0a01 | | Execute_Immediate Plus,0x1 080b c802 | | Store 0x4,0x2 080c 00c8 | | Action Pop_Auxiliary_Range 080d 3ff0 |? | Loop_Increasing 0x7fe 080e 00ce | | Action Pop_Auxiliary 080f 00d9 | | Load_Top At_Offset_1 0810 e9ff | | Load 0x4,-0x1 0811 01dc | | Execute Vector,Last 0812 e9ff | | Load 0x4,-0x1 0813 01cf | | Execute Vector,Slice_Read 0814 8803 | | Call 0x4,0x3 0815 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0816 0000 0000 | | .XXX[0x2] 0818 ; -------------------------------------------------------------------------------------- 0818 ; SUBPROGRAM 0818 ; -------------------------------------------------------------------------------------- 0818 083c | < | .CONST 0x083c ; Address of begin 0819 087d | } | .CONST 0x087d ; Address of exception handler 081a 000d | | .CONST 0x000d ; Number of locals 081b INIT_0818: 081b 00da | | Load_Top At_Offset_2 081c e602 | | Load 0x3,0x2 081d 011c | | Execute Any,Convert_Unchecked 081e 1c01 | | Execute_Immediate Run_Utility,0x1 081f e019 | | Load 0x0,0x19 0820 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0821 02c7 | | Declare_Variable Any 0822 00d8 | | Load_Top At_Offset_0 0823 1c00 | | Execute_Immediate Run_Utility,0x0 0824 00e3 | | Load_Encached Natural_Cache 0825 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0826 029f 0f43 | C| Declare_Subprogram INIT_0f40,For_Call 0828 029f 0f6b | k| Declare_Subprogram INIT_0f68,For_Call 082a 029f 0f83 | | Declare_Subprogram INIT_0f80,For_Call 082c e614 | | Load 0x3,0x14 082d 190f | | Execute Package,Field_Reference,Field_Number 0xf 082e 00c6 | | Action Check_Subprogram_Elaborated 082f 4805 |H | Short_Literal 0x5 0830 4804 |H | Short_Literal 0x4 0831 0099 | | Action Reference_Dynamic 0832 4806 |H | Short_Literal 0x6 0833 4804 |H | Short_Literal 0x4 0834 0099 | | Action Reference_Dynamic 0835 4807 |H | Short_Literal 0x7 0836 4804 |H | Short_Literal 0x4 0837 0099 | | Action Reference_Dynamic 0838 e01a | | Load 0x0,0x1a 0839 e01b | | Load 0x0,0x1b 083a 480d |H | Short_Literal 0xd 083b 0007 | | Action Break_Optional 083c BODY_0818: 083c e60c | | Load 0x3,0xc 083d 703e |p> | Jump_Nonzero 0x87c 083e e803 | | Load 0x4,0x3 083f 00ea | | Load_Encached Null_String_Cache 0840 e5fd | | Load 0x2,-0x3 0841 e802 | | Load 0x4,0x2 0842 01cc | | Execute Vector,Catenate 0843 4800 |H | Short_Literal 0x0 0844 e019 | | Load 0x0,0x19 0845 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0846 c803 | | Store 0x4,0x3 0847 00cf | | Action Mark_Auxiliary 0848 7812 |x | Jump 0x85b 0849 e803 | | Load 0x4,0x3 084a e019 | | Load 0x0,0x19 084b 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 084c 4808 |H | Short_Literal 0x8 084d 4804 |H | Short_Literal 0x4 084e 0099 | | Action Reference_Dynamic 084f 4809 |H | Short_Literal 0x9 0850 4804 |H | Short_Literal 0x4 0851 0099 | | Action Reference_Dynamic 0852 480a |H | Short_Literal 0xa 0853 4804 |H | Short_Literal 0x4 0854 0099 | | Action Reference_Dynamic 0855 480b |H | Short_Literal 0xb 0856 4804 |H | Short_Literal 0x4 0857 0099 | | Action Reference_Dynamic 0858 e614 | | Load 0x3,0x14 0859 180f | | Execute Package,Field_Execute,Field_Number 0xf 085a 00c9 | | Action Pop_Auxiliary_Loop 085b e803 | | Load 0x4,0x3 085c e019 | | Load 0x0,0x19 085d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 085e 6fea |o | Jump_Zero 0x849 085f 00ce | | Action Pop_Auxiliary 0860 e803 | | Load 0x4,0x3 0861 e019 | | Load 0x0,0x19 0862 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0863 c803 | | Store 0x4,0x3 0864 e9ff | | Load 0x4,-0x1 0865 a60e | | Store_Unchecked 0x3,0xe 0866 e804 | | Load 0x4,0x4 0867 a60d | | Store_Unchecked 0x3,0xd 0868 4801 |H | Short_Literal 0x1 0869 a60c | | Store_Unchecked 0x3,0xc 086a 4803 |H | Short_Literal 0x3 086b e5fd | | Load 0x2,-0x3 086c e802 | | Load 0x4,0x2 086d 01cc | | Execute Vector,Catenate 086e 0092 1cad | | Action Push_String_Extended,0x1cad ; " (" 0870 01cc | | Execute Vector,Catenate 0871 4820 |H | Short_Literal 0x20 0872 e804 | | Load 0x4,0x4 0873 00e0 | | Load_Encached Standard_Cache 0874 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0875 e01c | | Load 0x0,0x1c 0876 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0877 01cc | | Execute Vector,Catenate 0878 0092 1cae | | Action Push_String_Extended,0x1cae ; " bytes)" 087a 01cc | | Execute Vector,Catenate 087b 840a | | Call 0x2,0xa 087c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 087d TRAP_0818: 087d e008 | | Load 0x0,0x8 087e 010f | | Execute Exception,Equal 087f 680c |h | Jump_Zero 0x88c 0880 4806 |H | Short_Literal 0x6 0881 0092 1caf | | Action Push_String_Extended,0x1caf ; "Cannot load code from " 0883 e802 | | Load 0x4,0x2 0884 01cc | | Execute Vector,Catenate 0885 840a | | Call 0x2,0xa 0886 e803 | | Load 0x4,0x3 0887 e019 | | Load 0x0,0x19 0888 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0889 c803 | | Store 0x4,0x3 088a 00d8 | | Load_Top At_Offset_0 088b 0101 | | Execute Exception,Reraise 088c 4806 |H | Short_Literal 0x6 088d 0092 1cb0 | | Action Push_String_Extended,0x1cb0 ; "Cannot read code from " 088f e802 | | Load 0x4,0x2 0890 01cc | | Execute Vector,Catenate 0891 840a | | Call 0x2,0xa 0892 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0893 0000 0000 | | .BLANK 0000[0x5] 0898 ; -------------------------------------------------------------------------------------- 0898 ; SUBPROGRAM 0898 ; -------------------------------------------------------------------------------------- 0898 08b6 | | .CONST 0x08b6 ; Address of begin 0899 0004 | | .CONST 0x0004 ; Address of exception handler 089a 0006 | | .CONST 0x0006 ; Number of locals 089b INIT_0898: 089b 00da | | Load_Top At_Offset_2 089c e017 | | Load 0x0,0x17 089d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 089e e016 | | Load 0x0,0x16 089f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08a0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08a1 02c7 | | Declare_Variable Any 08a2 00d8 | | Load_Top At_Offset_0 08a3 1c00 | | Execute_Immediate Run_Utility,0x0 08a4 e00d | | Load 0x0,0xd 08a5 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08a6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08a7 0337 | 7 | Declare_Variable Array 08a8 e00d | | Load 0x0,0xd 08a9 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08aa 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08ab 00d9 | | Load_Top At_Offset_1 08ac 01d4 | | Execute Vector,Structure_Write 08ad 4801 |H | Short_Literal 0x1 08ae 4802 |H | Short_Literal 0x2 08af 00e9 | | Load_Encached String_Cache 08b0 0334 | 4 | Declare_Variable Array,With_Constraint 08b1 5036 |P6 | Indirect_Literal Any,0x8e8,{0x49502020, 0x20202020} 08b2 e017 | | Load 0x0,0x17 08b3 180f | | Execute Package,Field_Execute,Field_Number 0xf 08b4 029f 0f93 | | Declare_Subprogram INIT_0f90,For_Call 08b6 BODY_0898: 08b6 00db | | Load_Top At_Offset_3 08b7 0120 | | Execute Any,Is_Value 08b8 6804 |h | Jump_Zero 0x8bd 08b9 e016 | | Load 0x0,0x16 08ba 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08bb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08bc 7801 |x | Jump 0x8be 08bd 00db | | Load_Top At_Offset_3 08be e016 | | Load 0x0,0x16 08bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08c1 c803 | | Store 0x4,0x3 08c2 00cf | | Action Mark_Auxiliary 08c3 7819 |x | Jump 0x8dd 08c4 e803 | | Load 0x4,0x3 08c5 e016 | | Load 0x0,0x16 08c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08c8 e017 | | Load 0x0,0x17 08c9 180f | | Execute Package,Field_Execute,Field_Number 0xf 08ca 00db | | Load_Top At_Offset_3 08cb 01df | | Execute Vector,Equal 08cc 680a |h | Jump_Zero 0x8d7 08cd e803 | | Load 0x4,0x3 08ce e016 | | Load 0x0,0x16 08cf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08d0 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08d1 e017 | | Load 0x0,0x17 08d2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08d3 e802 | | Load 0x4,0x2 08d4 01df | | Execute Vector,Equal 08d5 6801 |h | Jump_Zero 0x8d7 08d6 8806 | | Call 0x4,0x6 08d7 e803 | | Load 0x4,0x3 08d8 e016 | | Load 0x0,0x16 08d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08da 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08db c803 | | Store 0x4,0x3 08dc 00c9 | | Action Pop_Auxiliary_Loop 08dd e803 | | Load 0x4,0x3 08de e016 | | Load 0x0,0x16 08df 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08e0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 08e1 6fe2 |o | Jump_Zero 0x8c4 08e2 00ce | | Action Pop_Auxiliary 08e3 00da | | Load_Top At_Offset_2 08e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e5 0000 0000 | | .XXX[0x3] 08e7 0000 | | 08e8 4950 2020 |IP | .LITERAL {0x49502020, 0x20202020} 08ec 0000 0000 | | .BLANK 0000[0x4] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 0926 | & | .CONST 0x0926 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 000c | | .CONST 0x000c ; Number of locals 08f3 INIT_08f0: 08f3 614c |aL | Indirect_Literal Discrete,0xa40,{0x00000000, 0x00002000} 08f4 e60b | | Load 0x3,0xb 08f5 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08f6 03f1 | | Declare_Variable Discrete,With_Value 08f7 e00d | | Load 0x0,0xd 08f8 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08f9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08fa 0337 | 7 | Declare_Variable Array 08fb e00d | | Load 0x0,0xd 08fc 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08fe 0337 | 7 | Declare_Variable Array 08ff e00d | | Load 0x0,0xd 0900 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0901 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0902 0337 | 7 | Declare_Variable Array 0903 00d8 | | Load_Top At_Offset_0 0904 0335 | 5 | Declare_Variable Array,Duplicate 0905 00cd | | Action Spare6_Action 0906 4800 |H | Short_Literal 0x0 0907 4801 |H | Short_Literal 0x1 0908 00da | | Load_Top At_Offset_2 0909 01d6 | | Execute Vector,Field_Write 090a 4800 |H | Short_Literal 0x0 090b 4802 |H | Short_Literal 0x2 090c 00da | | Load_Top At_Offset_2 090d 01d6 | | Execute Vector,Field_Write 090e 4800 |H | Short_Literal 0x0 090f 4803 |H | Short_Literal 0x3 0910 00da | | Load_Top At_Offset_2 0911 01d6 | | Execute Vector,Field_Write 0912 4800 |H | Short_Literal 0x0 0913 4804 |H | Short_Literal 0x4 0914 00da | | Load_Top At_Offset_2 0915 01d6 | | Execute Vector,Field_Write 0916 00d9 | | Load_Top At_Offset_1 0917 01d4 | | Execute Vector,Structure_Write 0918 029f 0fb3 | | Declare_Subprogram INIT_0fb0,For_Call 091a 029f 0fd3 | | Declare_Subprogram INIT_0fd0,For_Call 091c 029f 1023 | #| Declare_Subprogram INIT_1020,For_Call 091e 029f 103b | ;| Declare_Subprogram INIT_1038,For_Call 0920 029f 1053 | S| Declare_Subprogram INIT_1050,For_Call 0922 029f 1063 | c| Declare_Subprogram INIT_1060,For_Call 0924 029f 1073 | s| Declare_Subprogram INIT_1070,For_Call 0926 BODY_08f0: 0926 e612 | | Load 0x3,0x12 0927 e00d | | Load 0x0,0xd 0928 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0929 1a13 | | Execute Package,Field_Write,Field_Number 0x13 092a 880c | | Call 0x4,0xc 092b e804 | | Load 0x4,0x4 092c e00d | | Load 0x0,0xd 092d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 092e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 092f 01df | | Execute Vector,Equal 0930 686c |hl | Jump_Zero 0x99d 0931 4801 |H | Short_Literal 0x1 0932 e612 | | Load 0x3,0x12 0933 01d7 | | Execute Vector,Field_Read 0934 00d8 | | Load_Top At_Offset_0 0935 4800 |H | Short_Literal 0x0 0936 487f |H | Short_Literal 0x7f 0937 0262 | b | Execute Discrete,In_Range 0938 700e |p | Jump_Nonzero 0x947 0939 00d8 | | Load_Top At_Offset_0 093a 4880 |H | Short_Literal 0x80 093b 48bf |H | Short_Literal 0xbf 093c 0262 | b | Execute Discrete,In_Range 093d 7026 |p& | Jump_Nonzero 0x964 093e 48c0 |H | Short_Literal 0xc0 093f 48df |H | Short_Literal 0xdf 0940 0262 | b | Execute Discrete,In_Range 0941 703f |p? | Jump_Nonzero 0x981 0942 e804 | | Load 0x4,0x4 0943 e00d | | Load 0x0,0xd 0944 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0945 1a16 | | Execute Package,Field_Write,Field_Number 0x16 0946 785a |xZ | Jump 0x9a1 0947 00d1 | | Pop_Control Pop_Count_1 0948 e00d | | Load 0x0,0xd 0949 1b10 | | Execute Package,Field_Read,Field_Number 0x10 094a 00d8 | | Load_Top At_Offset_0 094b 1b16 | | Execute Package,Field_Read,Field_Number 0x16 094c 00d8 | | Load_Top At_Offset_0 094d 0335 | 5 | Declare_Variable Array,Duplicate 094e 00cd | | Action Spare6_Action 094f 48ff |H | Short_Literal 0xff 0950 4801 |H | Short_Literal 0x1 0951 00da | | Load_Top At_Offset_2 0952 01d6 | | Execute Vector,Field_Write 0953 4800 |H | Short_Literal 0x0 0954 4802 |H | Short_Literal 0x2 0955 00da | | Load_Top At_Offset_2 0956 01d6 | | Execute Vector,Field_Write 0957 4800 |H | Short_Literal 0x0 0958 4803 |H | Short_Literal 0x3 0959 00da | | Load_Top At_Offset_2 095a 01d6 | | Execute Vector,Field_Write 095b 4800 |H | Short_Literal 0x0 095c 4804 |H | Short_Literal 0x4 095d 00da | | Load_Top At_Offset_2 095e 01d6 | | Execute Vector,Field_Write 095f 00cd | | Action Spare6_Action 0960 00d9 | | Load_Top At_Offset_1 0961 1a16 | | Execute Package,Field_Write,Field_Number 0x16 0962 00d1 | | Pop_Control Pop_Count_1 0963 783d |x= | Jump 0x9a1 0964 00d1 | | Pop_Control Pop_Count_1 0965 e00d | | Load 0x0,0xd 0966 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0967 00d8 | | Load_Top At_Offset_0 0968 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0969 00d8 | | Load_Top At_Offset_0 096a 0335 | 5 | Declare_Variable Array,Duplicate 096b 00cd | | Action Spare6_Action 096c 48ff |H | Short_Literal 0xff 096d 4801 |H | Short_Literal 0x1 096e 00da | | Load_Top At_Offset_2 096f 01d6 | | Execute Vector,Field_Write 0970 48ff |H | Short_Literal 0xff 0971 4802 |H | Short_Literal 0x2 0972 00da | | Load_Top At_Offset_2 0973 01d6 | | Execute Vector,Field_Write 0974 4800 |H | Short_Literal 0x0 0975 4803 |H | Short_Literal 0x3 0976 00da | | Load_Top At_Offset_2 0977 01d6 | | Execute Vector,Field_Write 0978 4800 |H | Short_Literal 0x0 0979 4804 |H | Short_Literal 0x4 097a 00da | | Load_Top At_Offset_2 097b 01d6 | | Execute Vector,Field_Write 097c 00cd | | Action Spare6_Action 097d 00d9 | | Load_Top At_Offset_1 097e 1a16 | | Execute Package,Field_Write,Field_Number 0x16 097f 00d1 | | Pop_Control Pop_Count_1 0980 7820 |x | Jump 0x9a1 0981 e00d | | Load 0x0,0xd 0982 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0983 00d8 | | Load_Top At_Offset_0 0984 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0985 00d8 | | Load_Top At_Offset_0 0986 0335 | 5 | Declare_Variable Array,Duplicate 0987 00cd | | Action Spare6_Action 0988 48ff |H | Short_Literal 0xff 0989 4801 |H | Short_Literal 0x1 098a 00da | | Load_Top At_Offset_2 098b 01d6 | | Execute Vector,Field_Write 098c 48ff |H | Short_Literal 0xff 098d 4802 |H | Short_Literal 0x2 098e 00da | | Load_Top At_Offset_2 098f 01d6 | | Execute Vector,Field_Write 0990 48ff |H | Short_Literal 0xff 0991 4803 |H | Short_Literal 0x3 0992 00da | | Load_Top At_Offset_2 0993 01d6 | | Execute Vector,Field_Write 0994 4800 |H | Short_Literal 0x0 0995 4804 |H | Short_Literal 0x4 0996 00da | | Load_Top At_Offset_2 0997 01d6 | | Execute Vector,Field_Write 0998 00cd | | Action Spare6_Action 0999 00d9 | | Load_Top At_Offset_1 099a 1a16 | | Execute Package,Field_Write,Field_Number 0x16 099b 00d1 | | Pop_Control Pop_Count_1 099c 7804 |x | Jump 0x9a1 099d e804 | | Load 0x4,0x4 099e e00d | | Load 0x0,0xd 099f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09a0 1a16 | | Execute Package,Field_Write,Field_Number 0x16 09a1 e611 | | Load 0x3,0x11 09a2 e00d | | Load 0x0,0xd 09a3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09a4 1b13 | | Execute Package,Field_Read,Field_Number 0x13 09a5 01df | | Execute Vector,Equal 09a6 6806 |h | Jump_Zero 0x9ad 09a7 e613 | | Load 0x3,0x13 09a8 e60b | | Load 0x3,0xb 09a9 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd 09ab 880b | | Call 0x4,0xb 09ac 7806 |x | Jump 0x9b3 09ad e611 | | Load 0x3,0x11 09ae 8806 | | Call 0x4,0x6 09af e60b | | Load 0x3,0xb 09b0 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 09b2 880b | | Call 0x4,0xb 09b3 e612 | | Load 0x3,0x12 09b4 8806 | | Call 0x4,0x6 09b5 e60b | | Load 0x3,0xb 09b6 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09b8 880b | | Call 0x4,0xb 09b9 4804 |H | Short_Literal 0x4 09ba 4800 |H | Short_Literal 0x0 09bb 8617 | | Call 0x3,0x17 09bc e60b | | Load 0x3,0xb 09bd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09be 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09bf 880b | | Call 0x4,0xb 09c0 e017 | | Load 0x0,0x17 09c1 1b12 | | Execute Package,Field_Read,Field_Number 0x12 09c2 8622 | " | Call 0x3,0x22 09c3 e803 | | Load 0x4,0x3 09c4 01d4 | | Execute Vector,Structure_Write 09c5 e803 | | Load 0x4,0x3 09c6 e00d | | Load 0x0,0xd 09c7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09c8 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09c9 01df | | Execute Vector,Equal 09ca 6806 |h | Jump_Zero 0x9d1 09cb e613 | | Load 0x3,0x13 09cc e60b | | Load 0x3,0xb 09cd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09ce 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09cf 880b | | Call 0x4,0xb 09d0 780d |x | Jump 0x9de 09d1 e803 | | Load 0x4,0x3 09d2 8806 | | Call 0x4,0x6 09d3 e60b | | Load 0x3,0xb 09d4 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09d5 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09d6 880b | | Call 0x4,0xb 09d7 e605 | | Load 0x3,0x5 09d8 0092 1cb1 | | Action Push_String_Extended,0x1cb1 ; "Gateway address: " 09da e803 | | Load 0x4,0x3 09db 861a | | Call 0x3,0x1a 09dc 01cc | | Execute Vector,Catenate 09dd 8620 | | Call 0x3,0x20 09de e804 | | Load 0x4,0x4 09df e00d | | Load 0x0,0xd 09e0 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09e1 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09e2 01df | | Execute Vector,Equal 09e3 6806 |h | Jump_Zero 0x9ea 09e4 e613 | | Load 0x3,0x13 09e5 e60b | | Load 0x3,0xb 09e6 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09e7 1b11 | | Execute Package,Field_Read,Field_Number 0x11 09e8 880b | | Call 0x4,0xb 09e9 7806 |x | Jump 0x9f0 09ea e804 | | Load 0x4,0x4 09eb 8806 | | Call 0x4,0x6 09ec e60b | | Load 0x3,0xb 09ed 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09ee 1b11 | | Execute Package,Field_Read,Field_Number 0x11 09ef 880b | | Call 0x4,0xb 09f0 0092 1cb2 | | Action Push_String_Extended,0x1cb2 ; "Delta" 09f2 8807 | | Call 0x4,0x7 09f3 8806 | | Call 0x4,0x6 09f4 e60b | | Load 0x3,0xb 09f5 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09f6 1b12 | | Execute Package,Field_Read,Field_Number 0x12 09f7 880b | | Call 0x4,0xb 09f8 e613 | | Load 0x3,0x13 09f9 e60b | | Load 0x3,0xb 09fa 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09fb 1b13 | | Execute Package,Field_Read,Field_Number 0x13 09fc 880b | | Call 0x4,0xb 09fd e613 | | Load 0x3,0x13 09fe e60b | | Load 0x3,0xb 09ff 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a00 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0a01 880b | | Call 0x4,0xb 0a02 e613 | | Load 0x3,0x13 0a03 e60b | | Load 0x3,0xb 0a04 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a05 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0a06 880b | | Call 0x4,0xb 0a07 e613 | | Load 0x3,0x13 0a08 e60b | | Load 0x3,0xb 0a09 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a0a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0a0b 880b | | Call 0x4,0xb 0a0c e613 | | Load 0x3,0x13 0a0d e60b | | Load 0x3,0xb 0a0e 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a0f 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0a10 880b | | Call 0x4,0xb 0a11 4804 |H | Short_Literal 0x4 0a12 4800 |H | Short_Literal 0x0 0a13 8617 | | Call 0x3,0x17 0a14 e60b | | Load 0x3,0xb 0a15 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a16 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a17 880b | | Call 0x4,0xb 0a18 4804 |H | Short_Literal 0x4 0a19 48f0 |H | Short_Literal 0xf0 0a1a 8617 | | Call 0x3,0x17 0a1b e60b | | Load 0x3,0xb 0a1c 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a1d 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0a1e 880b | | Call 0x4,0xb 0a1f 880a | | Call 0x4,0xa 0a20 8806 | | Call 0x4,0x6 0a21 e60b | | Load 0x3,0xb 0a22 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a23 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0a24 880b | | Call 0x4,0xb 0a25 4801 |H | Short_Literal 0x1 0a26 e60b | | Load 0x3,0xb 0a27 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a28 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0a29 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a2a e001 | | Load 0x0,0x1 0a2b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a2c 035b | [ | Declare_Type Array,Constrained 0a2d 0337 | 7 | Declare_Variable Array 0a2e 00d8 | | Load_Top At_Offset_0 0a2f 01dc | | Execute Vector,Last 0a30 4801 |H | Short_Literal 0x1 0a31 0263 | c | Execute Discrete,Above_Bound 0a32 7005 |p | Jump_Nonzero 0xa38 0a33 4800 |H | Short_Literal 0x0 0a34 00d9 | | Load_Top At_Offset_1 0a35 e80d | | Load 0x4,0xd 0a36 01d6 | | Execute Vector,Field_Write 0a37 3ffb |? | Loop_Increasing 0xa33 0a38 e60b | | Load 0x3,0xb 0a39 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a3a 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0a3b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a3c e60b | | Load 0x3,0xb 0a3d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0a3e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a3f 0000 | | .XXX[0x1] 0a40 0000 0000 | | .LITERAL {0x00000000, 0x00002000} 0a44 0000 0000 | | .BLANK 0000[0x4] 0a48 ; -------------------------------------------------------------------------------------- 0a48 ; SUBPROGRAM 0a48 ; -------------------------------------------------------------------------------------- 0a48 0a9d | | .CONST 0x0a9d ; Address of begin 0a49 0004 | | .CONST 0x0004 ; Address of exception handler 0a4a 000b | | .CONST 0x000b ; Number of locals 0a4b INIT_0a48: 0a4b 4800 |H | Short_Literal 0x0 0a4c 4801 |H | Short_Literal 0x1 0a4d e001 | | Load 0x0,0x1 0a4e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a4f 035b | [ | Declare_Type Array,Constrained 0a50 0337 | 7 | Declare_Variable Array 0a51 4800 |H | Short_Literal 0x0 0a52 4800 |H | Short_Literal 0x0 0a53 00da | | Load_Top At_Offset_2 0a54 01d6 | | Execute Vector,Field_Write 0a55 4802 |H | Short_Literal 0x2 0a56 4801 |H | Short_Literal 0x1 0a57 00da | | Load_Top At_Offset_2 0a58 01d6 | | Execute Vector,Field_Write 0a59 4800 |H | Short_Literal 0x0 0a5a 4801 |H | Short_Literal 0x1 0a5b e001 | | Load 0x0,0x1 0a5c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a5d 035b | [ | Declare_Type Array,Constrained 0a5e 0337 | 7 | Declare_Variable Array 0a5f 4800 |H | Short_Literal 0x0 0a60 4800 |H | Short_Literal 0x0 0a61 00da | | Load_Top At_Offset_2 0a62 01d6 | | Execute Vector,Field_Write 0a63 480c |H | Short_Literal 0xc 0a64 4801 |H | Short_Literal 0x1 0a65 00da | | Load_Top At_Offset_2 0a66 01d6 | | Execute Vector,Field_Write 0a67 4800 |H | Short_Literal 0x0 0a68 4801 |H | Short_Literal 0x1 0a69 e001 | | Load 0x0,0x1 0a6a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a6b 035b | [ | Declare_Type Array,Constrained 0a6c 0337 | 7 | Declare_Variable Array 0a6d 4800 |H | Short_Literal 0x0 0a6e 4800 |H | Short_Literal 0x0 0a6f 00da | | Load_Top At_Offset_2 0a70 01d6 | | Execute Vector,Field_Write 0a71 4801 |H | Short_Literal 0x1 0a72 4801 |H | Short_Literal 0x1 0a73 00da | | Load_Top At_Offset_2 0a74 01d6 | | Execute Vector,Field_Write 0a75 4800 |H | Short_Literal 0x0 0a76 4801 |H | Short_Literal 0x1 0a77 e001 | | Load 0x0,0x1 0a78 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a79 035b | [ | Declare_Type Array,Constrained 0a7a 0337 | 7 | Declare_Variable Array 0a7b 4800 |H | Short_Literal 0x0 0a7c 4800 |H | Short_Literal 0x0 0a7d 00da | | Load_Top At_Offset_2 0a7e 01d6 | | Execute Vector,Field_Write 0a7f 4802 |H | Short_Literal 0x2 0a80 4801 |H | Short_Literal 0x1 0a81 00da | | Load_Top At_Offset_2 0a82 01d6 | | Execute Vector,Field_Write 0a83 4800 |H | Short_Literal 0x0 0a84 4801 |H | Short_Literal 0x1 0a85 e001 | | Load 0x0,0x1 0a86 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a87 035b | [ | Declare_Type Array,Constrained 0a88 0337 | 7 | Declare_Variable Array 0a89 4800 |H | Short_Literal 0x0 0a8a 4800 |H | Short_Literal 0x0 0a8b 00da | | Load_Top At_Offset_2 0a8c 01d6 | | Execute Vector,Field_Write 0a8d 4803 |H | Short_Literal 0x3 0a8e 4801 |H | Short_Literal 0x1 0a8f 00da | | Load_Top At_Offset_2 0a90 01d6 | | Execute Vector,Field_Write 0a91 00e3 | | Load_Encached Natural_Cache 0a92 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a93 6058 |`X | Indirect_Literal Discrete,0xaec,{0x00000000, 0x00001230} 0a94 e60b | | Load 0x3,0xb 0a95 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0a96 03f1 | | Declare_Variable Discrete,With_Value 0a97 029f 108b | | Declare_Subprogram INIT_1088,For_Call 0a99 029f 10a3 | | Declare_Subprogram INIT_10a0,For_Call 0a9b 029f 10c3 | | Declare_Subprogram INIT_10c0,For_Call 0a9d BODY_0a48: 0a9d e802 | | Load 0x4,0x2 0a9e e804 | | Load 0x4,0x4 0a9f 01cc | | Execute Vector,Catenate 0aa0 4831 |H1 | Short_Literal 0x31 0aa1 4800 |H | Short_Literal 0x0 0aa2 880a | | Call 0x4,0xa 0aa3 01cc | | Execute Vector,Catenate 0aa4 480c |H | Short_Literal 0xc 0aa5 0092 1cb3 | | Action Push_String_Extended,0x1cb3 ; "if_tcp" 0aa7 880b | | Call 0x4,0xb 0aa8 01cc | | Execute Vector,Catenate 0aa9 8809 | | Call 0x4,0x9 0aaa e802 | | Load 0x4,0x2 0aab e805 | | Load 0x4,0x5 0aac 01cc | | Execute Vector,Catenate 0aad 4839 |H9 | Short_Literal 0x39 0aae 4832 |H2 | Short_Literal 0x32 0aaf 880a | | Call 0x4,0xa 0ab0 01cc | | Execute Vector,Catenate 0ab1 480c |H | Short_Literal 0xc 0ab2 0092 1cb4 | | Action Push_String_Extended,0x1cb4 ; "if_udp" 0ab4 880b | | Call 0x4,0xb 0ab5 01cc | | Execute Vector,Catenate 0ab6 8809 | | Call 0x4,0x9 0ab7 e802 | | Load 0x4,0x2 0ab8 e806 | | Load 0x4,0x6 0ab9 01cc | | Execute Vector,Catenate 0aba 483b |H; | Short_Literal 0x3b 0abb 483a |H: | Short_Literal 0x3a 0abc 880a | | Call 0x4,0xa 0abd 01cc | | Execute Vector,Catenate 0abe 480c |H | Short_Literal 0xc 0abf 0092 1cb5 | | Action Push_String_Extended,0x1cb5 ; "if_rip" 0ac1 880b | | Call 0x4,0xb 0ac2 01cc | | Execute Vector,Catenate 0ac3 8809 | | Call 0x4,0x9 0ac4 e803 | | Load 0x4,0x3 0ac5 e806 | | Load 0x4,0x6 0ac6 01cc | | Execute Vector,Catenate 0ac7 483f |H? | Short_Literal 0x3f 0ac8 483c |H< | Short_Literal 0x3c 0ac9 880a | | Call 0x4,0xa 0aca 01cc | | Execute Vector,Catenate 0acb 480c |H | Short_Literal 0xc 0acc 0092 1cb6 | | Action Push_String_Extended,0x1cb6 ; "if_eth" 0ace 880b | | Call 0x4,0xb 0acf 01cc | | Execute Vector,Catenate 0ad0 8809 | | Call 0x4,0x9 0ad1 4801 |H | Short_Literal 0x1 0ad2 4818 |H | Short_Literal 0x18 0ad3 e001 | | Load 0x0,0x1 0ad4 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0ad5 035b | [ | Declare_Type Array,Constrained 0ad6 0337 | 7 | Declare_Variable Array 0ad7 4818 |H | Short_Literal 0x18 0ad8 4801 |H | Short_Literal 0x1 0ad9 4800 |H | Short_Literal 0x0 0ada 00d9 | | Load_Top At_Offset_1 0adb e80c | | Load 0x4,0xc 0adc 01d6 | | Execute Vector,Field_Write 0add 3ffb |? | Loop_Increasing 0xad9 0ade 8809 | | Call 0x4,0x9 0adf e807 | | Load 0x4,0x7 0ae0 0aff | | Execute_Immediate Plus,-0x1 0ae1 00d8 | | Load_Top At_Offset_0 0ae2 e00c | | Load 0x0,0xc 0ae3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0ae4 0260 | ` | Execute Discrete,In_Type 0ae5 7001 |p | Jump_Nonzero 0xae7 0ae6 0801 | | Execute_Immediate Raise,0x1 0ae7 a9ff | | Store_Unchecked 0x4,-0x1 0ae8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ae9 0000 0000 | | .XXX[0x3] 0aeb 0000 | | 0aec 0000 0000 | | .LITERAL {0x00000000, 0x00001230} 0af0 ; -------------------------------------------------------------------------------------- 0af0 ; SUBPROGRAM 0af0 ; -------------------------------------------------------------------------------------- 0af0 0b15 | | .CONST 0x0b15 ; Address of begin 0af1 0004 | | .CONST 0x0004 ; Address of exception handler 0af2 0010 | | .CONST 0x0010 ; Number of locals 0af3 INIT_0af0: 0af3 00e3 | | Load_Encached Natural_Cache 0af4 e60b | | Load 0x3,0xb 0af5 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0af6 e60b | | Load 0x3,0xb 0af7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0af8 e60b | | Load 0x3,0xb 0af9 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0afa e9ff | | Load 0x4,-0x1 0afb 0a01 | | Execute_Immediate Plus,0x1 0afc 00e4 | | Load_Encached Positive_Cache 0afd 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0afe 00d8 | | Load_Top At_Offset_0 0aff 0007 | | Action Break_Optional 0b00 613f |a? | Indirect_Literal Discrete,0xc40,{0x00000000, 0x0000043a} 0b01 00e4 | | Load_Encached Positive_Cache 0b02 03f1 | | Declare_Variable Discrete,With_Value 0b03 00da | | Load_Top At_Offset_2 0b04 00e4 | | Load_Encached Positive_Cache 0b05 03f1 | | Declare_Variable Discrete,With_Value 0b06 6135 |a5 | Indirect_Literal Discrete,0xc3c,{0x00000000, 0x0000242e} 0b07 00e4 | | Load_Encached Positive_Cache 0b08 03f1 | | Declare_Variable Discrete,With_Value 0b09 00e3 | | Load_Encached Natural_Cache 0b0a 0604 | | Execute_Immediate Set_Value_Unchecked,0x4 0b0b 00e3 | | Load_Encached Natural_Cache 0b0c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0b0d 029f 10fb | | Declare_Subprogram INIT_10f8,For_Call 0b0f 029f 110b | | Declare_Subprogram INIT_1108,For_Call 0b11 029f 114b | K| Declare_Subprogram INIT_1148,For_Call 0b13 029f 11e3 | | Declare_Subprogram INIT_11e0,For_Call 0b15 BODY_0af0: 0b15 e5f9 | | Load 0x2,-0x7 0b16 680a |h | Jump_Zero 0xb21 0b17 6120 |a | Indirect_Literal Discrete,0xc38,{0x00000000, 0xa0000000} 0b18 a610 | | Store_Unchecked 0x3,0x10 0b19 611a |a | Indirect_Literal Discrete,0xc34,{0x00000000, 0x0001ffff} 0b1a a803 | | Store_Unchecked 0x4,0x3 0b1b 6114 |a | Indirect_Literal Discrete,0xc30,{0x00000000, 0x000660d0} 0b1c e60d | | Load 0x3,0xd 0b1d 0272 | r | Execute Discrete,Minus 0b1e 09ff | | Execute_Immediate Binary_Scale,-0x1 0b1f c802 | | Store 0x4,0x2 0b20 7820 |x | Jump 0xb41 0b21 4800 |H | Short_Literal 0x0 0b22 e60b | | Load 0x3,0xb 0b23 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0b24 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b25 e60b | | Load 0x3,0xb 0b26 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b27 8618 | | Call 0x3,0x18 0b28 a610 | | Store_Unchecked 0x3,0x10 0b29 4800 |H | Short_Literal 0x0 0b2a e60b | | Load 0x3,0xb 0b2b 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0b2c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b2d e60b | | Load 0x3,0xb 0b2e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b2f 8618 | | Call 0x3,0x18 0b30 e610 | | Load 0x3,0x10 0b31 0272 | r | Execute Discrete,Minus 0b32 00d8 | | Load_Top At_Offset_0 0b33 e00c | | Load 0x0,0xc 0b34 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0b35 0260 | ` | Execute Discrete,In_Type 0b36 7001 |p | Jump_Nonzero 0xb38 0b37 0801 | | Execute_Immediate Raise,0x1 0b38 a803 | | Store_Unchecked 0x4,0x3 0b39 4800 |H | Short_Literal 0x0 0b3a e60b | | Load 0x3,0xb 0b3b 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0b3c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0b3d e60b | | Load 0x3,0xb 0b3e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b3f 880d | | Call 0x4,0xd 0b40 a802 | | Store_Unchecked 0x4,0x2 0b41 4802 |H | Short_Literal 0x2 0b42 0092 1cb7 | | Action Push_String_Extended,0x1cb7 ; "SHARED.bfrspace =" 0b44 e802 | | Load 0x4,0x2 0b45 00e0 | | Load_Encached Standard_Cache 0b46 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0b47 01cc | | Execute Vector,Catenate 0b48 840a | | Call 0x2,0xa 0b49 e803 | | Load 0x4,0x3 0b4a e802 | | Load 0x4,0x2 0b4b 00d8 | | Load_Top At_Offset_0 0b4c e00c | | Load 0x0,0xc 0b4d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0b4e 0260 | ` | Execute Discrete,In_Type 0b4f 7001 |p | Jump_Nonzero 0xb51 0b50 0801 | | Execute_Immediate Raise,0x1 0b51 0273 | s | Execute Discrete,Plus 0b52 c805 | | Store 0x4,0x5 0b53 8810 | | Call 0x4,0x10 0b54 e802 | | Load 0x4,0x2 0b55 e807 | | Load 0x4,0x7 0b56 0905 | | Execute_Immediate Binary_Scale,0x5 0b57 e809 | | Load 0x4,0x9 0b58 e808 | | Load 0x4,0x8 0b59 0a20 | | Execute_Immediate Plus,0x20 0b5a 0271 | q | Execute Discrete,Times 0b5b 0273 | s | Execute Discrete,Plus 0b5c e80b | | Load 0x4,0xb 0b5d e80a | | Load 0x4,0xa 0b5e 0a20 | | Execute_Immediate Plus,0x20 0b5f 0271 | q | Execute Discrete,Times 0b60 0273 | s | Execute Discrete,Plus 0b61 027b | { | Execute Discrete,Greater_Equal 0b62 6801 |h | Jump_Zero 0xb64 0b63 7824 |x$ | Jump 0xb88 0b64 e802 | | Load 0x4,0x2 0b65 e807 | | Load 0x4,0x7 0b66 0905 | | Execute_Immediate Binary_Scale,0x5 0b67 e809 | | Load 0x4,0x9 0b68 e808 | | Load 0x4,0x8 0b69 0a20 | | Execute_Immediate Plus,0x20 0b6a 0271 | q | Execute Discrete,Times 0b6b 0273 | s | Execute Discrete,Plus 0b6c 027b | { | Execute Discrete,Greater_Equal 0b6d 680e |h | Jump_Zero 0xb7c 0b6e e802 | | Load 0x4,0x2 0b6f e807 | | Load 0x4,0x7 0b70 0905 | | Execute_Immediate Binary_Scale,0x5 0b71 0272 | r | Execute Discrete,Minus 0b72 e809 | | Load 0x4,0x9 0b73 e808 | | Load 0x4,0x8 0b74 0a20 | | Execute_Immediate Plus,0x20 0b75 0271 | q | Execute Discrete,Times 0b76 0272 | r | Execute Discrete,Minus 0b77 e80a | | Load 0x4,0xa 0b78 0a20 | | Execute_Immediate Plus,0x20 0b79 0270 | p | Execute Discrete,Divide 0b7a c80b | | Store 0x4,0xb 0b7b 780c |x | Jump 0xb88 0b7c e802 | | Load 0x4,0x2 0b7d e807 | | Load 0x4,0x7 0b7e 0905 | | Execute_Immediate Binary_Scale,0x5 0b7f 0272 | r | Execute Discrete,Minus 0b80 e809 | | Load 0x4,0x9 0b81 0905 | | Execute_Immediate Binary_Scale,0x5 0b82 0272 | r | Execute Discrete,Minus 0b83 e809 | | Load 0x4,0x9 0b84 0270 | p | Execute Discrete,Divide 0b85 c808 | | Store 0x4,0x8 0b86 4800 |H | Short_Literal 0x0 0b87 a80b | | Store_Unchecked 0x4,0xb 0b88 e802 | | Load 0x4,0x2 0b89 e807 | | Load 0x4,0x7 0b8a 0905 | | Execute_Immediate Binary_Scale,0x5 0b8b 0272 | r | Execute Discrete,Minus 0b8c e80b | | Load 0x4,0xb 0b8d e80a | | Load 0x4,0xa 0b8e 0a20 | | Execute_Immediate Plus,0x20 0b8f 0271 | q | Execute Discrete,Times 0b90 0272 | r | Execute Discrete,Minus 0b91 e808 | | Load 0x4,0x8 0b92 0a20 | | Execute_Immediate Plus,0x20 0b93 0270 | p | Execute Discrete,Divide 0b94 c809 | | Store 0x4,0x9 0b95 00cf | | Action Mark_Auxiliary 0b96 e807 | | Load 0x4,0x7 0b97 4801 |H | Short_Literal 0x1 0b98 0263 | c | Execute Discrete,Above_Bound 0b99 7004 |p | Jump_Nonzero 0xb9e 0b9a 4800 |H | Short_Literal 0x0 0b9b 880f | | Call 0x4,0xf 0b9c 00c8 | | Action Pop_Auxiliary_Range 0b9d 3ffc |? | Loop_Increasing 0xb9a 0b9e 00c9 | | Action Pop_Auxiliary_Loop 0b9f e809 | | Load 0x4,0x9 0ba0 4801 |H | Short_Literal 0x1 0ba1 0263 | c | Execute Discrete,Above_Bound 0ba2 7004 |p | Jump_Nonzero 0xba7 0ba3 e808 | | Load 0x4,0x8 0ba4 880f | | Call 0x4,0xf 0ba5 00c8 | | Action Pop_Auxiliary_Range 0ba6 3ffc |? | Loop_Increasing 0xba3 0ba7 00c9 | | Action Pop_Auxiliary_Loop 0ba8 e80b | | Load 0x4,0xb 0ba9 4801 |H | Short_Literal 0x1 0baa 0263 | c | Execute Discrete,Above_Bound 0bab 7004 |p | Jump_Nonzero 0xbb0 0bac e80a | | Load 0x4,0xa 0bad 880f | | Call 0x4,0xf 0bae 00c8 | | Action Pop_Auxiliary_Range 0baf 3ffc |? | Loop_Increasing 0xbac 0bb0 00ce | | Action Pop_Auxiliary 0bb1 e613 | | Load 0x3,0x13 0bb2 e804 | | Load 0x4,0x4 0bb3 e60b | | Load 0x3,0xb 0bb4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0bb5 e60b | | Load 0x3,0xb 0bb6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0bb7 e80b | | Load 0x4,0xb 0bb8 7002 |p | Jump_Nonzero 0xbbb 0bb9 e808 | | Load 0x4,0x8 0bba a80a | | Store_Unchecked 0x4,0xa 0bbb e5f9 | | Load 0x2,-0x7 0bbc 680f |h | Jump_Zero 0xbcc 0bbd e80c | | Load 0x4,0xc 0bbe 0c01 | | Execute_Immediate Greater_Equal,0x1 0bbf 681f |h | Jump_Zero 0xbdf 0bc0 4802 |H | Short_Literal 0x2 0bc1 0092 1cb8 | | Action Push_String_Extended,0x1cb8 ; "skipped" 0bc3 e80c | | Load 0x4,0xc 0bc4 00e0 | | Load_Encached Standard_Cache 0bc5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0bc6 01cc | | Execute Vector,Catenate 0bc7 0092 1cb9 | | Action Push_String_Extended,0x1cb9 ; " bytes to avoid IOP page boundaries." 0bc9 01cc | | Execute Vector,Catenate 0bca 840a | | Call 0x2,0xa 0bcb 7813 |x | Jump 0xbdf 0bcc e808 | | Load 0x4,0x8 0bcd 0ac6 | | Execute_Immediate Plus,-0x3a 0bce e00d | | Load 0x0,0xd 0bcf 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0bd0 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0bd1 1a11 | | Execute Package,Field_Write,Field_Number 0x11 0bd2 e80a | | Load 0x4,0xa 0bd3 0ad2 | | Execute_Immediate Plus,-0x2e 0bd4 e00d | | Load 0x0,0xd 0bd5 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0bd6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0bd7 1a11 | | Execute Package,Field_Write,Field_Number 0x11 0bd8 e80a | | Load 0x4,0xa 0bd9 0aee | | Execute_Immediate Plus,-0x12 0bda 6051 |`Q | Indirect_Literal Discrete,0xc2c,{0x00000000, 0x000005dc} 0bdb 8616 | | Call 0x3,0x16 0bdc e00d | | Load 0x0,0xd 0bdd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bde 1a18 | | Execute Package,Field_Write,Field_Number 0x18 0bdf 4802 |H | Short_Literal 0x2 0be0 0092 1cba | | Action Push_String_Extended,0x1cba ; "small:" 0be2 e807 | | Load 0x4,0x7 0be3 00e0 | | Load_Encached Standard_Cache 0be4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0be5 01cc | | Execute Vector,Catenate 0be6 0092 1cbb | | Action Push_String_Extended,0x1cbb ; " *" 0be8 01cc | | Execute Vector,Catenate 0be9 0092 1cbc | | Action Push_String_Extended,0x1cbc ; " 0" 0beb 01cc | | Execute Vector,Catenate 0bec 840a | | Call 0x2,0xa 0bed 4802 |H | Short_Literal 0x2 0bee 0092 1cbd | | Action Push_String_Extended,0x1cbd ; "medium:" 0bf0 e809 | | Load 0x4,0x9 0bf1 00e0 | | Load_Encached Standard_Cache 0bf2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0bf3 01cc | | Execute Vector,Catenate 0bf4 0092 1cbb | | Action Push_String_Extended,0x1cbb ; " *" 0bf6 01cc | | Execute Vector,Catenate 0bf7 e808 | | Load 0x4,0x8 0bf8 00e0 | | Load_Encached Standard_Cache 0bf9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0bfa 01cc | | Execute Vector,Catenate 0bfb 840a | | Call 0x2,0xa 0bfc 4802 |H | Short_Literal 0x2 0bfd 0092 1cbe | | Action Push_String_Extended,0x1cbe ; "large:" 0bff e80b | | Load 0x4,0xb 0c00 00e0 | | Load_Encached Standard_Cache 0c01 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c02 01cc | | Execute Vector,Catenate 0c03 0092 1cbb | | Action Push_String_Extended,0x1cbb ; " *" 0c05 01cc | | Execute Vector,Catenate 0c06 e80a | | Load 0x4,0xa 0c07 00e0 | | Load_Encached Standard_Cache 0c08 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c09 01cc | | Execute Vector,Catenate 0c0a 840a | | Call 0x2,0xa 0c0b 4802 |H | Short_Literal 0x2 0c0c 0092 1cbf | | Action Push_String_Extended,0x1cbf ; "Enp_Coupler.Internet.Tcp.Max_Data_Length :=" 0c0e e808 | | Load 0x4,0x8 0c0f 0ac6 | | Execute_Immediate Plus,-0x3a 0c10 00e0 | | Load_Encached Standard_Cache 0c11 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c12 01cc | | Execute Vector,Catenate 0c13 840a | | Call 0x2,0xa 0c14 4802 |H | Short_Literal 0x2 0c15 0092 1cc0 | | Action Push_String_Extended,0x1cc0 ; "Enp_Coupler.Internet.Udp.Max_Data_Length :=" 0c17 e80a | | Load 0x4,0xa 0c18 0ad2 | | Execute_Immediate Plus,-0x2e 0c19 00e0 | | Load_Encached Standard_Cache 0c1a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c1b 01cc | | Execute Vector,Catenate 0c1c 840a | | Call 0x2,0xa 0c1d 4802 |H | Short_Literal 0x2 0c1e 0092 1cc1 | | Action Push_String_Extended,0x1cc1 ; "Enp_Coupler.Ethernet.Max_Data_Length :=" 0c20 e80a | | Load 0x4,0xa 0c21 0aee | | Execute_Immediate Plus,-0x12 0c22 6009 |` | Indirect_Literal Discrete,0xc2c,{0x00000000, 0x000005dc} 0c23 8616 | | Call 0x3,0x16 0c24 00e0 | | Load_Encached Standard_Cache 0c25 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c26 01cc | | Execute Vector,Catenate 0c27 840a | | Call 0x2,0xa 0c28 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c29 0000 0000 | | .XXX[0x3] 0c2b 0000 | | 0c2c 0000 0000 | | .LITERAL {0x00000000, 0x000005dc} 0c30 0000 0000 | | .LITERAL {0x00000000, 0x000660d0} 0c34 0000 0000 | | .LITERAL {0x00000000, 0x0001ffff} 0c38 0000 0000 | | .LITERAL {0x00000000, 0xa0000000} 0c3c 0000 0000 | | .LITERAL {0x00000000, 0x0000242e} 0c40 0000 0000 | | .LITERAL {0x00000000, 0x0000043a} 0c44 0000 0000 | | .BLANK 0000[0x4] 0c48 ; -------------------------------------------------------------------------------------- 0c48 ; SUBPROGRAM 0c48 ; -------------------------------------------------------------------------------------- 0c48 0c61 | a | .CONST 0x0c61 ; Address of begin 0c49 0004 | | .CONST 0x0004 ; Address of exception handler 0c4a 0004 | | .CONST 0x0004 ; Number of locals 0c4b INIT_0c48: 0c4b 4800 |H | Short_Literal 0x0 0c4c e60b | | Load 0x3,0xb 0c4d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0c4e 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0c4f e60b | | Load 0x3,0xb 0c50 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c51 e00d | | Load 0x0,0xd 0c52 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c53 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0c54 01c7 | | Execute Vector,Convert 0c55 4800 |H | Short_Literal 0x0 0c56 e60b | | Load 0x3,0xb 0c57 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0c58 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0c59 e60b | | Load 0x3,0xb 0c5a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c5b e00d | | Load 0x0,0xd 0c5c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0c5d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c5e 01c7 | | Execute Vector,Convert 0c5f 029f 122b | +| Declare_Subprogram INIT_1228,For_Call 0c61 BODY_0c48: 0c61 e611 | | Load 0x3,0x11 0c62 e00d | | Load 0x0,0xd 0c63 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c64 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0c65 01df | | Execute Vector,Equal 0c66 700d |p | Jump_Nonzero 0xc74 0c67 e611 | | Load 0x3,0x11 0c68 00db | | Load_Top At_Offset_3 0c69 01df | | Execute Vector,Equal 0c6a 7009 |p | Jump_Nonzero 0xc74 0c6b 4807 |H | Short_Literal 0x7 0c6c 0092 1cc2 | | Action Push_String_Extended,0x1cc2 ; "ENP.SHARED.enetaddr = " 0c6e e802 | | Load 0x4,0x2 0c6f 861b | | Call 0x3,0x1b 0c70 01cc | | Execute Vector,Catenate 0c71 840a | | Call 0x2,0xa 0c72 e008 | | Load 0x0,0x8 0c73 0257 | W | Execute Discrete,Raise 0c74 00da | | Load_Top At_Offset_2 0c75 e00d | | Load 0x0,0xd 0c76 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c77 1a17 | | Execute Package,Field_Write,Field_Number 0x17 0c78 e612 | | Load 0x3,0x12 0c79 00da | | Load_Top At_Offset_2 0c7a 01df | | Execute Vector,Equal 0c7b 7009 |p | Jump_Nonzero 0xc85 0c7c 4807 |H | Short_Literal 0x7 0c7d 0092 1cc3 | | Action Push_String_Extended,0x1cc3 ; "ENP.SHARED.inetaddr = " 0c7f 00db | | Load_Top At_Offset_3 0c80 861b | | Call 0x3,0x1b 0c81 01cc | | Execute Vector,Catenate 0c82 840a | | Call 0x2,0xa 0c83 e008 | | Load 0x0,0x8 0c84 0257 | W | Execute Discrete,Raise 0c85 4800 |H | Short_Literal 0x0 0c86 e60b | | Load 0x3,0xb 0c87 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0c88 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0c89 e60b | | Load 0x3,0xb 0c8a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c8b 8618 | | Call 0x3,0x18 0c8c e610 | | Load 0x3,0x10 0c8d 0272 | r | Execute Discrete,Minus 0c8e 00d8 | | Load_Top At_Offset_0 0c8f e00c | | Load 0x0,0xc 0c90 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0c91 0260 | ` | Execute Discrete,In_Type 0c92 7001 |p | Jump_Nonzero 0xc94 0c93 0801 | | Execute_Immediate Raise,0x1 0c94 e00d | | Load 0x0,0xd 0c95 1a0e | | Execute Package,Field_Write,Field_Number 0xe 0c96 e5f7 | | Load 0x2,-0x9 0c97 6806 |h | Jump_Zero 0xc9e 0c98 e00d | | Load 0x0,0xd 0c99 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c9a 6015 |` | Indirect_Literal Discrete,0xcb0,{0x00000000, 0x00100000} 0c9b 0273 | s | Execute Discrete,Plus 0c9c e00d | | Load 0x0,0xd 0c9d 1a0e | | Execute Package,Field_Write,Field_Number 0xe 0c9e 8804 | | Call 0x4,0x4 0c9f e605 | | Load 0x3,0x5 0ca0 0092 1cc4 | | Action Push_String_Extended,0x1cc4 ; "Ethernet address: " 0ca2 e802 | | Load 0x4,0x2 0ca3 8619 | | Call 0x3,0x19 0ca4 01cc | | Execute Vector,Catenate 0ca5 8620 | | Call 0x3,0x20 0ca6 e605 | | Load 0x3,0x5 0ca7 0092 1cc5 | | Action Push_String_Extended,0x1cc5 ; "Internet address: " 0ca9 00db | | Load_Top At_Offset_3 0caa 861a | | Call 0x3,0x1a 0cab 01cc | | Execute Vector,Catenate 0cac 8620 | | Call 0x3,0x20 0cad 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cae 0000 0000 | | .XXX[0x2] 0cb0 0000 0000 | | .LITERAL {0x00000000, 0x00100000} 0cb4 0000 0000 | | .BLANK 0000[0x4] 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 ; SUBPROGRAM 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 0cbb | | .CONST 0x0cbb ; Address of begin 0cb9 0cbe | | .CONST 0x0cbe ; Address of exception handler 0cba 0001 | | .CONST 0x0001 ; Number of locals 0cbb BODY_0cb8: 0cbb INIT_0cb8: 0cbb e00c | | Load 0x0,0xc 0cbc 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0cbd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cbe TRAP_0cb8: 0cbe 0007 | | Action Break_Optional 0cbf e010 | | Load 0x0,0x10 0cc0 180e | | Execute Package,Field_Execute,Field_Number 0xe 0cc1 4808 |H | Short_Literal 0x8 0cc2 0092 1cc6 | | Action Push_String_Extended,0x1cc6 ; "Enp_Driver.Configured" 0cc4 e011 | | Load 0x0,0x11 0cc5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cc6 00d8 | | Load_Top At_Offset_0 0cc7 0101 | | Execute Exception,Reraise 0cc8 ; -------------------------------------------------------------------------------------- 0cc8 ; SUBPROGRAM 0cc8 ; -------------------------------------------------------------------------------------- 0cc8 0ccb | | .CONST 0x0ccb ; Address of begin 0cc9 0cce | | .CONST 0x0cce ; Address of exception handler 0cca 0001 | | .CONST 0x0001 ; Number of locals 0ccb BODY_0cc8: 0ccb INIT_0cc8: 0ccb e00d | | Load 0x0,0xd 0ccc 180d | | Execute Package,Field_Execute,Field_Number 0xd 0ccd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cce TRAP_0cc8: 0cce 0007 | | Action Break_Optional 0ccf e010 | | Load 0x0,0x10 0cd0 180e | | Execute Package,Field_Execute,Field_Number 0xe 0cd1 4808 |H | Short_Literal 0x8 0cd2 0092 1cc7 | | Action Push_String_Extended,0x1cc7 ; "Enp_Coupler.Register" 0cd4 e011 | | Load 0x0,0x11 0cd5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cd6 00d8 | | Load_Top At_Offset_0 0cd7 0101 | | Execute Exception,Reraise 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 ; SUBPROGRAM 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 0cdb | | .CONST 0x0cdb ; Address of begin 0cd9 0004 | | .CONST 0x0004 ; Address of exception handler 0cda 0001 | | .CONST 0x0001 ; Number of locals 0cdb BODY_0cd8: 0cdb INIT_0cd8: 0cdb 4801 |H | Short_Literal 0x1 0cdc e603 | | Load 0x3,0x3 0cdd e602 | | Load 0x3,0x2 0cde 01cf | | Execute Vector,Slice_Read 0cdf e006 | | Load 0x0,0x6 0ce0 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0ce1 4800 |H | Short_Literal 0x0 0ce2 a603 | | Store_Unchecked 0x3,0x3 0ce3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ce4 0000 0000 | | .BLANK 0000[0x4] 0ce8 ; -------------------------------------------------------------------------------------- 0ce8 ; SUBPROGRAM 0ce8 ; -------------------------------------------------------------------------------------- 0ce8 0ceb | | .CONST 0x0ceb ; Address of begin 0ce9 0004 | | .CONST 0x0004 ; Address of exception handler 0cea 0001 | | .CONST 0x0001 ; Number of locals 0ceb BODY_0ce8: 0ceb INIT_0ce8: 0ceb 00da | | Load_Top At_Offset_2 0cec 4820 |H | Short_Literal 0x20 0ced 487e |H~ | Short_Literal 0x7e 0cee 0262 | b | Execute Discrete,In_Range 0cef 680c |h | Jump_Zero 0xcfc 0cf0 e603 | | Load 0x3,0x3 0cf1 0a01 | | Execute_Immediate Plus,0x1 0cf2 c603 | | Store 0x3,0x3 0cf3 00da | | Load_Top At_Offset_2 0cf4 e603 | | Load 0x3,0x3 0cf5 e602 | | Load 0x3,0x2 0cf6 01d6 | | Execute Vector,Field_Write 0cf7 e603 | | Load 0x3,0x3 0cf8 0f50 | P | Execute_Immediate Equal,0x50 0cf9 6801 |h | Jump_Zero 0xcfb 0cfa 8608 | | Call 0x3,0x8 0cfb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0cfc 482e |H. | Short_Literal 0x2e 0cfd 8609 | | Call 0x3,0x9 0cfe 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0cff 0000 | | .XXX[0x1] 0d00 ; -------------------------------------------------------------------------------------- 0d00 ; SUBPROGRAM 0d00 ; -------------------------------------------------------------------------------------- 0d00 0d05 | | .CONST 0x0d05 ; Address of begin 0d01 0004 | | .CONST 0x0004 ; Address of exception handler 0d02 0002 | | .CONST 0x0002 ; Number of locals 0d03 INIT_0d00: 0d03 029f 12ab | | Declare_Subprogram INIT_12a8,For_Call 0d05 BODY_0d00: 0d05 e605 | | Load 0x3,0x5 0d06 0c01 | | Execute_Immediate Greater_Equal,0x1 0d07 6824 |h$ | Jump_Zero 0xd2c 0d08 00cf | | Action Mark_Auxiliary 0d09 e605 | | Load 0x3,0x5 0d0a 4801 |H | Short_Literal 0x1 0d0b 0263 | c | Execute Discrete,Above_Bound 0d0c 7006 |p | Jump_Nonzero 0xd13 0d0d 00d8 | | Load_Top At_Offset_0 0d0e e604 | | Load 0x3,0x4 0d0f 01d7 | | Execute Vector,Field_Read 0d10 8802 | | Call 0x4,0x2 0d11 00c8 | | Action Pop_Auxiliary_Range 0d12 3ffa |? | Loop_Increasing 0xd0d 0d13 00ce | | Action Pop_Auxiliary 0d14 4820 |H | Short_Literal 0x20 0d15 8609 | | Call 0x3,0x9 0d16 4820 |H | Short_Literal 0x20 0d17 8609 | | Call 0x3,0x9 0d18 00cf | | Action Mark_Auxiliary 0d19 e605 | | Load 0x3,0x5 0d1a 4801 |H | Short_Literal 0x1 0d1b 0263 | c | Execute Discrete,Above_Bound 0d1c 700d |p | Jump_Nonzero 0xd2a 0d1d 00d8 | | Load_Top At_Offset_0 0d1e e604 | | Load 0x3,0x4 0d1f 01d7 | | Execute Vector,Field_Read 0d20 487f |H | Short_Literal 0x7f 0d21 0279 | y | Execute Discrete,And 0d22 00d8 | | Load_Top At_Offset_0 0d23 00e8 | | Load_Encached Character_Cache 0d24 0260 | ` | Execute Discrete,In_Type 0d25 7001 |p | Jump_Nonzero 0xd27 0d26 0801 | | Execute_Immediate Raise,0x1 0d27 8609 | | Call 0x3,0x9 0d28 00c8 | | Action Pop_Auxiliary_Range 0d29 3ff3 |? | Loop_Increasing 0xd1d 0d2a 00ce | | Action Pop_Auxiliary 0d2b 8608 | | Call 0x3,0x8 0d2c 4800 |H | Short_Literal 0x0 0d2d a605 | | Store_Unchecked 0x3,0x5 0d2e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0d2f 0000 | | .XXX[0x1] 0d30 ; -------------------------------------------------------------------------------------- 0d30 ; SUBPROGRAM 0d30 ; -------------------------------------------------------------------------------------- 0d30 0d33 | 3 | .CONST 0x0d33 ; Address of begin 0d31 0004 | | .CONST 0x0004 ; Address of exception handler 0d32 0001 | | .CONST 0x0001 ; Number of locals 0d33 BODY_0d30: 0d33 INIT_0d30: 0d33 e605 | | Load 0x3,0x5 0d34 0a01 | | Execute_Immediate Plus,0x1 0d35 c605 | | Store 0x3,0x5 0d36 00da | | Load_Top At_Offset_2 0d37 e605 | | Load 0x3,0x5 0d38 e604 | | Load 0x3,0x4 0d39 01d6 | | Execute Vector,Field_Write 0d3a e605 | | Load 0x3,0x5 0d3b 0f10 | | Execute_Immediate Equal,0x10 0d3c 6801 |h | Jump_Zero 0xd3e 0d3d 860a | | Call 0x3,0xa 0d3e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d3f 0000 | | .XXX[0x1] 0d40 ; -------------------------------------------------------------------------------------- 0d40 ; SUBPROGRAM 0d40 ; -------------------------------------------------------------------------------------- 0d40 0d45 | E | .CONST 0x0d45 ; Address of begin 0d41 0004 | | .CONST 0x0004 ; Address of exception handler 0d42 0002 | | .CONST 0x0002 ; Number of locals 0d43 INIT_0d40: 0d43 00e3 | | Load_Encached Natural_Cache 0d44 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d45 BODY_0d40: 0d45 00cf | | Action Mark_Auxiliary 0d46 781a |x | Jump 0xd61 0d47 e603 | | Load 0x3,0x3 0d48 00da | | Load_Top At_Offset_2 0d49 0a01 | | Execute_Immediate Plus,0x1 0d4a 00d8 | | Load_Top At_Offset_0 0d4b 00e2 | | Load_Encached Integer_Cache 0d4c 0260 | ` | Execute Discrete,In_Type 0d4d 7001 |p | Jump_Nonzero 0xd4f 0d4e 0801 | | Execute_Immediate Raise,0x1 0d4f 4808 |H | Short_Literal 0x8 0d50 00da | | Load_Top At_Offset_2 0d51 035b | [ | Declare_Type Array,Constrained 0d52 00d0 | | Action Swap_Control 0d53 01cd | | Execute Vector,Slice_Reference 0d54 00e3 | | Load_Encached Natural_Cache 0d55 00d9 | | Load_Top At_Offset_1 0d56 e602 | | Load 0x3,0x2 0d57 e012 | | Load 0x0,0x12 0d58 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0d59 00d1 | | Pop_Control Pop_Count_1 0d5a c604 | | Store 0x3,0x4 0d5b 00d1 | | Pop_Control Pop_Count_1 0d5c 00d9 | | Load_Top At_Offset_1 0d5d e604 | | Load 0x3,0x4 0d5e 0273 | s | Execute Discrete,Plus 0d5f 005a | Z | Store_Top Discrete,At_Offset_2 0d60 00c9 | | Action Pop_Auxiliary_Loop 0d61 00d9 | | Load_Top At_Offset_1 0d62 0d08 | | Execute_Immediate Less,0x8 0d63 77e3 |w | Jump_Nonzero 0xd47 0d64 00ce | | Action Pop_Auxiliary 0d65 e7fe | | Load 0x3,-0x2 0d66 6809 |h | Jump_Zero 0xd70 0d67 4800 |H | Short_Literal 0x0 0d68 4807 |H | Short_Literal 0x7 0d69 e603 | | Load 0x3,0x3 0d6a 01d6 | | Execute Vector,Field_Write 0d6b 4805 |H | Short_Literal 0x5 0d6c 4808 |H | Short_Literal 0x8 0d6d e603 | | Load 0x3,0x3 0d6e 01d6 | | Execute Vector,Field_Write 0d6f 7808 |x | Jump 0xd78 0d70 4800 |H | Short_Literal 0x0 0d71 4807 |H | Short_Literal 0x7 0d72 e603 | | Load 0x3,0x3 0d73 01d6 | | Execute Vector,Field_Write 0d74 4800 |H | Short_Literal 0x0 0d75 4808 |H | Short_Literal 0x8 0d76 e603 | | Load 0x3,0x3 0d77 01d6 | | Execute Vector,Field_Write 0d78 4802 |H | Short_Literal 0x2 0d79 0092 1c92 | | Action Push_String_Extended,0x1c92 ; "Downloading" 0d7b 00da | | Load_Top At_Offset_2 0d7c 00e0 | | Load_Encached Standard_Cache 0d7d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d7e 01cc | | Execute Vector,Catenate 0d7f 0092 1cc8 | | Action Push_String_Extended,0x1cc8 ; " option bytes to address" 0d81 01cc | | Execute Vector,Catenate 0d82 e9ff | | Load 0x4,-0x1 0d83 00e0 | | Load_Encached Standard_Cache 0d84 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d85 01cc | | Execute Vector,Catenate 0d86 840a | | Call 0x2,0xa 0d87 e7fd | | Load 0x3,-0x3 0d88 6806 |h | Jump_Zero 0xd8f 0d89 4801 |H | Short_Literal 0x1 0d8a 00d9 | | Load_Top At_Offset_1 0d8b e603 | | Load 0x3,0x3 0d8c 01cf | | Execute Vector,Slice_Read 0d8d 840b | | Call 0x2,0xb 0d8e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d8f 4801 |H | Short_Literal 0x1 0d90 00d9 | | Load_Top At_Offset_1 0d91 e603 | | Load 0x3,0x3 0d92 01cf | | Execute Vector,Slice_Read 0d93 e9ff | | Load 0x4,-0x1 0d94 e003 | | Load 0x0,0x3 0d95 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0d96 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d97 0000 | | .XXX[0x1] 0d98 ; -------------------------------------------------------------------------------------- 0d98 ; SUBPROGRAM 0d98 ; -------------------------------------------------------------------------------------- 0d98 0d9b | | .CONST 0x0d9b ; Address of begin 0d99 0dad | | .CONST 0x0dad ; Address of exception handler 0d9a 0001 | | .CONST 0x0001 ; Number of locals 0d9b BODY_0d98: 0d9b INIT_0d98: 0d9b 4802 |H | Short_Literal 0x2 0d9c 0092 1cc9 | | Action Push_String_Extended,0x1cc9 ; "Tcp_Ip_Boot.Load_3_1 caught Io_Exceptions.Name_Error." 0d9e 840a | | Call 0x2,0xa 0d9f 4802 |H | Short_Literal 0x2 0da0 0092 1cca | | Action Push_String_Extended,0x1cca ; "Does the file \x22" 0da2 e7ff | | Load 0x3,-0x1 0da3 01cc | | Execute Vector,Catenate 0da4 0092 1ccb | | Action Push_String_Extended,0x1ccb ; "\x22 exist?" 0da6 01cc | | Execute Vector,Catenate 0da7 840a | | Call 0x2,0xa 0da8 e602 | | Load 0x3,0x2 0da9 e012 | | Load 0x0,0x12 0daa 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0dab c602 | | Store 0x3,0x2 0dac 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0dad TRAP_0d98: 0dad 0007 | | Action Break_Optional 0dae 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0daf 0000 | | .XXX[0x1] 0db0 ; -------------------------------------------------------------------------------------- 0db0 ; SUBPROGRAM 0db0 ; -------------------------------------------------------------------------------------- 0db0 0db3 | | .CONST 0x0db3 ; Address of begin 0db1 0dbc | | .CONST 0x0dbc ; Address of exception handler 0db2 0001 | | .CONST 0x0001 ; Number of locals 0db3 BODY_0db0: 0db3 INIT_0db0: 0db3 4808 |H | Short_Literal 0x8 0db4 0092 1ccc | | Action Push_String_Extended,0x1ccc ; "Tcp_Ip_Boot.Load_3_1 caught an unexpected exception." 0db6 840a | | Call 0x2,0xa 0db7 e602 | | Load 0x3,0x2 0db8 e012 | | Load 0x0,0x12 0db9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0dba c602 | | Store 0x3,0x2 0dbb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0dbc TRAP_0db0: 0dbc 0007 | | Action Break_Optional 0dbd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0dbe 0000 0000 | | .XXX[0x2] 0dc0 ; -------------------------------------------------------------------------------------- 0dc0 ; SUBPROGRAM 0dc0 ; -------------------------------------------------------------------------------------- 0dc0 0dca | | .CONST 0x0dca ; Address of begin 0dc1 0004 | | .CONST 0x0004 ; Address of exception handler 0dc2 0003 | | .CONST 0x0003 ; Number of locals 0dc3 INIT_0dc0: 0dc3 4801 |H | Short_Literal 0x1 0dc4 4802 |H | Short_Literal 0x2 0dc5 e001 | | Load 0x0,0x1 0dc6 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0dc7 035b | [ | Declare_Type Array,Constrained 0dc8 0337 | 7 | Declare_Variable Array 0dc9 00e3 | | Load_Encached Natural_Cache 0dca BODY_0dc0: 0dca 00e3 | | Load_Encached Natural_Cache 0dcb 00da | | Load_Top At_Offset_2 0dcc e602 | | Load 0x3,0x2 0dcd e012 | | Load 0x0,0x12 0dce 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0dcf 00d1 | | Pop_Control Pop_Count_1 0dd0 0059 | Y | Store_Top Discrete,At_Offset_1 0dd1 00d8 | | Load_Top At_Offset_0 0dd2 0e02 | | Execute_Immediate Not_Equal,0x2 0dd3 6801 |h | Jump_Zero 0xdd5 0dd4 08e0 | | Execute_Immediate Raise,0xe0 0dd5 e9ff | | Load 0x4,-0x1 0dd6 680a |h | Jump_Zero 0xde1 0dd7 4802 |H | Short_Literal 0x2 0dd8 00da | | Load_Top At_Offset_2 0dd9 01d7 | | Execute Vector,Field_Read 0dda 0908 | | Execute_Immediate Binary_Scale,0x8 0ddb 4801 |H | Short_Literal 0x1 0ddc 00db | | Load_Top At_Offset_3 0ddd 01d7 | | Execute Vector,Field_Read 0dde 0273 | s | Execute Discrete,Plus 0ddf c9fe | | Store 0x4,-0x2 0de0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0de1 4801 |H | Short_Literal 0x1 0de2 00da | | Load_Top At_Offset_2 0de3 01d7 | | Execute Vector,Field_Read 0de4 0908 | | Execute_Immediate Binary_Scale,0x8 0de5 4802 |H | Short_Literal 0x2 0de6 00db | | Load_Top At_Offset_3 0de7 01d7 | | Execute Vector,Field_Read 0de8 0273 | s | Execute Discrete,Plus 0de9 c9fe | | Store 0x4,-0x2 0dea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0deb 0000 0000 | | .BLANK 0000[0x5] 0df0 ; -------------------------------------------------------------------------------------- 0df0 ; SUBPROGRAM 0df0 ; -------------------------------------------------------------------------------------- 0df0 0dfb | | .CONST 0x0dfb ; Address of begin 0df1 0004 | | .CONST 0x0004 ; Address of exception handler 0df2 0003 | | .CONST 0x0003 ; Number of locals 0df3 INIT_0df0: 0df3 00e3 | | Load_Encached Natural_Cache 0df4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0df5 4801 |H | Short_Literal 0x1 0df6 4815 |H | Short_Literal 0x15 0df7 e001 | | Load 0x0,0x1 0df8 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0df9 035b | [ | Declare_Type Array,Constrained 0dfa 0337 | 7 | Declare_Variable Array 0dfb BODY_0df0: 0dfb 00cf | | Action Mark_Auxiliary 0dfc 781a |x | Jump 0xe17 0dfd 00d9 | | Load_Top At_Offset_1 0dfe 00db | | Load_Top At_Offset_3 0dff 0a01 | | Execute_Immediate Plus,0x1 0e00 00d8 | | Load_Top At_Offset_0 0e01 00e2 | | Load_Encached Integer_Cache 0e02 0260 | ` | Execute Discrete,In_Type 0e03 7001 |p | Jump_Nonzero 0xe05 0e04 0801 | | Execute_Immediate Raise,0x1 0e05 4815 |H | Short_Literal 0x15 0e06 00da | | Load_Top At_Offset_2 0e07 035b | [ | Declare_Type Array,Constrained 0e08 00d0 | | Action Swap_Control 0e09 01cd | | Execute Vector,Slice_Reference 0e0a 00e3 | | Load_Encached Natural_Cache 0e0b 00d9 | | Load_Top At_Offset_1 0e0c e602 | | Load 0x3,0x2 0e0d e012 | | Load 0x0,0x12 0e0e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0e0f 00d1 | | Pop_Control Pop_Count_1 0e10 c604 | | Store 0x3,0x4 0e11 00d1 | | Pop_Control Pop_Count_1 0e12 00da | | Load_Top At_Offset_2 0e13 e604 | | Load 0x3,0x4 0e14 0273 | s | Execute Discrete,Plus 0e15 005b | [ | Store_Top Discrete,At_Offset_3 0e16 00c9 | | Action Pop_Auxiliary_Loop 0e17 00da | | Load_Top At_Offset_2 0e18 0d15 | | Execute_Immediate Less,0x15 0e19 77e3 |w | Jump_Nonzero 0xdfd 0e1a 00ce | | Action Pop_Auxiliary 0e1b e7fb | | Load 0x3,-0x5 0e1c 6805 |h | Jump_Zero 0xe22 0e1d 4801 |H | Short_Literal 0x1 0e1e 4801 |H | Short_Literal 0x1 0e1f 00da | | Load_Top At_Offset_2 0e20 01d6 | | Execute Vector,Field_Write 0e21 7804 |x | Jump 0xe26 0e22 4800 |H | Short_Literal 0x0 0e23 4801 |H | Short_Literal 0x1 0e24 00da | | Load_Top At_Offset_2 0e25 01d6 | | Execute Vector,Field_Write 0e26 e7f9 | | Load 0x3,-0x7 0e27 6805 |h | Jump_Zero 0xe2d 0e28 4801 |H | Short_Literal 0x1 0e29 4802 |H | Short_Literal 0x2 0e2a 00da | | Load_Top At_Offset_2 0e2b 01d6 | | Execute Vector,Field_Write 0e2c 7804 |x | Jump 0xe31 0e2d 4800 |H | Short_Literal 0x0 0e2e 4802 |H | Short_Literal 0x2 0e2f 00da | | Load_Top At_Offset_2 0e30 01d6 | | Execute Vector,Field_Write 0e31 4800 |H | Short_Literal 0x0 0e32 4804 |H | Short_Literal 0x4 0e33 00da | | Load_Top At_Offset_2 0e34 01d6 | | Execute Vector,Field_Write 0e35 e7fd | | Load 0x3,-0x3 0e36 4805 |H | Short_Literal 0x5 0e37 4808 |H | Short_Literal 0x8 0e38 00db | | Load_Top At_Offset_3 0e39 01ce | | Execute Vector,Slice_Write 0e3a e403 | | Load 0x2,0x3 0e3b e402 | | Load 0x2,0x2 0e3c 01df | | Execute Vector,Equal 0e3d 6805 |h | Jump_Zero 0xe43 0e3e 4800 |H | Short_Literal 0x0 0e3f 4803 |H | Short_Literal 0x3 0e40 00da | | Load_Top At_Offset_2 0e41 01d6 | | Execute Vector,Field_Write 0e42 7813 |x | Jump 0xe56 0e43 4801 |H | Short_Literal 0x1 0e44 4803 |H | Short_Literal 0x3 0e45 00da | | Load_Top At_Offset_2 0e46 01d6 | | Execute Vector,Field_Write 0e47 e403 | | Load 0x2,0x3 0e48 4809 |H | Short_Literal 0x9 0e49 480e |H | Short_Literal 0xe 0e4a 00db | | Load_Top At_Offset_3 0e4b 01ce | | Execute Vector,Slice_Write 0e4c e7f8 | | Load 0x3,-0x8 0e4d 7008 |p | Jump_Nonzero 0xe56 0e4e e403 | | Load 0x2,0x3 0e4f e003 | | Load 0x0,0x3 0e50 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 0e51 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e52 01c7 | | Execute Vector,Convert 0e53 e003 | | Load 0x0,0x3 0e54 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0e55 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e56 e7fa | | Load 0x3,-0x6 0e57 6805 |h | Jump_Zero 0xe5d 0e58 4801 |H | Short_Literal 0x1 0e59 4811 |H | Short_Literal 0x11 0e5a 00da | | Load_Top At_Offset_2 0e5b 01d6 | | Execute Vector,Field_Write 0e5c 7804 |x | Jump 0xe61 0e5d 4800 |H | Short_Literal 0x0 0e5e 4811 |H | Short_Literal 0x11 0e5f 00da | | Load_Top At_Offset_2 0e60 01d6 | | Execute Vector,Field_Write 0e61 4802 |H | Short_Literal 0x2 0e62 0092 1c92 | | Action Push_String_Extended,0x1c92 ; "Downloading" 0e64 00db | | Load_Top At_Offset_3 0e65 00e0 | | Load_Encached Standard_Cache 0e66 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e67 01cc | | Execute Vector,Catenate 0e68 0092 1cc8 | | Action Push_String_Extended,0x1cc8 ; " option bytes to address" 0e6a 01cc | | Execute Vector,Catenate 0e6b e9ff | | Load 0x4,-0x1 0e6c 00e0 | | Load_Encached Standard_Cache 0e6d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e6e 01cc | | Execute Vector,Catenate 0e6f 840a | | Call 0x2,0xa 0e70 e7f8 | | Load 0x3,-0x8 0e71 6806 |h | Jump_Zero 0xe78 0e72 4801 |H | Short_Literal 0x1 0e73 00da | | Load_Top At_Offset_2 0e74 00da | | Load_Top At_Offset_2 0e75 01cf | | Execute Vector,Slice_Read 0e76 840b | | Call 0x2,0xb 0e77 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e78 4801 |H | Short_Literal 0x1 0e79 00da | | Load_Top At_Offset_2 0e7a 00da | | Load_Top At_Offset_2 0e7b 01cf | | Execute Vector,Slice_Read 0e7c e9ff | | Load 0x4,-0x1 0e7d e003 | | Load 0x0,0x3 0e7e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0e7f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e80 ; -------------------------------------------------------------------------------------- 0e80 ; SUBPROGRAM 0e80 ; -------------------------------------------------------------------------------------- 0e80 0e83 | | .CONST 0x0e83 ; Address of begin 0e81 0e95 | | .CONST 0x0e95 ; Address of exception handler 0e82 0001 | | .CONST 0x0001 ; Number of locals 0e83 BODY_0e80: 0e83 INIT_0e80: 0e83 4802 |H | Short_Literal 0x2 0e84 0092 1ccd | | Action Push_String_Extended,0x1ccd ; "Tcp_Ip_Boot.Load_3_2 caught Io_Exceptions.Name_Error." 0e86 840a | | Call 0x2,0xa 0e87 4802 |H | Short_Literal 0x2 0e88 0092 1cca | | Action Push_String_Extended,0x1cca ; "Does the file \x22" 0e8a e7ff | | Load 0x3,-0x1 0e8b 01cc | | Execute Vector,Catenate 0e8c 0092 1ccb | | Action Push_String_Extended,0x1ccb ; "\x22 exist?" 0e8e 01cc | | Execute Vector,Catenate 0e8f 840a | | Call 0x2,0xa 0e90 e602 | | Load 0x3,0x2 0e91 e012 | | Load 0x0,0x12 0e92 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0e93 c602 | | Store 0x3,0x2 0e94 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e95 TRAP_0e80: 0e95 0007 | | Action Break_Optional 0e96 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e97 0000 | | .XXX[0x1] 0e98 ; -------------------------------------------------------------------------------------- 0e98 ; SUBPROGRAM 0e98 ; -------------------------------------------------------------------------------------- 0e98 0e9b | | .CONST 0x0e9b ; Address of begin 0e99 0ea4 | | .CONST 0x0ea4 ; Address of exception handler 0e9a 0001 | | .CONST 0x0001 ; Number of locals 0e9b BODY_0e98: 0e9b INIT_0e98: 0e9b 4808 |H | Short_Literal 0x8 0e9c 0092 1cce | | Action Push_String_Extended,0x1cce ; "Tcp_Ip_Boot.Load_3_2 caught an unexpected exception." 0e9e 840a | | Call 0x2,0xa 0e9f e602 | | Load 0x3,0x2 0ea0 e012 | | Load 0x0,0x12 0ea1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0ea2 c602 | | Store 0x3,0x2 0ea3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ea4 TRAP_0e98: 0ea4 0007 | | Action Break_Optional 0ea5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ea6 0000 0000 | | .XXX[0x2] 0ea8 ; -------------------------------------------------------------------------------------- 0ea8 ; SUBPROGRAM 0ea8 ; -------------------------------------------------------------------------------------- 0ea8 0eab | | .CONST 0x0eab ; Address of begin 0ea9 0eb3 | | .CONST 0x0eb3 ; Address of exception handler 0eaa 0001 | | .CONST 0x0001 ; Number of locals 0eab BODY_0ea8: 0eab INIT_0ea8: 0eab e40e | | Load 0x2,0xe 0eac 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ead 4800 |H | Short_Literal 0x0 0eae e7ff | | Load 0x3,-0x1 0eaf e40e | | Load 0x2,0xe 0eb0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0eb1 c602 | | Store 0x3,0x2 0eb2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0eb3 TRAP_0ea8: 0eb3 0007 | | Action Break_Optional 0eb4 e404 | | Load 0x2,0x4 0eb5 a602 | | Store_Unchecked 0x3,0x2 0eb6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0eb7 0000 | | .XXX[0x1] 0eb8 ; -------------------------------------------------------------------------------------- 0eb8 ; SUBPROGRAM 0eb8 ; -------------------------------------------------------------------------------------- 0eb8 0ebe | | .CONST 0x0ebe ; Address of begin 0eb9 0004 | | .CONST 0x0004 ; Address of exception handler 0eba 0002 | | .CONST 0x0002 ; Number of locals 0ebb INIT_0eb8: 0ebb e7ff | | Load 0x3,-0x1 0ebc e006 | | Load 0x0,0x6 0ebd 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0ebe BODY_0eb8: 0ebe 4807 |H | Short_Literal 0x7 0ebf 0092 1ccf | | Action Push_String_Extended,0x1ccf ; "In " 0ec1 00da | | Load_Top At_Offset_2 0ec2 01cc | | Execute Vector,Catenate 0ec3 0092 1cd0 | | Action Push_String_Extended,0x1cd0 ; ":" 0ec5 01cc | | Execute Vector,Catenate 0ec6 e602 | | Load 0x3,0x2 0ec7 00e0 | | Load_Encached Standard_Cache 0ec8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ec9 01cc | | Execute Vector,Catenate 0eca 0092 1cd1 | | Action Push_String_Extended,0x1cd1 ; " /= Machine.Get_Id." 0ecc 01cc | | Execute Vector,Catenate 0ecd 840a | | Call 0x2,0xa 0ece 4802 |H | Short_Literal 0x2 0ecf 0092 1cd2 | | Action Push_String_Extended,0x1cd2 ; "Was " 0ed1 00da | | Load_Top At_Offset_2 0ed2 01cc | | Execute Vector,Catenate 0ed3 0092 1cd3 | | Action Push_String_Extended,0x1cd3 ; " copied from another machine?" 0ed5 01cc | | Execute Vector,Catenate 0ed6 840a | | Call 0x2,0xa 0ed7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ed8 ; -------------------------------------------------------------------------------------- 0ed8 ; SUBPROGRAM 0ed8 ; -------------------------------------------------------------------------------------- 0ed8 0ede | | .CONST 0x0ede ; Address of begin 0ed9 0004 | | .CONST 0x0004 ; Address of exception handler 0eda 0002 | | .CONST 0x0002 ; Number of locals 0edb INIT_0ed8: 0edb e602 | | Load 0x3,0x2 0edc e007 | | Load 0x0,0x7 0edd 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0ede BODY_0ed8: 0ede e602 | | Load 0x3,0x2 0edf 8413 | | Call 0x2,0x13 0ee0 c602 | | Store 0x3,0x2 0ee1 e602 | | Load 0x3,0x2 0ee2 840d | | Call 0x2,0xd 0ee3 c602 | | Store 0x3,0x2 0ee4 00d8 | | Load_Top At_Offset_0 0ee5 00cb | | Action Pop_Block_With_Result 0ee6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ee7 0000 | | .XXX[0x1] 0ee8 ; -------------------------------------------------------------------------------------- 0ee8 ; SUBPROGRAM 0ee8 ; -------------------------------------------------------------------------------------- 0ee8 0ef4 | | .CONST 0x0ef4 ; Address of begin 0ee9 0004 | | .CONST 0x0004 ; Address of exception handler 0eea 0002 | | .CONST 0x0002 ; Number of locals 0eeb INIT_0ee8: 0eeb 00da | | Load_Top At_Offset_2 0eec 01da | | Execute Vector,Bounds 0eed e017 | | Load 0x0,0x17 0eee 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0eef 035b | [ | Declare_Type Array,Constrained 0ef0 0337 | 7 | Declare_Variable Array 0ef1 00db | | Load_Top At_Offset_3 0ef2 00d9 | | Load_Top At_Offset_1 0ef3 01d4 | | Execute Vector,Structure_Write 0ef4 BODY_0ee8: 0ef4 00d8 | | Load_Top At_Offset_0 0ef5 01db | | Execute Vector,Length 0ef6 0c01 | | Execute_Immediate Greater_Equal,0x1 0ef7 6811 |h | Jump_Zero 0xf09 0ef8 00d8 | | Load_Top At_Offset_0 0ef9 01dc | | Execute Vector,Last 0efa 00d9 | | Load_Top At_Offset_1 0efb 01d7 | | Execute Vector,Field_Read 0efc 0a01 | | Execute_Immediate Plus,0x1 0efd 48ff |H | Short_Literal 0xff 0efe 0279 | y | Execute Discrete,And 0eff 00d8 | | Load_Top At_Offset_0 0f00 e001 | | Load 0x0,0x1 0f01 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0f02 0260 | ` | Execute Discrete,In_Type 0f03 7001 |p | Jump_Nonzero 0xf05 0f04 0801 | | Execute_Immediate Raise,0x1 0f05 00d9 | | Load_Top At_Offset_1 0f06 01dc | | Execute Vector,Last 0f07 00da | | Load_Top At_Offset_2 0f08 01d6 | | Execute Vector,Field_Write 0f09 00d8 | | Load_Top At_Offset_0 0f0a e017 | | Load 0x0,0x17 0f0b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0f0c 01c6 | | Execute Vector,Convert_To_Formal 0f0d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f0e 0000 0000 | | .XXX[0x2] 0f10 ; -------------------------------------------------------------------------------------- 0f10 ; SUBPROGRAM 0f10 ; -------------------------------------------------------------------------------------- 0f10 0f13 | | .CONST 0x0f13 ; Address of begin 0f11 0004 | | .CONST 0x0004 ; Address of exception handler 0f12 0001 | | .CONST 0x0001 ; Number of locals 0f13 BODY_0f10: 0f13 INIT_0f10: 0f13 e9fe | | Load 0x4,-0x2 0f14 e01d | | Load 0x0,0x1d 0f15 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f16 4603 |F | Jump_Case 0x4 0f17 780a |x | Jump 0xf22 ; case 0x0 0f18 7810 |x | Jump 0xf29 ; case 0x1 0f19 7801 |x | Jump 0xf1b ; case 0x2 0f1a 7800 |x | Jump 0xf1b ; case 0x3 0f1b 4807 |H | Short_Literal 0x7 0f1c 0092 1cd4 | | Action Push_String_Extended,0x1cd4 ; "CMC " 0f1e ebff | | Load 0x5,-0x1 0f1f 01cc | | Execute Vector,Catenate 0f20 840a | | Call 0x2,0xa 0f21 780d |x | Jump 0xf2f 0f22 4802 |H | Short_Literal 0x2 0f23 0092 1cd4 | | Action Push_String_Extended,0x1cd4 ; "CMC " 0f25 ebff | | Load 0x5,-0x1 0f26 01cc | | Execute Vector,Catenate 0f27 840a | | Call 0x2,0xa 0f28 7806 |x | Jump 0xf2f 0f29 4806 |H | Short_Literal 0x6 0f2a 0092 1cd4 | | Action Push_String_Extended,0x1cd4 ; "CMC " 0f2c ebff | | Load 0x5,-0x1 0f2d 01cc | | Execute Vector,Catenate 0f2e 840a | | Call 0x2,0xa 0f2f e5f9 | | Load 0x2,-0x7 0f30 7007 |p | Jump_Nonzero 0xf38 0f31 00da | | Load_Top At_Offset_2 0f32 e9fe | | Load 0x4,-0x2 0f33 483a |H: | Short_Literal 0x3a 0f34 e604 | | Load 0x3,0x4 0f35 01cb | | Execute Vector,Append 0f36 e00a | | Load 0x0,0xa 0f37 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0f38 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f39 0000 0000 | | .BLANK 0000[0x7] 0f40 ; -------------------------------------------------------------------------------------- 0f40 ; SUBPROGRAM 0f40 ; -------------------------------------------------------------------------------------- 0f40 0f45 | E | .CONST 0x0f45 ; Address of begin 0f41 0004 | | .CONST 0x0004 ; Address of exception handler 0f42 0002 | | .CONST 0x0002 ; Number of locals 0f43 INIT_0f40: 0f43 029f 12c3 | | Declare_Subprogram INIT_12c0,For_Call 0f45 BODY_0f40: 0f45 00db | | Load_Top At_Offset_3 0f46 4607 |F | Jump_Case 0x8 0f47 7814 |x | Jump 0xf5c ; case 0x0 0f48 7808 |x | Jump 0xf51 ; case 0x1 0f49 7807 |x | Jump 0xf51 ; case 0x2 0f4a 7806 |x | Jump 0xf51 ; case 0x3 0f4b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x4 0f4c 7802 |x | Jump 0xf4f ; case 0x5 0f4d 7801 |x | Jump 0xf4f ; case 0x6 0f4e 7800 |x | Jump 0xf4f ; case 0x7 0f4f 8a02 | | Call 0x5,0x2 0f50 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f51 ebfd | | Load 0x5,-0x3 0f52 ebfe | | Load 0x5,-0x2 0f53 861f | | Call 0x3,0x1f 0f54 e60b | | Load 0x3,0xb 0f55 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0f56 e804 | | Load 0x4,0x4 0f57 ebfd | | Load 0x5,-0x3 0f58 01db | | Execute Vector,Length 0f59 0273 | s | Execute Discrete,Plus 0f5a c804 | | Store 0x4,0x4 0f5b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f5c 4802 |H | Short_Literal 0x2 0f5d e802 | | Load 0x4,0x2 0f5e 0092 1cd5 | | Action Push_String_Extended,0x1cd5 ; ": " 0f60 01cc | | Execute Vector,Catenate 0f61 ebfd | | Load 0x5,-0x3 0f62 861e | | Call 0x3,0x1e 0f63 01cc | | Execute Vector,Catenate 0f64 840a | | Call 0x2,0xa 0f65 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f66 0000 0000 | | .XXX[0x2] 0f68 ; -------------------------------------------------------------------------------------- 0f68 ; SUBPROGRAM 0f68 ; -------------------------------------------------------------------------------------- 0f68 0f6b | k | .CONST 0x0f6b ; Address of begin 0f69 0004 | | .CONST 0x0004 ; Address of exception handler 0f6a 0001 | | .CONST 0x0001 ; Number of locals 0f6b BODY_0f68: 0f6b INIT_0f68: 0f6b 4807 |H | Short_Literal 0x7 0f6c 0092 1cd6 | | Action Push_String_Extended,0x1cd6 ; "in " 0f6e e802 | | Load 0x4,0x2 0f6f 01cc | | Execute Vector,Catenate 0f70 0092 1cd5 | | Action Push_String_Extended,0x1cd5 ; ": " 0f72 01cc | | Execute Vector,Catenate 0f73 ebff | | Load 0x5,-0x1 0f74 01cc | | Execute Vector,Catenate 0f75 840a | | Call 0x2,0xa 0f76 e803 | | Load 0x4,0x3 0f77 e019 | | Load 0x0,0x19 0f78 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0f79 c803 | | Store 0x4,0x3 0f7a 4960 |I` | Short_Literal 0x160 0f7b 0257 | W | Execute Discrete,Raise 0f7c 0000 0000 | | .BLANK 0000[0x4] 0f80 ; -------------------------------------------------------------------------------------- 0f80 ; SUBPROGRAM 0f80 ; -------------------------------------------------------------------------------------- 0f80 0f83 | | .CONST 0x0f83 ; Address of begin 0f81 0004 | | .CONST 0x0004 ; Address of exception handler 0f82 0001 | | .CONST 0x0001 ; Number of locals 0f83 BODY_0f80: 0f83 INIT_0f80: 0f83 4806 |H | Short_Literal 0x6 0f84 0092 1cd6 | | Action Push_String_Extended,0x1cd6 ; "in " 0f86 e802 | | Load 0x4,0x2 0f87 01cc | | Execute Vector,Catenate 0f88 0092 1cd5 | | Action Push_String_Extended,0x1cd5 ; ": " 0f8a 01cc | | Execute Vector,Catenate 0f8b ebff | | Load 0x5,-0x1 0f8c 01cc | | Execute Vector,Catenate 0f8d 840a | | Call 0x2,0xa 0f8e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f8f 0000 | | .XXX[0x1] 0f90 ; -------------------------------------------------------------------------------------- 0f90 ; SUBPROGRAM 0f90 ; -------------------------------------------------------------------------------------- 0f90 0f99 | | .CONST 0x0f99 ; Address of begin 0f91 0fae | | .CONST 0x0fae ; Address of exception handler 0f92 0002 | | .CONST 0x0002 ; Number of locals 0f93 INIT_0f90: 0f93 e803 | | Load 0x4,0x3 0f94 e016 | | Load 0x0,0x16 0f95 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0f96 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0f97 e017 | | Load 0x0,0x17 0f98 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f99 BODY_0f90: 0f99 00cf | | Action Mark_Auxiliary 0f9a 00d9 | | Load_Top At_Offset_1 0f9b 01da | | Execute Vector,Bounds 0f9c 0264 | d | Execute Discrete,Below_Bound 0f9d 700d |p | Jump_Nonzero 0xfab 0f9e 00d8 | | Load_Top At_Offset_0 0f9f ea02 | | Load 0x5,0x2 0fa0 01d7 | | Execute Vector,Field_Read 0fa1 4804 |H | Short_Literal 0x4 0fa2 ea02 | | Load 0x5,0x2 0fa3 01dc | | Execute Vector,Last 0fa4 00db | | Load_Top At_Offset_3 0fa5 0272 | r | Execute Discrete,Minus 0fa6 0272 | r | Execute Discrete,Minus 0fa7 e804 | | Load 0x4,0x4 0fa8 01d6 | | Execute Vector,Field_Write 0fa9 00c8 | | Action Pop_Auxiliary_Range 0faa 37f3 |7 | Loop_Decreasing 0xf9e 0fab 00cc | | Action Pop_Block 0fac 00a7 08e2 | | Action Jump_Extended,0x8e2 0fae TRAP_0f90: 0fae 0007 | | Action Break_Optional 0faf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fb0 ; -------------------------------------------------------------------------------------- 0fb0 ; SUBPROGRAM 0fb0 ; -------------------------------------------------------------------------------------- 0fb0 0fb3 | | .CONST 0x0fb3 ; Address of begin 0fb1 0004 | | .CONST 0x0004 ; Address of exception handler 0fb2 0001 | | .CONST 0x0001 ; Number of locals 0fb3 BODY_0fb0: 0fb3 INIT_0fb0: 0fb3 e802 | | Load 0x4,0x2 0fb4 00db | | Load_Top At_Offset_3 0fb5 01db | | Execute Vector,Length 0fb6 e00c | | Load 0x0,0xc 0fb7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0fb8 00d9 | | Load_Top At_Offset_1 0fb9 00d0 | | Action Swap_Control 0fba 0260 | ` | Execute Discrete,In_Type 0fbb 7001 |p | Jump_Nonzero 0xfbd 0fbc 0801 | | Execute_Immediate Raise,0x1 0fbd 861d | | Call 0x3,0x1d 0fbe 0272 | r | Execute Discrete,Minus 0fbf c802 | | Store 0x4,0x2 0fc0 00da | | Load_Top At_Offset_2 0fc1 e802 | | Load 0x4,0x2 0fc2 e60b | | Load 0x3,0xb 0fc3 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0fc4 4804 |H | Short_Literal 0x4 0fc5 e60b | | Load 0x3,0xb 0fc6 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0fc7 e802 | | Load 0x4,0x2 0fc8 0273 | s | Execute Discrete,Plus 0fc9 8617 | | Call 0x3,0x17 0fca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0fcb 0000 0000 | | .BLANK 0000[0x5] 0fd0 ; -------------------------------------------------------------------------------------- 0fd0 ; SUBPROGRAM 0fd0 ; -------------------------------------------------------------------------------------- 0fd0 0fe9 | | .CONST 0x0fe9 ; Address of begin 0fd1 0004 | | .CONST 0x0004 ; Address of exception handler 0fd2 0003 | | .CONST 0x0003 ; Number of locals 0fd3 INIT_0fd0: 0fd3 4800 |H | Short_Literal 0x0 0fd4 481b |H | Short_Literal 0x1b 0fd5 e607 | | Load 0x3,0x7 0fd6 035b | [ | Declare_Type Array,Constrained 0fd7 0337 | 7 | Declare_Variable Array 0fd8 00d8 | | Load_Top At_Offset_0 0fd9 0335 | 5 | Declare_Variable Array,Duplicate 0fda 00cd | | Action Spare6_Action 0fdb 481b |H | Short_Literal 0x1b 0fdc 4800 |H | Short_Literal 0x0 0fdd 4800 |H | Short_Literal 0x0 0fde 00d9 | | Load_Top At_Offset_1 0fdf ea03 | | Load 0x5,0x3 0fe0 01d6 | | Execute Vector,Field_Write 0fe1 3ffb |? | Loop_Increasing 0xfdd 0fe2 00d9 | | Load_Top At_Offset_1 0fe3 01d4 | | Execute Vector,Structure_Write 0fe4 e60b | | Load 0x3,0xb 0fe5 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0fe6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0fe7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0fe8 0007 | | Action Break_Optional 0fe9 BODY_0fd0: 0fe9 ebff | | Load 0x5,-0x1 0fea 01db | | Execute Vector,Length 0feb e60b | | Load 0x3,0xb 0fec 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0fed 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0fee 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0fef 027d | } | Execute Discrete,Greater 0ff0 6801 |h | Jump_Zero 0xff2 0ff1 08e0 | | Execute_Immediate Raise,0xe0 0ff2 00cf | | Action Mark_Auxiliary 0ff3 00d9 | | Load_Top At_Offset_1 0ff4 ebff | | Load 0x5,-0x1 0ff5 01db | | Execute Vector,Length 0ff6 0273 | s | Execute Discrete,Plus 0ff7 0aff | | Execute_Immediate Plus,-0x1 0ff8 00d8 | | Load_Top At_Offset_0 0ff9 00e2 | | Load_Encached Integer_Cache 0ffa 0260 | ` | Execute Discrete,In_Type 0ffb 7001 |p | Jump_Nonzero 0xffd 0ffc 0801 | | Execute_Immediate Raise,0x1 0ffd 00da | | Load_Top At_Offset_2 0ffe 0263 | c | Execute Discrete,Above_Bound 0fff 7013 |p | Jump_Nonzero 0x1013 1000 ebff | | Load 0x5,-0x1 1001 01dd | | Execute Vector,First 1002 00d9 | | Load_Top At_Offset_1 1003 0273 | s | Execute Discrete,Plus 1004 ea03 | | Load 0x5,0x3 1005 0272 | r | Execute Discrete,Minus 1006 ebff | | Load 0x5,-0x1 1007 01d7 | | Execute Vector,Field_Read 1008 00d8 | | Load_Top At_Offset_0 1009 e001 | | Load 0x0,0x1 100a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 100b 0260 | ` | Execute Discrete,In_Type 100c 7001 |p | Jump_Nonzero 0x100e 100d 0801 | | Execute_Immediate Raise,0x1 100e 00d9 | | Load_Top At_Offset_1 100f ea02 | | Load 0x5,0x2 1010 01d6 | | Execute Vector,Field_Write 1011 00c8 | | Action Pop_Auxiliary_Range 1012 3fed |? | Loop_Increasing 0x1000 1013 00ce | | Action Pop_Auxiliary 1014 00d9 | | Load_Top At_Offset_1 1015 e001 | | Load 0x0,0x1 1016 1b12 | | Execute Package,Field_Read,Field_Number 0x12 1017 01c6 | | Execute Vector,Convert_To_Formal 1018 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1019 0000 0000 | | .BLANK 0000[0x7] 1020 ; -------------------------------------------------------------------------------------- 1020 ; SUBPROGRAM 1020 ; -------------------------------------------------------------------------------------- 1020 1025 | % | .CONST 0x1025 ; Address of begin 1021 0004 | | .CONST 0x0004 ; Address of exception handler 1022 0002 | | .CONST 0x0002 ; Number of locals 1023 INIT_1020: 1023 029f 12fb | | Declare_Subprogram INIT_12f8,For_Call 1025 BODY_1020: 1025 4800 |H | Short_Literal 0x0 1026 ebff | | Load 0x5,-0x1 1027 01cb | | Execute Vector,Append 1028 8a02 | | Call 0x5,0x2 1029 8806 | | Call 0x4,0x6 102a ebfe | | Load 0x5,-0x2 102b 8806 | | Call 0x4,0x6 102c 01cc | | Execute Vector,Catenate 102d 4802 |H | Short_Literal 0x2 102e ebfd | | Load 0x5,-0x3 102f 8617 | | Call 0x3,0x17 1030 01cc | | Execute Vector,Catenate 1031 4802 |H | Short_Literal 0x2 1032 4801 |H | Short_Literal 0x1 1033 8617 | | Call 0x3,0x17 1034 01cc | | Execute Vector,Catenate 1035 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 1036 0000 0000 | | .XXX[0x2] 1038 ; -------------------------------------------------------------------------------------- 1038 ; SUBPROGRAM 1038 ; -------------------------------------------------------------------------------------- 1038 103b | ; | .CONST 0x103b ; Address of begin 1039 0004 | | .CONST 0x0004 ; Address of exception handler 103a 0001 | | .CONST 0x0001 ; Number of locals 103b BODY_1038: 103b INIT_1038: 103b 4801 |H | Short_Literal 0x1 103c e805 | | Load 0x4,0x5 103d 0092 1cd7 | | Action Push_String_Extended,0x1cd7 ; "public" 103f 8808 | | Call 0x4,0x8 1040 4801 |H | Short_Literal 0x1 1041 480c |H | Short_Literal 0xc 1042 e001 | | Load 0x0,0x1 1043 1b12 | | Execute Package,Field_Read,Field_Number 0x12 1044 035b | [ | Declare_Type Array,Constrained 1045 0337 | 7 | Declare_Variable Array 1046 480c |H | Short_Literal 0xc 1047 4801 |H | Short_Literal 0x1 1048 4800 |H | Short_Literal 0x0 1049 00d9 | | Load_Top At_Offset_1 104a ea03 | | Load 0x5,0x3 104b 01d6 | | Execute Vector,Field_Write 104c 3ffb |? | Loop_Increasing 0x1048 104d 01cc | | Execute Vector,Catenate 104e 00ca | | Action Exit_Nullary_Function 104f 0000 | | .XXX[0x1] 1050 ; -------------------------------------------------------------------------------------- 1050 ; SUBPROGRAM 1050 ; -------------------------------------------------------------------------------------- 1050 1053 | S | .CONST 0x1053 ; Address of begin 1051 0004 | | .CONST 0x0004 ; Address of exception handler 1052 0001 | | .CONST 0x0001 ; Number of locals 1053 BODY_1050: 1053 INIT_1050: 1053 4804 |H | Short_Literal 0x4 1054 4801 |H | Short_Literal 0x1 1055 8617 | | Call 0x3,0x17 1056 8809 | | Call 0x4,0x9 1057 8806 | | Call 0x4,0x6 1058 01cc | | Execute Vector,Catenate 1059 00ca | | Action Exit_Nullary_Function 105a 0000 0000 | | .BLANK 0000[0x6] 1060 ; -------------------------------------------------------------------------------------- 1060 ; SUBPROGRAM 1060 ; -------------------------------------------------------------------------------------- 1060 1063 | c | .CONST 0x1063 ; Address of begin 1061 0004 | | .CONST 0x0004 ; Address of exception handler 1062 0001 | | .CONST 0x0001 ; Number of locals 1063 BODY_1060: 1063 INIT_1060: 1063 00da | | Load_Top At_Offset_2 1064 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1065 ebfe | | Load 0x5,-0x2 1066 01db | | Execute Vector,Length 1067 027f | | Execute Discrete,Equal 1068 7001 |p | Jump_Nonzero 0x106a 1069 0887 | | Execute_Immediate Raise,0x87 106a 00db | | Load_Top At_Offset_3 106b 00db | | Load_Top At_Offset_3 106c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 106d e60b | | Load 0x3,0xb 106e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 106f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1070 ; -------------------------------------------------------------------------------------- 1070 ; SUBPROGRAM 1070 ; -------------------------------------------------------------------------------------- 1070 1073 | s | .CONST 0x1073 ; Address of begin 1071 107d | } | .CONST 0x107d ; Address of exception handler 1072 0001 | | .CONST 0x0001 ; Number of locals 1073 BODY_1070: 1073 INIT_1070: 1073 4801 |H | Short_Literal 0x1 1074 e603 | | Load 0x3,0x3 1075 8414 | | Call 0x2,0x14 1076 e00d | | Load 0x0,0xd 1077 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1078 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1079 01c7 | | Execute Vector,Convert 107a e804 | | Load 0x4,0x4 107b 01d4 | | Execute Vector,Structure_Write 107c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 107d TRAP_1070: 107d 0007 | | Action Break_Optional 107e e00d | | Load 0x0,0xd 107f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1080 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1081 e804 | | Load 0x4,0x4 1082 01d4 | | Execute Vector,Structure_Write 1083 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1084 0000 0000 | | .BLANK 0000[0x4] 1088 ; -------------------------------------------------------------------------------------- 1088 ; SUBPROGRAM 1088 ; -------------------------------------------------------------------------------------- 1088 108b | | .CONST 0x108b ; Address of begin 1089 0004 | | .CONST 0x0004 ; Address of exception handler 108a 0001 | | .CONST 0x0001 ; Number of locals 108b BODY_1088: 108b INIT_1088: 108b 00da | | Load_Top At_Offset_2 108c 01db | | Execute Vector,Length 108d 0f18 | | Execute_Immediate Equal,0x18 108e 7001 |p | Jump_Nonzero 0x1090 108f 0887 | | Execute_Immediate Raise,0x87 1090 00da | | Load_Top At_Offset_2 1091 e808 | | Load 0x4,0x8 1092 e60b | | Load 0x3,0xb 1093 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1094 e808 | | Load 0x4,0x8 1095 00db | | Load_Top At_Offset_3 1096 01db | | Execute Vector,Length 1097 0273 | s | Execute Discrete,Plus 1098 c808 | | Store 0x4,0x8 1099 4502 |E | Exit_Suprogram New_Top_Offset 0x2 109a 0000 0000 | | .BLANK 0000[0x6] 10a0 ; -------------------------------------------------------------------------------------- 10a0 ; SUBPROGRAM 10a0 ; -------------------------------------------------------------------------------------- 10a0 10b0 | | .CONST 0x10b0 ; Address of begin 10a1 0004 | | .CONST 0x0004 ; Address of exception handler 10a2 0002 | | .CONST 0x0002 ; Number of locals 10a3 INIT_10a0: 10a3 00db | | Load_Top At_Offset_3 10a4 00db | | Load_Top At_Offset_3 10a5 0272 | r | Execute Discrete,Minus 10a6 0a01 | | Execute_Immediate Plus,0x1 10a7 00d8 | | Load_Top At_Offset_0 10a8 00e3 | | Load_Encached Natural_Cache 10a9 0260 | ` | Execute Discrete,In_Type 10aa 7001 |p | Jump_Nonzero 0x10ac 10ab 0801 | | Execute_Immediate Raise,0x1 10ac 4800 |H | Short_Literal 0x0 10ad 8615 | | Call 0x3,0x15 10ae 00e3 | | Load_Encached Natural_Cache 10af 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 10b0 BODY_10a0: 10b0 e807 | | Load 0x4,0x7 10b1 00d9 | | Load_Top At_Offset_1 10b2 0273 | s | Execute Discrete,Plus 10b3 c807 | | Store 0x4,0x7 10b4 4804 |H | Short_Literal 0x4 10b5 ebff | | Load 0x5,-0x1 10b6 8617 | | Call 0x3,0x17 10b7 4804 |H | Short_Literal 0x4 10b8 00da | | Load_Top At_Offset_2 10b9 8617 | | Call 0x3,0x17 10ba 01cc | | Execute Vector,Catenate 10bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10bc 0000 0000 | | .BLANK 0000[0x4] 10c0 ; -------------------------------------------------------------------------------------- 10c0 ; SUBPROGRAM 10c0 ; -------------------------------------------------------------------------------------- 10c0 10d6 | | .CONST 0x10d6 ; Address of begin 10c1 0004 | | .CONST 0x0004 ; Address of exception handler 10c2 0002 | | .CONST 0x0002 ; Number of locals 10c3 INIT_10c0: 10c3 4801 |H | Short_Literal 0x1 10c4 ebfe | | Load 0x5,-0x2 10c5 e607 | | Load 0x3,0x7 10c6 035b | [ | Declare_Type Array,Constrained 10c7 0337 | 7 | Declare_Variable Array 10c8 00d8 | | Load_Top At_Offset_0 10c9 0335 | 5 | Declare_Variable Array,Duplicate 10ca 00cd | | Action Spare6_Action 10cb 00d9 | | Load_Top At_Offset_1 10cc 01d9 | | Execute Vector,Reverse_Bounds 10cd 0263 | c | Execute Discrete,Above_Bound 10ce 7005 |p | Jump_Nonzero 0x10d4 10cf 4800 |H | Short_Literal 0x0 10d0 00d9 | | Load_Top At_Offset_1 10d1 ea03 | | Load 0x5,0x3 10d2 01d6 | | Execute Vector,Field_Write 10d3 3ffb |? | Loop_Increasing 0x10cf 10d4 00d9 | | Load_Top At_Offset_1 10d5 01d4 | | Execute Vector,Structure_Write 10d6 BODY_10c0: 10d6 00cf | | Action Mark_Auxiliary 10d7 ebff | | Load 0x5,-0x1 10d8 01d9 | | Execute Vector,Reverse_Bounds 10d9 0263 | c | Execute Discrete,Above_Bound 10da 7012 |p | Jump_Nonzero 0x10ed 10db 00d8 | | Load_Top At_Offset_0 10dc ebff | | Load 0x5,-0x1 10dd 01d7 | | Execute Vector,Field_Read 10de 00d8 | | Load_Top At_Offset_0 10df e001 | | Load 0x0,0x1 10e0 1b11 | | Execute Package,Field_Read,Field_Number 0x11 10e1 0260 | ` | Execute Discrete,In_Type 10e2 7001 |p | Jump_Nonzero 0x10e4 10e3 0801 | | Execute_Immediate Raise,0x1 10e4 00d9 | | Load_Top At_Offset_1 10e5 0a01 | | Execute_Immediate Plus,0x1 10e6 ebff | | Load 0x5,-0x1 10e7 01dd | | Execute Vector,First 10e8 0272 | r | Execute Discrete,Minus 10e9 ea02 | | Load 0x5,0x2 10ea 01d6 | | Execute Vector,Field_Write 10eb 00c8 | | Action Pop_Auxiliary_Range 10ec 3fee |? | Loop_Increasing 0x10db 10ed 00ce | | Action Pop_Auxiliary 10ee 00d8 | | Load_Top At_Offset_0 10ef e001 | | Load 0x0,0x1 10f0 1b12 | | Execute Package,Field_Read,Field_Number 0x12 10f1 01c6 | | Execute Vector,Convert_To_Formal 10f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10f3 0000 0000 | | .BLANK 0000[0x5] 10f8 ; -------------------------------------------------------------------------------------- 10f8 ; SUBPROGRAM 10f8 ; -------------------------------------------------------------------------------------- 10f8 10fb | | .CONST 0x10fb ; Address of begin 10f9 0004 | | .CONST 0x0004 ; Address of exception handler 10fa 0001 | | .CONST 0x0001 ; Number of locals 10fb BODY_10f8: 10fb INIT_10f8: 10fb 00da | | Load_Top At_Offset_2 10fc 8618 | | Call 0x3,0x18 10fd 00d8 | | Load_Top At_Offset_0 10fe 00e3 | | Load_Encached Natural_Cache 10ff 0260 | ` | Execute Discrete,In_Type 1100 7001 |p | Jump_Nonzero 0x1102 1101 0801 | | Execute_Immediate Raise,0x1 1102 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1103 0000 0000 | | .BLANK 0000[0x5] 1108 ; -------------------------------------------------------------------------------------- 1108 ; SUBPROGRAM 1108 ; -------------------------------------------------------------------------------------- 1108 1117 | | .CONST 0x1117 ; Address of begin 1109 0004 | | .CONST 0x0004 ; Address of exception handler 110a 0002 | | .CONST 0x0002 ; Number of locals 110b INIT_1108: 110b e610 | | Load 0x3,0x10 110c 00db | | Load_Top At_Offset_3 110d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 110e 0273 | s | Execute Discrete,Plus 110f 0275 | u | Execute Discrete,Unary_Minus 1110 48ff |H | Short_Literal 0xff 1111 0279 | y | Execute Discrete,And 1112 00d8 | | Load_Top At_Offset_0 1113 00e3 | | Load_Encached Natural_Cache 1114 0260 | ` | Execute Discrete,In_Type 1115 7001 |p | Jump_Nonzero BODY_1108 1116 0801 | | Execute_Immediate Raise,0x1 1117 BODY_1108: 1117 00d8 | | Load_Top At_Offset_0 1118 6805 |h | Jump_Zero 0x111e 1119 00d8 | | Load_Top At_Offset_0 111a ebff | | Load 0x5,-0x1 111b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 111c 027b | { | Execute Discrete,Greater_Equal 111d 6803 |h | Jump_Zero 0x1121 111e 00db | | Load_Top At_Offset_3 111f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1120 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1121 e5f9 | | Load 0x2,-0x7 1122 680b |h | Jump_Zero 0x112e 1123 4802 |H | Short_Literal 0x2 1124 0092 1cd8 | | Action Push_String_Extended,0x1cd8 ; "skip" 1126 00da | | Load_Top At_Offset_2 1127 00e0 | | Load_Encached Standard_Cache 1128 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1129 01cc | | Execute Vector,Catenate 112a 0092 1cd9 | | Action Push_String_Extended,0x1cd9 ; " bytes" 112c 01cc | | Execute Vector,Catenate 112d 840a | | Call 0x2,0xa 112e e80c | | Load 0x4,0xc 112f 00d9 | | Load_Top At_Offset_1 1130 0273 | s | Execute Discrete,Plus 1131 c80c | | Store 0x4,0xc 1132 00db | | Load_Top At_Offset_3 1133 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1134 00d9 | | Load_Top At_Offset_1 1135 00d8 | | Load_Top At_Offset_0 1136 e00c | | Load 0x0,0xc 1137 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1138 0260 | ` | Execute Discrete,In_Type 1139 7001 |p | Jump_Nonzero 0x113b 113a 0801 | | Execute_Immediate Raise,0x1 113b 0273 | s | Execute Discrete,Plus 113c e00c | | Load 0x0,0xc 113d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 113e 00d9 | | Load_Top At_Offset_1 113f 00d0 | | Action Swap_Control 1140 0260 | ` | Execute Discrete,In_Type 1141 7001 |p | Jump_Nonzero 0x1143 1142 0801 | | Execute_Immediate Raise,0x1 1143 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1144 0000 0000 | | .BLANK 0000[0x4] 1148 ; -------------------------------------------------------------------------------------- 1148 ; SUBPROGRAM 1148 ; -------------------------------------------------------------------------------------- 1148 1179 | y | .CONST 0x1179 ; Address of begin 1149 0004 | | .CONST 0x0004 ; Address of exception handler 114a 0005 | | .CONST 0x0005 ; Number of locals 114b INIT_1148: 114b e60b | | Load 0x3,0xb 114c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 114d 0322 | " | Declare_Variable Record 114e 4800 |H | Short_Literal 0x0 114f 00d9 | | Load_Top At_Offset_1 1150 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1151 4804 |H | Short_Literal 0x4 1152 00d9 | | Load_Top At_Offset_1 1153 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1154 e60b | | Load 0x3,0xb 1155 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1156 0322 | " | Declare_Variable Record 1157 4808 |H | Short_Literal 0x8 1158 00d9 | | Load_Top At_Offset_1 1159 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 115a 4804 |H | Short_Literal 0x4 115b 00d9 | | Load_Top At_Offset_1 115c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 115d e60b | | Load 0x3,0xb 115e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 115f 0322 | " | Declare_Variable Record 1160 480c |H | Short_Literal 0xc 1161 00d9 | | Load_Top At_Offset_1 1162 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1163 4802 |H | Short_Literal 0x2 1164 00d9 | | Load_Top At_Offset_1 1165 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1166 e60b | | Load 0x3,0xb 1167 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1168 0322 | " | Declare_Variable Record 1169 e803 | | Load 0x4,0x3 116a ebff | | Load 0x5,-0x1 116b 0a20 | | Execute_Immediate Plus,0x20 116c 00d8 | | Load_Top At_Offset_0 116d e00c | | Load 0x0,0xc 116e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 116f 0260 | ` | Execute Discrete,In_Type 1170 7001 |p | Jump_Nonzero 0x1172 1171 0801 | | Execute_Immediate Raise,0x1 1172 0273 | s | Execute Discrete,Plus 1173 00d9 | | Load_Top At_Offset_1 1174 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1175 4820 |H | Short_Literal 0x20 1176 00d9 | | Load_Top At_Offset_1 1177 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1178 880e | | Call 0x4,0xe 1179 BODY_1148: 1179 e803 | | Load 0x4,0x3 117a 0a20 | | Execute_Immediate Plus,0x20 117b ebff | | Load 0x5,-0x1 117c 00d8 | | Load_Top At_Offset_0 117d e00c | | Load 0x0,0xc 117e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 117f 0260 | ` | Execute Discrete,In_Type 1180 7001 |p | Jump_Nonzero 0x1182 1181 0801 | | Execute_Immediate Raise,0x1 1182 0273 | s | Execute Discrete,Plus 1183 e805 | | Load 0x4,0x5 1184 027f | | Execute Discrete,Equal 1185 680a |h | Jump_Zero 0x1190 1186 4802 |H | Short_Literal 0x2 1187 0092 1cda | | Action Push_String_Extended,0x1cda ; "attempted to allocate buffer space >=" 1189 e805 | | Load 0x4,0x5 118a 00e0 | | Load_Encached Standard_Cache 118b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 118c 01cc | | Execute Vector,Catenate 118d 840a | | Call 0x2,0xa 118e e008 | | Load 0x0,0x8 118f 0257 | W | Execute Discrete,Raise 1190 00db | | Load_Top At_Offset_3 1191 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1192 00d8 | | Load_Top At_Offset_0 1193 00e4 | | Load_Encached Positive_Cache 1194 0260 | ` | Execute Discrete,In_Type 1195 7001 |p | Jump_Nonzero 0x1197 1196 0801 | | Execute_Immediate Raise,0x1 1197 e610 | | Load 0x3,0x10 1198 00da | | Load_Top At_Offset_2 1199 0273 | s | Execute Discrete,Plus 119a 8617 | | Call 0x3,0x17 119b e803 | | Load 0x4,0x3 119c ea02 | | Load 0x5,0x2 119d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 119e 0273 | s | Execute Discrete,Plus 119f e00c | | Load 0x0,0xc 11a0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 11a1 00d9 | | Load_Top At_Offset_1 11a2 00d0 | | Action Swap_Control 11a3 0260 | ` | Execute Discrete,In_Type 11a4 7001 |p | Jump_Nonzero 0x11a6 11a5 0801 | | Execute_Immediate Raise,0x1 11a6 e60b | | Load 0x3,0xb 11a7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 11a8 00da | | Load_Top At_Offset_2 11a9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 11aa 00d8 | | Load_Top At_Offset_0 11ab 00e4 | | Load_Encached Positive_Cache 11ac 0260 | ` | Execute Discrete,In_Type 11ad 7001 |p | Jump_Nonzero 0x11af 11ae 0801 | | Execute_Immediate Raise,0x1 11af e610 | | Load 0x3,0x10 11b0 e803 | | Load 0x4,0x3 11b1 0a20 | | Execute_Immediate Plus,0x20 11b2 0273 | s | Execute Discrete,Plus 11b3 8617 | | Call 0x3,0x17 11b4 e803 | | Load 0x4,0x3 11b5 ea03 | | Load 0x5,0x3 11b6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 11b7 0273 | s | Execute Discrete,Plus 11b8 e00c | | Load 0x0,0xc 11b9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 11ba 00d9 | | Load_Top At_Offset_1 11bb 00d0 | | Action Swap_Control 11bc 0260 | ` | Execute Discrete,In_Type 11bd 7001 |p | Jump_Nonzero 0x11bf 11be 0801 | | Execute_Immediate Raise,0x1 11bf e60b | | Load 0x3,0xb 11c0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 11c1 00d9 | | Load_Top At_Offset_1 11c2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 11c3 00d8 | | Load_Top At_Offset_0 11c4 00e4 | | Load_Encached Positive_Cache 11c5 0260 | ` | Execute Discrete,In_Type 11c6 7001 |p | Jump_Nonzero 0x11c8 11c7 0801 | | Execute_Immediate Raise,0x1 11c8 ebff | | Load 0x5,-0x1 11c9 8617 | | Call 0x3,0x17 11ca e803 | | Load 0x4,0x3 11cb 00db | | Load_Top At_Offset_3 11cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 11cd 0273 | s | Execute Discrete,Plus 11ce e00c | | Load 0x0,0xc 11cf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 11d0 00d9 | | Load_Top At_Offset_1 11d1 00d0 | | Action Swap_Control 11d2 0260 | ` | Execute Discrete,In_Type 11d3 7001 |p | Jump_Nonzero 0x11d5 11d4 0801 | | Execute_Immediate Raise,0x1 11d5 e60b | | Load 0x3,0xb 11d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 11d7 e803 | | Load 0x4,0x3 11d8 a804 | | Store_Unchecked 0x4,0x4 11d9 00d8 | | Load_Top At_Offset_0 11da a803 | | Store_Unchecked 0x4,0x3 11db 4502 |E | Exit_Suprogram New_Top_Offset 0x2 11dc 0000 0000 | | .BLANK 0000[0x4] 11e0 ; -------------------------------------------------------------------------------------- 11e0 ; SUBPROGRAM 11e0 ; -------------------------------------------------------------------------------------- 11e0 11ed | | .CONST 0x11ed ; Address of begin 11e1 0004 | | .CONST 0x0004 ; Address of exception handler 11e2 0002 | | .CONST 0x0002 ; Number of locals 11e3 INIT_11e0: 11e3 e60b | | Load 0x3,0xb 11e4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 11e5 0322 | " | Declare_Variable Record 11e6 e803 | | Load 0x4,0x3 11e7 00d9 | | Load_Top At_Offset_1 11e8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 11e9 4820 |H | Short_Literal 0x20 11ea 00d9 | | Load_Top At_Offset_1 11eb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 11ec 880e | | Call 0x4,0xe 11ed BODY_11e0: 11ed e803 | | Load 0x4,0x3 11ee 00d9 | | Load_Top At_Offset_1 11ef 027f | | Execute Discrete,Equal 11f0 7031 |p1 | Jump_Nonzero 0x1222 11f1 e802 | | Load 0x4,0x2 11f2 00d9 | | Load_Top At_Offset_1 11f3 e803 | | Load 0x4,0x3 11f4 0272 | r | Execute Discrete,Minus 11f5 00d8 | | Load_Top At_Offset_0 11f6 00e3 | | Load_Encached Natural_Cache 11f7 0260 | ` | Execute Discrete,In_Type 11f8 7001 |p | Jump_Nonzero 0x11fa 11f9 0801 | | Execute_Immediate Raise,0x1 11fa 0272 | r | Execute Discrete,Minus 11fb c802 | | Store 0x4,0x2 11fc 00d8 | | Load_Top At_Offset_0 11fd a803 | | Store_Unchecked 0x4,0x3 11fe e60b | | Load 0x3,0xb 11ff 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 1200 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1201 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1202 00d8 | | Load_Top At_Offset_0 1203 00e4 | | Load_Encached Positive_Cache 1204 0260 | ` | Execute Discrete,In_Type 1205 7001 |p | Jump_Nonzero 0x1207 1206 0801 | | Execute_Immediate Raise,0x1 1207 e610 | | Load 0x3,0x10 1208 e803 | | Load 0x4,0x3 1209 0273 | s | Execute Discrete,Plus 120a 8617 | | Call 0x3,0x17 120b e60b | | Load 0x3,0xb 120c 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 120d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 120e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 120f e60b | | Load 0x3,0xb 1210 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1211 e60b | | Load 0x3,0xb 1212 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 1213 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1214 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1215 00d8 | | Load_Top At_Offset_0 1216 00e4 | | Load_Encached Positive_Cache 1217 0260 | ` | Execute Discrete,In_Type 1218 7001 |p | Jump_Nonzero 0x121a 1219 0801 | | Execute_Immediate Raise,0x1 121a e802 | | Load 0x4,0x2 121b 8617 | | Call 0x3,0x17 121c e60b | | Load 0x3,0xb 121d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 121e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 121f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1220 e60b | | Load 0x3,0xb 1221 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1222 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1223 0000 0000 | | .BLANK 0000[0x5] 1228 ; -------------------------------------------------------------------------------------- 1228 ; SUBPROGRAM 1228 ; -------------------------------------------------------------------------------------- 1228 123b | ; | .CONST 0x123b ; Address of begin 1229 0004 | | .CONST 0x0004 ; Address of exception handler 122a 0005 | | .CONST 0x0005 ; Number of locals 122b INIT_1228: 122b 4800 |H | Short_Literal 0x0 122c e60b | | Load 0x3,0xb 122d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 122e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 122f e60b | | Load 0x3,0xb 1230 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1231 8618 | | Call 0x3,0x18 1232 4800 |H | Short_Literal 0x0 1233 481b |H | Short_Literal 0x1b 1234 e607 | | Load 0x3,0x7 1235 035b | [ | Declare_Type Array,Constrained 1236 0337 | 7 | Declare_Variable Array 1237 029f 131b | | Declare_Subprogram INIT_1318,For_Call 1239 029f 1333 | 3| Declare_Subprogram INIT_1330,For_Call 123b BODY_1228: 123b 00db | | Load_Top At_Offset_3 123c 6868 |hh | Jump_Zero 0x12a5 123d 4800 |H | Short_Literal 0x0 123e e60b | | Load 0x3,0xb 123f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1240 0322 | " | Declare_Variable Record 1241 ea02 | | Load 0x5,0x2 1242 e60b | | Load 0x3,0xb 1243 1b11 | | Execute Package,Field_Read,Field_Number 0x11 1244 0272 | r | Execute Discrete,Minus 1245 00d8 | | Load_Top At_Offset_0 1246 e00c | | Load 0x0,0xc 1247 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1248 0260 | ` | Execute Discrete,In_Type 1249 7001 |p | Jump_Nonzero 0x124b 124a 0801 | | Execute_Immediate Raise,0x1 124b 00d9 | | Load_Top At_Offset_1 124c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 124d 481c |H | Short_Literal 0x1c 124e 00d9 | | Load_Top At_Offset_1 124f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1250 e60b | | Load 0x3,0xb 1251 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1252 00db | | Load_Top At_Offset_3 1253 01d4 | | Execute Vector,Structure_Write 1254 e60b | | Load 0x3,0xb 1255 1b19 | | Execute Package,Field_Read,Field_Number 0x19 1256 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1257 8a04 | | Call 0x5,0x4 1258 4800 |H | Short_Literal 0x0 1259 4803 |H | Short_Literal 0x3 125a e001 | | Load 0x0,0x1 125b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 125c 035b | [ | Declare_Type Array,Constrained 125d 0337 | 7 | Declare_Variable Array 125e 4800 |H | Short_Literal 0x0 125f 4800 |H | Short_Literal 0x0 1260 00da | | Load_Top At_Offset_2 1261 01d6 | | Execute Vector,Field_Write 1262 4800 |H | Short_Literal 0x0 1263 4801 |H | Short_Literal 0x1 1264 00da | | Load_Top At_Offset_2 1265 01d6 | | Execute Vector,Field_Write 1266 4800 |H | Short_Literal 0x0 1267 4802 |H | Short_Literal 0x2 1268 00da | | Load_Top At_Offset_2 1269 01d6 | | Execute Vector,Field_Write 126a 4800 |H | Short_Literal 0x0 126b 4803 |H | Short_Literal 0x3 126c 00da | | Load_Top At_Offset_2 126d 01d6 | | Execute Vector,Field_Write 126e 01df | | Execute Vector,Equal 126f 701c |p | Jump_Nonzero 0x128c 1270 e605 | | Load 0x3,0x5 1271 4801 |H | Short_Literal 0x1 1272 e60b | | Load 0x3,0xb 1273 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1274 0322 | " | Declare_Variable Record 1275 e60b | | Load 0x3,0xb 1276 1b19 | | Execute Package,Field_Read,Field_Number 0x19 1277 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1278 8a04 | | Call 0x5,0x4 1279 8618 | | Call 0x3,0x18 127a e60b | | Load 0x3,0xb 127b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 127c 0272 | r | Execute Discrete,Minus 127d 00d8 | | Load_Top At_Offset_0 127e e00c | | Load 0x0,0xc 127f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1280 0260 | ` | Execute Discrete,In_Type 1281 7001 |p | Jump_Nonzero 0x1283 1282 0801 | | Execute_Immediate Raise,0x1 1283 00d9 | | Load_Top At_Offset_1 1284 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1285 4850 |HP | Short_Literal 0x50 1286 00d9 | | Load_Top At_Offset_1 1287 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1288 e60b | | Load 0x3,0xb 1289 1815 | | Execute Package,Field_Execute,Field_Number 0x15 128a 861e | | Call 0x3,0x1e 128b 8620 | | Call 0x3,0x20 128c e605 | | Load 0x3,0x5 128d 0092 1cdb | | Action Push_String_Extended,0x1cdb ; "code " 128f e60b | | Load 0x3,0xb 1290 1b19 | | Execute Package,Field_Read,Field_Number 0x19 1291 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1292 8a05 | | Call 0x5,0x5 1293 01cc | | Execute Vector,Catenate 1294 0092 1cdc | | Action Push_String_Extended,0x1cdc ; ", kernel \x22" 1296 01cc | | Execute Vector,Catenate 1297 e60b | | Load 0x3,0xb 1298 1b19 | | Execute Package,Field_Read,Field_Number 0x19 1299 1b0f | | Execute Package,Field_Read,Field_Number 0xf 129a 8a05 | | Call 0x5,0x5 129b 01cc | | Execute Vector,Catenate 129c 0092 1cdd | | Action Push_String_Extended,0x1cdd ; "\x22, host " 129e 01cc | | Execute Vector,Catenate 129f e60b | | Load 0x3,0xb 12a0 1b19 | | Execute Package,Field_Read,Field_Number 0x19 12a1 1b10 | | Execute Package,Field_Read,Field_Number 0x10 12a2 8a05 | | Call 0x5,0x5 12a3 01cc | | Execute Vector,Catenate 12a4 8620 | | Call 0x3,0x20 12a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 12a6 0000 0000 | | .XXX[0x2] 12a8 ; -------------------------------------------------------------------------------------- 12a8 ; SUBPROGRAM 12a8 ; -------------------------------------------------------------------------------------- 12a8 12ab | | .CONST 0x12ab ; Address of begin 12a9 0004 | | .CONST 0x0004 ; Address of exception handler 12aa 0001 | | .CONST 0x0001 ; Number of locals 12ab BODY_12a8: 12ab INIT_12a8: 12ab 4820 |H | Short_Literal 0x20 12ac 8609 | | Call 0x3,0x9 12ad 00da | | Load_Top At_Offset_2 12ae 09fc | | Execute_Immediate Binary_Scale,-0x4 12af e607 | | Load 0x3,0x7 12b0 01d7 | | Execute Vector,Field_Read 12b1 8609 | | Call 0x3,0x9 12b2 00da | | Load_Top At_Offset_2 12b3 480f |H | Short_Literal 0xf 12b4 0279 | y | Execute Discrete,And 12b5 e607 | | Load 0x3,0x7 12b6 01d7 | | Execute Vector,Field_Read 12b7 8609 | | Call 0x3,0x9 12b8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 12b9 0000 0000 | | .BLANK 0000[0x7] 12c0 ; -------------------------------------------------------------------------------------- 12c0 ; SUBPROGRAM 12c0 ; -------------------------------------------------------------------------------------- 12c0 12e0 | | .CONST 0x12e0 ; Address of begin 12c1 0004 | | .CONST 0x0004 ; Address of exception handler 12c2 0003 | | .CONST 0x0003 ; Number of locals 12c3 INIT_12c0: 12c3 ebfe | | Load 0x5,-0x2 12c4 01db | | Execute Vector,Length 12c5 0275 | u | Execute Discrete,Unary_Minus 12c6 e60b | | Load 0x3,0xb 12c7 1b17 | | Execute Package,Field_Read,Field_Number 0x17 12c8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 12ca 026e | n | Execute Discrete,Modulo 12cb 00e3 | | Load_Encached Natural_Cache 12cc 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 12cd 4801 |H | Short_Literal 0x1 12ce 00d9 | | Load_Top At_Offset_1 12cf e607 | | Load 0x3,0x7 12d0 035b | [ | Declare_Type Array,Constrained 12d1 0337 | 7 | Declare_Variable Array 12d2 00d8 | | Load_Top At_Offset_0 12d3 0335 | 5 | Declare_Variable Array,Duplicate 12d4 00cd | | Action Spare6_Action 12d5 00d9 | | Load_Top At_Offset_1 12d6 01d9 | | Execute Vector,Reverse_Bounds 12d7 0263 | c | Execute Discrete,Above_Bound 12d8 7005 |p | Jump_Nonzero 0x12de 12d9 4800 |H | Short_Literal 0x0 12da 00d9 | | Load_Top At_Offset_1 12db ec04 | | Load 0x6,0x4 12dc 01d6 | | Execute Vector,Field_Write 12dd 3ffb |? | Loop_Increasing 0x12d9 12de 00d9 | | Load_Top At_Offset_1 12df 01d4 | | Execute Vector,Structure_Write 12e0 BODY_12c0: 12e0 00d8 | | Load_Top At_Offset_0 12e1 01db | | Execute Vector,Length 12e2 ebfe | | Load 0x5,-0x2 12e3 01db | | Execute Vector,Length 12e4 0273 | s | Execute Discrete,Plus 12e5 e60b | | Load 0x3,0xb 12e6 1b17 | | Execute Package,Field_Read,Field_Number 0x17 12e7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12e8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 12e9 027f | | Execute Discrete,Equal 12ea 7001 |p | Jump_Nonzero 0x12ec 12eb 0887 | | Execute_Immediate Raise,0x87 12ec 00d8 | | Load_Top At_Offset_0 12ed ebfe | | Load 0x5,-0x2 12ee 01cc | | Execute Vector,Catenate 12ef e60b | | Load 0x3,0xb 12f0 1b17 | | Execute Package,Field_Read,Field_Number 0x17 12f1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12f2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 12f3 e60b | | Load 0x3,0xb 12f4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 12f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 12f6 0000 0000 | | .XXX[0x2] 12f8 ; -------------------------------------------------------------------------------------- 12f8 ; SUBPROGRAM 12f8 ; -------------------------------------------------------------------------------------- 12f8 1300 | | .CONST 0x1300 ; Address of begin 12f9 0004 | | .CONST 0x0004 ; Address of exception handler 12fa 0002 | | .CONST 0x0002 ; Number of locals 12fb INIT_12f8: 12fb 00da | | Load_Top At_Offset_2 12fc 01da | | Execute Vector,Bounds 12fd e607 | | Load 0x3,0x7 12fe 035b | [ | Declare_Type Array,Constrained 12ff 0337 | 7 | Declare_Variable Array 1300 BODY_12f8: 1300 00cf | | Action Mark_Auxiliary 1301 00d9 | | Load_Top At_Offset_1 1302 01d9 | | Execute Vector,Reverse_Bounds 1303 0263 | c | Execute Discrete,Above_Bound 1304 7008 |p | Jump_Nonzero 0x130d 1305 00d8 | | Load_Top At_Offset_0 1306 edff | | Load 0x6,-0x1 1307 01d7 | | Execute Vector,Field_Read 1308 00d9 | | Load_Top At_Offset_1 1309 ec02 | | Load 0x6,0x2 130a 01d6 | | Execute Vector,Field_Write 130b 00c8 | | Action Pop_Auxiliary_Range 130c 3ff8 |? | Loop_Increasing 0x1305 130d 00ce | | Action Pop_Auxiliary 130e 00d8 | | Load_Top At_Offset_0 130f e001 | | Load 0x0,0x1 1310 1b12 | | Execute Package,Field_Read,Field_Number 0x12 1311 01c6 | | Execute Vector,Convert_To_Formal 1312 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1313 0000 0000 | | .BLANK 0000[0x5] 1318 ; -------------------------------------------------------------------------------------- 1318 ; SUBPROGRAM 1318 ; -------------------------------------------------------------------------------------- 1318 131b | | .CONST 0x131b ; Address of begin 1319 0004 | | .CONST 0x0004 ; Address of exception handler 131a 0001 | | .CONST 0x0001 ; Number of locals 131b BODY_1318: 131b INIT_1318: 131b 00da | | Load_Top At_Offset_2 131c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 131d 00db | | Load_Top At_Offset_3 131e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 131f edff | | Load 0x6,-0x1 1320 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1321 0273 | s | Execute Discrete,Plus 1322 0aff | | Execute_Immediate Plus,-0x1 1323 00d8 | | Load_Top At_Offset_0 1324 00e2 | | Load_Encached Integer_Cache 1325 0260 | ` | Execute Discrete,In_Type 1326 7001 |p | Jump_Nonzero 0x1328 1327 0801 | | Execute_Immediate Raise,0x1 1328 ea03 | | Load 0x5,0x3 1329 01cf | | Execute Vector,Slice_Read 132a 0335 | 5 | Declare_Variable Array,Duplicate 132b 00cd | | Action Spare6_Action 132c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 132d 0000 0000 | | .XXX[0x3] 132f 0000 | | 1330 ; -------------------------------------------------------------------------------------- 1330 ; SUBPROGRAM 1330 ; -------------------------------------------------------------------------------------- 1330 1333 | 3 | .CONST 0x1333 ; Address of begin 1331 0004 | | .CONST 0x0004 ; Address of exception handler 1332 0001 | | .CONST 0x0001 ; Number of locals 1333 BODY_1330: 1333 INIT_1330: 1333 00da | | Load_Top At_Offset_2 1334 8a04 | | Call 0x5,0x4 1335 861e | | Call 0x3,0x1e 1336 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1337 0000 | | .XXX[0x1] 1338 ; -------------------------------------------------------------------------------------- 1338 ; SUBPROGRAM 1338 ; -------------------------------------------------------------------------------------- 1338 13c9 | | .CONST 0x13c9 ; Address of begin 1339 0004 | | .CONST 0x0004 ; Address of exception handler 133a 0016 | | .CONST 0x0016 ; Number of locals 133b INIT_1338: 133b 029a 13d3 | | Declare_Subprogram INIT_13d0,For_Outer_Call,Visible,Unelaborated 133d 4800 |H | Short_Literal 0x0 133e 4807 |H | Short_Literal 0x7 133f 029f 142b | +| Declare_Subprogram INIT_1428,For_Call 1341 03fe | | Declare_Type Discrete,Defined,Visible 1342 029a 1453 | S| Declare_Subprogram INIT_1450,For_Outer_Call,Visible,Unelaborated 1344 00bf | | Action Accept_Activation 1345 e001 | | Load 0x0,0x1 1346 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1347 4800 |H | Short_Literal 0x0 1348 480f |H | Short_Literal 0xf 1349 00da | | Load_Top At_Offset_2 134a 03f8 | | Declare_Type Discrete,Constrained 134b 00db | | Load_Top At_Offset_3 134c 0266 | f | Execute Discrete,Bounds 134d 00e3 | | Load_Encached Natural_Cache 134e 02a0 | | Declare_Subprogram Null_Subprogram 134f 4801 |H | Short_Literal 0x1 1350 035d | ] | Declare_Type Array,Defined 1351 00d8 | | Load_Top At_Offset_0 1352 0337 | 7 | Declare_Variable Array 1353 4803 |H | Short_Literal 0x3 1354 4802 |H | Short_Literal 0x2 1355 00da | | Load_Top At_Offset_2 1356 01d6 | | Execute Vector,Field_Write 1357 4803 |H | Short_Literal 0x3 1358 4806 |H | Short_Literal 0x6 1359 00da | | Load_Top At_Offset_2 135a 01d6 | | Execute Vector,Field_Write 135b 4804 |H | Short_Literal 0x4 135c 4803 |H | Short_Literal 0x3 135d 00da | | Load_Top At_Offset_2 135e 01d6 | | Execute Vector,Field_Write 135f 4804 |H | Short_Literal 0x4 1360 4805 |H | Short_Literal 0x5 1361 00da | | Load_Top At_Offset_2 1362 01d6 | | Execute Vector,Field_Write 1363 4802 |H | Short_Literal 0x2 1364 4800 |H | Short_Literal 0x0 1365 00da | | Load_Top At_Offset_2 1366 01d6 | | Execute Vector,Field_Write 1367 4802 |H | Short_Literal 0x2 1368 4801 |H | Short_Literal 0x1 1369 00da | | Load_Top At_Offset_2 136a 01d6 | | Execute Vector,Field_Write 136b 4802 |H | Short_Literal 0x2 136c 4804 |H | Short_Literal 0x4 136d 00da | | Load_Top At_Offset_2 136e 01d6 | | Execute Vector,Field_Write 136f 4802 |H | Short_Literal 0x2 1370 4807 |H | Short_Literal 0x7 1371 00da | | Load_Top At_Offset_2 1372 01d6 | | Execute Vector,Field_Write 1373 00d9 | | Load_Top At_Offset_1 1374 01c3 | | Execute Vector,Check_In_Type 1375 0007 | | Action Break_Optional 1376 4800 |H | Short_Literal 0x0 1377 480f |H | Short_Literal 0xf 1378 00e8 | | Load_Encached Character_Cache 1379 02a0 | | Declare_Subprogram Null_Subprogram 137a 4801 |H | Short_Literal 0x1 137b 035d | ] | Declare_Type Array,Defined 137c 00d8 | | Load_Top At_Offset_0 137d 0337 | 7 | Declare_Variable Array 137e 00d8 | | Load_Top At_Offset_0 137f 0335 | 5 | Declare_Variable Array,Duplicate 1380 00cd | | Action Spare6_Action 1381 4830 |H0 | Short_Literal 0x30 1382 4800 |H | Short_Literal 0x0 1383 00da | | Load_Top At_Offset_2 1384 01d6 | | Execute Vector,Field_Write 1385 4831 |H1 | Short_Literal 0x31 1386 4801 |H | Short_Literal 0x1 1387 00da | | Load_Top At_Offset_2 1388 01d6 | | Execute Vector,Field_Write 1389 4832 |H2 | Short_Literal 0x32 138a 4802 |H | Short_Literal 0x2 138b 00da | | Load_Top At_Offset_2 138c 01d6 | | Execute Vector,Field_Write 138d 4833 |H3 | Short_Literal 0x33 138e 4803 |H | Short_Literal 0x3 138f 00da | | Load_Top At_Offset_2 1390 01d6 | | Execute Vector,Field_Write 1391 4834 |H4 | Short_Literal 0x34 1392 4804 |H | Short_Literal 0x4 1393 00da | | Load_Top At_Offset_2 1394 01d6 | | Execute Vector,Field_Write 1395 4835 |H5 | Short_Literal 0x35 1396 4805 |H | Short_Literal 0x5 1397 00da | | Load_Top At_Offset_2 1398 01d6 | | Execute Vector,Field_Write 1399 4836 |H6 | Short_Literal 0x36 139a 4806 |H | Short_Literal 0x6 139b 00da | | Load_Top At_Offset_2 139c 01d6 | | Execute Vector,Field_Write 139d 4837 |H7 | Short_Literal 0x37 139e 4807 |H | Short_Literal 0x7 139f 00da | | Load_Top At_Offset_2 13a0 01d6 | | Execute Vector,Field_Write 13a1 4838 |H8 | Short_Literal 0x38 13a2 4808 |H | Short_Literal 0x8 13a3 00da | | Load_Top At_Offset_2 13a4 01d6 | | Execute Vector,Field_Write 13a5 4839 |H9 | Short_Literal 0x39 13a6 4809 |H | Short_Literal 0x9 13a7 00da | | Load_Top At_Offset_2 13a8 01d6 | | Execute Vector,Field_Write 13a9 4861 |Ha | Short_Literal 0x61 13aa 480a |H | Short_Literal 0xa 13ab 00da | | Load_Top At_Offset_2 13ac 01d6 | | Execute Vector,Field_Write 13ad 4862 |Hb | Short_Literal 0x62 13ae 480b |H | Short_Literal 0xb 13af 00da | | Load_Top At_Offset_2 13b0 01d6 | | Execute Vector,Field_Write 13b1 4863 |Hc | Short_Literal 0x63 13b2 480c |H | Short_Literal 0xc 13b3 00da | | Load_Top At_Offset_2 13b4 01d6 | | Execute Vector,Field_Write 13b5 4864 |Hd | Short_Literal 0x64 13b6 480d |H | Short_Literal 0xd 13b7 00da | | Load_Top At_Offset_2 13b8 01d6 | | Execute Vector,Field_Write 13b9 4865 |He | Short_Literal 0x65 13ba 480e |H | Short_Literal 0xe 13bb 00da | | Load_Top At_Offset_2 13bc 01d6 | | Execute Vector,Field_Write 13bd 4866 |Hf | Short_Literal 0x66 13be 480f |H | Short_Literal 0xf 13bf 00da | | Load_Top At_Offset_2 13c0 01d6 | | Execute Vector,Field_Write 13c1 00d9 | | Load_Top At_Offset_1 13c2 01d4 | | Execute Vector,Structure_Write 13c3 1d0d | | Execute_Immediate Reference_Lex_1,0xd 13c4 00c7 | | Action Elaborate_Subprogram 13c5 029d 149b | | Declare_Subprogram INIT_1498,For_Outer_Call 13c7 1d0f | | Execute_Immediate Reference_Lex_1,0xf 13c8 00c7 | | Action Elaborate_Subprogram 13c9 BODY_1338: 13c9 00bc | | Action Signal_Activated 13ca 00bb | | Action Signal_Completion 13cb 0000 0000 | | .BLANK 0000[0x5] 13d0 ; -------------------------------------------------------------------------------------- 13d0 ; SUBPROGRAM 13d0 ; -------------------------------------------------------------------------------------- 13d0 13e1 | | .CONST 0x13e1 ; Address of begin 13d1 0004 | | .CONST 0x0004 ; Address of exception handler 13d2 0003 | | .CONST 0x0003 ; Number of locals 13d3 INIT_13d0: 13d3 4801 |H | Short_Literal 0x1 13d4 00db | | Load_Top At_Offset_3 13d5 01db | | Execute Vector,Length 13d6 0901 | | Execute_Immediate Binary_Scale,0x1 13d7 00d8 | | Load_Top At_Offset_0 13d8 00e2 | | Load_Encached Integer_Cache 13d9 0260 | ` | Execute Discrete,In_Type 13da 7001 |p | Jump_Nonzero 0x13dc 13db 0801 | | Execute_Immediate Raise,0x1 13dc 00e9 | | Load_Encached String_Cache 13dd 035b | [ | Declare_Type Array,Constrained 13de 0337 | 7 | Declare_Variable Array 13df 00e4 | | Load_Encached Positive_Cache 13e0 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 13e1 BODY_13d0: 13e1 00cf | | Action Mark_Auxiliary 13e2 e5ff | | Load 0x2,-0x1 13e3 01d9 | | Execute Vector,Reverse_Bounds 13e4 0263 | c | Execute Discrete,Above_Bound 13e5 7038 |p8 | Jump_Nonzero 0x141e 13e6 e402 | | Load 0x2,0x2 13e7 e403 | | Load 0x2,0x3 13e8 00d8 | | Load_Top At_Offset_0 13e9 0a01 | | Execute_Immediate Plus,0x1 13ea 00d8 | | Load_Top At_Offset_0 13eb 00e2 | | Load_Encached Integer_Cache 13ec 0260 | ` | Execute Discrete,In_Type 13ed 7001 |p | Jump_Nonzero 0x13ef 13ee 0801 | | Execute_Immediate Raise,0x1 13ef 00d9 | | Load_Top At_Offset_1 13f0 00d9 | | Load_Top At_Offset_1 13f1 e407 | | Load 0x2,0x7 13f2 035b | [ | Declare_Type Array,Constrained 13f3 00db | | Load_Top At_Offset_3 13f4 01cd | | Execute Vector,Slice_Reference 13f5 00d8 | | Load_Top At_Offset_0 13f6 01dd | | Execute Vector,First 13f7 00d8 | | Load_Top At_Offset_0 13f8 0a01 | | Execute_Immediate Plus,0x1 13f9 00e9 | | Load_Encached String_Cache 13fa 035b | [ | Declare_Type Array,Constrained 13fb 0337 | 7 | Declare_Variable Array 13fc 00d8 | | Load_Top At_Offset_0 13fd 01dd | | Execute Vector,First 13fe e406 | | Load 0x2,0x6 13ff e5ff | | Load 0x2,-0x1 1400 01d7 | | Execute Vector,Field_Read 1401 09fc | | Execute_Immediate Binary_Scale,-0x4 1402 e215 | | Load 0x1,0x15 1403 01d7 | | Execute Vector,Field_Read 1404 00d9 | | Load_Top At_Offset_1 1405 00db | | Load_Top At_Offset_3 1406 01d6 | | Execute Vector,Field_Write 1407 0a01 | | Execute_Immediate Plus,0x1 1408 e406 | | Load 0x2,0x6 1409 e5ff | | Load 0x2,-0x1 140a 01d7 | | Execute Vector,Field_Read 140b 480f |H | Short_Literal 0xf 140c 0279 | y | Execute Discrete,And 140d e215 | | Load 0x1,0x15 140e 01d7 | | Execute Vector,Field_Read 140f 00d9 | | Load_Top At_Offset_1 1410 00db | | Load_Top At_Offset_3 1411 01d6 | | Execute Vector,Field_Write 1412 00d1 | | Pop_Control Pop_Count_1 1413 00cd | | Action Spare6_Action 1414 00da | | Load_Top At_Offset_2 1415 00da | | Load_Top At_Offset_2 1416 e407 | | Load 0x2,0x7 1417 01ce | | Execute Vector,Slice_Write 1418 00d3 | | Pop_Control Pop_Count_3 1419 00db | | Load_Top At_Offset_3 141a 0a02 | | Execute_Immediate Plus,0x2 141b c403 | | Store 0x2,0x3 141c 00c8 | | Action Pop_Auxiliary_Range 141d 3fc8 |? | Loop_Increasing 0x13e6 141e 00ce | | Action Pop_Auxiliary 141f 00d9 | | Load_Top At_Offset_1 1420 00e9 | | Load_Encached String_Cache 1421 01c6 | | Execute Vector,Convert_To_Formal 1422 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1423 0000 0000 | | .BLANK 0000[0x5] 1428 ; -------------------------------------------------------------------------------------- 1428 ; SUBPROGRAM 1428 ; -------------------------------------------------------------------------------------- 1428 142b | + | .CONST 0x142b ; Address of begin 1429 0004 | | .CONST 0x0004 ; Address of exception handler 142a 0001 | | .CONST 0x0001 ; Number of locals 142b BODY_1428: 142b INIT_1428: 142b 4607 |F | Jump_Case 0x8 142c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 142d 7806 |x | Jump 0x1434 ; case 0x1 142e 7809 |x | Jump 0x1438 ; case 0x2 142f 780d |x | Jump 0x143d ; case 0x3 1430 7810 |x | Jump 0x1441 ; case 0x4 1431 7811 |x | Jump 0x1443 ; case 0x5 1432 7812 |x | Jump 0x1445 ; case 0x6 1433 7815 |x | Jump 0x1449 ; case 0x7 1434 00da | | Load_Top At_Offset_2 1435 0091 1c68 | h| Action Push_String_Extended_Indexed,0x1c68 ; "S0" 1437 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1438 00db | | Load_Top At_Offset_3 1439 00db | | Load_Top At_Offset_3 143a 00e0 | | Load_Encached Standard_Cache 143b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 143c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 143d 00da | | Load_Top At_Offset_2 143e 00e0 | | Load_Encached Standard_Cache 143f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1440 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1441 00db | | Load_Top At_Offset_3 1442 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1443 00db | | Load_Top At_Offset_3 1444 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1445 e20e | | Load 0x1,0xe 1446 00dc | | Load_Top At_Offset_4 1447 0267 | g | Execute Discrete,Predecessor 1448 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1449 e20e | | Load 0x1,0xe 144a 00dc | | Load_Top At_Offset_4 144b 0268 | h | Execute Discrete,Successor 144c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 144d 0000 0000 | | .XXX[0x3] 144f 0000 | | 1450 ; -------------------------------------------------------------------------------------- 1450 ; SUBPROGRAM 1450 ; -------------------------------------------------------------------------------------- 1450 1467 | g | .CONST 0x1467 ; Address of begin 1451 1491 | | .CONST 0x1491 ; Address of exception handler 1452 0009 | | .CONST 0x0009 ; Number of locals 1453 INIT_1450: 1453 e5fb | | Load 0x2,-0x5 1454 01dd | | Execute Vector,First 1455 00e4 | | Load_Encached Positive_Cache 1456 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1457 e5fb | | Load 0x2,-0x5 1458 01dc | | Execute Vector,Last 1459 00e3 | | Load_Encached Natural_Cache 145a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 145b e20e | | Load 0x1,0xe 145c 0007 | | Action Break_Optional 145d 029f 14d3 | | Declare_Subprogram INIT_14d0,For_Call 145f 029f 14e3 | | Declare_Subprogram INIT_14e0,For_Call 1461 029f 1533 | 3| Declare_Subprogram INIT_1530,For_Call 1463 029f 156b | k| Declare_Subprogram INIT_1568,For_Call 1465 029f 1593 | | Declare_Subprogram INIT_1590,For_Call 1467 BODY_1450: 1467 00cf | | Action Mark_Auxiliary 1468 7804 |x | Jump 0x146d 1469 e402 | | Load 0x2,0x2 146a 0a01 | | Execute_Immediate Plus,0x1 146b c402 | | Store 0x2,0x2 146c 00c9 | | Action Pop_Auxiliary_Loop 146d e402 | | Load 0x2,0x2 146e e403 | | Load 0x2,0x3 146f 027a | z | Execute Discrete,Less_Equal 1470 680c |h | Jump_Zero 0x147d 1471 e402 | | Load 0x2,0x2 1472 e5fb | | Load 0x2,-0x5 1473 01d7 | | Execute Vector,Field_Read 1474 0f53 | S | Execute_Immediate Equal,0x53 1475 7005 |p | Jump_Nonzero 0x147b 1476 e402 | | Load 0x2,0x2 1477 e5fb | | Load 0x2,-0x5 1478 01d7 | | Execute Vector,Field_Read 1479 0f73 | s | Execute_Immediate Equal,0x73 147a 7801 |x | Jump 0x147c 147b 4801 |H | Short_Literal 0x1 147c 6fec |o | Jump_Zero 0x1469 147d 00ce | | Action Pop_Auxiliary 147e e403 | | Load 0x2,0x3 147f e402 | | Load 0x2,0x2 1480 0272 | r | Execute Discrete,Minus 1481 0d03 | | Execute_Immediate Less,0x3 1482 680b |h | Jump_Zero 0x148e 1483 4801 |H | Short_Literal 0x1 1484 4822 |H" | Short_Literal 0x22 1485 0092 1cde | | Action Push_String_Extended,0x1cde ; "record too short: \x22" 1487 e402 | | Load 0x2,0x2 1488 e403 | | Load 0x2,0x3 1489 e5fb | | Load 0x2,-0x5 148a 01cf | | Execute Vector,Slice_Read 148b 01cc | | Execute Vector,Catenate 148c 01cb | | Execute Vector,Append 148d 8405 | | Call 0x2,0x5 148e 8408 | | Call 0x2,0x8 148f 8409 | | Call 0x2,0x9 1490 4506 |E | Exit_Suprogram New_Top_Offset 0x6 1491 TRAP_1450: 1491 e002 | | Load 0x0,0x2 1492 010f | | Execute Exception,Equal 1493 6801 |h | Jump_Zero 0x1495 1494 4506 |E | Exit_Suprogram New_Top_Offset 0x6 1495 0100 | | Execute Exception,Raise 1496 0000 0000 | | .XXX[0x2] 1498 ; -------------------------------------------------------------------------------------- 1498 ; SUBPROGRAM 1498 ; -------------------------------------------------------------------------------------- 1498 149d | | .CONST 0x149d ; Address of begin 1499 0004 | | .CONST 0x0004 ; Address of exception handler 149a 0002 | | .CONST 0x0002 ; Number of locals 149b INIT_1498: 149b e210 | | Load 0x1,0x10 149c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 149d BODY_1498: 149d 00cf | | Action Mark_Auxiliary 149e e5ff | | Load 0x2,-0x1 149f 01d9 | | Execute Vector,Reverse_Bounds 14a0 0263 | c | Execute Discrete,Above_Bound 14a1 7010 |p | Jump_Nonzero 0x14b2 14a2 00db | | Load_Top At_Offset_3 14a3 00d9 | | Load_Top At_Offset_1 14a4 e5ff | | Load 0x2,-0x1 14a5 01d7 | | Execute Vector,Field_Read 14a6 0273 | s | Execute Discrete,Plus 14a7 48ff |H | Short_Literal 0xff 14a8 0279 | y | Execute Discrete,And 14a9 00d8 | | Load_Top At_Offset_0 14aa e003 | | Load 0x0,0x3 14ab 1b11 | | Execute Package,Field_Read,Field_Number 0x11 14ac 0260 | ` | Execute Discrete,In_Type 14ad 7001 |p | Jump_Nonzero 0x14af 14ae 0801 | | Execute_Immediate Raise,0x1 14af a402 | | Store_Unchecked 0x2,0x2 14b0 00c8 | | Action Pop_Auxiliary_Range 14b1 3ff0 |? | Loop_Increasing 0x14a2 14b2 00ce | | Action Pop_Auxiliary 14b3 00d8 | | Load_Top At_Offset_0 14b4 0275 | u | Execute Discrete,Unary_Minus 14b5 0aff | | Execute_Immediate Plus,-0x1 14b6 48ff |H | Short_Literal 0xff 14b7 0279 | y | Execute Discrete,And 14b8 00d8 | | Load_Top At_Offset_0 14b9 e003 | | Load 0x0,0x3 14ba 1b11 | | Execute Package,Field_Read,Field_Number 0x11 14bb 0260 | ` | Execute Discrete,In_Type 14bc 7001 |p | Jump_Nonzero 0x14be 14bd 0801 | | Execute_Immediate Raise,0x1 14be 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 14bf 4801 |H | Short_Literal 0x1 14c0 4801 |H | Short_Literal 0x1 14c1 e003 | | Load 0x0,0x3 14c2 1b12 | | Execute Package,Field_Read,Field_Number 0x12 14c3 035b | [ | Declare_Type Array,Constrained 14c4 0337 | 7 | Declare_Variable Array 14c5 00d9 | | Load_Top At_Offset_1 14c6 4801 |H | Short_Literal 0x1 14c7 00da | | Load_Top At_Offset_2 14c8 01d6 | | Execute Vector,Field_Write 14c9 e003 | | Load 0x0,0x3 14ca 1b12 | | Execute Package,Field_Read,Field_Number 0x12 14cb 01c6 | | Execute Vector,Convert_To_Formal 14cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14cd 0000 0000 | | .XXX[0x3] 14cf 0000 | | 14d0 ; -------------------------------------------------------------------------------------- 14d0 ; SUBPROGRAM 14d0 ; -------------------------------------------------------------------------------------- 14d0 14d3 | | .CONST 0x14d3 ; Address of begin 14d1 0004 | | .CONST 0x0004 ; Address of exception handler 14d2 0001 | | .CONST 0x0001 ; Number of locals 14d3 BODY_14d0: 14d3 INIT_14d0: 14d3 00db | | Load_Top At_Offset_3 14d4 6804 |h | Jump_Zero 0x14d9 14d5 00da | | Load_Top At_Offset_2 14d6 85fd | | Call 0x2,-0x3 14d7 e002 | | Load 0x0,0x2 14d8 0257 | W | Execute Discrete,Raise 14d9 00da | | Load_Top At_Offset_2 14da 85fe | | Call 0x2,-0x2 14db 4503 |E | Exit_Suprogram New_Top_Offset 0x3 14dc 0000 0000 | | .BLANK 0000[0x4] 14e0 ; -------------------------------------------------------------------------------------- 14e0 ; SUBPROGRAM 14e0 ; -------------------------------------------------------------------------------------- 14e0 14e3 | | .CONST 0x14e3 ; Address of begin 14e1 0004 | | .CONST 0x0004 ; Address of exception handler 14e2 0001 | | .CONST 0x0001 ; Number of locals 14e3 BODY_14e0: 14e3 INIT_14e0: 14e3 00da | | Load_Top At_Offset_2 14e4 00d8 | | Load_Top At_Offset_0 14e5 0d41 | A | Execute_Immediate Less,0x41 14e6 7018 |p | Jump_Nonzero 0x14ff 14e7 00d8 | | Load_Top At_Offset_0 14e8 0c47 | G | Execute_Immediate Greater_Equal,0x47 14e9 7010 |p | Jump_Nonzero 0x14fa 14ea 00d1 | | Pop_Control Pop_Count_1 14eb 00da | | Load_Top At_Offset_2 14ec 0abf | | Execute_Immediate Plus,-0x41 14ed 00d8 | | Load_Top At_Offset_0 14ee e003 | | Load 0x0,0x3 14ef 1b11 | | Execute Package,Field_Read,Field_Number 0x11 14f0 0260 | ` | Execute Discrete,In_Type 14f1 7001 |p | Jump_Nonzero 0x14f3 14f2 0801 | | Execute_Immediate Raise,0x1 14f3 0a0a | | Execute_Immediate Plus,0xa 14f4 00d8 | | Load_Top At_Offset_0 14f5 e211 | | Load 0x1,0x11 14f6 0260 | ` | Execute Discrete,In_Type 14f7 7001 |p | Jump_Nonzero 0x14f9 14f8 0801 | | Execute_Immediate Raise,0x1 14f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14fa 4861 |Ha | Short_Literal 0x61 14fb 4866 |Hf | Short_Literal 0x66 14fc 0262 | b | Execute Discrete,In_Range 14fd 7014 |p | Jump_Nonzero 0x1512 14fe 7822 |x" | Jump 0x1521 14ff 4830 |H0 | Short_Literal 0x30 1500 4839 |H9 | Short_Literal 0x39 1501 0262 | b | Execute Discrete,In_Range 1502 7001 |p | Jump_Nonzero 0x1504 1503 781d |x | Jump 0x1521 1504 00da | | Load_Top At_Offset_2 1505 0ad0 | | Execute_Immediate Plus,-0x30 1506 00d8 | | Load_Top At_Offset_0 1507 e003 | | Load 0x0,0x3 1508 1b11 | | Execute Package,Field_Read,Field_Number 0x11 1509 0260 | ` | Execute Discrete,In_Type 150a 7001 |p | Jump_Nonzero 0x150c 150b 0801 | | Execute_Immediate Raise,0x1 150c 00d8 | | Load_Top At_Offset_0 150d e211 | | Load 0x1,0x11 150e 0260 | ` | Execute Discrete,In_Type 150f 7001 |p | Jump_Nonzero 0x1511 1510 0801 | | Execute_Immediate Raise,0x1 1511 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1512 00da | | Load_Top At_Offset_2 1513 0a9f | | Execute_Immediate Plus,-0x61 1514 00d8 | | Load_Top At_Offset_0 1515 e003 | | Load 0x0,0x3 1516 1b11 | | Execute Package,Field_Read,Field_Number 0x11 1517 0260 | ` | Execute Discrete,In_Type 1518 7001 |p | Jump_Nonzero 0x151a 1519 0801 | | Execute_Immediate Raise,0x1 151a 0a0a | | Execute_Immediate Plus,0xa 151b 00d8 | | Load_Top At_Offset_0 151c e211 | | Load 0x1,0x11 151d 0260 | ` | Execute Discrete,In_Type 151e 7001 |p | Jump_Nonzero 0x1520 151f 0801 | | Execute_Immediate Raise,0x1 1520 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1521 4801 |H | Short_Literal 0x1 1522 00db | | Load_Top At_Offset_3 1523 0092 1cdf | | Action Push_String_Extended,0x1cdf ; "not a hexadecimal digit: '" 1525 01cb | | Execute Vector,Append 1526 0092 1ce0 | | Action Push_String_Extended,0x1ce0 ; "'" 1528 01cc | | Execute Vector,Catenate 1529 8405 | | Call 0x2,0x5 152a 08e0 | | Execute_Immediate Raise,0xe0 152b 0000 0000 | | .BLANK 0000[0x5] 1530 ; -------------------------------------------------------------------------------------- 1530 ; SUBPROGRAM 1530 ; -------------------------------------------------------------------------------------- 1530 1543 | C | .CONST 0x1543 ; Address of begin 1531 0004 | | .CONST 0x0004 ; Address of exception handler 1532 0003 | | .CONST 0x0003 ; Number of locals 1533 INIT_1530: 1533 00da | | Load_Top At_Offset_2 1534 01dd | | Execute Vector,First 1535 00e4 | | Load_Encached Positive_Cache 1536 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1537 4801 |H | Short_Literal 0x1 1538 e7ff | | Load 0x3,-0x1 1539 01db | | Execute Vector,Length 153a 09ff | | Execute_Immediate Binary_Scale,-0x1 153b 00d8 | | Load_Top At_Offset_0 153c 00e2 | | Load_Encached Integer_Cache 153d 0260 | ` | Execute Discrete,In_Type 153e 7001 |p | Jump_Nonzero 0x1540 153f 0801 | | Execute_Immediate Raise,0x1 1540 e004 | | Load 0x0,0x4 1541 035b | [ | Declare_Type Array,Constrained 1542 0337 | 7 | Declare_Variable Array 1543 BODY_1530: 1543 00cf | | Action Mark_Auxiliary 1544 00d9 | | Load_Top At_Offset_1 1545 01d9 | | Execute Vector,Reverse_Bounds 1546 0263 | c | Execute Discrete,Above_Bound 1547 7013 |p | Jump_Nonzero 0x155b 1548 e602 | | Load 0x3,0x2 1549 e7ff | | Load 0x3,-0x1 154a 01d7 | | Execute Vector,Field_Read 154b 8406 | | Call 0x2,0x6 154c 0904 | | Execute_Immediate Binary_Scale,0x4 154d e602 | | Load 0x3,0x2 154e 0a01 | | Execute_Immediate Plus,0x1 154f e7ff | | Load 0x3,-0x1 1550 01d7 | | Execute Vector,Field_Read 1551 8406 | | Call 0x2,0x6 1552 0273 | s | Execute Discrete,Plus 1553 00d9 | | Load_Top At_Offset_1 1554 e603 | | Load 0x3,0x3 1555 01d6 | | Execute Vector,Field_Write 1556 e602 | | Load 0x3,0x2 1557 0a02 | | Execute_Immediate Plus,0x2 1558 c602 | | Store 0x3,0x2 1559 00c8 | | Action Pop_Auxiliary_Range 155a 3fed |? | Loop_Increasing 0x1548 155b 00ce | | Action Pop_Auxiliary 155c 00d8 | | Load_Top At_Offset_0 155d e003 | | Load 0x0,0x3 155e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 155f 01c6 | | Execute Vector,Convert_To_Formal 1560 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1561 0000 0000 | | .BLANK 0000[0x7] 1568 ; -------------------------------------------------------------------------------------- 1568 ; SUBPROGRAM 1568 ; -------------------------------------------------------------------------------------- 1568 156b | k | .CONST 0x156b ; Address of begin 1569 1579 | y | .CONST 0x1579 ; Address of exception handler 156a 0001 | | .CONST 0x0001 ; Number of locals 156b BODY_1568: 156b INIT_1568: 156b e402 | | Load 0x2,0x2 156c 00d8 | | Load_Top At_Offset_0 156d 0a01 | | Execute_Immediate Plus,0x1 156e 00d8 | | Load_Top At_Offset_0 156f 00e2 | | Load_Encached Integer_Cache 1570 0260 | ` | Execute Discrete,In_Type 1571 7001 |p | Jump_Nonzero 0x1573 1572 0801 | | Execute_Immediate Raise,0x1 1573 e5fb | | Load 0x2,-0x5 1574 01cf | | Execute Vector,Slice_Read 1575 e20e | | Load 0x1,0xe 1576 1c02 | | Execute_Immediate Run_Utility,0x2 1577 a404 | | Store_Unchecked 0x2,0x4 1578 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1579 TRAP_1568: 1579 0007 | | Action Break_Optional 157a 4801 |H | Short_Literal 0x1 157b 4822 |H" | Short_Literal 0x22 157c 0092 1ce1 | | Action Push_String_Extended,0x1ce1 ; "undefined type: \x22" 157e e402 | | Load 0x2,0x2 157f 00d8 | | Load_Top At_Offset_0 1580 0a01 | | Execute_Immediate Plus,0x1 1581 00d8 | | Load_Top At_Offset_0 1582 00e2 | | Load_Encached Integer_Cache 1583 0260 | ` | Execute Discrete,In_Type 1584 7001 |p | Jump_Nonzero 0x1586 1585 0801 | | Execute_Immediate Raise,0x1 1586 e5fb | | Load 0x2,-0x5 1587 01cf | | Execute Vector,Slice_Read 1588 01cc | | Execute Vector,Catenate 1589 01cb | | Execute Vector,Append 158a 8405 | | Call 0x2,0x5 158b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 158c 0000 0000 | | .BLANK 0000[0x4] 1590 ; -------------------------------------------------------------------------------------- 1590 ; SUBPROGRAM 1590 ; -------------------------------------------------------------------------------------- 1590 15bc | | .CONST 0x15bc ; Address of begin 1591 0004 | | .CONST 0x0004 ; Address of exception handler 1592 0006 | | .CONST 0x0006 ; Number of locals 1593 INIT_1590: 1593 e402 | | Load 0x2,0x2 1594 0a04 | | Execute_Immediate Plus,0x4 1595 00e3 | | Load_Encached Natural_Cache 1596 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1597 00d8 | | Load_Top At_Offset_0 1598 e404 | | Load 0x2,0x4 1599 e213 | | Load 0x1,0x13 159a 01d7 | | Execute Vector,Field_Read 159b 0901 | | Execute_Immediate Binary_Scale,0x1 159c 0273 | s | Execute Discrete,Plus 159d 00e3 | | Load_Encached Natural_Cache 159e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 159f e402 | | Load 0x2,0x2 15a0 0a02 | | Execute_Immediate Plus,0x2 15a1 00d8 | | Load_Top At_Offset_0 15a2 00e2 | | Load_Encached Integer_Cache 15a3 0260 | ` | Execute Discrete,In_Type 15a4 7001 |p | Jump_Nonzero 0x15a6 15a5 0801 | | Execute_Immediate Raise,0x1 15a6 e402 | | Load 0x2,0x2 15a7 0a03 | | Execute_Immediate Plus,0x3 15a8 00d8 | | Load_Top At_Offset_0 15a9 00e2 | | Load_Encached Integer_Cache 15aa 0260 | ` | Execute Discrete,In_Type 15ab 7001 |p | Jump_Nonzero 0x15ad 15ac 0801 | | Execute_Immediate Raise,0x1 15ad e5fb | | Load 0x2,-0x5 15ae 01cf | | Execute Vector,Slice_Read 15af 8407 | | Call 0x2,0x7 15b0 e402 | | Load 0x2,0x2 15b1 0a02 | | Execute_Immediate Plus,0x2 15b2 00d9 | | Load_Top At_Offset_1 15b3 01dd | | Execute Vector,First 15b4 00da | | Load_Top At_Offset_2 15b5 01d7 | | Execute Vector,Field_Read 15b6 0901 | | Execute_Immediate Binary_Scale,0x1 15b7 0273 | s | Execute Discrete,Plus 15b8 00e3 | | Load_Encached Natural_Cache 15b9 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 15ba 029f 15e3 | | Declare_Subprogram INIT_15e0,For_Call 15bc BODY_1590: 15bc 00d9 | | Load_Top At_Offset_1 15bd 0a01 | | Execute_Immediate Plus,0x1 15be e403 | | Load 0x2,0x3 15bf 027d | } | Execute Discrete,Greater 15c0 680b |h | Jump_Zero 0x15cc 15c1 4801 |H | Short_Literal 0x1 15c2 4822 |H" | Short_Literal 0x22 15c3 0092 1ce2 | | Action Push_String_Extended,0x1ce2 ; "record shorter than encoded record length: \x22" 15c5 e402 | | Load 0x2,0x2 15c6 e403 | | Load 0x2,0x3 15c7 e5fb | | Load 0x2,-0x5 15c8 01cf | | Execute Vector,Slice_Read 15c9 01cc | | Execute Vector,Catenate 15ca 01cb | | Execute Vector,Append 15cb 8405 | | Call 0x2,0x5 15cc 00db | | Load_Top At_Offset_3 15cd 00da | | Load_Top At_Offset_2 15ce 027d | } | Execute Discrete,Greater 15cf 680b |h | Jump_Zero 0x15db 15d0 4801 |H | Short_Literal 0x1 15d1 4822 |H" | Short_Literal 0x22 15d2 0092 1ce3 | | Action Push_String_Extended,0x1ce3 ; "record shorter than address: \x22" 15d4 e402 | | Load 0x2,0x2 15d5 e403 | | Load 0x2,0x3 15d6 e5fb | | Load 0x2,-0x5 15d7 01cf | | Execute Vector,Slice_Read 15d8 01cc | | Execute Vector,Catenate 15d9 01cb | | Execute Vector,Append 15da 8405 | | Call 0x2,0x5 15db 8606 | | Call 0x3,0x6 15dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 15dd 0000 0000 | | .XXX[0x3] 15df 0000 | | 15e0 ; -------------------------------------------------------------------------------------- 15e0 ; SUBPROGRAM 15e0 ; -------------------------------------------------------------------------------------- 15e0 15fa | | .CONST 0x15fa ; Address of begin 15e1 0004 | | .CONST 0x0004 ; Address of exception handler 15e2 0004 | | .CONST 0x0004 ; Number of locals 15e3 INIT_15e0: 15e3 e602 | | Load 0x3,0x2 15e4 e603 | | Load 0x3,0x3 15e5 0aff | | Execute_Immediate Plus,-0x1 15e6 e5fb | | Load 0x2,-0x5 15e7 01cf | | Execute Vector,Slice_Read 15e8 8407 | | Call 0x2,0x7 15e9 e603 | | Load 0x3,0x3 15ea e605 | | Load 0x3,0x5 15eb 0aff | | Execute_Immediate Plus,-0x1 15ec e5fb | | Load 0x2,-0x5 15ed 01cf | | Execute Vector,Slice_Read 15ee 8407 | | Call 0x2,0x7 15ef e605 | | Load 0x3,0x5 15f0 00d8 | | Load_Top At_Offset_0 15f1 0a01 | | Execute_Immediate Plus,0x1 15f2 00d8 | | Load_Top At_Offset_0 15f3 00e2 | | Load_Encached Integer_Cache 15f4 0260 | ` | Execute Discrete,In_Type 15f5 7001 |p | Jump_Nonzero 0x15f7 15f6 0801 | | Execute_Immediate Raise,0x1 15f7 e5fb | | Load 0x2,-0x5 15f8 01cf | | Execute Vector,Slice_Read 15f9 8407 | | Call 0x2,0x7 15fa BODY_15e0: 15fa e605 | | Load 0x3,0x5 15fb 0a01 | | Execute_Immediate Plus,0x1 15fc e403 | | Load 0x2,0x3 15fd 027e | ~ | Execute Discrete,Not_Equal 15fe 6811 |h | Jump_Zero 0x1610 15ff 4800 |H | Short_Literal 0x0 1600 4822 |H" | Short_Literal 0x22 1601 0092 1ce4 | | Action Push_String_Extended,0x1ce4 ; "extraneous data at end of line: \x22" 1603 e605 | | Load 0x3,0x5 1604 0a02 | | Execute_Immediate Plus,0x2 1605 00d8 | | Load_Top At_Offset_0 1606 00e2 | | Load_Encached Integer_Cache 1607 0260 | ` | Execute Discrete,In_Type 1608 7001 |p | Jump_Nonzero 0x160a 1609 0801 | | Execute_Immediate Raise,0x1 160a e403 | | Load 0x2,0x3 160b e5fb | | Load 0x2,-0x5 160c 01cf | | Execute Vector,Slice_Read 160d 01cc | | Execute Vector,Catenate 160e 01cb | | Execute Vector,Append 160f 8405 | | Call 0x2,0x5 1610 e604 | | Load 0x3,0x4 1611 00db | | Load_Top At_Offset_3 1612 01cc | | Execute Vector,Catenate 1613 00da | | Load_Top At_Offset_2 1614 01cc | | Execute Vector,Catenate 1615 8216 | | Call 0x1,0x16 1616 00d9 | | Load_Top At_Offset_1 1617 01df | | Execute Vector,Equal 1618 7004 |p | Jump_Nonzero 0x161d 1619 4801 |H | Short_Literal 0x1 161a 0092 1ce5 | | Action Push_String_Extended,0x1ce5 ; "bad checksum" 161c 8405 | | Call 0x2,0x5 161d 00d9 | | Load_Top At_Offset_1 161e 00db | | Load_Top At_Offset_3 161f e404 | | Load 0x2,0x4 1620 85fc | | Call 0x2,-0x4 1621 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1622 0000 0000 | | .BLANK 0000[0x6] 1628 ; -------------------------------------------------------------------------------------- 1628 ; SUBPROGRAM 1628 ; -------------------------------------------------------------------------------------- 1628 169a | | .CONST 0x169a ; Address of begin 1629 0004 | | .CONST 0x0004 ; Address of exception handler 162a 0021 | ! | .CONST 0x0021 ; Number of locals 162b INIT_1628: 162b 029a 16ab | | Declare_Subprogram INIT_16a8,For_Outer_Call,Visible,Unelaborated 162d 029a 1703 | | Declare_Subprogram INIT_1700,For_Outer_Call,Visible,Unelaborated 162f 029a 1793 | | Declare_Subprogram INIT_1790,For_Outer_Call,Visible,Unelaborated 1631 e001 | | Load 0x0,0x1 1632 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1633 0129 | ) | Execute Any,Make_Visible 1634 00e5 | | Load_Encached Long_Integer_Cache 1635 0129 | ) | Execute Any,Make_Visible 1636 029a 181b | | Declare_Subprogram INIT_1818,For_Outer_Call,Visible,Unelaborated 1638 029a 18d3 | | Declare_Subprogram INIT_18d0,For_Outer_Call,Visible,Unelaborated 163a 00db | | Load_Top At_Offset_3 163b 00e3 | | Load_Encached Natural_Cache 163c 02a0 | | Declare_Subprogram Null_Subprogram 163d 4802 |H | Short_Literal 0x2 163e 032e | . | Declare_Type Record,Defined,Visible 163f 029a 18f3 | | Declare_Subprogram INIT_18f0,For_Outer_Call,Visible,Unelaborated 1641 00d9 | | Load_Top At_Offset_1 1642 0322 | " | Declare_Variable Record 1643 4800 |H | Short_Literal 0x0 1644 00d9 | | Load_Top At_Offset_1 1645 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1646 60b5 |` | Indirect_Literal Discrete,0x16fc,{0x00000000, 0x00001000} 1647 00d9 | | Load_Top At_Offset_1 1648 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1649 0129 | ) | Execute Any,Make_Visible 164a 4800 |H | Short_Literal 0x0 164b 0093 1bc3 | | push_full_address INIT_1bc0 164d 02a0 | | Declare_Subprogram Null_Subprogram 164e 038f | | Declare_Type Package,Defined,Visible 164f 00b6 | | Action Make_Scope 1650 4801 |H | Short_Literal 0x1 1651 00da | | Load_Top At_Offset_2 1652 020e | | Execute Module,Augment_Imports 1653 0386 | | Declare_Variable Package,Visible 1654 4800 |H | Short_Literal 0x0 1655 0093 1aeb | | push_full_address INIT_1ae8 1657 02a0 | | Declare_Subprogram Null_Subprogram 1658 038f | | Declare_Type Package,Defined,Visible 1659 00b6 | | Action Make_Scope 165a 4801 |H | Short_Literal 0x1 165b 00da | | Load_Top At_Offset_2 165c 020e | | Execute Module,Augment_Imports 165d 0386 | | Declare_Variable Package,Visible 165e 4800 |H | Short_Literal 0x0 165f 0093 1abb | | push_full_address INIT_1ab8 1661 02a0 | | Declare_Subprogram Null_Subprogram 1662 038f | | Declare_Type Package,Defined,Visible 1663 00b6 | | Action Make_Scope 1664 4801 |H | Short_Literal 0x1 1665 00da | | Load_Top At_Offset_2 1666 020e | | Execute Module,Augment_Imports 1667 0386 | | Declare_Variable Package,Visible 1668 4800 |H | Short_Literal 0x0 1669 0093 1a43 | C| push_full_address INIT_1a40 166b 02a0 | | Declare_Subprogram Null_Subprogram 166c 038f | | Declare_Type Package,Defined,Visible 166d 00b6 | | Action Make_Scope 166e 4801 |H | Short_Literal 0x1 166f 00da | | Load_Top At_Offset_2 1670 020e | | Execute Module,Augment_Imports 1671 0386 | | Declare_Variable Package,Visible 1672 00bf | | Action Accept_Activation 1673 e210 | | Load 0x1,0x10 1674 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1675 4801 |H | Short_Literal 0x1 1676 6081 |` | Indirect_Literal Discrete,0x16f8,{0x00000000, 0x00000400} 1677 e002 | | Load 0x0,0x2 1678 035b | [ | Declare_Type Array,Constrained 1679 0337 | 7 | Declare_Variable Array 167a 00e3 | | Load_Encached Natural_Cache 167b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 167c 4800 |H | Short_Literal 0x0 167d 6076 |`v | Indirect_Literal Discrete,0x16f4,{0x00000000, 0x0000ffff} 167e 00e5 | | Load_Encached Long_Integer_Cache 167f 03f8 | | Declare_Type Discrete,Constrained 1680 029d 1963 | c| Declare_Subprogram INIT_1960,For_Outer_Call 1682 029d 1973 | s| Declare_Subprogram INIT_1970,For_Outer_Call 1684 029d 198b | | Declare_Subprogram INIT_1988,For_Outer_Call 1686 1d13 | | Execute_Immediate Reference_Lex_1,0x13 1687 00c7 | | Action Elaborate_Subprogram 1688 1d12 | | Execute_Immediate Reference_Lex_1,0x12 1689 00c7 | | Action Elaborate_Subprogram 168a 1d15 | | Execute_Immediate Reference_Lex_1,0x15 168b 00c7 | | Action Elaborate_Subprogram 168c 1d0d | | Execute_Immediate Reference_Lex_1,0xd 168d 00c7 | | Action Elaborate_Subprogram 168e 1d0e | | Execute_Immediate Reference_Lex_1,0xe 168f 00c7 | | Action Elaborate_Subprogram 1690 1d0f | | Execute_Immediate Reference_Lex_1,0xf 1691 00c7 | | Action Elaborate_Subprogram 1692 e217 | | Load 0x1,0x17 1693 020f | | Execute Module,Activate 1694 e218 | | Load 0x1,0x18 1695 020f | | Execute Module,Activate 1696 e219 | | Load 0x1,0x19 1697 020f | | Execute Module,Activate 1698 e21a | | Load 0x1,0x1a 1699 020f | | Execute Module,Activate 169a BODY_1628: 169a 6055 |`U | Indirect_Literal Discrete,0x16f0,{0x00000000, 0x0000e000} 169b a211 | | Store_Unchecked 0x1,0x11 169c e211 | | Load 0x1,0x11 169d 0910 | | Execute_Immediate Binary_Scale,0x10 169e a211 | | Store_Unchecked 0x1,0x11 169f 00bc | | Action Signal_Activated 16a0 00bb | | Action Signal_Completion 16a1 0000 0000 | | .BLANK 0000[0x7] 16a8 ; -------------------------------------------------------------------------------------- 16a8 ; SUBPROGRAM 16a8 ; -------------------------------------------------------------------------------------- 16a8 16af | | .CONST 0x16af ; Address of begin 16a9 0004 | | .CONST 0x0004 ; Address of exception handler 16aa 0003 | | .CONST 0x0003 ; Number of locals 16ab INIT_16a8: 16ab e001 | | Load 0x0,0x1 16ac 1b10 | | Execute Package,Field_Read,Field_Number 0x10 16ad 029f 1a0b | | Declare_Subprogram INIT_1a08,For_Call 16af BODY_16a8: 16af e003 | | Load 0x0,0x3 16b0 6805 |h | Jump_Zero 0x16b6 16b1 4802 |H | Short_Literal 0x2 16b2 0092 1ce6 | | Action Push_String_Extended,0x1ce6 ; "Enp_Driver.Reset" 16b4 8004 | | Call 0x0,0x4 16b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 16b6 e001 | | Load 0x0,0x1 16b7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 16b8 e001 | | Load 0x0,0x1 16b9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 16ba 005a | Z | Store_Top Discrete,At_Offset_2 16bb 0092 1ce7 | | Action Push_String_Extended,0x1ce7 ; "Reset" 16bd 00da | | Load_Top At_Offset_2 16be 8220 | | Call 0x1,0x20 16bf e001 | | Load 0x0,0x1 16c0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 16c1 7006 |p | Jump_Nonzero 0x16c8 16c2 4807 |H | Short_Literal 0x7 16c3 0092 1ce8 | | Action Push_String_Extended,0x1ce8 ; "not Enp_Driver.Installed" 16c5 8004 | | Call 0x0,0x4 16c6 e005 | | Load 0x0,0x5 16c7 0257 | W | Execute Discrete,Raise 16c8 e001 | | Load 0x0,0x1 16c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 16ca 0e01 | | Execute_Immediate Not_Equal,0x1 16cb 680b |h | Jump_Zero 0x16d7 16cc 4807 |H | Short_Literal 0x7 16cd 0092 1ce9 | | Action Push_String_Extended,0x1ce9 ; "Enp_Driver.Driver_Version =" 16cf e001 | | Load 0x0,0x1 16d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 16d1 00e0 | | Load_Encached Standard_Cache 16d2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 16d3 01cc | | Execute Vector,Catenate 16d4 8004 | | Call 0x0,0x4 16d5 e005 | | Load 0x0,0x5 16d6 0257 | W | Execute Discrete,Raise 16d7 6014 |` | Indirect_Literal Discrete,0x16ec,{0x00000000, 0x00060000} 16d8 00ba | | Action Initiate_Delay 16d9 8403 | | Call 0x2,0x3 16da 700a |p | Jump_Nonzero 0x16e5 16db 600c |` | Indirect_Literal Discrete,0x16e8,{0x00000000, 0x00090000} 16dc 00ba | | Action Initiate_Delay 16dd 8403 | | Call 0x2,0x3 16de 7006 |p | Jump_Nonzero 0x16e5 16df 4807 |H | Short_Literal 0x7 16e0 0092 1cea | | Action Push_String_Extended,0x1cea ; "ENP did not complete self-test." 16e2 8004 | | Call 0x0,0x4 16e3 e005 | | Load 0x0,0x5 16e4 0257 | W | Execute Discrete,Raise 16e5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 16e6 0000 0000 | | .XXX[0x2] 16e8 0000 0000 | | .LITERAL {0x00000000, 0x00090000} 16ec 0000 0000 | | .LITERAL {0x00000000, 0x00060000} 16f0 0000 0000 | | .LITERAL {0x00000000, 0x0000e000} 16f4 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 16f8 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 16fc 0000 0000 | | .LITERAL {0x00000000, 0x00001000} 1700 ; -------------------------------------------------------------------------------------- 1700 ; SUBPROGRAM 1700 ; -------------------------------------------------------------------------------------- 1700 172c | , | .CONST 0x172c ; Address of begin 1701 0004 | | .CONST 0x0004 ; Address of exception handler 1702 0006 | | .CONST 0x0006 ; Number of locals 1703 INIT_1700: 1703 e006 | | Load 0x0,0x6 1704 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1705 02c7 | | Declare_Variable Any 1706 6085 |` | Indirect_Literal Discrete,0x178c,{0x00000000, 0x000f0000} 1707 e006 | | Load 0x0,0x6 1708 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1709 8007 | | Call 0x0,0x7 170a a402 | | Store_Unchecked 0x2,0x2 170b 607c |`| | Indirect_Literal Discrete,0x1788,{0x00000000, 0x00008000} 170c 00e7 | | Load_Encached Duration_Cache 170d 03f1 | | Declare_Variable Discrete,With_Value 170e 4801 |H | Short_Literal 0x1 170f 4802 |H | Short_Literal 0x2 1710 e002 | | Load 0x0,0x2 1711 035b | [ | Declare_Type Array,Constrained 1712 0337 | 7 | Declare_Variable Array 1713 4801 |H | Short_Literal 0x1 1714 e217 | | Load 0x1,0x17 1715 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1716 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1717 e002 | | Load 0x0,0x2 1718 035b | [ | Declare_Type Array,Constrained 1719 0337 | 7 | Declare_Variable Array 171a 4801 |H | Short_Literal 0x1 171b 4802 |H | Short_Literal 0x2 171c e008 | | Load 0x0,0x8 171d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 171e 035b | [ | Declare_Type Array,Constrained 171f 0337 | 7 | Declare_Variable Array 1720 4880 |H | Short_Literal 0x80 1721 4801 |H | Short_Literal 0x1 1722 00da | | Load_Top At_Offset_2 1723 01d6 | | Execute Vector,Field_Write 1724 4880 |H | Short_Literal 0x80 1725 4802 |H | Short_Literal 0x2 1726 00da | | Load_Top At_Offset_2 1727 01d6 | | Execute Vector,Field_Write 1728 00d9 | | Load_Top At_Offset_1 1729 01d4 | | Execute Vector,Structure_Write 172a e21e | | Load 0x1,0x1e 172b 0007 | | Action Break_Optional 172c BODY_1700: 172c 00d9 | | Load_Top At_Offset_1 172d e217 | | Load 0x1,0x17 172e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 172f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1730 8212 | | Call 0x1,0x12 1731 8213 | | Call 0x1,0x13 1732 e003 | | Load 0x0,0x3 1733 6803 |h | Jump_Zero 0x1737 1734 4802 |H | Short_Literal 0x2 1735 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 1736 7832 |x2 | Jump 0x1769 1737 e001 | | Load 0x0,0x1 1738 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1739 7006 |p | Jump_Nonzero 0x1740 173a 4807 |H | Short_Literal 0x7 173b 0092 1ce8 | | Action Push_String_Extended,0x1ce8 ; "not Enp_Driver.Installed" 173d 8004 | | Call 0x0,0x4 173e e005 | | Load 0x0,0x5 173f 0257 | W | Execute Discrete,Raise 1740 6047 |`G | Indirect_Literal Discrete,0x1788,{0x00000000, 0x00008000} 1741 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 1742 00cf | | Action Mark_Auxiliary 1743 e403 | | Load 0x2,0x3 1744 00ba | | Action Initiate_Delay 1745 4800 |H | Short_Literal 0x0 1746 e217 | | Load 0x1,0x17 1747 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1748 8215 | | Call 0x1,0x15 1749 e404 | | Load 0x2,0x4 174a 01d4 | | Execute Vector,Structure_Write 174b 4802 |H | Short_Literal 0x2 174c e404 | | Load 0x2,0x4 174d 01d7 | | Execute Vector,Field_Read 174e 4803 |H | Short_Literal 0x3 174f 0279 | y | Execute Discrete,And 1750 0c02 | | Execute_Immediate Greater_Equal,0x2 1751 7005 |p | Jump_Nonzero 0x1757 1752 4801 |H | Short_Literal 0x1 1753 e404 | | Load 0x2,0x4 1754 01d7 | | Execute Vector,Field_Read 1755 0c80 | | Execute_Immediate Greater_Equal,-0x80 1756 6806 |h | Jump_Zero 0x175d 1757 00db | | Load_Top At_Offset_3 1758 821f | | Call 0x1,0x1f 1759 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 175a 602d |`- | Indirect_Literal Discrete,0x1788,{0x00000000, 0x00008000} 175b 00ba | | Action Initiate_Delay 175c 780b |x | Jump 0x1768 175d e402 | | Load 0x2,0x2 175e e006 | | Load 0x0,0x6 175f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1760 8009 | | Call 0x0,0x9 1761 7006 |p | Jump_Nonzero 0x1768 1762 e403 | | Load 0x2,0x3 1763 6024 |`$ | Indirect_Literal Discrete,0x1788,{0x00000000, 0x00008000} 1764 0273 | s | Execute Discrete,Plus 1765 c403 | | Store 0x2,0x3 1766 00c9 | | Action Pop_Auxiliary_Loop 1767 7fdb | | Jump 0x1743 1768 00ce | | Action Pop_Auxiliary 1769 00d8 | | Load_Top At_Offset_0 176a 4803 |H | Short_Literal 0x3 176b 0279 | y | Execute Discrete,And 176c 0d02 | | Execute_Immediate Less,0x2 176d 6816 |h | Jump_Zero 0x1784 176e 4807 |H | Short_Literal 0x7 176f e00a | | Load 0x0,0xa 1770 0092 1ceb | | Action Push_String_Extended,0x1ceb ; ": Go.Control_Status =" 1772 01cc | | Execute Vector,Catenate 1773 00da | | Load_Top At_Offset_2 1774 00e0 | | Load_Encached Standard_Cache 1775 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1776 01cc | | Execute Vector,Catenate 1777 8004 | | Call 0x0,0x4 1778 4807 |H | Short_Literal 0x7 1779 0092 1cec | | Action Push_String_Extended,0x1cec ; "Diagnostic Control Block = " 177b 4801 |H | Short_Literal 0x1 177c e217 | | Load 0x1,0x17 177d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 177e 8215 | | Call 0x1,0x15 177f 800b | | Call 0x0,0xb 1780 01cc | | Execute Vector,Catenate 1781 8004 | | Call 0x0,0x4 1782 e005 | | Load 0x0,0x5 1783 0257 | W | Execute Discrete,Raise 1784 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1785 0000 0000 | | .XXX[0x3] 1787 0000 | | 1788 0000 0000 | | .LITERAL {0x00000000, 0x00008000} 178c 0000 0000 | | .LITERAL {0x00000000, 0x000f0000} 1790 ; -------------------------------------------------------------------------------------- 1790 ; SUBPROGRAM 1790 ; -------------------------------------------------------------------------------------- 1790 17b5 | | .CONST 0x17b5 ; Address of begin 1791 0004 | | .CONST 0x0004 ; Address of exception handler 1792 0007 | | .CONST 0x0007 ; Number of locals 1793 INIT_1790: 1793 e006 | | Load 0x0,0x6 1794 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1795 02c7 | | Declare_Variable Any 1796 67f5 |g | Indirect_Literal Discrete,0x178c,{0x00000000, 0x000f0000} 1797 e006 | | Load 0x0,0x6 1798 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1799 8007 | | Call 0x0,0x7 179a a402 | | Store_Unchecked 0x2,0x2 179b 67ec |g | Indirect_Literal Discrete,0x1788,{0x00000000, 0x00008000} 179c 00e7 | | Load_Encached Duration_Cache 179d 03f1 | | Declare_Variable Discrete,With_Value 179e 4800 |H | Short_Literal 0x0 179f 4801 |H | Short_Literal 0x1 17a0 e008 | | Load 0x0,0x8 17a1 1b12 | | Execute Package,Field_Read,Field_Number 0x12 17a2 035b | [ | Declare_Type Array,Constrained 17a3 0337 | 7 | Declare_Variable Array 17a4 4812 |H | Short_Literal 0x12 17a5 4800 |H | Short_Literal 0x0 17a6 00da | | Load_Top At_Offset_2 17a7 01d6 | | Execute Vector,Field_Write 17a8 4834 |H4 | Short_Literal 0x34 17a9 4801 |H | Short_Literal 0x1 17aa 00da | | Load_Top At_Offset_2 17ab 01d6 | | Execute Vector,Field_Write 17ac 4801 |H | Short_Literal 0x1 17ad 4802 |H | Short_Literal 0x2 17ae e002 | | Load 0x0,0x2 17af 035b | [ | Declare_Type Array,Constrained 17b0 0337 | 7 | Declare_Variable Array 17b1 e001 | | Load 0x0,0x1 17b2 1b10 | | Execute Package,Field_Read,Field_Number 0x10 17b3 e21e | | Load 0x1,0x1e 17b4 0007 | | Action Break_Optional 17b5 BODY_1790: 17b5 00db | | Load_Top At_Offset_3 17b6 e21a | | Load 0x1,0x1a 17b7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 17b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 17b9 8212 | | Call 0x1,0x12 17ba 8213 | | Call 0x1,0x13 17bb e003 | | Load 0x0,0x3 17bc 6807 |h | Jump_Zero 0x17c4 17bd 4802 |H | Short_Literal 0x2 17be 0092 1ced | | Action Push_String_Extended,0x1ced ; "Enp_Driver.Configure" 17c0 8004 | | Call 0x0,0x4 17c1 4800 |H | Short_Literal 0x0 17c2 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 17c3 783d |x= | Jump 0x1801 17c4 e001 | | Load 0x0,0x1 17c5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 17c6 7006 |p | Jump_Nonzero 0x17cd 17c7 4807 |H | Short_Literal 0x7 17c8 0092 1ce8 | | Action Push_String_Extended,0x1ce8 ; "not Enp_Driver.Installed" 17ca 8004 | | Call 0x0,0x4 17cb e005 | | Load 0x0,0x5 17cc 0257 | W | Execute Discrete,Raise 17cd 6046 |`F | Indirect_Literal Discrete,0x1814,{0x00000000, 0x0000ffff} 17ce 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 17cf e001 | | Load 0x0,0x1 17d0 1b10 | | Execute Package,Field_Read,Field_Number 0x10 17d1 603e |`> | Indirect_Literal Discrete,0x1810,{0x00007fff, 0xffffffff} 17d2 4802 |H | Short_Literal 0x2 17d3 e00c | | Load 0x0,0xc 17d4 00d8 | | Load_Top At_Offset_0 17d5 e008 | | Load 0x0,0x8 17d6 1b11 | | Execute Package,Field_Read,Field_Number 0x11 17d7 0260 | ` | Execute Discrete,In_Type 17d8 7001 |p | Jump_Nonzero 0x17da 17d9 0801 | | Execute_Immediate Raise,0x1 17da 4801 |H | Short_Literal 0x1 17db 4800 |H | Short_Literal 0x0 17dc e5ff | | Load 0x2,-0x1 17dd e001 | | Load 0x0,0x1 17de 1818 | | Execute Package,Field_Execute,Field_Number 0x18 17df 005a | Z | Store_Top Discrete,At_Offset_2 17e0 0092 1cee | | Action Push_String_Extended,0x1cee ; "Configure" 17e2 00da | | Load_Top At_Offset_2 17e3 8220 | | Call 0x1,0x20 17e4 00cf | | Action Mark_Auxiliary 17e5 e403 | | Load 0x2,0x3 17e6 00ba | | Action Initiate_Delay 17e7 4800 |H | Short_Literal 0x0 17e8 e21a | | Load 0x1,0x1a 17e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 17ea 8215 | | Call 0x1,0x15 17eb e405 | | Load 0x2,0x5 17ec 01d4 | | Execute Vector,Structure_Write 17ed 00db | | Load_Top At_Offset_3 17ee e404 | | Load 0x2,0x4 17ef 01df | | Execute Vector,Equal 17f0 7004 |p | Jump_Nonzero 0x17f5 17f1 00db | | Load_Top At_Offset_3 17f2 821f | | Call 0x1,0x1f 17f3 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 17f4 780b |x | Jump 0x1800 17f5 e402 | | Load 0x2,0x2 17f6 e006 | | Load 0x0,0x6 17f7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 17f8 8009 | | Call 0x0,0x9 17f9 7006 |p | Jump_Nonzero 0x1800 17fa e403 | | Load 0x2,0x3 17fb 678c |g | Indirect_Literal Discrete,0x1788,{0x00000000, 0x00008000} 17fc 0273 | s | Execute Discrete,Plus 17fd c403 | | Store 0x2,0x3 17fe 00c9 | | Action Pop_Auxiliary_Loop 17ff 7fe5 | | Jump 0x17e5 1800 00ce | | Action Pop_Auxiliary 1801 00d8 | | Load_Top At_Offset_0 1802 680c |h | Jump_Zero 0x180f 1803 4807 |H | Short_Literal 0x7 1804 e00a | | Load 0x0,0xa 1805 0092 1cef | | Action Push_String_Extended,0x1cef ; ": Configure.Initialization_Status =" 1807 01cc | | Execute Vector,Catenate 1808 00da | | Load_Top At_Offset_2 1809 00e0 | | Load_Encached Standard_Cache 180a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 180b 01cc | | Execute Vector,Catenate 180c 8004 | | Call 0x0,0x4 180d e005 | | Load 0x0,0x5 180e 0257 | W | Execute Discrete,Raise 180f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1810 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff} 1814 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 1818 ; -------------------------------------------------------------------------------------- 1818 ; SUBPROGRAM 1818 ; -------------------------------------------------------------------------------------- 1818 181d | | .CONST 0x181d ; Address of begin 1819 0004 | | .CONST 0x0004 ; Address of exception handler 181a 0002 | | .CONST 0x0002 ; Number of locals 181b INIT_1818: 181b 00e3 | | Load_Encached Natural_Cache 181c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 181d BODY_1818: 181d e21b | | Load 0x1,0x1b 181e e5ff | | Load 0x2,-0x1 181f 027f | | Execute Discrete,Equal 1820 7003 |p | Jump_Nonzero 0x1824 1821 8213 | | Call 0x1,0x13 1822 00db | | Load_Top At_Offset_3 1823 a21b | | Store_Unchecked 0x1,0x1b 1824 e21d | | Load 0x1,0x1d 1825 e5fe | | Load 0x2,-0x2 1826 01db | | Execute Vector,Length 1827 0273 | s | Execute Discrete,Plus 1828 609f |` | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1829 027a | z | Execute Discrete,Less_Equal 182a 681e |h | Jump_Zero 0x1849 182b e5fe | | Load 0x2,-0x2 182c e21d | | Load 0x1,0x1d 182d 0a01 | | Execute_Immediate Plus,0x1 182e 00d8 | | Load_Top At_Offset_0 182f 00e2 | | Load_Encached Integer_Cache 1830 0260 | ` | Execute Discrete,In_Type 1831 7001 |p | Jump_Nonzero 0x1833 1832 0801 | | Execute_Immediate Raise,0x1 1833 e21d | | Load 0x1,0x1d 1834 e5fe | | Load 0x2,-0x2 1835 01db | | Execute Vector,Length 1836 0273 | s | Execute Discrete,Plus 1837 00d8 | | Load_Top At_Offset_0 1838 00e2 | | Load_Encached Integer_Cache 1839 0260 | ` | Execute Discrete,In_Type 183a 7001 |p | Jump_Nonzero 0x183c 183b 0801 | | Execute_Immediate Raise,0x1 183c e21c | | Load 0x1,0x1c 183d 01ce | | Execute Vector,Slice_Write 183e e21d | | Load 0x1,0x1d 183f e5fe | | Load 0x2,-0x2 1840 01db | | Execute Vector,Length 1841 0273 | s | Execute Discrete,Plus 1842 c21d | | Store 0x1,0x1d 1843 e21b | | Load 0x1,0x1b 1844 e5fe | | Load 0x2,-0x2 1845 01db | | Execute Vector,Length 1846 0273 | s | Execute Discrete,Plus 1847 c21b | | Store 0x1,0x1b 1848 7878 |xx | Jump 0x18c1 1849 607e |`~ | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 184a e21d | | Load 0x1,0x1d 184b 0272 | r | Execute Discrete,Minus 184c 0059 | Y | Store_Top Discrete,At_Offset_1 184d 00d8 | | Load_Top At_Offset_0 184e 0c01 | | Execute_Immediate Greater_Equal,0x1 184f 6824 |h$ | Jump_Zero 0x1874 1850 e5fe | | Load 0x2,-0x2 1851 01dd | | Execute Vector,First 1852 e5fe | | Load 0x2,-0x2 1853 01dd | | Execute Vector,First 1854 00da | | Load_Top At_Offset_2 1855 0273 | s | Execute Discrete,Plus 1856 0aff | | Execute_Immediate Plus,-0x1 1857 00d8 | | Load_Top At_Offset_0 1858 00e2 | | Load_Encached Integer_Cache 1859 0260 | ` | Execute Discrete,In_Type 185a 7001 |p | Jump_Nonzero 0x185c 185b 0801 | | Execute_Immediate Raise,0x1 185c e5fe | | Load 0x2,-0x2 185d 01cf | | Execute Vector,Slice_Read 185e e21d | | Load 0x1,0x1d 185f 0a01 | | Execute_Immediate Plus,0x1 1860 00d8 | | Load_Top At_Offset_0 1861 00e2 | | Load_Encached Integer_Cache 1862 0260 | ` | Execute Discrete,In_Type 1863 7001 |p | Jump_Nonzero 0x1865 1864 0801 | | Execute_Immediate Raise,0x1 1865 6062 |`b | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1866 e21c | | Load 0x1,0x1c 1867 01ce | | Execute Vector,Slice_Write 1868 605f |`_ | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1869 a21d | | Store_Unchecked 0x1,0x1d 186a e21b | | Load 0x1,0x1b 186b 00d9 | | Load_Top At_Offset_1 186c 00d8 | | Load_Top At_Offset_0 186d e001 | | Load 0x0,0x1 186e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 186f 0260 | ` | Execute Discrete,In_Type 1870 7001 |p | Jump_Nonzero 0x1872 1871 0801 | | Execute_Immediate Raise,0x1 1872 0273 | s | Execute Discrete,Plus 1873 c21b | | Store 0x1,0x1b 1874 8213 | | Call 0x1,0x13 1875 00cf | | Action Mark_Auxiliary 1876 7825 |x% | Jump 0x189c 1877 e5fe | | Load 0x2,-0x2 1878 01dd | | Execute Vector,First 1879 00da | | Load_Top At_Offset_2 187a 0273 | s | Execute Discrete,Plus 187b 00d8 | | Load_Top At_Offset_0 187c 00e2 | | Load_Encached Integer_Cache 187d 0260 | ` | Execute Discrete,In_Type 187e 7001 |p | Jump_Nonzero 0x1880 187f 0801 | | Execute_Immediate Raise,0x1 1880 e5fe | | Load 0x2,-0x2 1881 01dd | | Execute Vector,First 1882 00db | | Load_Top At_Offset_3 1883 0273 | s | Execute Discrete,Plus 1884 6043 |`C | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1885 0273 | s | Execute Discrete,Plus 1886 0aff | | Execute_Immediate Plus,-0x1 1887 00d8 | | Load_Top At_Offset_0 1888 00e2 | | Load_Encached Integer_Cache 1889 0260 | ` | Execute Discrete,In_Type 188a 7001 |p | Jump_Nonzero 0x188c 188b 0801 | | Execute_Immediate Raise,0x1 188c e5fe | | Load 0x2,-0x2 188d 01cf | | Execute Vector,Slice_Read 188e e21c | | Load 0x1,0x1c 188f 01d4 | | Execute Vector,Structure_Write 1890 6037 |`7 | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1891 a21d | | Store_Unchecked 0x1,0x1d 1892 e21b | | Load 0x1,0x1b 1893 6034 |`4 | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1894 0273 | s | Execute Discrete,Plus 1895 c21b | | Store 0x1,0x1b 1896 8213 | | Call 0x1,0x13 1897 00d9 | | Load_Top At_Offset_1 1898 602f |`/ | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 1899 0273 | s | Execute Discrete,Plus 189a 005a | Z | Store_Top Discrete,At_Offset_2 189b 00c9 | | Action Pop_Auxiliary_Loop 189c e5fe | | Load 0x2,-0x2 189d 01db | | Execute Vector,Length 189e 00da | | Load_Top At_Offset_2 189f 0272 | r | Execute Discrete,Minus 18a0 6027 |`' | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 18a1 027d | } | Execute Discrete,Greater 18a2 77d4 |w | Jump_Nonzero 0x1877 18a3 00ce | | Action Pop_Auxiliary 18a4 e5fe | | Load 0x2,-0x2 18a5 01db | | Execute Vector,Length 18a6 0a01 | | Execute_Immediate Plus,0x1 18a7 00d9 | | Load_Top At_Offset_1 18a8 0272 | r | Execute Discrete,Minus 18a9 0aff | | Execute_Immediate Plus,-0x1 18aa c21d | | Store 0x1,0x1d 18ab e5fe | | Load 0x2,-0x2 18ac 01dd | | Execute Vector,First 18ad 00d9 | | Load_Top At_Offset_1 18ae 0273 | s | Execute Discrete,Plus 18af 00d8 | | Load_Top At_Offset_0 18b0 00e2 | | Load_Encached Integer_Cache 18b1 0260 | ` | Execute Discrete,In_Type 18b2 7001 |p | Jump_Nonzero 0x18b4 18b3 0801 | | Execute_Immediate Raise,0x1 18b4 e5fe | | Load 0x2,-0x2 18b5 01dc | | Execute Vector,Last 18b6 e5fe | | Load 0x2,-0x2 18b7 01cf | | Execute Vector,Slice_Read 18b8 4801 |H | Short_Literal 0x1 18b9 e21d | | Load 0x1,0x1d 18ba e21c | | Load 0x1,0x1c 18bb 01ce | | Execute Vector,Slice_Write 18bc 00db | | Load_Top At_Offset_3 18bd e5fe | | Load 0x2,-0x2 18be 01db | | Execute Vector,Length 18bf 0273 | s | Execute Discrete,Plus 18c0 c21b | | Store 0x1,0x1b 18c1 e21d | | Load 0x1,0x1d 18c2 6005 |` | Indirect_Literal Discrete,0x18c8,{0x00000000, 0x00000400} 18c3 027b | { | Execute Discrete,Greater_Equal 18c4 6801 |h | Jump_Zero 0x18c6 18c5 8213 | | Call 0x1,0x13 18c6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 18c7 0000 | | .XXX[0x1] 18c8 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 18cc 0000 0000 | | .BLANK 0000[0x4] 18d0 ; -------------------------------------------------------------------------------------- 18d0 ; SUBPROGRAM 18d0 ; -------------------------------------------------------------------------------------- 18d0 18d3 | | .CONST 0x18d3 ; Address of begin 18d1 0004 | | .CONST 0x0004 ; Address of exception handler 18d2 0001 | | .CONST 0x0001 ; Number of locals 18d3 BODY_18d0: 18d3 INIT_18d0: 18d3 e21d | | Load 0x1,0x1d 18d4 0c01 | | Execute_Immediate Greater_Equal,0x1 18d5 6815 |h | Jump_Zero 0x18eb 18d6 4801 |H | Short_Literal 0x1 18d7 e21d | | Load 0x1,0x1d 18d8 e21c | | Load 0x1,0x1c 18d9 01cf | | Execute Vector,Slice_Read 18da e21b | | Load 0x1,0x1b 18db e21d | | Load 0x1,0x1d 18dc 00d8 | | Load_Top At_Offset_0 18dd e001 | | Load 0x0,0x1 18de 1b14 | | Execute Package,Field_Read,Field_Number 0x14 18df 0260 | ` | Execute Discrete,In_Type 18e0 7001 |p | Jump_Nonzero 0x18e2 18e1 0801 | | Execute_Immediate Raise,0x1 18e2 0272 | r | Execute Discrete,Minus 18e3 e001 | | Load 0x0,0x1 18e4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 18e5 00d9 | | Load_Top At_Offset_1 18e6 00d0 | | Action Swap_Control 18e7 0260 | ` | Execute Discrete,In_Type 18e8 7001 |p | Jump_Nonzero 0x18ea 18e9 0801 | | Execute_Immediate Raise,0x1 18ea 8221 | ! | Call 0x1,0x21 18eb 4800 |H | Short_Literal 0x0 18ec a21d | | Store_Unchecked 0x1,0x1d 18ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1 18ee 0000 0000 | | .XXX[0x2] 18f0 ; -------------------------------------------------------------------------------------- 18f0 ; SUBPROGRAM 18f0 ; -------------------------------------------------------------------------------------- 18f0 18fc | | .CONST 0x18fc ; Address of begin 18f1 0004 | | .CONST 0x0004 ; Address of exception handler 18f2 0004 | | .CONST 0x0004 ; Number of locals 18f3 INIT_18f0: 18f3 e001 | | Load 0x0,0x1 18f4 1b10 | | Execute Package,Field_Read,Field_Number 0x10 18f5 4801 |H | Short_Literal 0x1 18f6 e5ff | | Load 0x2,-0x1 18f7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 18f8 e002 | | Load 0x0,0x2 18f9 035b | [ | Declare_Type Array,Constrained 18fa 0337 | 7 | Declare_Variable Array 18fb 00e3 | | Load_Encached Natural_Cache 18fc BODY_18f0: 18fc e003 | | Load 0x0,0x3 18fd 6824 |h$ | Jump_Zero 0x1922 18fe 4807 |H | Short_Literal 0x7 18ff 0092 1cf0 | | Action Push_String_Extended,0x1cf0 ; "Read from " 1901 e5ff | | Load 0x2,-0x1 1902 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1903 800d | | Call 0x0,0xd 1904 01cc | | Execute Vector,Catenate 1905 0092 1cf1 | | Action Push_String_Extended,0x1cf1 ; "," 1907 01cc | | Execute Vector,Catenate 1908 e5ff | | Load 0x2,-0x1 1909 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 190a 00e0 | | Load_Encached Standard_Cache 190b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 190c 01cc | | Execute Vector,Catenate 190d 8004 | | Call 0x0,0x4 190e 00d9 | | Load_Top At_Offset_1 190f 00d8 | | Load_Top At_Offset_0 1910 0335 | 5 | Declare_Variable Array,Duplicate 1911 00cd | | Action Spare6_Action 1912 00d9 | | Load_Top At_Offset_1 1913 01d9 | | Execute Vector,Reverse_Bounds 1914 0263 | c | Execute Discrete,Above_Bound 1915 7005 |p | Jump_Nonzero 0x191b 1916 4800 |H | Short_Literal 0x0 1917 00d9 | | Load_Top At_Offset_1 1918 e406 | | Load 0x2,0x6 1919 01d6 | | Execute Vector,Field_Write 191a 3ffb |? | Loop_Increasing 0x1916 191b 00cd | | Action Spare6_Action 191c 00da | | Load_Top At_Offset_2 191d 01d4 | | Execute Vector,Structure_Write 191e 00d9 | | Load_Top At_Offset_1 191f 01db | | Execute Vector,Length 1920 0059 | Y | Store_Top Discrete,At_Offset_1 1921 780f |x | Jump 0x1931 1922 00e3 | | Load_Encached Natural_Cache 1923 00da | | Load_Top At_Offset_2 1924 e001 | | Load 0x0,0x1 1925 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1926 e5ff | | Load 0x2,-0x1 1927 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1928 e001 | | Load 0x0,0x1 1929 1815 | | Execute Package,Field_Execute,Field_Number 0x15 192a c402 | | Store 0x2,0x2 192b 00d1 | | Pop_Control Pop_Count_1 192c 0059 | Y | Store_Top Discrete,At_Offset_1 192d 0092 1cf2 | | Action Push_String_Extended,0x1cf2 ; "Read" 192f 00db | | Load_Top At_Offset_3 1930 8220 | | Call 0x1,0x20 1931 e5fe | | Load 0x2,-0x2 1932 6808 |h | Jump_Zero 0x193b 1933 4801 |H | Short_Literal 0x1 1934 00d9 | | Load_Top At_Offset_1 1935 00db | | Load_Top At_Offset_3 1936 01cf | | Execute Vector,Slice_Read 1937 e008 | | Load 0x0,0x8 1938 1b12 | | Execute Package,Field_Read,Field_Number 0x12 1939 01c6 | | Execute Vector,Convert_To_Formal 193a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 193b 00d8 | | Load_Top At_Offset_0 193c 00da | | Load_Top At_Offset_2 193d 01db | | Execute Vector,Length 193e 027e | ~ | Execute Discrete,Not_Equal 193f 6819 |h | Jump_Zero 0x1959 1940 4807 |H | Short_Literal 0x7 1941 0092 1cf3 | | Action Push_String_Extended,0x1cf3 ; "Cannot read from " 1943 e5ff | | Load 0x2,-0x1 1944 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1945 00db | | Load_Top At_Offset_3 1946 00d8 | | Load_Top At_Offset_0 1947 e001 | | Load 0x0,0x1 1948 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1949 0260 | ` | Execute Discrete,In_Type 194a 7001 |p | Jump_Nonzero 0x194c 194b 0801 | | Execute_Immediate Raise,0x1 194c 0273 | s | Execute Discrete,Plus 194d e001 | | Load 0x0,0x1 194e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 194f 00d9 | | Load_Top At_Offset_1 1950 00d0 | | Action Swap_Control 1951 0260 | ` | Execute Discrete,In_Type 1952 7001 |p | Jump_Nonzero 0x1954 1953 0801 | | Execute_Immediate Raise,0x1 1954 800d | | Call 0x0,0xd 1955 01cc | | Execute Vector,Catenate 1956 8004 | | Call 0x0,0x4 1957 e005 | | Load 0x0,0x5 1958 0257 | W | Execute Discrete,Raise 1959 00d9 | | Load_Top At_Offset_1 195a e008 | | Load 0x0,0x8 195b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 195c 01c6 | | Execute Vector,Convert_To_Formal 195d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 195e 0000 0000 | | .XXX[0x2] 1960 ; -------------------------------------------------------------------------------------- 1960 ; SUBPROGRAM 1960 ; -------------------------------------------------------------------------------------- 1960 1963 | c | .CONST 0x1963 ; Address of begin 1961 0004 | | .CONST 0x0004 ; Address of exception handler 1962 0001 | | .CONST 0x0001 ; Number of locals 1963 BODY_1960: 1963 INIT_1960: 1963 00da | | Load_Top At_Offset_2 1964 800e | | Call 0x0,0xe 1965 00d8 | | Load_Top At_Offset_0 1966 e21e | | Load 0x1,0x1e 1967 0260 | ` | Execute Discrete,In_Type 1968 7001 |p | Jump_Nonzero 0x196a 1969 0801 | | Execute_Immediate Raise,0x1 196a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 196b 0000 0000 | | .BLANK 0000[0x5] 1970 ; -------------------------------------------------------------------------------------- 1970 ; SUBPROGRAM 1970 ; -------------------------------------------------------------------------------------- 1970 1973 | s | .CONST 0x1973 ; Address of begin 1971 0004 | | .CONST 0x0004 ; Address of exception handler 1972 0001 | | .CONST 0x0001 ; Number of locals 1973 BODY_1970: 1973 INIT_1970: 1973 00da | | Load_Top At_Offset_2 1974 6811 |h | Jump_Zero 0x1986 1975 4807 |H | Short_Literal 0x7 1976 0092 1cf4 | | Action Push_String_Extended,0x1cf4 ; "Enp_Driver." 1978 e5fe | | Load 0x2,-0x2 1979 01cc | | Execute Vector,Catenate 197a 0092 1cf5 | | Action Push_String_Extended,0x1cf5 ; ".Status = " 197c 01cc | | Execute Vector,Catenate 197d e5ff | | Load 0x2,-0x1 197e e001 | | Load 0x0,0x1 197f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1980 011c | | Execute Any,Convert_Unchecked 1981 1c01 | | Execute_Immediate Run_Utility,0x1 1982 01cc | | Execute Vector,Catenate 1983 8004 | | Call 0x0,0x4 1984 e005 | | Load 0x0,0x5 1985 0257 | W | Execute Discrete,Raise 1986 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1987 0000 | | .XXX[0x1] 1988 ; -------------------------------------------------------------------------------------- 1988 ; SUBPROGRAM 1988 ; -------------------------------------------------------------------------------------- 1988 198f | | .CONST 0x198f ; Address of begin 1989 0004 | | .CONST 0x0004 ; Address of exception handler 198a 0004 | | .CONST 0x0004 ; Number of locals 198b INIT_1988: 198b e001 | | Load 0x0,0x1 198c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 198d 00e3 | | Load_Encached Natural_Cache 198e 03e9 | | Declare_Variable Discrete,Duplicate 198f BODY_1988: 198f e003 | | Load 0x0,0x3 1990 680b |h | Jump_Zero 0x199c 1991 4802 |H | Short_Literal 0x2 1992 e5ff | | Load 0x2,-0x1 1993 800d | | Call 0x0,0xd 1994 0092 1cf6 | | Action Push_String_Extended,0x1cf6 ; " := " 1996 01cc | | Execute Vector,Catenate 1997 e5fe | | Load 0x2,-0x2 1998 800b | | Call 0x0,0xb 1999 01cc | | Execute Vector,Catenate 199a 8004 | | Call 0x0,0x4 199b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 199c 00e3 | | Load_Encached Natural_Cache 199d e001 | | Load 0x0,0x1 199e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 199f e5fe | | Load 0x2,-0x2 19a0 e5ff | | Load 0x2,-0x1 19a1 e001 | | Load 0x0,0x1 19a2 1816 | | Execute Package,Field_Execute,Field_Number 0x16 19a3 c402 | | Store 0x2,0x2 19a4 0059 | Y | Store_Top Discrete,At_Offset_1 19a5 0092 1cf7 | | Action Push_String_Extended,0x1cf7 ; "Write" 19a7 00db | | Load_Top At_Offset_3 19a8 8220 | | Call 0x1,0x20 19a9 00cf | | Action Mark_Auxiliary 19aa 7856 |xV | Jump 0x1a01 19ab 00e3 | | Load_Encached Natural_Cache 19ac e001 | | Load 0x0,0x1 19ad 1b10 | | Execute Package,Field_Read,Field_Number 0x10 19ae e5fe | | Load 0x2,-0x2 19af 01dd | | Execute Vector,First 19b0 e404 | | Load 0x2,0x4 19b1 0273 | s | Execute Discrete,Plus 19b2 00d8 | | Load_Top At_Offset_0 19b3 00e2 | | Load_Encached Integer_Cache 19b4 0260 | ` | Execute Discrete,In_Type 19b5 7001 |p | Jump_Nonzero 0x19b7 19b6 0801 | | Execute_Immediate Raise,0x1 19b7 e5fe | | Load 0x2,-0x2 19b8 01dc | | Execute Vector,Last 19b9 e5fe | | Load 0x2,-0x2 19ba 01cf | | Execute Vector,Slice_Read 19bb e5ff | | Load 0x2,-0x1 19bc e404 | | Load 0x2,0x4 19bd 00d8 | | Load_Top At_Offset_0 19be e001 | | Load 0x0,0x1 19bf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 19c0 0260 | ` | Execute Discrete,In_Type 19c1 7001 |p | Jump_Nonzero 0x19c3 19c2 0801 | | Execute_Immediate Raise,0x1 19c3 0273 | s | Execute Discrete,Plus 19c4 e001 | | Load 0x0,0x1 19c5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 19c6 00d9 | | Load_Top At_Offset_1 19c7 00d0 | | Action Swap_Control 19c8 0260 | ` | Execute Discrete,In_Type 19c9 7001 |p | Jump_Nonzero 0x19cb 19ca 0801 | | Execute_Immediate Raise,0x1 19cb e001 | | Load 0x0,0x1 19cc 1816 | | Execute Package,Field_Execute,Field_Number 0x16 19cd c402 | | Store 0x2,0x2 19ce 005b | [ | Store_Top Discrete,At_Offset_3 19cf 0092 1cf7 | | Action Push_String_Extended,0x1cf7 ; "Write" 19d1 e402 | | Load 0x2,0x2 19d2 8220 | | Call 0x1,0x20 19d3 00da | | Load_Top At_Offset_2 19d4 7027 |p' | Jump_Nonzero 0x19fc 19d5 4807 |H | Short_Literal 0x7 19d6 e5ff | | Load 0x2,-0x1 19d7 00db | | Load_Top At_Offset_3 19d8 00d8 | | Load_Top At_Offset_0 19d9 e001 | | Load 0x0,0x1 19da 1b14 | | Execute Package,Field_Read,Field_Number 0x14 19db 0260 | ` | Execute Discrete,In_Type 19dc 7001 |p | Jump_Nonzero 0x19de 19dd 0801 | | Execute_Immediate Raise,0x1 19de 0273 | s | Execute Discrete,Plus 19df e001 | | Load 0x0,0x1 19e0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 19e1 00d9 | | Load_Top At_Offset_1 19e2 00d0 | | Action Swap_Control 19e3 0260 | ` | Execute Discrete,In_Type 19e4 7001 |p | Jump_Nonzero 0x19e6 19e5 0801 | | Execute_Immediate Raise,0x1 19e6 800d | | Call 0x0,0xd 19e7 0092 1cf6 | | Action Push_String_Extended,0x1cf6 ; " := " 19e9 01cc | | Execute Vector,Catenate 19ea e5fe | | Load 0x2,-0x2 19eb 01dd | | Execute Vector,First 19ec e404 | | Load 0x2,0x4 19ed 0273 | s | Execute Discrete,Plus 19ee 00d8 | | Load_Top At_Offset_0 19ef 00e2 | | Load_Encached Integer_Cache 19f0 0260 | ` | Execute Discrete,In_Type 19f1 7001 |p | Jump_Nonzero 0x19f3 19f2 0801 | | Execute_Immediate Raise,0x1 19f3 e5fe | | Load 0x2,-0x2 19f4 01dc | | Execute Vector,Last 19f5 e5fe | | Load 0x2,-0x2 19f6 01cf | | Execute Vector,Slice_Read 19f7 800b | | Call 0x0,0xb 19f8 01cc | | Execute Vector,Catenate 19f9 8004 | | Call 0x0,0x4 19fa e005 | | Load 0x0,0x5 19fb 0257 | W | Execute Discrete,Raise 19fc 00d9 | | Load_Top At_Offset_1 19fd 00db | | Load_Top At_Offset_3 19fe 0273 | s | Execute Discrete,Plus 19ff 005a | Z | Store_Top Discrete,At_Offset_2 1a00 00c9 | | Action Pop_Auxiliary_Loop 1a01 00d9 | | Load_Top At_Offset_1 1a02 e5fe | | Load 0x2,-0x2 1a03 01db | | Execute Vector,Length 1a04 027c | | | Execute Discrete,Less 1a05 77a5 |w | Jump_Nonzero 0x19ab 1a06 00ce | | Action Pop_Auxiliary 1a07 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1a08 ; -------------------------------------------------------------------------------------- 1a08 ; SUBPROGRAM 1a08 ; -------------------------------------------------------------------------------------- 1a08 1a16 | | .CONST 0x1a16 ; Address of begin 1a09 0004 | | .CONST 0x0004 ; Address of exception handler 1a0a 0002 | | .CONST 0x0002 ; Number of locals 1a0b INIT_1a08: 1a0b 4801 |H | Short_Literal 0x1 1a0c 4802 |H | Short_Literal 0x2 1a0d e002 | | Load 0x0,0x2 1a0e 035b | [ | Declare_Type Array,Constrained 1a0f 0337 | 7 | Declare_Variable Array 1a10 4800 |H | Short_Literal 0x0 1a11 e217 | | Load 0x1,0x17 1a12 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1a13 8215 | | Call 0x1,0x15 1a14 00d9 | | Load_Top At_Offset_1 1a15 01d4 | | Execute Vector,Structure_Write 1a16 BODY_1a08: 1a16 4801 |H | Short_Literal 0x1 1a17 00d9 | | Load_Top At_Offset_1 1a18 01d7 | | Execute Vector,Field_Read 1a19 0c80 | | Execute_Immediate Greater_Equal,-0x80 1a1a 6813 |h | Jump_Zero 0x1a2e 1a1b e00f | | Load 0x0,0xf 1a1c 0092 1cf8 | | Action Push_String_Extended,0x1cf8 ; "Reset.Control_Status =" 1a1e 00da | | Load_Top At_Offset_2 1a1f 800b | | Call 0x0,0xb 1a20 01cc | | Execute Vector,Catenate 1a21 8010 | | Call 0x0,0x10 1a22 e00f | | Load 0x0,0xf 1a23 0092 1cec | | Action Push_String_Extended,0x1cec ; "Diagnostic Control Block = " 1a25 4801 |H | Short_Literal 0x1 1a26 e217 | | Load 0x1,0x17 1a27 1b12 | | Execute Package,Field_Read,Field_Number 0x12 1a28 8215 | | Call 0x1,0x15 1a29 800b | | Call 0x0,0xb 1a2a 01cc | | Execute Vector,Catenate 1a2b 8010 | | Call 0x0,0x10 1a2c e005 | | Load 0x0,0x5 1a2d 0257 | W | Execute Discrete,Raise 1a2e 4802 |H | Short_Literal 0x2 1a2f 00d9 | | Load_Top At_Offset_1 1a30 01d7 | | Execute Vector,Field_Read 1a31 4807 |H | Short_Literal 0x7 1a32 0279 | y | Execute Discrete,And 1a33 0c04 | | Execute_Immediate Greater_Equal,0x4 1a34 6802 |h | Jump_Zero 0x1a37 1a35 4801 |H | Short_Literal 0x1 1a36 00ca | | Action Exit_Nullary_Function 1a37 4800 |H | Short_Literal 0x0 1a38 00ca | | Action Exit_Nullary_Function 1a39 0000 0000 | | .BLANK 0000[0x7] 1a40 ; -------------------------------------------------------------------------------------- 1a40 ; SUBPROGRAM 1a40 ; -------------------------------------------------------------------------------------- 1a40 1a94 | | .CONST 0x1a94 ; Address of begin 1a41 0004 | | .CONST 0x0004 ; Address of exception handler 1a42 0014 | | .CONST 0x0014 ; Number of locals 1a43 INIT_1a40: 1a43 e001 | | Load 0x0,0x1 1a44 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a45 0322 | " | Declare_Variable Record 1a46 606d |`m | Indirect_Literal Discrete,0x1ab4,{0x00000000, 0x00001200} 1a47 00d9 | | Load_Top At_Offset_1 1a48 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a49 4804 |H | Short_Literal 0x4 1a4a 00d9 | | Load_Top At_Offset_1 1a4b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a4c 0129 | ) | Execute Any,Make_Visible 1a4d e001 | | Load 0x0,0x1 1a4e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a4f 0322 | " | Declare_Variable Record 1a50 605f |`_ | Indirect_Literal Discrete,0x1ab0,{0x00000000, 0x00001204} 1a51 00d9 | | Load_Top At_Offset_1 1a52 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a53 4804 |H | Short_Literal 0x4 1a54 00d9 | | Load_Top At_Offset_1 1a55 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a56 0129 | ) | Execute Any,Make_Visible 1a57 e001 | | Load 0x0,0x1 1a58 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a59 0322 | " | Declare_Variable Record 1a5a 6051 |`Q | Indirect_Literal Discrete,0x1aac,{0x00000000, 0x00001208} 1a5b 00d9 | | Load_Top At_Offset_1 1a5c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a5d 4804 |H | Short_Literal 0x4 1a5e 00d9 | | Load_Top At_Offset_1 1a5f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a60 0129 | ) | Execute Any,Make_Visible 1a61 e001 | | Load 0x0,0x1 1a62 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a63 0322 | " | Declare_Variable Record 1a64 6043 |`C | Indirect_Literal Discrete,0x1aa8,{0x00000000, 0x0000120c} 1a65 00d9 | | Load_Top At_Offset_1 1a66 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a67 4804 |H | Short_Literal 0x4 1a68 00d9 | | Load_Top At_Offset_1 1a69 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a6a 0129 | ) | Execute Any,Make_Visible 1a6b e001 | | Load 0x0,0x1 1a6c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a6d 0322 | " | Declare_Variable Record 1a6e 6035 |`5 | Indirect_Literal Discrete,0x1aa4,{0x00000000, 0x00001210} 1a6f 00d9 | | Load_Top At_Offset_1 1a70 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a71 4804 |H | Short_Literal 0x4 1a72 00d9 | | Load_Top At_Offset_1 1a73 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a74 0129 | ) | Execute Any,Make_Visible 1a75 e001 | | Load 0x0,0x1 1a76 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a77 0322 | " | Declare_Variable Record 1a78 6027 |`' | Indirect_Literal Discrete,0x1aa0,{0x00000000, 0x00001214} 1a79 00d9 | | Load_Top At_Offset_1 1a7a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a7b 4804 |H | Short_Literal 0x4 1a7c 00d9 | | Load_Top At_Offset_1 1a7d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a7e 0129 | ) | Execute Any,Make_Visible 1a7f e001 | | Load 0x0,0x1 1a80 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a81 0322 | " | Declare_Variable Record 1a82 6019 |` | Indirect_Literal Discrete,0x1a9c,{0x00000000, 0x00001218} 1a83 00d9 | | Load_Top At_Offset_1 1a84 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a85 4806 |H | Short_Literal 0x6 1a86 00d9 | | Load_Top At_Offset_1 1a87 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a88 0129 | ) | Execute Any,Make_Visible 1a89 e001 | | Load 0x0,0x1 1a8a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1a8b 0322 | " | Declare_Variable Record 1a8c 600b |` | Indirect_Literal Discrete,0x1a98,{0x00000000, 0x0000121e} 1a8d 00d9 | | Load_Top At_Offset_1 1a8e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1a8f 4802 |H | Short_Literal 0x2 1a90 00d9 | | Load_Top At_Offset_1 1a91 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1a92 0129 | ) | Execute Any,Make_Visible 1a93 00bf | | Action Accept_Activation 1a94 BODY_1a40: 1a94 00bc | | Action Signal_Activated 1a95 00bb | | Action Signal_Completion 1a96 0000 0000 | | .XXX[0x2] 1a98 0000 0000 | | .LITERAL {0x00000000, 0x0000121e} 1a9c 0000 0000 | | .LITERAL {0x00000000, 0x00001218} 1aa0 0000 0000 | | .LITERAL {0x00000000, 0x00001214} 1aa4 0000 0000 | | .LITERAL {0x00000000, 0x00001210} 1aa8 0000 0000 | | .LITERAL {0x00000000, 0x0000120c} 1aac 0000 0000 | | .LITERAL {0x00000000, 0x00001208} 1ab0 0000 0000 | | .LITERAL {0x00000000, 0x00001204} 1ab4 0000 0000 | | .LITERAL {0x00000000, 0x00001200} 1ab8 ; -------------------------------------------------------------------------------------- 1ab8 ; SUBPROGRAM 1ab8 ; -------------------------------------------------------------------------------------- 1ab8 1ae4 | | .CONST 0x1ae4 ; Address of begin 1ab9 0004 | | .CONST 0x0004 ; Address of exception handler 1aba 0010 | | .CONST 0x0010 ; Number of locals 1abb INIT_1ab8: 1abb e001 | | Load 0x0,0x1 1abc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1abd 0322 | " | Declare_Variable Record 1abe 4800 |H | Short_Literal 0x0 1abf 00d9 | | Load_Top At_Offset_1 1ac0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1ac1 4804 |H | Short_Literal 0x4 1ac2 00d9 | | Load_Top At_Offset_1 1ac3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1ac4 0129 | ) | Execute Any,Make_Visible 1ac5 e001 | | Load 0x0,0x1 1ac6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1ac7 0322 | " | Declare_Variable Record 1ac8 4804 |H | Short_Literal 0x4 1ac9 00d9 | | Load_Top At_Offset_1 1aca 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1acb 4808 |H | Short_Literal 0x8 1acc 00d9 | | Load_Top At_Offset_1 1acd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1ace 0129 | ) | Execute Any,Make_Visible 1acf e001 | | Load 0x0,0x1 1ad0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1ad1 0322 | " | Declare_Variable Record 1ad2 480c |H | Short_Literal 0xc 1ad3 00d9 | | Load_Top At_Offset_1 1ad4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1ad5 4808 |H | Short_Literal 0x8 1ad6 00d9 | | Load_Top At_Offset_1 1ad7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1ad8 0129 | ) | Execute Any,Make_Visible 1ad9 e001 | | Load 0x0,0x1 1ada 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1adb 0322 | " | Declare_Variable Record 1adc 4814 |H | Short_Literal 0x14 1add 00d9 | | Load_Top At_Offset_1 1ade 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1adf 4808 |H | Short_Literal 0x8 1ae0 00d9 | | Load_Top At_Offset_1 1ae1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1ae2 0129 | ) | Execute Any,Make_Visible 1ae3 00bf | | Action Accept_Activation 1ae4 BODY_1ab8: 1ae4 00bc | | Action Signal_Activated 1ae5 00bb | | Action Signal_Completion 1ae6 0000 0000 | | .XXX[0x2] 1ae8 ; -------------------------------------------------------------------------------------- 1ae8 ; SUBPROGRAM 1ae8 ; -------------------------------------------------------------------------------------- 1ae8 1b82 | | .CONST 0x1b82 ; Address of begin 1ae9 0004 | | .CONST 0x0004 ; Address of exception handler 1aea 001b | | .CONST 0x001b ; Number of locals 1aeb INIT_1ae8: 1aeb e001 | | Load 0x0,0x1 1aec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1aed 0322 | " | Declare_Variable Record 1aee 60cd |` | Indirect_Literal Discrete,0x1bbc,{0x00000000, 0x00001100} 1aef 00d9 | | Load_Top At_Offset_1 1af0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1af1 4804 |H | Short_Literal 0x4 1af2 00d9 | | Load_Top At_Offset_1 1af3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1af4 0129 | ) | Execute Any,Make_Visible 1af5 e001 | | Load 0x0,0x1 1af6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1af7 0322 | " | Declare_Variable Record 1af8 60bf |` | Indirect_Literal Discrete,0x1bb8,{0x00000000, 0x00001104} 1af9 00d9 | | Load_Top At_Offset_1 1afa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1afb 4804 |H | Short_Literal 0x4 1afc 00d9 | | Load_Top At_Offset_1 1afd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1afe 0129 | ) | Execute Any,Make_Visible 1aff e001 | | Load 0x0,0x1 1b00 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b01 0322 | " | Declare_Variable Record 1b02 60b1 |` | Indirect_Literal Discrete,0x1bb4,{0x00000000, 0x00001108} 1b03 00d9 | | Load_Top At_Offset_1 1b04 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b05 4804 |H | Short_Literal 0x4 1b06 00d9 | | Load_Top At_Offset_1 1b07 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b08 0129 | ) | Execute Any,Make_Visible 1b09 e001 | | Load 0x0,0x1 1b0a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b0b 0322 | " | Declare_Variable Record 1b0c 60a3 |` | Indirect_Literal Discrete,0x1bb0,{0x00000000, 0x0000110c} 1b0d 00d9 | | Load_Top At_Offset_1 1b0e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b0f 4804 |H | Short_Literal 0x4 1b10 00d9 | | Load_Top At_Offset_1 1b11 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b12 0129 | ) | Execute Any,Make_Visible 1b13 e001 | | Load 0x0,0x1 1b14 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b15 0322 | " | Declare_Variable Record 1b16 6095 |` | Indirect_Literal Discrete,0x1bac,{0x00000000, 0x00001110} 1b17 00d9 | | Load_Top At_Offset_1 1b18 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b19 4804 |H | Short_Literal 0x4 1b1a 00d9 | | Load_Top At_Offset_1 1b1b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b1c 0129 | ) | Execute Any,Make_Visible 1b1d e001 | | Load 0x0,0x1 1b1e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b1f 0322 | " | Declare_Variable Record 1b20 6087 |` | Indirect_Literal Discrete,0x1ba8,{0x00000000, 0x00001114} 1b21 00d9 | | Load_Top At_Offset_1 1b22 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b23 4804 |H | Short_Literal 0x4 1b24 00d9 | | Load_Top At_Offset_1 1b25 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b26 0129 | ) | Execute Any,Make_Visible 1b27 e001 | | Load 0x0,0x1 1b28 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b29 0322 | " | Declare_Variable Record 1b2a 6079 |`y | Indirect_Literal Discrete,0x1ba4,{0x00000000, 0x00001118} 1b2b 00d9 | | Load_Top At_Offset_1 1b2c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b2d 4804 |H | Short_Literal 0x4 1b2e 00d9 | | Load_Top At_Offset_1 1b2f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b30 0129 | ) | Execute Any,Make_Visible 1b31 e001 | | Load 0x0,0x1 1b32 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b33 0322 | " | Declare_Variable Record 1b34 606b |`k | Indirect_Literal Discrete,0x1ba0,{0x00000000, 0x0000111c} 1b35 00d9 | | Load_Top At_Offset_1 1b36 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b37 4804 |H | Short_Literal 0x4 1b38 00d9 | | Load_Top At_Offset_1 1b39 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b3a 0129 | ) | Execute Any,Make_Visible 1b3b e001 | | Load 0x0,0x1 1b3c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b3d 0322 | " | Declare_Variable Record 1b3e 605d |`] | Indirect_Literal Discrete,0x1b9c,{0x00000000, 0x00001120} 1b3f 00d9 | | Load_Top At_Offset_1 1b40 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b41 4804 |H | Short_Literal 0x4 1b42 00d9 | | Load_Top At_Offset_1 1b43 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b44 0129 | ) | Execute Any,Make_Visible 1b45 e001 | | Load 0x0,0x1 1b46 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b47 0322 | " | Declare_Variable Record 1b48 604f |`O | Indirect_Literal Discrete,0x1b98,{0x00000000, 0x00001124} 1b49 00d9 | | Load_Top At_Offset_1 1b4a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b4b 4804 |H | Short_Literal 0x4 1b4c 00d9 | | Load_Top At_Offset_1 1b4d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b4e 0129 | ) | Execute Any,Make_Visible 1b4f e001 | | Load 0x0,0x1 1b50 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b51 0322 | " | Declare_Variable Record 1b52 6041 |`A | Indirect_Literal Discrete,0x1b94,{0x00000000, 0x00001128} 1b53 00d9 | | Load_Top At_Offset_1 1b54 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b55 4804 |H | Short_Literal 0x4 1b56 00d9 | | Load_Top At_Offset_1 1b57 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b58 0129 | ) | Execute Any,Make_Visible 1b59 e001 | | Load 0x0,0x1 1b5a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b5b 0322 | " | Declare_Variable Record 1b5c 6033 |`3 | Indirect_Literal Discrete,0x1b90,{0x00000000, 0x0000112c} 1b5d 00d9 | | Load_Top At_Offset_1 1b5e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b5f 4804 |H | Short_Literal 0x4 1b60 00d9 | | Load_Top At_Offset_1 1b61 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b62 0129 | ) | Execute Any,Make_Visible 1b63 e001 | | Load 0x0,0x1 1b64 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b65 0322 | " | Declare_Variable Record 1b66 6025 |`% | Indirect_Literal Discrete,0x1b8c,{0x00000000, 0x00001130} 1b67 00d9 | | Load_Top At_Offset_1 1b68 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b69 4804 |H | Short_Literal 0x4 1b6a 00d9 | | Load_Top At_Offset_1 1b6b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b6c 0129 | ) | Execute Any,Make_Visible 1b6d e001 | | Load 0x0,0x1 1b6e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b6f 0322 | " | Declare_Variable Record 1b70 6017 |` | Indirect_Literal Discrete,0x1b88,{0x00000000, 0x00001134} 1b71 00d9 | | Load_Top At_Offset_1 1b72 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b73 4804 |H | Short_Literal 0x4 1b74 00d9 | | Load_Top At_Offset_1 1b75 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b76 0129 | ) | Execute Any,Make_Visible 1b77 e001 | | Load 0x0,0x1 1b78 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1b79 0322 | " | Declare_Variable Record 1b7a 6009 |` | Indirect_Literal Discrete,0x1b84,{0x00000000, 0x00001138} 1b7b 00d9 | | Load_Top At_Offset_1 1b7c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1b7d 48c8 |H | Short_Literal 0xc8 1b7e 00d9 | | Load_Top At_Offset_1 1b7f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1b80 0129 | ) | Execute Any,Make_Visible 1b81 00bf | | Action Accept_Activation 1b82 BODY_1ae8: 1b82 00bc | | Action Signal_Activated 1b83 00bb | | Action Signal_Completion 1b84 0000 0000 | | .LITERAL {0x00000000, 0x00001138} 1b88 0000 0000 | | .LITERAL {0x00000000, 0x00001134} 1b8c 0000 0000 | | .LITERAL {0x00000000, 0x00001130} 1b90 0000 0000 | | .LITERAL {0x00000000, 0x0000112c} 1b94 0000 0000 | | .LITERAL {0x00000000, 0x00001128} 1b98 0000 0000 | | .LITERAL {0x00000000, 0x00001124} 1b9c 0000 0000 | | .LITERAL {0x00000000, 0x00001120} 1ba0 0000 0000 | | .LITERAL {0x00000000, 0x0000111c} 1ba4 0000 0000 | | .LITERAL {0x00000000, 0x00001118} 1ba8 0000 0000 | | .LITERAL {0x00000000, 0x00001114} 1bac 0000 0000 | | .LITERAL {0x00000000, 0x00001110} 1bb0 0000 0000 | | .LITERAL {0x00000000, 0x0000110c} 1bb4 0000 0000 | | .LITERAL {0x00000000, 0x00001108} 1bb8 0000 0000 | | .LITERAL {0x00000000, 0x00001104} 1bbc 0000 0000 | | .LITERAL {0x00000000, 0x00001100} 1bc0 ; -------------------------------------------------------------------------------------- 1bc0 ; SUBPROGRAM 1bc0 ; -------------------------------------------------------------------------------------- 1bc0 1c32 | 2 | .CONST 0x1c32 ; Address of begin 1bc1 0004 | | .CONST 0x0004 ; Address of exception handler 1bc2 0017 | | .CONST 0x0017 ; Number of locals 1bc3 INIT_1bc0: 1bc3 e001 | | Load 0x0,0x1 1bc4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1bc5 0322 | " | Declare_Variable Record 1bc6 6095 |` | Indirect_Literal Discrete,0x1c5c,{0x00000000, 0x00001000} 1bc7 00d9 | | Load_Top At_Offset_1 1bc8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1bc9 4802 |H | Short_Literal 0x2 1bca 00d9 | | Load_Top At_Offset_1 1bcb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1bcc 0129 | ) | Execute Any,Make_Visible 1bcd e001 | | Load 0x0,0x1 1bce 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1bcf 0322 | " | Declare_Variable Record 1bd0 6087 |` | Indirect_Literal Discrete,0x1c58,{0x00000000, 0x00001002} 1bd1 00d9 | | Load_Top At_Offset_1 1bd2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1bd3 4802 |H | Short_Literal 0x2 1bd4 00d9 | | Load_Top At_Offset_1 1bd5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1bd6 0129 | ) | Execute Any,Make_Visible 1bd7 e001 | | Load 0x0,0x1 1bd8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1bd9 0322 | " | Declare_Variable Record 1bda 6079 |`y | Indirect_Literal Discrete,0x1c54,{0x00000000, 0x00001004} 1bdb 00d9 | | Load_Top At_Offset_1 1bdc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1bdd 4804 |H | Short_Literal 0x4 1bde 00d9 | | Load_Top At_Offset_1 1bdf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1be0 0129 | ) | Execute Any,Make_Visible 1be1 e001 | | Load 0x0,0x1 1be2 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1be3 0322 | " | Declare_Variable Record 1be4 606b |`k | Indirect_Literal Discrete,0x1c50,{0x00000000, 0x00001008} 1be5 00d9 | | Load_Top At_Offset_1 1be6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1be7 4804 |H | Short_Literal 0x4 1be8 00d9 | | Load_Top At_Offset_1 1be9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1bea 0129 | ) | Execute Any,Make_Visible 1beb e001 | | Load 0x0,0x1 1bec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1bed 0322 | " | Declare_Variable Record 1bee 605d |`] | Indirect_Literal Discrete,0x1c4c,{0x00000000, 0x0000100c} 1bef 00d9 | | Load_Top At_Offset_1 1bf0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1bf1 4804 |H | Short_Literal 0x4 1bf2 00d9 | | Load_Top At_Offset_1 1bf3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1bf4 0129 | ) | Execute Any,Make_Visible 1bf5 e001 | | Load 0x0,0x1 1bf6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1bf7 0322 | " | Declare_Variable Record 1bf8 604f |`O | Indirect_Literal Discrete,0x1c48,{0x00000000, 0x00001010} 1bf9 00d9 | | Load_Top At_Offset_1 1bfa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1bfb 4818 |H | Short_Literal 0x18 1bfc 00d9 | | Load_Top At_Offset_1 1bfd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1bfe 0129 | ) | Execute Any,Make_Visible 1bff e001 | | Load 0x0,0x1 1c00 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1c01 0322 | " | Declare_Variable Record 1c02 6041 |`A | Indirect_Literal Discrete,0x1c44,{0x00000000, 0x00001012} 1c03 00d9 | | Load_Top At_Offset_1 1c04 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1c05 4802 |H | Short_Literal 0x2 1c06 00d9 | | Load_Top At_Offset_1 1c07 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1c08 0129 | ) | Execute Any,Make_Visible 1c09 e001 | | Load 0x0,0x1 1c0a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1c0b 0322 | " | Declare_Variable Record 1c0c 6033 |`3 | Indirect_Literal Discrete,0x1c40,{0x00000000, 0x00001014} 1c0d 00d9 | | Load_Top At_Offset_1 1c0e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1c0f 4804 |H | Short_Literal 0x4 1c10 00d9 | | Load_Top At_Offset_1 1c11 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1c12 0129 | ) | Execute Any,Make_Visible 1c13 e001 | | Load 0x0,0x1 1c14 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1c15 0322 | " | Declare_Variable Record 1c16 6025 |`% | Indirect_Literal Discrete,0x1c3c,{0x00000000, 0x00001020} 1c17 00d9 | | Load_Top At_Offset_1 1c18 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1c19 4804 |H | Short_Literal 0x4 1c1a 00d9 | | Load_Top At_Offset_1 1c1b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1c1c 0129 | ) | Execute Any,Make_Visible 1c1d e001 | | Load 0x0,0x1 1c1e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1c1f 0322 | " | Declare_Variable Record 1c20 6017 |` | Indirect_Literal Discrete,0x1c38,{0x00000000, 0x00001024} 1c21 00d9 | | Load_Top At_Offset_1 1c22 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1c23 4802 |H | Short_Literal 0x2 1c24 00d9 | | Load_Top At_Offset_1 1c25 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1c26 0129 | ) | Execute Any,Make_Visible 1c27 e001 | | Load 0x0,0x1 1c28 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1c29 0322 | " | Declare_Variable Record 1c2a 6009 |` | Indirect_Literal Discrete,0x1c34,{0x00000000, 0x00001026} 1c2b 00d9 | | Load_Top At_Offset_1 1c2c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 1c2d 4802 |H | Short_Literal 0x2 1c2e 00d9 | | Load_Top At_Offset_1 1c2f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1c30 0129 | ) | Execute Any,Make_Visible 1c31 00bf | | Action Accept_Activation 1c32 BODY_1bc0: 1c32 00bc | | Action Signal_Activated 1c33 00bb | | Action Signal_Completion 1c34 0000 0000 | | .LITERAL {0x00000000, 0x00001026} 1c38 0000 0000 | | .LITERAL {0x00000000, 0x00001024} 1c3c 0000 0000 | | .LITERAL {0x00000000, 0x00001020} 1c40 0000 0000 | | .LITERAL {0x00000000, 0x00001014} 1c44 0000 0000 | | .LITERAL {0x00000000, 0x00001012} 1c48 0000 0000 | | .LITERAL {0x00000000, 0x00001010} 1c4c 0000 0000 | | .LITERAL {0x00000000, 0x0000100c} 1c50 0000 0000 | | .LITERAL {0x00000000, 0x00001008} 1c54 0000 0000 | | .LITERAL {0x00000000, 0x00001004} 1c58 0000 0000 | | .LITERAL {0x00000000, 0x00001002} 1c5c 0000 0000 | | .LITERAL {0x00000000, 0x00001000} 1c60 ; -------------------------------------------------------------------------------------- 1c60 ; STRING TABLE 1c60 ; -------------------------------------------------------------------------------------- 1c60 0134 | 4 | .STRTAB 0x0134->0x1cfa ; "CMC_TCP_IP_2_5_1" 1c61 0142 | B | .STRTAB 0x0142->0x1d02 ; "CMC_TCP_IP_2_6" 1c62 014e | N | .STRTAB 0x014e->0x1d09 ; "CMC_TCP_IP_2_6_1" 1c63 015c | \ | .STRTAB 0x015c->0x1d11 ; "CMC_TCP_IP_2_6_2" 1c64 016a | j | .STRTAB 0x016a->0x1d19 ; "CMC_TCP_IP_2_6_3" 1c65 0178 | x | .STRTAB 0x0178->0x1d21 ; "CMC_TCP_IP_2_6_4" 1c66 0186 | | .STRTAB 0x0186->0x1d29 ; "CMC_TCP_IP_2_6_5" 1c67 0194 | | .STRTAB 0x0194->0x1d31 ; "CMC_TCP_IP_2_6_6" 1c68 01a2 | | .STRTAB 0x01a2->0x1d39 ; "S0" 1c69 01a2 | | .STRTAB 0x01a2->0x1d3a ; "S1" 1c6a 01a2 | | .STRTAB 0x01a2->0x1d3b ; "S2" 1c6b 01a2 | | .STRTAB 0x01a2->0x1d3c ; "S3" 1c6c 01a2 | | .STRTAB 0x01a2->0x1d3d ; "S5" 1c6d 01a2 | | .STRTAB 0x01a2->0x1d3e ; "S7" 1c6e 01a2 | | .STRTAB 0x01a2->0x1d3f ; "S8" 1c6f 01a2 | | .STRTAB 0x01a2->0x1d40 ; "S9" 1c70 01a2 | | .STRTAB 0x01a2->0x1d41 ; "Tcp_Ip_Boot" 1c71 01ab | | .STRTAB 0x01ab->0x1d46 ; "[Tcp_Ip_Boot]" 1c72 01b6 | | .STRTAB 0x01b6->0x1d4d ; "Local_Host_Id => " 1c73 01c5 | | .STRTAB 0x01c5->0x1d55 ; "Last_Address =>" 1c74 01d2 | | .STRTAB 0x01d2->0x1d5d ; "Downloading code to EXOS controller." 1c75 01f4 | | .STRTAB 0x01f4->0x1d6f ; "Exos_8000_4_Ia" 1c76 0200 | | .STRTAB 0x0200->0x1d76 ; "Exos_8000_4_Hb" 1c77 020c | | .STRTAB 0x020c->0x1d7d ; "Exos_8000_4_Aa" 1c78 0218 | | .STRTAB 0x0218->0x1d84 ; "EXOS_8010_3_Sd" 1c79 0224 | $ | .STRTAB 0x0224->0x1d8b ; "EXOS_8010_3_P" 1c7a 022f | / | .STRTAB 0x022f->0x1d91 ; "EXOS_8010_3_3h" 1c7b 023b | ; | .STRTAB 0x023b->0x1d98 ; "EXOS_8010_3_3" 1c7c 0246 | F | .STRTAB 0x0246->0x1d9f ; "EXOS_8010_3_2" 1c7d 0251 | Q | .STRTAB 0x0251->0x1da5 ; "EXOS_8010_3_1" 1c7e 025c | \ | .STRTAB 0x025c->0x1dac ; "Tcp_Ip_Boot succeeded." 1c7f 0270 | p | .STRTAB 0x0270->0x1db7 ; "Unable to find an EXOS controller code file." 1c80 029a | | .STRTAB 0x029a->0x1dcd ; "Tcp_Ip_Boot failed." 1c81 02ab | | .STRTAB 0x02ab->0x1dd6 ; "Tcp_Ip_Boot caught an unexpected exception." 1c82 02d4 | | .STRTAB 0x02d4->0x1dec ; "$TCP_IP_Subnet_Mask" 1c83 02e5 | | .STRTAB 0x02e5->0x1df5 ; ".ENP_Boot" 1c84 02ec | | .STRTAB 0x02ec->0x1dfa ; "CMC" 1c85 02ed | | .STRTAB 0x02ed->0x1dfb ; "[" 1c86 02ec | | .STRTAB 0x02ec->0x1dfc ; "]" 1c87 02eb | | .STRTAB 0x02eb->0x1dfc ; "Unable to find an ENP code file." 1c88 0309 | | .STRTAB 0x0309->0x1e0c ; " succeeded." 1c89 0312 | | .STRTAB 0x0312->0x1e12 ; " failed." 1c8a 0318 | | .STRTAB 0x0318->0x1e16 ; "Text_Io.Open (\x22" 1c8b 0325 | % | .STRTAB 0x0325->0x1e1d ; "\x22)" 1c8c 0325 | % | .STRTAB 0x0325->0x1e1e ; " raised Io_Exceptions.Name_Error." 1c8d 0344 | D | .STRTAB 0x0344->0x1e2f ; " Does this file exist?" 1c8e 0359 | Y | .STRTAB 0x0359->0x1e3a ; " raised Io_Exceptions.Use_Error." 1c8f 0377 | w | .STRTAB 0x0377->0x1e4a ; " Is this file already open?" 1c90 0391 | | .STRTAB 0x0391->0x1e58 ; "EXOS reset status => " 1c91 03a4 | | .STRTAB 0x03a4->0x1e63 ; "EXOS last address =>" 1c92 03b6 | | .STRTAB 0x03b6->0x1e6d ; "Downloading" 1c93 03bf | | .STRTAB 0x03bf->0x1e72 ; " bytes to address" 1c94 03ce | | .STRTAB 0x03ce->0x1e7b ; " first 32 bytes =>" 1c95 03de | | .STRTAB 0x03de->0x1e84 ; " bytes downloaded =>" 1c96 03f0 | | .STRTAB 0x03f0->0x1e8e ; "Tcp_Ip_Boot.Load_3_1" 1c97 0402 | | .STRTAB 0x0402->0x1e98 ; "Reading code file \x22" 1c98 0413 | | .STRTAB 0x0413->0x1ea1 ; "Starting execution at address" 1c99 042e | . | .STRTAB 0x042e->0x1eb0 ; "Tcp_Ip_Boot.Load_3_2" 1c9a 0440 | @ | .STRTAB 0x0440->0x1eba ; "Reading code file header:" 1c9b 0457 | W | .STRTAB 0x0457->0x1ec6 ; " X7_Magic =>" 1c9c 0463 | c | .STRTAB 0x0463->0x1ecd ; " X7_Textsiz =>" 1c9d 046f | o | .STRTAB 0x046f->0x1ed4 ; " X7_Datasiz =>" 1c9e 047b | { | .STRTAB 0x047b->0x1edb ; " X7_Bsssiz =>" 1c9f 0487 | | .STRTAB 0x0487->0x1ee2 ; " X7_Symsiz =>" 1ca0 0493 | | .STRTAB 0x0493->0x1ee9 ; " X7_Reloc =>" 1ca1 049f | | .STRTAB 0x049f->0x1ef0 ; "Error: Tcp_Ip_Boot.Load_3_2: first word in code file /= 8#411#" 1ca2 04db | | .STRTAB 0x04db->0x1f0f ; "Code_Address =>" 1ca3 04e8 | | .STRTAB 0x04e8->0x1f17 ; "Data_Address =>" 1ca4 04f5 | | .STRTAB 0x04f5->0x1f1e ; "<PROFILE>" 1ca5 04fc | | .STRTAB 0x04fc->0x1f23 ; "!machine.transport_routes" 1ca6 0513 | | .STRTAB 0x0513->0x1f2f ; "Cannot read Internet address from \x22" 1ca7 0534 | 4 | .STRTAB 0x0534->0x1f41 ; "\x22." 1ca8 0534 | 4 | .STRTAB 0x0534->0x1f42 ; "Cannot read Ethernet address from \x22" 1ca9 0555 | U | .STRTAB 0x0555->0x1f53 ; "Ethernet address will be taken from controller PROM." 1caa 0587 | | .STRTAB 0x0587->0x1f6d ; "dump_file" 1cab 058e | | .STRTAB 0x058e->0x1f72 ; "16#" 1cac 058f | | .STRTAB 0x058f->0x1f73 ; "#" 1cad 058e | | .STRTAB 0x058e->0x1f74 ; " (" 1cae 058e | | .STRTAB 0x058e->0x1f75 ; " bytes)" 1caf 0593 | | .STRTAB 0x0593->0x1f78 ; "Cannot load code from " 1cb0 05a7 | | .STRTAB 0x05a7->0x1f83 ; "Cannot read code from " 1cb1 05bb | | .STRTAB 0x05bb->0x1f8e ; "Gateway address: " 1cb2 05ca | | .STRTAB 0x05ca->0x1f97 ; "Delta" 1cb3 05cd | | .STRTAB 0x05cd->0x1f99 ; "if_tcp" 1cb4 05d1 | | .STRTAB 0x05d1->0x1f9c ; "if_udp" 1cb5 05d5 | | .STRTAB 0x05d5->0x1f9f ; "if_rip" 1cb6 05d9 | | .STRTAB 0x05d9->0x1fa2 ; "if_eth" 1cb7 05dd | | .STRTAB 0x05dd->0x1fa5 ; "SHARED.bfrspace =" 1cb8 05ec | | .STRTAB 0x05ec->0x1fae ; "skipped" 1cb9 05f1 | | .STRTAB 0x05f1->0x1fb1 ; " bytes to avoid IOP page boundaries." 1cba 0613 | | .STRTAB 0x0613->0x1fc3 ; "small:" 1cbb 0617 | | .STRTAB 0x0617->0x1fc6 ; " *" 1cbc 0617 | | .STRTAB 0x0617->0x1fc7 ; " 0" 1cbd 0617 | | .STRTAB 0x0617->0x1fc8 ; "medium:" 1cbe 061c | | .STRTAB 0x061c->0x1fcc ; "large:" 1cbf 0620 | | .STRTAB 0x0620->0x1fcf ; "Enp_Coupler.Internet.Tcp.Max_Data_Length :=" 1cc0 0649 | I | .STRTAB 0x0649->0x1fe4 ; "Enp_Coupler.Internet.Udp.Max_Data_Length :=" 1cc1 0672 | r | .STRTAB 0x0672->0x1ffa ; "Enp_Coupler.Ethernet.Max_Data_Length :=" 1cc2 0697 | | .STRTAB 0x0697->0x200d ; "ENP.SHARED.enetaddr = " 1cc3 06ab | | .STRTAB 0x06ab->0x2018 ; "ENP.SHARED.inetaddr = " 1cc4 06bf | | .STRTAB 0x06bf->0x2023 ; "Ethernet address: " 1cc5 06cf | | .STRTAB 0x06cf->0x202c ; "Internet address: " 1cc6 06df | | .STRTAB 0x06df->0x2035 ; "Enp_Driver.Configured" 1cc7 06f2 | | .STRTAB 0x06f2->0x2040 ; "Enp_Coupler.Register" 1cc8 0704 | | .STRTAB 0x0704->0x204a ; " option bytes to address" 1cc9 071a | | .STRTAB 0x071a->0x2056 ; "Tcp_Ip_Boot.Load_3_1 caught Io_Exceptions.Name_Error." 1cca 074d | M | .STRTAB 0x074d->0x2070 ; "Does the file \x22" 1ccb 075a | Z | .STRTAB 0x075a->0x2078 ; "\x22 exist?" 1ccc 0760 | ` | .STRTAB 0x0760->0x207c ; "Tcp_Ip_Boot.Load_3_1 caught an unexpected exception." 1ccd 0792 | | .STRTAB 0x0792->0x2096 ; "Tcp_Ip_Boot.Load_3_2 caught Io_Exceptions.Name_Error." 1cce 07c5 | | .STRTAB 0x07c5->0x20b0 ; "Tcp_Ip_Boot.Load_3_2 caught an unexpected exception." 1ccf 07f7 | | .STRTAB 0x07f7->0x20ca ; "In " 1cd0 07f8 | | .STRTAB 0x07f8->0x20cc ; ":" 1cd1 07f7 | | .STRTAB 0x07f7->0x20cc ; " /= Machine.Get_Id." 1cd2 0808 | | .STRTAB 0x0808->0x20d6 ; "Was " 1cd3 080a | | .STRTAB 0x080a->0x20d8 ; " copied from another machine?" 1cd4 0825 | % | .STRTAB 0x0825->0x20e6 ; "CMC " 1cd5 0827 | ' | .STRTAB 0x0827->0x20e8 ; ": " 1cd6 0827 | ' | .STRTAB 0x0827->0x20e9 ; "in " 1cd7 0828 | ( | .STRTAB 0x0828->0x20eb ; "public" 1cd8 082c | , | .STRTAB 0x082c->0x20ee ; "skip" 1cd9 082e | . | .STRTAB 0x082e->0x20f0 ; " bytes" 1cda 0832 | 2 | .STRTAB 0x0832->0x20f3 ; "attempted to allocate buffer space >=" 1cdb 0855 | U | .STRTAB 0x0855->0x2105 ; "code " 1cdc 0858 | X | .STRTAB 0x0858->0x2108 ; ", kernel \x22" 1cdd 0860 | ` | .STRTAB 0x0860->0x210d ; "\x22, host " 1cde 0866 | f | .STRTAB 0x0866->0x2111 ; "record too short: \x22" 1cdf 0877 | w | .STRTAB 0x0877->0x211a ; "not a hexadecimal digit: '" 1ce0 088f | | .STRTAB 0x088f->0x2127 ; "'" 1ce1 088e | | .STRTAB 0x088e->0x2128 ; "undefined type: \x22" 1ce2 089d | | .STRTAB 0x089d->0x2130 ; "record shorter than encoded record length: \x22" 1ce3 08c7 | | .STRTAB 0x08c7->0x2146 ; "record shorter than address: \x22" 1ce4 08e3 | | .STRTAB 0x08e3->0x2155 ; "extraneous data at end of line: \x22" 1ce5 0902 | | .STRTAB 0x0902->0x2166 ; "bad checksum" 1ce6 090c | | .STRTAB 0x090c->0x216c ; "Enp_Driver.Reset" 1ce7 091a | | .STRTAB 0x091a->0x2174 ; "Reset" 1ce8 091d | | .STRTAB 0x091d->0x2176 ; "not Enp_Driver.Installed" 1ce9 0933 | 3 | .STRTAB 0x0933->0x2182 ; "Enp_Driver.Driver_Version =" 1cea 094c | L | .STRTAB 0x094c->0x2190 ; "ENP did not complete self-test." 1ceb 0969 | i | .STRTAB 0x0969->0x219f ; ": Go.Control_Status =" 1cec 097c | | | .STRTAB 0x097c->0x21aa ; "Diagnostic Control Block = " 1ced 0995 | | .STRTAB 0x0995->0x21b7 ; "Enp_Driver.Configure" 1cee 09a7 | | .STRTAB 0x09a7->0x21c1 ; "Configure" 1cef 09ae | | .STRTAB 0x09ae->0x21c6 ; ": Configure.Initialization_Status =" 1cf0 09cf | | .STRTAB 0x09cf->0x21d7 ; "Read from " 1cf1 09d7 | | .STRTAB 0x09d7->0x21dc ; "," 1cf2 09d6 | | .STRTAB 0x09d6->0x21dd ; "Read" 1cf3 09d8 | | .STRTAB 0x09d8->0x21df ; "Cannot read from " 1cf4 09e7 | | .STRTAB 0x09e7->0x21e7 ; "Enp_Driver." 1cf5 09f0 | | .STRTAB 0x09f0->0x21ed ; ".Status = " 1cf6 09f8 | | .STRTAB 0x09f8->0x21f2 ; " := " 1cf7 09fa | | .STRTAB 0x09fa->0x21f4 ; "Write" 1cf8 09fd | | .STRTAB 0x09fd->0x21f6 ; "Reset.Control_Status =" 1cf9 0a11 | | .STREND 0x0a11->0x2201 1cfa 434d 435f |CMC_| .STRTAB_STRINGS 2202 0000 0000 | | .BLANK 0000[0x6] 2208 ; -------------------------------------------------------------------------------------- 2208 ; Debug Table 2208 ; -------------------------------------------------------------------------------------- 2208 0004 0012 | | .DEBUG4 0x0004,0x0012,0x98a4,0x0000,0x0001,0x0000 220e 1c0a 0000 | | .XXX[0x1f2] 2210 0010 00bc | | 2212 01c8 14bc | | 2214 04bc 513a | Q:| 2216 e400 0000 | | 2218 013f bc00 | ? | 221a 3080 e400 |0 | 221c 019c 31c8 | 1 | 221e 1302 059c | | 2220 5880 1b02 |X | 2222 04bc 01c8 | | 2224 18bc 04bc | | 2226 513a e400 |Q: | 2228 0000 013f | ?| 222a bc00 3080 | 0 | 222c e400 019c | | 222e 31c8 0b02 |1 | 2230 059c 5880 | X | 2232 1b02 04bc | | 2234 01c8 1cbc | | 2236 04bc 513a | Q:| 2238 e400 0000 | | 223a 013f bc00 | ? | 223c 3128 e400 |1( | 223e 0126 999c | & | 2240 6840 e400 |h@ | 2242 0000 1127 | '| 2244 00bc 01c8 | | 2246 44bc 04bc |D | 2248 513a e400 |Q: | 224a 0000 013f | ?| 224c bc00 3128 | 1(| 224e e400 0126 | &| 2250 a19c 7881 | x | 2252 e400 0000 | | 2254 0040 a009 | @ | 2256 6927 00bc |i' | 2258 01c8 4cbc | L | 225a 04bc 513a | Q:| 225c e400 0000 | | 225e 013f bc00 | ? | 2260 3128 e400 |1( | 2262 0126 a99c | & | 2264 7881 e400 |x | 2266 0000 0040 | @| 2268 a009 6d27 | m'| 226a 00bc 01c8 | | 226c 54bc 04bc |T | 226e 513a e400 |Q: | 2270 0000 013f | ?| 2272 bc00 3128 | 1(| 2274 e400 0126 | &| 2276 b19c 7881 | x | 2278 e400 0000 | | 227a 0040 a009 | @ | 227c 7127 00bc |q' | 227e 01c8 58bc | X | 2280 04bc 513a | Q:| 2282 e400 0000 | | 2284 013f bc00 | ? | 2286 3128 e400 |1( | 2288 0126 919c | & | 228a 6840 e400 |h@ | 228c 0000 4d27 | M'| 228e 00bc 01c8 | | 2290 5cbc 04bc |\ | 2292 513a e400 |Q: | 2294 0000 013f | ?| 2296 bc00 312a | 1*| 2298 ac03 09bc | | 229a 11c0 0580 | | 229c 09c0 0088 | | 229e e400 019c | | 22a0 82ca 019c | | 22a2 0002 f12a | *| 22a4 ac03 09bc | | 22a6 11c0 0580 | | 22a8 09c0 008f | | 22aa 0000 019c | | 22ac 80bc 010a | | 22ae 9cbc 513a | Q:| 22b0 e400 0000 | | 22b2 013f bc00 | ? | 22b4 312a e400 |1* | 22b6 019c 8198 | | 22b8 11c0 0580 | | 22ba 09c0 00bc | | 22bc 01c8 20bc | | 22be 04bc 513a | Q:| 22c0 e400 0000 | | 22c2 013f bc00 | ? | 22c4 312a e400 |1* | 22c6 019c 819c | | 22c8 4128 ac03 |A( | 22ca 5d9c 29c8 |] ) | 22cc 048f 0400 | | 22ce 019c 9180 | | 22d0 190a e400 | | 22d2 019c 90bc | | 22d4 e400 019c | | 22d6 91c8 20bc | | 22d8 04bc 513a | Q:| 22da e400 0000 | | 22dc 013f bc00 | ? | 22de 312a e400 |1* | 22e0 019c 8198 | | 22e2 11c0 0580 | | 22e4 09c0 00bc | | 22e6 01c8 24bc | $ | 22e8 04bc 513a | Q:| 22ea e400 0000 | | 22ec 013f bc00 | ? | 22ee 312a e400 |1* | 22f0 019c 819c | | 22f2 4928 ac03 |I( | 22f4 599c 31c8 |Y 1 | 22f6 048f 0400 | | 22f8 019c a0bc | | 22fa 0581 790a | y | 22fc e400 019c | | 22fe a10a 9d81 | | 2300 512a e400 |Q* | 2302 019c 819d | | 2304 7040 ac03 |p@ | 2306 5d27 0088 |]' | 2308 e400 019c | | 230a 92ca 019c | | 230c 7840 ac03 |x@ | 230e 5d27 008f |]' | 2310 0000 019c | | 2312 90bc 01c8 | | 2314 20bc 04bc | | 2316 513a e400 |Q: | 2318 0000 013f | ?| 231a bc00 3040 | 0@| 231c ac03 5927 | Y'| 231e 0088 e400 | | 2320 019c a2ca | | 2322 019c 7840 | x@| 2324 ac03 5927 | Y'| 2326 008f 0000 | | 2328 019c a0bc | | 232a 01c8 24bc | $ | 232c 04bc 513a | Q:| 232e e400 0000 | | 2330 013f bc00 | ? | 2332 3040 ac03 |0@ | 2334 d127 0088 | ' | 2336 e400 019c | | 2338 42ca 019c |B | 233a 7840 ac03 |x@ | 233c d127 008f | ' | 233e 0000 019c | | 2340 40bc 01c8 |@ | 2342 28bc 04bc |( | 2344 513a e400 |Q: | 2346 0000 013f | ?| 2348 bc00 3040 | 0@| 234a ac03 d527 | '| 234c 0088 e400 | | 234e 019c 62ca | b | 2350 019c 7840 | x@| 2352 ac03 d527 | '| 2354 008f 0000 | | 2356 019c 60bc | ` | 2358 01c8 2cbc | , | 235a 04bc 513a | Q:| 235c e400 0000 | | 235e 013f bc00 | ? | 2360 3040 ac03 |0@ | 2362 d927 0088 | ' | 2364 e400 019c | | 2366 72ca 019c |r | 2368 7840 ac03 |x@ | 236a d927 008f | ' | 236c 0000 019c | | 236e 70bc 01c8 |p | 2370 30bc 04bc |0 | 2372 513a e400 |Q: | 2374 0000 013f | ?| 2376 bc00 3040 | 0@| 2378 ac03 b127 | '| 237a 0088 e400 | | 237c 019c 52ca | R | 237e 019c 7840 | x@| 2380 ac03 b127 | '| 2382 008f 0000 | | 2384 019c 50bc | P | 2386 01c8 34bc | 4 | 2388 04bc 513a | Q:| 238a e400 0000 | | 238c 013f bc00 | ? | 238e 304f e400 |0O | 2390 0000 4c00 | L | 2392 0126 904f | & O| 2394 e400 0000 | | 2396 1000 0126 | &| 2398 9881 e400 | | 239a 0000 004f | O| 239c a009 6800 | h | 239e 0126 a04f | & O| 23a0 a009 6c00 | l | 23a2 0126 a84f | & O| 23a4 a009 7000 | p | 23a6 0126 b08f | & | 23a8 1c00 019c | | 23aa 208f 1800 | | 23ac 019c 3080 | 0 | 23ae 50b0 7cb8 |P | | 23b0 7c99 7ca1 || | | 23b2 7ca9 7d39 || }9| 23b4 7939 d539 |y9 9| 23b6 5bff e0bc |[ | 23b8 3481 e400 |4 | 23ba 0000 012f | /| 23bc a001 c881 | | 23be 3480 b800 |4 | 23c0 2032 0000 | 2 | 23c2 0000 5d88 | ] | 23c4 0002 8080 | | 23c6 c036 c000 | 6 | 23c8 00e4 e13b | ;| 23ca ec20 0800 | | 23cc 0004 1000 | | 23ce 0001 8000 | | 23d0 0002 8000 | | 23d2 0002 f000 | | 23d4 0003 2800 | ( | 23d6 0003 6000 | ` | 23d8 0003 9800 | | 23da 0003 d000 | | 23dc 0004 b800 | | 23de 0005 0800 | | 23e0 0005 5800 | X | 23e2 0006 2000 | | 23e4 0005 a800 | | 23e6 0002 4800 | H | 23e8 0002 4800 | H | 23ea 0006 a800 | | 23ec 0006 7000 | p | 23ee 0006 d800 | | 23f0 0002 4800 | H | 23f2 0008 e000 | | 23f4 0009 f800 | | 23f6 0009 7800 | x | 23f8 000a 5800 | X | 23fa 000a d881 | | 23fc e400 0000 | | 23fe 0021 a000 | ! |