|
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 | ! |