|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0368ff
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0470 | p | .CONST 0x0470 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0042 | B | .CONST 0x0042 ; Address of begin
0009 004c | L | .CONST 0x004c ; Address of exception handler
000a 001b | | .CONST 0x001b ; Number of locals
000b INIT_0008:
000b 00e1 | | Load_Encached Boolean_Cache
000c 0401 | | Execute_Immediate Set_Value_Visible_Unchecked,0x1
000d 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
000f 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0011 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 0092 038c | | Action Push_String_Extended,0x38c ; "Memory.ENP"
0016 00e3 | | Load_Encached Natural_Cache
0017 00e5 | | Load_Encached Long_Integer_Cache
0018 00d9 | | Load_Top At_Offset_1
0019 00e3 | | Load_Encached Natural_Cache
001a 02a0 | | Declare_Subprogram Null_Subprogram
001b 4802 |H | Short_Literal 0x2
001c 032d | - | Declare_Type Record,Defined
001d 00d8 | | Load_Top At_Offset_0
001e 0322 | " | Declare_Variable Record
001f 4800 |H | Short_Literal 0x0
0020 00d9 | | Load_Top At_Offset_1
0021 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0022 60a9 |` | Indirect_Literal Discrete,0xcc,{0x00000000, 0x00001000}
0023 00d9 | | Load_Top At_Offset_1
0024 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0025 4800 |H | Short_Literal 0x0
0026 0093 033b | ;| push_full_address INIT_0338
0028 02a0 | | Declare_Subprogram Null_Subprogram
0029 038e | | Declare_Type Package,Defined
002a 00da | | Load_Top At_Offset_2
002b 4801 |H | Short_Literal 0x1
002c 00da | | Load_Top At_Offset_2
002d 020e | | Execute Module,Augment_Imports
002e 0387 | | Declare_Variable Package
002f 6098 |` | Indirect_Literal Discrete,0xc8,{0x00000000, 0x0007e000}
0030 e212 | | Load 0x1,0x12
0031 03f1 | | Declare_Variable Discrete,With_Value
0032 029d 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call
0034 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call
0036 029d 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call
0038 029d 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call
003a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
003b 00c7 | | Action Elaborate_Subprogram
003c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
003d 00c7 | | Action Elaborate_Subprogram
003e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
003f 00c7 | | Action Elaborate_Subprogram
0040 e216 | | Load 0x1,0x16
0041 020f | | Execute Module,Activate
0042 BODY_0008:
0042 6081 |` | Indirect_Literal Discrete,0xc4,{0x00000000, 0x0000e000}
0043 a213 | | Store_Unchecked 0x1,0x13
0044 e213 | | Load 0x1,0x13
0045 0910 | | Execute_Immediate Binary_Scale,0x10
0046 a213 | | Store_Unchecked 0x1,0x13
0047 e001 | | Load 0x0,0x1
0048 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0049 a20d | | Store_Unchecked 0x1,0xd
004a 00bc | | Action Signal_Activated
004b 00bb | | Action Signal_Completion
004c TRAP_0008:
004c 0007 | | Action Break_Optional
004d 4800 |H | Short_Literal 0x0
004e a20d | | Store_Unchecked 0x1,0xd
004f 00bc | | Action Signal_Activated
0050 00bb | | Action Signal_Completion
0051 0000 0000 | | .BLANK 0000[0x7]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0064 | d | .CONST 0x0064 ; Address of begin
0059 0097 | | .CONST 0x0097 ; Address of exception handler
005a 0004 | | .CONST 0x0004 ; Number of locals
005b INIT_0058:
005b e211 | | Load 0x1,0x11
005c 0092 038d | | Action Push_String_Extended,0x38d ; ".Reset"
005e 01cc | | Execute Vector,Catenate
005f 0007 | | Action Break_Optional
0060 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
0062 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
0064 BODY_0058:
0064 8404 | | Call 0x2,0x4
0065 e001 | | Load 0x0,0x1
0066 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0067 700a |p | Jump_Nonzero 0x72
0068 4800 |H | Short_Literal 0x0
0069 a20d | | Store_Unchecked 0x1,0xd
006a e002 | | Load 0x0,0x2
006b 180e | | Execute Package,Field_Execute,Field_Number 0xe
006c 4802 |H | Short_Literal 0x2
006d 0092 038e | | Action Push_String_Extended,0x38e ; "not ENP_Driver.Installed"
006f e003 | | Load 0x0,0x3
0070 180d | | Execute Package,Field_Execute,Field_Number 0xd
0071 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0072 604d |`M | Indirect_Literal Discrete,0xc0,{0x00000000, 0x00060000}
0073 00ba | | Action Initiate_Delay
0074 8403 | | Call 0x2,0x3
0075 700e |p | Jump_Nonzero 0x84
0076 6045 |`E | Indirect_Literal Discrete,0xbc,{0x00000000, 0x00090000}
0077 00ba | | Action Initiate_Delay
0078 8403 | | Call 0x2,0x3
0079 700a |p | Jump_Nonzero 0x84
007a e002 | | Load 0x0,0x2
007b 180e | | Execute Package,Field_Execute,Field_Number 0xe
007c 4807 |H | Short_Literal 0x7
007d 0092 038f | | Action Push_String_Extended,0x38f ; "ENP did not complete self-test."
007f e003 | | Load 0x0,0x3
0080 180d | | Execute Package,Field_Execute,Field_Number 0xd
0081 e003 | | Load 0x0,0x3
0082 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0083 0257 | W | Execute Discrete,Raise
0084 4800 |H | Short_Literal 0x0
0085 e216 | | Load 0x1,0x16
0086 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0087 821a | | Call 0x1,0x1a
0088 821b | | Call 0x1,0x1b
0089 a217 | | Store_Unchecked 0x1,0x17
008a e002 | | Load 0x0,0x2
008b 180e | | Execute Package,Field_Execute,Field_Number 0xe
008c 4800 |H | Short_Literal 0x0
008d e211 | | Load 0x1,0x11
008e 0092 0390 | | Action Push_String_Extended,0x390 ; ".Limit_Address ="
0090 01cc | | Execute Vector,Catenate
0091 e217 | | Load 0x1,0x17
0092 8218 | | Call 0x1,0x18
0093 01cc | | Execute Vector,Catenate
0094 e003 | | Load 0x0,0x3
0095 180d | | Execute Package,Field_Execute,Field_Number 0xd
0096 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0097 TRAP_0058:
0097 e003 | | Load 0x0,0x3
0098 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0099 010f | | Execute Exception,Equal
009a 6802 |h | Jump_Zero 0x9d
009b 00d8 | | Load_Top At_Offset_0
009c 0101 | | Execute Exception,Reraise
009d 4884 |H | Short_Literal 0x84
009e 010f | | Execute Exception,Equal
009f 680c |h | Jump_Zero 0xac
00a0 e002 | | Load 0x0,0x2
00a1 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a2 4806 |H | Short_Literal 0x6
00a3 e402 | | Load 0x2,0x2
00a4 0092 0391 | | Action Push_String_Extended,0x391 ; " caught System.Nonexistent_Page_Error"
00a6 01cc | | Execute Vector,Catenate
00a7 e003 | | Load 0x0,0x3
00a8 180d | | Execute Package,Field_Execute,Field_Number 0xd
00a9 4800 |H | Short_Literal 0x0
00aa a20d | | Store_Unchecked 0x1,0xd
00ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00ac e002 | | Load 0x0,0x2
00ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ae 4808 |H | Short_Literal 0x8
00af e402 | | Load 0x2,0x2
00b0 0092 0392 | | Action Push_String_Extended,0x392 ; " caught "
00b2 01cc | | Execute Vector,Catenate
00b3 4801 |H | Short_Literal 0x1
00b4 4801 |H | Short_Literal 0x1
00b5 e004 | | Load 0x0,0x4
00b6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b7 01cc | | Execute Vector,Catenate
00b8 e003 | | Load 0x0,0x3
00b9 180d | | Execute Package,Field_Execute,Field_Number 0xd
00ba 00d8 | | Load_Top At_Offset_0
00bb 0101 | | Execute Exception,Reraise
00bc 0000 0000 | | .LITERAL {0x00000000, 0x00090000}
00c0 0000 0000 | | .LITERAL {0x00000000, 0x00060000}
00c4 0000 0000 | | .LITERAL {0x00000000, 0x0000e000}
00c8 0000 0000 | | .LITERAL {0x00000000, 0x0007e000}
00cc 0000 0000 | | .LITERAL {0x00000000, 0x00001000}
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00de | | .CONST 0x00de ; Address of begin
00d1 0115 | | .CONST 0x0115 ; Address of exception handler
00d2 0005 | | .CONST 0x0005 ; Number of locals
00d3 INIT_00d0:
00d3 6064 |`d | Indirect_Literal Discrete,0x138,{0x00000000, 0x00001100}
00d4 e212 | | Load 0x1,0x12
00d5 03f1 | | Declare_Variable Discrete,With_Value
00d6 4801 |H | Short_Literal 0x1
00d7 4900 |I | Short_Literal 0x100
00d8 e005 | | Load 0x0,0x5
00d9 035b | [ | Declare_Type Array,Constrained
00da 0337 | 7 | Declare_Variable Array
00db 00e3 | | Load_Encached Natural_Cache
00dc 029f 02db | | Declare_Subprogram INIT_02d8,For_Call
00de BODY_00d0:
00de e20d | | Load 0x1,0xd
00df 7001 |p | Jump_Nonzero 0xe1
00e0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00e1 00cf | | Action Mark_Auxiliary
00e2 7823 |x# | Jump 0x106
00e3 e402 | | Load 0x2,0x2
00e4 4900 |I | Short_Literal 0x100
00e5 e003 | | Load 0x0,0x3
00e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00e7 e403 | | Load 0x2,0x3
00e8 01d4 | | Execute Vector,Structure_Write
00e9 8405 | | Call 0x2,0x5
00ea 00da | | Load_Top At_Offset_2
00eb 0d01 | | Execute_Immediate Less,0x1
00ec 6814 |h | Jump_Zero 0x101
00ed e002 | | Load 0x0,0x2
00ee 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ef 4807 |H | Short_Literal 0x7
00f0 0092 0393 | | Action Push_String_Extended,0x393 ; "Write("
00f2 e402 | | Load 0x2,0x2
00f3 8218 | | Call 0x1,0x18
00f4 01cc | | Execute Vector,Catenate
00f5 0092 0394 | | Action Push_String_Extended,0x394 ; ").Count ="
00f7 01cc | | Execute Vector,Catenate
00f8 e404 | | Load 0x2,0x4
00f9 00e0 | | Load_Encached Standard_Cache
00fa 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00fb 01cc | | Execute Vector,Catenate
00fc e003 | | Load 0x0,0x3
00fd 180d | | Execute Package,Field_Execute,Field_Number 0xd
00fe e003 | | Load 0x0,0x3
00ff 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0100 0257 | W | Execute Discrete,Raise
0101 e402 | | Load 0x2,0x2
0102 00db | | Load_Top At_Offset_3
0103 0273 | s | Execute Discrete,Plus
0104 c402 | | Store 0x2,0x2
0105 00c9 | | Action Pop_Auxiliary_Loop
0106 e402 | | Load 0x2,0x2
0107 e217 | | Load 0x1,0x17
0108 027c | | | Execute Discrete,Less
0109 77d9 |w | Jump_Nonzero 0xe3
010a 00ce | | Action Pop_Auxiliary
010b e002 | | Load 0x0,0x2
010c 180e | | Execute Package,Field_Execute,Field_Number 0xe
010d 4802 |H | Short_Literal 0x2
010e e211 | | Load 0x1,0x11
010f 0092 0395 | | Action Push_String_Extended,0x395 ; ".Write succeeded"
0111 01cc | | Execute Vector,Catenate
0112 e003 | | Load 0x0,0x3
0113 180d | | Execute Package,Field_Execute,Field_Number 0xd
0114 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0115 TRAP_00d0:
0115 e003 | | Load 0x0,0x3
0116 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0117 010f | | Execute Exception,Equal
0118 680b |h | Jump_Zero 0x124
0119 e002 | | Load 0x0,0x2
011a 180e | | Execute Package,Field_Execute,Field_Number 0xe
011b 4807 |H | Short_Literal 0x7
011c e211 | | Load 0x1,0x11
011d 0092 0396 | | Action Push_String_Extended,0x396 ; ".Write failed"
011f 01cc | | Execute Vector,Catenate
0120 e003 | | Load 0x0,0x3
0121 180d | | Execute Package,Field_Execute,Field_Number 0xd
0122 00d8 | | Load_Top At_Offset_0
0123 0101 | | Execute Exception,Reraise
0124 e002 | | Load 0x0,0x2
0125 180e | | Execute Package,Field_Execute,Field_Number 0xe
0126 4808 |H | Short_Literal 0x8
0127 4801 |H | Short_Literal 0x1
0128 4801 |H | Short_Literal 0x1
0129 e004 | | Load 0x0,0x4
012a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
012b 0092 0397 | | Action Push_String_Extended,0x397 ; " caught in "
012d 01cc | | Execute Vector,Catenate
012e e211 | | Load 0x1,0x11
012f 01cc | | Execute Vector,Catenate
0130 0092 0398 | | Action Push_String_Extended,0x398 ; ".Write"
0132 01cc | | Execute Vector,Catenate
0133 e003 | | Load 0x0,0x3
0134 180d | | Execute Package,Field_Execute,Field_Number 0xd
0135 00d8 | | Load_Top At_Offset_0
0136 0101 | | Execute Exception,Reraise
0137 0000 | | .XXX[0x1]
0138 0000 0000 | | .LITERAL {0x00000000, 0x00001100}
013c 0000 0000 | | .BLANK 0000[0x4]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 014e | N | .CONST 0x014e ; Address of begin
0141 019e | | .CONST 0x019e ; Address of exception handler
0142 0005 | | .CONST 0x0005 ; Number of locals
0143 INIT_0140:
0143 67f4 |g | Indirect_Literal Discrete,0x138,{0x00000000, 0x00001100}
0144 e212 | | Load 0x1,0x12
0145 03f1 | | Declare_Variable Discrete,With_Value
0146 4801 |H | Short_Literal 0x1
0147 4900 |I | Short_Literal 0x100
0148 e005 | | Load 0x0,0x5
0149 035b | [ | Declare_Type Array,Constrained
014a 0337 | 7 | Declare_Variable Array
014b 00e3 | | Load_Encached Natural_Cache
014c 029f 031b | | Declare_Subprogram INIT_0318,For_Call
014e BODY_0140:
014e e20d | | Load 0x1,0xd
014f 7005 |p | Jump_Nonzero 0x155
0150 e003 | | Load 0x0,0x3
0151 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0152 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0153 00ba | | Action Initiate_Delay
0154 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0155 00cf | | Action Mark_Auxiliary
0156 7836 |x6 | Jump 0x18d
0157 e5ff | | Load 0x2,-0x1
0158 7004 |p | Jump_Nonzero 0x15d
0159 e003 | | Load 0x0,0x3
015a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
015b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015c 00ba | | Action Initiate_Delay
015d 8405 | | Call 0x2,0x5
015e 00da | | Load_Top At_Offset_2
015f 0d01 | | Execute_Immediate Less,0x1
0160 6814 |h | Jump_Zero 0x175
0161 e002 | | Load 0x0,0x2
0162 180e | | Execute Package,Field_Execute,Field_Number 0xe
0163 4807 |H | Short_Literal 0x7
0164 0092 0399 | | Action Push_String_Extended,0x399 ; "Enp_Driver.Read("
0166 e402 | | Load 0x2,0x2
0167 8218 | | Call 0x1,0x18
0168 01cc | | Execute Vector,Catenate
0169 0092 0394 | | Action Push_String_Extended,0x394 ; ").Count ="
016b 01cc | | Execute Vector,Catenate
016c e404 | | Load 0x2,0x4
016d 00e0 | | Load_Encached Standard_Cache
016e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
016f 01cc | | Execute Vector,Catenate
0170 e003 | | Load 0x0,0x3
0171 180d | | Execute Package,Field_Execute,Field_Number 0xd
0172 e003 | | Load 0x0,0x3
0173 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0174 0257 | W | Execute Discrete,Raise
0175 e5ff | | Load 0x2,-0x1
0176 6811 |h | Jump_Zero 0x188
0177 0092 0399 | | Action Push_String_Extended,0x399 ; "Enp_Driver.Read("
0179 e402 | | Load 0x2,0x2
017a 8218 | | Call 0x1,0x18
017b 01cc | | Execute Vector,Catenate
017c 0092 039a | | Action Push_String_Extended,0x39a ; ")"
017e 01cc | | Execute Vector,Catenate
017f e402 | | Load 0x2,0x2
0180 e404 | | Load 0x2,0x4
0181 e003 | | Load 0x0,0x3
0182 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0183 4801 |H | Short_Literal 0x1
0184 e404 | | Load 0x2,0x4
0185 e403 | | Load 0x2,0x3
0186 01cf | | Execute Vector,Slice_Read
0187 8006 | | Call 0x0,0x6
0188 e402 | | Load 0x2,0x2
0189 00db | | Load_Top At_Offset_3
018a 0273 | s | Execute Discrete,Plus
018b c402 | | Store 0x2,0x2
018c 00c9 | | Action Pop_Auxiliary_Loop
018d e402 | | Load 0x2,0x2
018e e217 | | Load 0x1,0x17
018f 027c | | | Execute Discrete,Less
0190 77c6 |w | Jump_Nonzero 0x157
0191 00ce | | Action Pop_Auxiliary
0192 e5ff | | Load 0x2,-0x1
0193 6809 |h | Jump_Zero 0x19d
0194 e002 | | Load 0x0,0x2
0195 180e | | Execute Package,Field_Execute,Field_Number 0xe
0196 4802 |H | Short_Literal 0x2
0197 e211 | | Load 0x1,0x11
0198 0092 039b | | Action Push_String_Extended,0x39b ; ".Read succeeded"
019a 01cc | | Execute Vector,Catenate
019b e003 | | Load 0x0,0x3
019c 180d | | Execute Package,Field_Execute,Field_Number 0xd
019d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
019e TRAP_0140:
019e e003 | | Load 0x0,0x3
019f 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01a0 010f | | Execute Exception,Equal
01a1 680b |h | Jump_Zero 0x1ad
01a2 e002 | | Load 0x0,0x2
01a3 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a4 4807 |H | Short_Literal 0x7
01a5 e211 | | Load 0x1,0x11
01a6 0092 039c | | Action Push_String_Extended,0x39c ; ".Read failed"
01a8 01cc | | Execute Vector,Catenate
01a9 e003 | | Load 0x0,0x3
01aa 180d | | Execute Package,Field_Execute,Field_Number 0xd
01ab 00d8 | | Load_Top At_Offset_0
01ac 0101 | | Execute Exception,Reraise
01ad e002 | | Load 0x0,0x2
01ae 180e | | Execute Package,Field_Execute,Field_Number 0xe
01af 4808 |H | Short_Literal 0x8
01b0 4801 |H | Short_Literal 0x1
01b1 4801 |H | Short_Literal 0x1
01b2 e004 | | Load 0x0,0x4
01b3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01b4 0092 0397 | | Action Push_String_Extended,0x397 ; " caught in "
01b6 01cc | | Execute Vector,Catenate
01b7 e211 | | Load 0x1,0x11
01b8 01cc | | Execute Vector,Catenate
01b9 0092 039d | | Action Push_String_Extended,0x39d ; ".Read"
01bb 01cc | | Execute Vector,Catenate
01bc e003 | | Load 0x0,0x3
01bd 180d | | Execute Package,Field_Execute,Field_Number 0xd
01be 00d8 | | Load_Top At_Offset_0
01bf 0101 | | Execute Exception,Reraise
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 0092 039e | | Action Push_String_Extended,0x39e ; " #"
01c5 00db | | Load_Top At_Offset_3
01c6 8007 | | Call 0x0,0x7
01c7 01cc | | Execute Vector,Catenate
01c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c9 0000 0000 | | .BLANK 0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 00da | | Load_Top At_Offset_2
01d4 6815 |h | Jump_Zero 0x1ea
01d5 e002 | | Load 0x0,0x2
01d6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d7 4807 |H | Short_Literal 0x7
01d8 0092 039f | | Action Push_String_Extended,0x39f ; "ENP_Driver."
01da e5fe | | Load 0x2,-0x2
01db 01cc | | Execute Vector,Catenate
01dc 0092 03a0 | | Action Push_String_Extended,0x3a0 ; ".Status = "
01de 01cc | | Execute Vector,Catenate
01df e5ff | | Load 0x2,-0x1
01e0 e001 | | Load 0x0,0x1
01e1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01e2 011c | | Execute Any,Convert_Unchecked
01e3 1c01 | | Execute_Immediate Run_Utility,0x1
01e4 01cc | | Execute Vector,Catenate
01e5 e003 | | Load 0x0,0x3
01e6 180d | | Execute Package,Field_Execute,Field_Number 0xd
01e7 e003 | | Load 0x0,0x3
01e8 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01e9 0257 | W | Execute Discrete,Raise
01ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01eb 0000 0000 | | .BLANK 0000[0x5]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01fc | | .CONST 0x01fc ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0004 | | .CONST 0x0004 ; Number of locals
01f3 INIT_01f0:
01f3 e001 | | Load 0x0,0x1
01f4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01f5 4801 |H | Short_Literal 0x1
01f6 e5ff | | Load 0x2,-0x1
01f7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01f8 e005 | | Load 0x0,0x5
01f9 035b | [ | Declare_Type Array,Constrained
01fa 0337 | 7 | Declare_Variable Array
01fb 00e3 | | Load_Encached Natural_Cache
01fc BODY_01f0:
01fc 00e3 | | Load_Encached Natural_Cache
01fd 00da | | Load_Top At_Offset_2
01fe e001 | | Load 0x0,0x1
01ff 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0200 e5ff | | Load 0x2,-0x1
0201 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0202 00d8 | | Load_Top At_Offset_0
0203 e001 | | Load 0x0,0x1
0204 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0205 0260 | ` | Execute Discrete,In_Type
0206 7001 |p | Jump_Nonzero 0x208
0207 0801 | | Execute_Immediate Raise,0x1
0208 e001 | | Load 0x0,0x1
0209 1815 | | Execute Package,Field_Execute,Field_Number 0x15
020a c402 | | Store 0x2,0x2
020b 00d1 | | Pop_Control Pop_Count_1
020c 0059 | Y | Store_Top Discrete,At_Offset_1
020d 0092 03a1 | | Action Push_String_Extended,0x3a1 ; "Read"
020f 00db | | Load_Top At_Offset_3
0210 8219 | | Call 0x1,0x19
0211 e5fe | | Load 0x2,-0x2
0212 6808 |h | Jump_Zero 0x21b
0213 4801 |H | Short_Literal 0x1
0214 00d9 | | Load_Top At_Offset_1
0215 00db | | Load_Top At_Offset_3
0216 01cf | | Execute Vector,Slice_Read
0217 e008 | | Load 0x0,0x8
0218 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0219 01c6 | | Execute Vector,Convert_To_Formal
021a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
021b 00d8 | | Load_Top At_Offset_0
021c 00da | | Load_Top At_Offset_2
021d 01db | | Execute Vector,Length
021e 027e | ~ | Execute Discrete,Not_Equal
021f 6815 |h | Jump_Zero 0x235
0220 e002 | | Load 0x0,0x2
0221 180e | | Execute Package,Field_Execute,Field_Number 0xe
0222 4807 |H | Short_Literal 0x7
0223 0092 03a2 | | Action Push_String_Extended,0x3a2 ; "Cannot read from "
0225 e5ff | | Load 0x2,-0x1
0226 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0227 e404 | | Load 0x2,0x4
0228 0273 | s | Execute Discrete,Plus
0229 00d8 | | Load_Top At_Offset_0
022a e212 | | Load 0x1,0x12
022b 0260 | ` | Execute Discrete,In_Type
022c 7001 |p | Jump_Nonzero 0x22e
022d 0801 | | Execute_Immediate Raise,0x1
022e 8218 | | Call 0x1,0x18
022f 01cc | | Execute Vector,Catenate
0230 e003 | | Load 0x0,0x3
0231 180d | | Execute Package,Field_Execute,Field_Number 0xd
0232 e003 | | Load 0x0,0x3
0233 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0234 0257 | W | Execute Discrete,Raise
0235 00d9 | | Load_Top At_Offset_1
0236 e008 | | Load 0x0,0x8
0237 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0238 01c6 | | Execute Vector,Convert_To_Formal
0239 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
023a 0000 0000 | | .BLANK 0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0245 | E | .CONST 0x0245 ; Address of begin
0241 025d | ] | .CONST 0x025d ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 00e5 | | Load_Encached Long_Integer_Cache
0244 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0245 BODY_0240:
0245 00cf | | Action Mark_Auxiliary
0246 e5ff | | Load 0x2,-0x1
0247 01d9 | | Execute Vector,Reverse_Bounds
0248 0263 | c | Execute Discrete,Above_Bound
0249 7009 |p | Jump_Nonzero 0x253
024a 00db | | Load_Top At_Offset_3
024b 0908 | | Execute_Immediate Binary_Scale,0x8
024c 00d9 | | Load_Top At_Offset_1
024d e5ff | | Load 0x2,-0x1
024e 01d7 | | Execute Vector,Field_Read
024f 0273 | s | Execute Discrete,Plus
0250 a402 | | Store_Unchecked 0x2,0x2
0251 00c8 | | Action Pop_Auxiliary_Range
0252 3ff7 |? | Loop_Increasing 0x24a
0253 00ce | | Action Pop_Auxiliary
0254 00d8 | | Load_Top At_Offset_0
0255 e213 | | Load 0x1,0x13
0256 0272 | r | Execute Discrete,Minus
0257 00d8 | | Load_Top At_Offset_0
0258 e212 | | Load 0x1,0x12
0259 0260 | ` | Execute Discrete,In_Type
025a 7001 |p | Jump_Nonzero 0x25c
025b 0801 | | Execute_Immediate Raise,0x1
025c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
025d TRAP_0240:
025d 0007 | | Action Break_Optional
025e e002 | | Load 0x0,0x2
025f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0260 4808 |H | Short_Literal 0x8
0261 4801 |H | Short_Literal 0x1
0262 4801 |H | Short_Literal 0x1
0263 e004 | | Load 0x0,0x4
0264 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0265 0092 0397 | | Action Push_String_Extended,0x397 ; " caught in "
0267 01cc | | Execute Vector,Catenate
0268 e211 | | Load 0x1,0x11
0269 01cc | | Execute Vector,Catenate
026a 0092 03a3 | | Action Push_String_Extended,0x3a3 ; ".Convert("
026c 01cc | | Execute Vector,Catenate
026d e5ff | | Load 0x2,-0x1
026e e003 | | Load 0x0,0x3
026f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0270 01cc | | Execute Vector,Catenate
0271 0092 039a | | Action Push_String_Extended,0x39a ; ")"
0273 01cc | | Execute Vector,Catenate
0274 e003 | | Load 0x0,0x3
0275 180d | | Execute Package,Field_Execute,Field_Number 0xd
0276 00d8 | | Load_Top At_Offset_0
0277 0101 | | Execute Exception,Reraise
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0286 | | .CONST 0x0286 ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b 4801 |H | Short_Literal 0x1
027c 4802 |H | Short_Literal 0x2
027d e005 | | Load 0x0,0x5
027e 035b | [ | Declare_Type Array,Constrained
027f 0337 | 7 | Declare_Variable Array
0280 4800 |H | Short_Literal 0x0
0281 e216 | | Load 0x1,0x16
0282 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0283 821a | | Call 0x1,0x1a
0284 00d9 | | Load_Top At_Offset_1
0285 01d4 | | Execute Vector,Structure_Write
0286 BODY_0278:
0286 4801 |H | Short_Literal 0x1
0287 00d9 | | Load_Top At_Offset_1
0288 01d7 | | Execute Vector,Field_Read
0289 0c80 | | Execute_Immediate Greater_Equal,-0x80
028a 681c |h | Jump_Zero 0x2a7
028b e002 | | Load 0x0,0x2
028c 180e | | Execute Package,Field_Execute,Field_Number 0xe
028d 4807 |H | Short_Literal 0x7
028e 0092 03a4 | | Action Push_String_Extended,0x3a4 ; "Reset.Control_Status ="
0290 00db | | Load_Top At_Offset_3
0291 e003 | | Load 0x0,0x3
0292 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0293 01cc | | Execute Vector,Catenate
0294 e003 | | Load 0x0,0x3
0295 180d | | Execute Package,Field_Execute,Field_Number 0xd
0296 e002 | | Load 0x0,0x2
0297 180e | | Execute Package,Field_Execute,Field_Number 0xe
0298 4807 |H | Short_Literal 0x7
0299 0092 03a5 | | Action Push_String_Extended,0x3a5 ; "Diagnostic Control Block = "
029b 4801 |H | Short_Literal 0x1
029c e216 | | Load 0x1,0x16
029d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
029e 821a | | Call 0x1,0x1a
029f e003 | | Load 0x0,0x3
02a0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02a1 01cc | | Execute Vector,Catenate
02a2 e003 | | Load 0x0,0x3
02a3 180d | | Execute Package,Field_Execute,Field_Number 0xd
02a4 e003 | | Load 0x0,0x3
02a5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02a6 0257 | W | Execute Discrete,Raise
02a7 4802 |H | Short_Literal 0x2
02a8 00d9 | | Load_Top At_Offset_1
02a9 01d7 | | Execute Vector,Field_Read
02aa 4807 |H | Short_Literal 0x7
02ab 0279 | y | Execute Discrete,And
02ac 0c04 | | Execute_Immediate Greater_Equal,0x4
02ad 6802 |h | Jump_Zero 0x2b0
02ae 4801 |H | Short_Literal 0x1
02af 00ca | | Action Exit_Nullary_Function
02b0 4800 |H | Short_Literal 0x0
02b1 00ca | | Action Exit_Nullary_Function
02b2 0000 0000 | | .BLANK 0000[0x6]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bd | | .CONST 0x02bd ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0002 | | .CONST 0x0002 ; Number of locals
02bb INIT_02b8:
02bb e001 | | Load 0x0,0x1
02bc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02bd BODY_02b8:
02bd e001 | | Load 0x0,0x1
02be 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02bf e001 | | Load 0x0,0x1
02c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02c1 0059 | Y | Store_Top Discrete,At_Offset_1
02c2 00d8 | | Load_Top At_Offset_0
02c3 0f01 | | Execute_Immediate Equal,0x1
02c4 680b |h | Jump_Zero 0x2d0
02c5 4800 |H | Short_Literal 0x0
02c6 a20d | | Store_Unchecked 0x1,0xd
02c7 e002 | | Load 0x0,0x2
02c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c9 4802 |H | Short_Literal 0x2
02ca 0092 03a6 | | Action Push_String_Extended,0x3a6 ; "ENP_Driver.Reset.Status = No_Hardware"
02cc e003 | | Load 0x0,0x3
02cd 180d | | Execute Package,Field_Execute,Field_Number 0xd
02ce 00cc | | Action Pop_Block
02cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02d0 0092 03a7 | | Action Push_String_Extended,0x3a7 ; "Reset"
02d2 00d9 | | Load_Top At_Offset_1
02d3 8219 | | Call 0x1,0x19
02d4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02d5 0000 0000 | | .XXX[0x3]
02d7 0000 | |
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02dd | | .CONST 0x02dd ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0002 | | .CONST 0x0002 ; Number of locals
02db INIT_02d8:
02db e001 | | Load 0x0,0x1
02dc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02dd BODY_02d8:
02dd e402 | | Load 0x2,0x2
02de 4900 |I | Short_Literal 0x100
02df 0273 | s | Execute Discrete,Plus
02e0 e217 | | Load 0x1,0x17
02e1 027a | z | Execute Discrete,Less_Equal
02e2 6810 |h | Jump_Zero 0x2f3
02e3 00e3 | | Load_Encached Natural_Cache
02e4 e001 | | Load 0x0,0x1
02e5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02e6 e403 | | Load 0x2,0x3
02e7 e402 | | Load 0x2,0x2
02e8 00d8 | | Load_Top At_Offset_0
02e9 e001 | | Load 0x0,0x1
02ea 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02eb 0260 | ` | Execute Discrete,In_Type
02ec 7001 |p | Jump_Nonzero 0x2ee
02ed 0801 | | Execute_Immediate Raise,0x1
02ee e001 | | Load 0x0,0x1
02ef 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02f0 005a | Z | Store_Top Discrete,At_Offset_2
02f1 c404 | | Store 0x2,0x4
02f2 7819 |x | Jump 0x30c
02f3 00e3 | | Load_Encached Natural_Cache
02f4 e001 | | Load 0x0,0x1
02f5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02f6 4801 |H | Short_Literal 0x1
02f7 e217 | | Load 0x1,0x17
02f8 e402 | | Load 0x2,0x2
02f9 0272 | r | Execute Discrete,Minus
02fa 00d8 | | Load_Top At_Offset_0
02fb 00e3 | | Load_Encached Natural_Cache
02fc 0260 | ` | Execute Discrete,In_Type
02fd 7001 |p | Jump_Nonzero 0x2ff
02fe 0801 | | Execute_Immediate Raise,0x1
02ff e403 | | Load 0x2,0x3
0300 01cf | | Execute Vector,Slice_Read
0301 e402 | | Load 0x2,0x2
0302 00d8 | | Load_Top At_Offset_0
0303 e001 | | Load 0x0,0x1
0304 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0305 0260 | ` | Execute Discrete,In_Type
0306 7001 |p | Jump_Nonzero 0x308
0307 0801 | | Execute_Immediate Raise,0x1
0308 e001 | | Load 0x0,0x1
0309 1816 | | Execute Package,Field_Execute,Field_Number 0x16
030a 005a | Z | Store_Top Discrete,At_Offset_2
030b c404 | | Store 0x2,0x4
030c 0092 0393 | | Action Push_String_Extended,0x393 ; "Write("
030e e402 | | Load 0x2,0x2
030f 8218 | | Call 0x1,0x18
0310 01cc | | Execute Vector,Catenate
0311 0092 039a | | Action Push_String_Extended,0x39a ; ")"
0313 01cc | | Execute Vector,Catenate
0314 00d9 | | Load_Top At_Offset_1
0315 8219 | | Call 0x1,0x19
0316 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0317 0000 | | .XXX[0x1]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031d | | .CONST 0x031d ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 0002 | | .CONST 0x0002 ; Number of locals
031b INIT_0318:
031b e001 | | Load 0x0,0x1
031c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
031d BODY_0318:
031d 00e3 | | Load_Encached Natural_Cache
031e e403 | | Load 0x2,0x3
031f e001 | | Load 0x0,0x1
0320 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0321 e402 | | Load 0x2,0x2
0322 00d8 | | Load_Top At_Offset_0
0323 e001 | | Load 0x0,0x1
0324 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0325 0260 | ` | Execute Discrete,In_Type
0326 7001 |p | Jump_Nonzero 0x328
0327 0801 | | Execute_Immediate Raise,0x1
0328 e001 | | Load 0x0,0x1
0329 1815 | | Execute Package,Field_Execute,Field_Number 0x15
032a 005b | [ | Store_Top Discrete,At_Offset_3
032b 00d1 | | Pop_Control Pop_Count_1
032c c404 | | Store 0x2,0x4
032d 0092 03a8 | | Action Push_String_Extended,0x3a8 ; "Read("
032f e402 | | Load 0x2,0x2
0330 8218 | | Call 0x1,0x18
0331 01cc | | Execute Vector,Catenate
0332 0092 039a | | Action Push_String_Extended,0x39a ; ")"
0334 01cc | | Execute Vector,Catenate
0335 00d9 | | Load_Top At_Offset_1
0336 8219 | | Call 0x1,0x19
0337 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0372 | r | .CONST 0x0372 ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0012 | | .CONST 0x0012 ; Number of locals
033b INIT_0338:
033b e001 | | Load 0x0,0x1
033c 0322 | " | Declare_Variable Record
033d 604a |`J | Indirect_Literal Discrete,0x388,{0x00000000, 0x00001000}
033e 00d9 | | Load_Top At_Offset_1
033f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0340 4802 |H | Short_Literal 0x2
0341 00d9 | | Load_Top At_Offset_1
0342 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0343 0129 | ) | Execute Any,Make_Visible
0344 e001 | | Load 0x0,0x1
0345 0322 | " | Declare_Variable Record
0346 603d |`= | Indirect_Literal Discrete,0x384,{0x00000000, 0x00001002}
0347 00d9 | | Load_Top At_Offset_1
0348 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0349 4802 |H | Short_Literal 0x2
034a 00d9 | | Load_Top At_Offset_1
034b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
034c 0129 | ) | Execute Any,Make_Visible
034d e001 | | Load 0x0,0x1
034e 0322 | " | Declare_Variable Record
034f 6030 |`0 | Indirect_Literal Discrete,0x380,{0x00000000, 0x00001004}
0350 00d9 | | Load_Top At_Offset_1
0351 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0352 4804 |H | Short_Literal 0x4
0353 00d9 | | Load_Top At_Offset_1
0354 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0355 0129 | ) | Execute Any,Make_Visible
0356 e001 | | Load 0x0,0x1
0357 0322 | " | Declare_Variable Record
0358 6023 |`# | Indirect_Literal Discrete,0x37c,{0x00000000, 0x00001008}
0359 00d9 | | Load_Top At_Offset_1
035a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
035b 4804 |H | Short_Literal 0x4
035c 00d9 | | Load_Top At_Offset_1
035d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
035e 0129 | ) | Execute Any,Make_Visible
035f e001 | | Load 0x0,0x1
0360 0322 | " | Declare_Variable Record
0361 6016 |` | Indirect_Literal Discrete,0x378,{0x00000000, 0x0000100c}
0362 00d9 | | Load_Top At_Offset_1
0363 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0364 4804 |H | Short_Literal 0x4
0365 00d9 | | Load_Top At_Offset_1
0366 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0367 0129 | ) | Execute Any,Make_Visible
0368 e001 | | Load 0x0,0x1
0369 0322 | " | Declare_Variable Record
036a 6009 |` | Indirect_Literal Discrete,0x374,{0x00000000, 0x00001010}
036b 00d9 | | Load_Top At_Offset_1
036c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
036d 4818 |H | Short_Literal 0x18
036e 00d9 | | Load_Top At_Offset_1
036f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0370 0129 | ) | Execute Any,Make_Visible
0371 00bf | | Action Accept_Activation
0372 BODY_0338:
0372 00bc | | Action Signal_Activated
0373 00bb | | Action Signal_Completion
0374 0000 0000 | | .LITERAL {0x00000000, 0x00001010}
0378 0000 0000 | | .LITERAL {0x00000000, 0x0000100c}
037c 0000 0000 | | .LITERAL {0x00000000, 0x00001008}
0380 0000 0000 | | .LITERAL {0x00000000, 0x00001004}
0384 0000 0000 | | .LITERAL {0x00000000, 0x00001002}
0388 0000 0000 | | .LITERAL {0x00000000, 0x00001000}
038c ; --------------------------------------------------------------------------------------
038c ; STRING TABLE
038c ; --------------------------------------------------------------------------------------
038c 003c | < | .STRTAB 0x003c->0x03aa ; "Memory.ENP"
038d 0044 | D | .STRTAB 0x0044->0x03af ; ".Reset"
038e 0048 | H | .STRTAB 0x0048->0x03b2 ; "not ENP_Driver.Installed"
038f 005e | ^ | .STRTAB 0x005e->0x03be ; "ENP did not complete self-test."
0390 007b | { | .STRTAB 0x007b->0x03cd ; ".Limit_Address ="
0391 0089 | | .STRTAB 0x0089->0x03d5 ; " caught System.Nonexistent_Page_Error"
0392 00ac | | .STRTAB 0x00ac->0x03e8 ; " caught "
0393 00b2 | | .STRTAB 0x00b2->0x03ec ; "Write("
0394 00b6 | | .STRTAB 0x00b6->0x03ef ; ").Count ="
0395 00bd | | .STRTAB 0x00bd->0x03f3 ; ".Write succeeded"
0396 00cb | | .STRTAB 0x00cb->0x03fb ; ".Write failed"
0397 00d6 | | .STRTAB 0x00d6->0x0402 ; " caught in "
0398 00df | | .STRTAB 0x00df->0x0407 ; ".Write"
0399 00e3 | | .STRTAB 0x00e3->0x040a ; "Enp_Driver.Read("
039a 00f1 | | .STRTAB 0x00f1->0x0412 ; ")"
039b 00f0 | | .STRTAB 0x00f0->0x0413 ; ".Read succeeded"
039c 00fd | | .STRTAB 0x00fd->0x041a ; ".Read failed"
039d 0107 | | .STRTAB 0x0107->0x0420 ; ".Read"
039e 010a | | .STRTAB 0x010a->0x0423 ; " #"
039f 010a | | .STRTAB 0x010a->0x0424 ; "ENP_Driver."
03a0 0113 | | .STRTAB 0x0113->0x0429 ; ".Status = "
03a1 011b | | .STRTAB 0x011b->0x042e ; "Read"
03a2 011d | | .STRTAB 0x011d->0x0430 ; "Cannot read from "
03a3 012c | , | .STRTAB 0x012c->0x0439 ; ".Convert("
03a4 0133 | 3 | .STRTAB 0x0133->0x043d ; "Reset.Control_Status ="
03a5 0147 | G | .STRTAB 0x0147->0x0448 ; "Diagnostic Control Block = "
03a6 0160 | ` | .STRTAB 0x0160->0x0456 ; "ENP_Driver.Reset.Status = No_Hardware"
03a7 0183 | | .STRTAB 0x0183->0x0468 ; "Reset"
03a8 0186 | | .STRTAB 0x0186->0x046b ; "Read("
03a9 0189 | | .STREND 0x0189->0x046d
03aa 4d65 6d6f |Memo| .STRTAB_STRINGS
046e 0000 0000 | | .XXX[0x2]
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug Table
0470 ; --------------------------------------------------------------------------------------
0470 0004 000d | | .DEBUG4 0x0004,0x000d,0x6df5,0x0000,0x0001,0x0000
0476 0000 0000 | | .BLANK 0000[0xc]
0482 0011 4230 | B0| .XXX[0x6]
0484 07a4 8c00 | |
0486 0000 0068 | h|
0488 0000 0000 | | .BLANK 0000[0x6]
048e 0002 0000 | | .XXX[0x24]
0490 0000 3d05 | = |
0492 7089 0007 |p |
0494 a674 0000 | t |
0496 0000 7a3b | z;|
0498 8000 0004 | |
049a 69f8 01ea |i |
049c 3100 0000 |1 |
049e 001e 9230 | 0|
04a0 078e a401 | |
04a2 e420 4325 | C%|
04a4 001e bb00 | |
04a6 0000 0001 | |
04a8 afd6 0000 | |
04aa 0000 0000 | |
04ac 460b 001e |F |
04ae e6d0 0000 | |
04b0 0001 d800 | |
04b2 0000 0000 | | .BLANK 0000[0x9]
04bb 80bd 803d | =| .XXX[0x42]
04bd cda0 0000 | |
04bf 0003 d463 | c|
04c1 3b17 0000 |; |
04c3 0000 0000 | |
04c5 0011 2000 | |
04c7 0000 0276 | v|
04c9 2e00 0000 |. |
04cb 0000 0000 | |
04cd 09c0 0000 | |
04cf 0004 ec5c | \|
04d1 01f2 1200 | |
04d3 0000 0019 | |
04d5 0000 0000 | |
04d7 09a8 5803 | X |
04d9 e424 0000 | $ |
04db 0000 0600 | |
04dd 0000 0000 | |
04df 0000 0002 | |
04e1 0300 00f7 | |
04e3 3680 0000 |6 |
04e5 000f 24bc | $ |
04e7 18f4 0304 | |
04e9 0600 7bc4 | { |
04eb 401e ac10 |@ |
04ed 07ae c001 | |
04ef ee0e 0007 | |
04f1 c1d8 1680 | |
04f3 0000 0fff | |
04f5 e803 f02a | *|
04f7 00f7 36c0 | 6 |
04f9 0000 0007 | |
04fb b21a 2ccc | , |
04fd 0000 0000 | | .BLANK 0000[0xd]
050a 8a11 803e | >| .XXX[0x6]
050c 3300 0000 |3 |
050e 0002 7000 | p |
0510 0000 0000 | | .BLANK 0000[0x6]
0516 1000 0000 | | .XXX[0x30]
0518 01f0 a084 | |
051a 4800 3e42 |H >B|
051c 4000 0000 |@ |
051e 03e2 c600 | |
0520 0000 234f | #O|
0522 c00f ac98 | |
0524 0000 0000 | |
0526 f8cc 003d | =|
0528 9fa0 0f6b | k|
052a a276 2e00 | v. |
052c 0000 0000 | |
052e 0000 1a00 | |
0530 0000 0004 | |
0532 ec5c 0000 | \ |
0534 0000 0000 | |
0536 0013 8000 | |
0538 0000 09d8 | |
053a b803 f5a6 | |
053c 0000 0000 | |
053e 3200 0000 |2 |
0540 0013 50b0 | P |
0542 07eb 4c00 | L |
0544 0000 0026 | &|
0546 0000 0000 | | .BLANK 0000[0x4]
054a 04ec 5c01 | \ | .XXX[0x1e]
054c ff44 0000 | D |
054e 0000 2280 | " |
0550 0000 0009 | |
0552 d8b8 03fe | |
0554 8800 0000 | |
0556 0068 0000 | h |
0558 0000 10c9 | |
055a 4007 dc48 |@ H|
055c 0000 0000 | |
055e 7c7d c000 ||} |
0560 0000 0000 | |
0562 1182 c007 | |
0564 ddc4 0000 | |
0566 0001 1200 | |
0568 0000 0000 | | .BLANK 0000[0x9]
0571 202f 600f | /` | .XXX[0x18]
0573 bb88 0000 | |
0575 0000 fac9 | |
0577 c18f 4030 | @0|
0579 4060 0000 |@` |
057b 0001 f623 | #|
057d 007d c480 | } |
057f 0000 0000 | |
0581 0c02 00eb | |
0583 007d dc60 | } `|
0585 0000 0003 | |
0587 e63b 1666 | ; f|
0589 0000 0000 | | .BLANK 0000[0xd]
0596 4508 c01f |E | .XXX[0x6]
0598 a590 0000 | |
059a 0001 3800 | 8 |
059c 0000 0000 | | .BLANK 0000[0x6]
05a2 0800 0000 | | .XXX[0x23]
05a4 00fc b0c2 | |
05a6 2400 1fad |$ |
05a8 3000 0000 |0 |
05aa 01fa 2400 | $ |
05ac 0000 11a7 | |
05ae e007 ed9c | |
05b0 0000 0000 | |
05b2 7e96 401f |~ @ |
05b4 3940 07d0 |9@ |
05b6 2d0c 9400 |- |
05b8 7f39 8000 | 9 |
05ba 0000 07ea | |
05bc e000 0000 | |
05be 0000 0118 | |
05c0 2c00 8011 |, |
05c2 c000 0000 | |
05c4 0d00 | |
05c5 0000 0000 | | .BLANK 0000[0x9]
05ce 0202 f601 | | .XXX[0x22]
05d0 0023 8000 | # |
05d2 0000 0fdb | |
05d4 3cec 5c00 |< \ |
05d6 0000 0000 | |
05d8 0000 4500 | E |
05da 0000 0009 | |
05dc d8b8 0000 | |
05de 0000 0000 | |
05e0 0027 0000 | ' |
05e2 0000 13b1 | |
05e4 7008 0ea4 |p |
05e6 0000 0000 | |
05e8 6400 0000 |d |
05ea 0026 a160 | & `|
05ec 101d 4800 | H |
05ee 0000 0018 | |
05f0 0000 0000 | | .BLANK 0000[0x4]
05f4 0998 9003 | | .XXX[0xc]
05f6 ffd0 0000 | |
05f8 0000 3e94 | > |
05fa a00f a8e0 | |
05fc 0000 0000 | |
05fe 0080 c000 | |