|
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: 6144 (0x1800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0a40 | @ | .CONST 0x0a40 ; 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 8006 | | .CONST 0x8006 ; 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 0087 | | .CONST 0x0087 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0013 | | .CONST 0x0013 ; Number of locals 001b INIT_0018: 001b e5fb | | Load 0x2,-0x5 001c 0092 0817 | | Action Push_String_Extended,0x817 ; ".Remote_Access" 001e 01cc | | Execute Vector,Catenate 001f 0007 | | Action Break_Optional 0020 4801 |H | Short_Literal 0x1 0021 4806 |H | Short_Literal 0x6 0022 00e9 | | Load_Encached String_Cache 0023 0334 | 4 | Declare_Variable Array,With_Constraint 0024 5097 |P | Indirect_Literal Any,0xbc,{0x7463702f, 0x69702020} 0025 e001 | | Load 0x0,0x1 0026 180f | | Execute Package,Field_Execute,Field_Number 0xf 0027 00e9 | | Load_Encached String_Cache 0028 02a0 | | Declare_Subprogram Null_Subprogram 0029 4818 |H | Short_Literal 0x18 002a 03d3 | | Declare_Type Access,Defined,Accesses_Protected 002b 00d8 | | Load_Top At_Offset_0 002c 0007 | | Action Break_Optional 002d 00d9 | | Load_Top At_Offset_1 002e 00da | | Load_Top At_Offset_2 002f 00db | | Load_Top At_Offset_3 0030 02a0 | | Declare_Subprogram Null_Subprogram 0031 4803 |H | Short_Literal 0x3 0032 032d | - | Declare_Type Record,Defined 0033 00d8 | | Load_Top At_Offset_0 0034 02a0 | | Declare_Subprogram Null_Subprogram 0035 4818 |H | Short_Literal 0x18 0036 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0037 e002 | | Load 0x0,0x2 0038 e003 | | Load 0x0,0x3 0039 4864 |Hd | Short_Literal 0x64 003a 00db | | Load_Top At_Offset_3 003b 4801 |H | Short_Literal 0x1 003c e004 | | Load 0x0,0x4 003d 0387 | | Declare_Variable Package 003e 00d8 | | Load_Top At_Offset_0 003f 020f | | Execute Module,Activate 0040 00d8 | | Load_Top At_Offset_0 0041 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0042 4800 |H | Short_Literal 0x0 0043 4801 |H | Short_Literal 0x1 0044 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 0046 03fd | | Declare_Type Discrete,Defined 0047 e005 | | Load 0x0,0x5 0048 e006 | | Load 0x0,0x6 0049 00da | | Load_Top At_Offset_2 004a 4800 |H | Short_Literal 0x0 004b 4801 |H | Short_Literal 0x1 004c 4801 |H | Short_Literal 0x1 004d 0092 0818 | | Action Push_String_Extended,0x818 ; "others => Unspecified" 004f 00ea | | Load_Encached Null_String_Cache 0050 00ea | | Load_Encached Null_String_Cache 0051 4801 |H | Short_Literal 0x1 0052 4801 |H | Short_Literal 0x1 0053 e007 | | Load 0x0,0x7 0054 0387 | | Declare_Variable Package 0055 00d8 | | Load_Top At_Offset_0 0056 020f | | Execute Module,Activate 0057 4800 |H | Short_Literal 0x0 0058 480a |H | Short_Literal 0xa 0059 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 005b 03fd | | Declare_Type Discrete,Defined 005c e008 | | Load 0x0,0x8 005d e009 | | Load 0x0,0x9 005e 00da | | Load_Top At_Offset_2 005f 4800 |H | Short_Literal 0x0 0060 4801 |H | Short_Literal 0x1 0061 480a |H | Short_Literal 0xa 0062 0092 0819 | | Action Push_String_Extended,0x819 ; "Laser_Comm | Reverse_Output_Pages => Boolean_Valued, others => unspecified" 0064 00ea | | Load_Encached Null_String_Cache 0065 00ea | | Load_Encached Null_String_Cache 0066 4801 |H | Short_Literal 0x1 0067 480a |H | Short_Literal 0xa 0068 e007 | | Load 0x0,0x7 0069 0387 | | Declare_Variable Package 006a 00d8 | | Load_Top At_Offset_0 006b 020f | | Execute Module,Activate 006c 4800 |H | Short_Literal 0x0 006d 4804 |H | Short_Literal 0x4 006e 029f 0113 | | Declare_Subprogram INIT_0110,For_Call 0070 03fd | | Declare_Type Discrete,Defined 0071 4800 |H | Short_Literal 0x0 0072 4802 |H | Short_Literal 0x2 0073 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call 0075 03fd | | Declare_Type Discrete,Defined 0076 e00a | | Load 0x0,0xa 0077 e00b | | Load 0x0,0xb 0078 00da | | Load_Top At_Offset_2 0079 4800 |H | Short_Literal 0x0 007a 4800 |H | Short_Literal 0x0 007b 4801 |H | Short_Literal 0x1 007c e40d | | Load 0x2,0xd 007d 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 007e 0387 | | Declare_Variable Package 007f 00d8 | | Load_Top At_Offset_0 0080 020f | | Execute Module,Activate 0081 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call 0083 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call 0085 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call 0087 BODY_0018: 0087 e5fa | | Load 0x2,-0x6 0088 7017 |p | Jump_Nonzero 0xa0 0089 e00c | | Load 0x0,0xc 008a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 008b e5fb | | Load 0x2,-0x5 008c 8413 | | Call 0x2,0x13 008d 7008 |p | Jump_Nonzero 0x96 008e 0092 081a | | Action Push_String_Extended,0x81a ; "<ERRORS>" 0090 00ea | | Load_Encached Null_String_Cache 0091 4800 |H | Short_Literal 0x0 0092 4801 |H | Short_Literal 0x1 0093 e5fb | | Load 0x2,-0x5 0094 e00d | | Load 0x0,0xd 0095 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0096 0092 081b | | Action Push_String_Extended,0x81b ; "Holding" 0098 e00c | | Load 0x0,0xc 0099 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 009a 6805 |h | Jump_Zero 0xa0 009b 00ea | | Load_Encached Null_String_Cache 009c 0092 081b | | Action Push_String_Extended,0x81b ; "Holding" 009e e00c | | Load 0x0,0xc 009f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00a0 e408 | | Load 0x2,0x8 00a1 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00a2 4864 |Hd | Short_Literal 0x64 00a3 e408 | | Load 0x2,0x8 00a4 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00a5 c409 | | Store 0x2,0x9 00a6 e5ff | | Load 0x2,-0x1 00a7 8411 | | Call 0x2,0x11 00a8 e5fe | | Load 0x2,-0x2 00a9 8411 | | Call 0x2,0x11 00aa e405 | | Load 0x2,0x5 00ab 6804 |h | Jump_Zero 0xb0 00ac e5fc | | Load 0x2,-0x4 00ad e5fd | | Load 0x2,-0x3 00ae 8412 | | Call 0x2,0x12 00af 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00b0 0092 081c | | Action Push_String_Extended,0x81c ; "The file " 00b2 e5fc | | Load 0x2,-0x4 00b3 01cc | | Execute Vector,Catenate 00b4 0092 081d | | Action Push_String_Extended,0x81d ; " will not be created" 00b6 01cc | | Execute Vector,Catenate 00b7 e00e | | Load 0x0,0xe 00b8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00b9 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00ba 0000 0000 | | .XXX[0x2] 00bc 7463 702f |tcp/| .LITERAL {0x7463702f, 0x69702020} 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 4607 |F | Jump_Case 0x8 00c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00c5 7806 |x | Jump 0xcc ; case 0x1 00c6 7809 |x | Jump 0xd0 ; case 0x2 00c7 780d |x | Jump 0xd5 ; case 0x3 00c8 7810 |x | Jump 0xd9 ; case 0x4 00c9 7811 |x | Jump 0xdb ; case 0x5 00ca 7812 |x | Jump 0xdd ; case 0x6 00cb 7815 |x | Jump 0xe1 ; case 0x7 00cc 00da | | Load_Top At_Offset_2 00cd 0091 0802 | | Action Push_String_Extended_Indexed,0x802 ; "NIL" 00cf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00d0 00db | | Load_Top At_Offset_3 00d1 00db | | Load_Top At_Offset_3 00d2 00e0 | | Load_Encached Standard_Cache 00d3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00d5 00da | | Load_Top At_Offset_2 00d6 00e0 | | Load_Encached Standard_Cache 00d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00d9 00db | | Load_Top At_Offset_3 00da 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00db 00db | | Load_Top At_Offset_3 00dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00dd e40a | | Load 0x2,0xa 00de 00dc | | Load_Top At_Offset_4 00df 0267 | g | Execute Discrete,Predecessor 00e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e1 e40a | | Load 0x2,0xa 00e2 00dc | | Load_Top At_Offset_4 00e3 0268 | h | Execute Discrete,Successor 00e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e5 0000 0000 | | .XXX[0x3] 00e7 0000 | | 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4607 |F | Jump_Case 0x8 00ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00ed 7806 |x | Jump 0xf4 ; case 0x1 00ee 7809 |x | Jump 0xf8 ; case 0x2 00ef 780d |x | Jump 0xfd ; case 0x3 00f0 7810 |x | Jump 0x101 ; case 0x4 00f1 7811 |x | Jump 0x103 ; case 0x5 00f2 7812 |x | Jump 0x105 ; case 0x6 00f3 7815 |x | Jump 0x109 ; case 0x7 00f4 00da | | Load_Top At_Offset_2 00f5 0091 0804 | | Action Push_String_Extended_Indexed,0x804 ; "NIL" 00f7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f8 00db | | Load_Top At_Offset_3 00f9 00db | | Load_Top At_Offset_3 00fa 00e0 | | Load_Encached Standard_Cache 00fb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fd 00da | | Load_Top At_Offset_2 00fe 00e0 | | Load_Encached Standard_Cache 00ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0100 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0101 00db | | Load_Top At_Offset_3 0102 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0103 00db | | Load_Top At_Offset_3 0104 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0105 e40c | | Load 0x2,0xc 0106 00dc | | Load_Top At_Offset_4 0107 0267 | g | Execute Discrete,Predecessor 0108 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0109 e40c | | Load 0x2,0xc 010a 00dc | | Load_Top At_Offset_4 010b 0268 | h | Execute Discrete,Successor 010c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010d 0000 0000 | | .XXX[0x3] 010f 0000 | | 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0113 | | .CONST 0x0113 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0001 | | .CONST 0x0001 ; Number of locals 0113 BODY_0110: 0113 INIT_0110: 0113 4607 |F | Jump_Case 0x8 0114 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0115 7806 |x | Jump 0x11c ; case 0x1 0116 7809 |x | Jump 0x120 ; case 0x2 0117 780d |x | Jump 0x125 ; case 0x3 0118 7810 |x | Jump 0x129 ; case 0x4 0119 7811 |x | Jump 0x12b ; case 0x5 011a 7812 |x | Jump 0x12d ; case 0x6 011b 7815 |x | Jump 0x131 ; case 0x7 011c 00da | | Load_Top At_Offset_2 011d 0091 080f | | Action Push_String_Extended_Indexed,0x80f ; "NIL" 011f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0120 00db | | Load_Top At_Offset_3 0121 00db | | Load_Top At_Offset_3 0122 00e0 | | Load_Encached Standard_Cache 0123 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0124 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0125 00da | | Load_Top At_Offset_2 0126 00e0 | | Load_Encached Standard_Cache 0127 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0128 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0129 00db | | Load_Top At_Offset_3 012a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 012b 00db | | Load_Top At_Offset_3 012c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 012d e40e | | Load 0x2,0xe 012e 00dc | | Load_Top At_Offset_4 012f 0267 | g | Execute Discrete,Predecessor 0130 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0131 e40e | | Load 0x2,0xe 0132 00dc | | Load_Top At_Offset_4 0133 0268 | h | Execute Discrete,Successor 0134 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0135 0000 0000 | | .XXX[0x3] 0137 0000 | | 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 4607 |F | Jump_Case 0x8 013c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 013d 7806 |x | Jump 0x144 ; case 0x1 013e 7809 |x | Jump 0x148 ; case 0x2 013f 780d |x | Jump 0x14d ; case 0x3 0140 7810 |x | Jump 0x151 ; case 0x4 0141 7811 |x | Jump 0x153 ; case 0x5 0142 7812 |x | Jump 0x155 ; case 0x6 0143 7815 |x | Jump 0x159 ; case 0x7 0144 00da | | Load_Top At_Offset_2 0145 0091 0814 | | Action Push_String_Extended_Indexed,0x814 ; "NIL" 0147 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0148 00db | | Load_Top At_Offset_3 0149 00db | | Load_Top At_Offset_3 014a 00e0 | | Load_Encached Standard_Cache 014b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 014c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 014d 00da | | Load_Top At_Offset_2 014e 00e0 | | Load_Encached Standard_Cache 014f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0150 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0151 00db | | Load_Top At_Offset_3 0152 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0153 00db | | Load_Top At_Offset_3 0154 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0155 e40f | | Load 0x2,0xf 0156 00dc | | Load_Top At_Offset_4 0157 0267 | g | Execute Discrete,Predecessor 0158 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0159 e40f | | Load 0x2,0xf 015a 00dc | | Load_Top At_Offset_4 015b 0268 | h | Execute Discrete,Successor 015c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0184 | | .CONST 0x0184 ; Address of begin 0161 019b | | .CONST 0x019b ; Address of exception handler 0162 0010 | | .CONST 0x0010 ; Number of locals 0163 INIT_0160: 0163 e00e | | Load 0x0,0xe 0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0165 02c7 | | Declare_Variable Any 0166 00d8 | | Load_Top At_Offset_0 0167 1c00 | | Execute_Immediate Run_Utility,0x0 0168 029f 021b | | Declare_Subprogram INIT_0218,For_Call 016a 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call 016c 029f 024b | K| Declare_Subprogram INIT_0248,For_Call 016e 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call 0170 029f 02d3 | | Declare_Subprogram INIT_02d0,For_Call 0172 029f 0303 | | Declare_Subprogram INIT_0300,For_Call 0174 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call 0176 029f 0343 | C| Declare_Subprogram INIT_0340,For_Call 0178 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call 017a 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call 017c 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call 017e 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call 0180 029f 04d3 | | Declare_Subprogram INIT_04d0,For_Call 0182 029f 052b | +| Declare_Subprogram INIT_0528,For_Call 0184 BODY_0160: 0184 e602 | | Load 0x3,0x2 0185 00ea | | Load_Encached Null_String_Cache 0186 e7ff | | Load 0x3,-0x1 0187 4800 |H | Short_Literal 0x0 0188 e00e | | Load 0x0,0xe 0189 1815 | | Execute Package,Field_Execute,Field_Number 0x15 018a c602 | | Store 0x3,0x2 018b 00cf | | Action Mark_Auxiliary 018c 7804 |x | Jump 0x191 018d e602 | | Load 0x3,0x2 018e 8610 | | Call 0x3,0x10 018f 860f | | Call 0x3,0xf 0190 00c9 | | Action Pop_Auxiliary_Loop 0191 e602 | | Load 0x3,0x2 0192 e00e | | Load 0x0,0xe 0193 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0194 6ff8 |o | Jump_Zero 0x18d 0195 00ce | | Action Pop_Auxiliary 0196 e602 | | Load 0x3,0x2 0197 e00e | | Load 0x0,0xe 0198 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0199 c602 | | Store 0x3,0x2 019a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 019b TRAP_0160: 019b 00d8 | | Load_Top At_Offset_0 019c 0107 | | Execute Exception,Get_Name 019d 4920 |I | Short_Literal 0x120 019e 492f |I/ | Short_Literal 0x12f 019f 0262 | b | Execute Discrete,In_Range 01a0 6807 |h | Jump_Zero 0x1a8 01a1 e7ff | | Load 0x3,-0x1 01a2 0092 081e | | Action Push_String_Extended,0x81e ; " does not exist" 01a4 01cc | | Execute Vector,Catenate 01a5 e00e | | Load 0x0,0xe 01a6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01a8 00d8 | | Load_Top At_Offset_0 01a9 0107 | | Execute Exception,Get_Name 01aa 4950 |IP | Short_Literal 0x150 01ab 495f |I_ | Short_Literal 0x15f 01ac 0262 | b | Execute Discrete,In_Range 01ad 6801 |h | Jump_Zero 0x1af 01ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01af 0100 | | Execute Exception,Raise 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01c5 | | .CONST 0x01c5 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0007 | | .CONST 0x0007 ; Number of locals 01b3 INIT_01b0: 01b3 e00e | | Load 0x0,0xe 01b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01b5 02c7 | | Declare_Variable Any 01b6 00d8 | | Load_Top At_Offset_0 01b7 1c00 | | Execute_Immediate Run_Utility,0x0 01b8 e00e | | Load 0x0,0xe 01b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ba 02c7 | | Declare_Variable Any 01bb 00d8 | | Load_Top At_Offset_0 01bc 1c00 | | Execute_Immediate Run_Utility,0x0 01bd 029f 0563 | c| Declare_Subprogram INIT_0560,For_Call 01bf 029f 05a3 | | Declare_Subprogram INIT_05a0,For_Call 01c1 029f 05db | | Declare_Subprogram INIT_05d8,For_Call 01c3 029f 05fb | | Declare_Subprogram INIT_05f8,For_Call 01c5 BODY_01b0: 01c5 e5fa | | Load 0x2,-0x6 01c6 7007 |p | Jump_Nonzero 0x1ce 01c7 e603 | | Load 0x3,0x3 01c8 00ea | | Load_Encached Null_String_Cache 01c9 e7fe | | Load 0x3,-0x2 01ca 4801 |H | Short_Literal 0x1 01cb e00e | | Load 0x0,0xe 01cc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01cd c603 | | Store 0x3,0x3 01ce 00ea | | Load_Encached Null_String_Cache 01cf e00e | | Load 0x0,0xe 01d0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01d1 0092 081f | | Action Push_String_Extended,0x81f ; "The contents of the file " 01d3 e7fe | | Load 0x3,-0x2 01d4 e00f | | Load 0x0,0xf 01d5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 01d6 01cc | | Execute Vector,Catenate 01d7 0092 0820 | | Action Push_String_Extended,0x820 ; " are:" 01d9 01cc | | Execute Vector,Catenate 01da e00e | | Load 0x0,0xe 01db 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01dc 8607 | | Call 0x3,0x7 01dd 8606 | | Call 0x3,0x6 01de e5fa | | Load 0x2,-0x6 01df 7004 |p | Jump_Nonzero 0x1e4 01e0 e603 | | Load 0x3,0x3 01e1 e00e | | Load 0x0,0xe 01e2 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01e3 c603 | | Store 0x3,0x3 01e4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e5 0000 0000 | | .XXX[0x3] 01e7 0000 | | 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01f3 | | .CONST 0x01f3 ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0003 | | .CONST 0x0003 ; Number of locals 01eb INIT_01e8: 01eb e010 | | Load 0x0,0x10 01ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ed 02c7 | | Declare_Variable Any 01ee 00d8 | | Load_Top At_Offset_0 01ef 1c00 | | Execute_Immediate Run_Utility,0x0 01f0 e010 | | Load 0x0,0x10 01f1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01f3 BODY_01e8: 01f3 e010 | | Load 0x0,0x10 01f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01f6 00da | | Load_Top At_Offset_2 01f7 0120 | | Execute Any,Is_Value 01f8 6803 |h | Jump_Zero 0x1fc 01f9 e010 | | Load 0x0,0x10 01fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01fb 7801 |x | Jump 0x1fd 01fc 00da | | Load_Top At_Offset_2 01fd 6012 |` | Indirect_Literal Discrete,0x210,{0x00000000, 0x00004000} 01fe e011 | | Load 0x0,0x11 01ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0200 e012 | | Load 0x0,0x12 0201 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0202 e010 | | Load 0x0,0x10 0203 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0204 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0205 e7ff | | Load 0x3,-0x1 0206 e010 | | Load 0x0,0x10 0207 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0208 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0209 c602 | | Store 0x3,0x2 020a 0059 | Y | Store_Top Discrete,At_Offset_1 020b 00d8 | | Load_Top At_Offset_0 020c 0f00 | | Execute_Immediate Equal,0x0 020d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 020e 0000 0000 | | .XXX[0x2] 0210 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0214 0000 0000 | | .BLANK 0000[0x4] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0225 | % | .CONST 0x0225 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0003 | | .CONST 0x0003 ; Number of locals 021b INIT_0218: 021b 4801 |H | Short_Literal 0x1 021c 00db | | Load_Top At_Offset_3 021d 0092 0821 | !| Action Push_String_Extended,0x821 ; "=" 021f e00f | | Load 0x0,0xf 0220 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0221 00e3 | | Load_Encached Natural_Cache 0222 03f1 | | Declare_Variable Discrete,With_Value 0223 029f 062b | +| Declare_Subprogram INIT_0628,For_Call 0225 BODY_0218: 0225 00d9 | | Load_Top At_Offset_1 0226 0c01 | | Execute_Immediate Greater_Equal,0x1 0227 6801 |h | Jump_Zero 0x229 0228 8803 | | Call 0x4,0x3 0229 4502 |E | Exit_Suprogram New_Top_Offset 0x2 022a 0000 0000 | | .BLANK 0000[0x6] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0235 | 5 | .CONST 0x0235 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0002 | | .CONST 0x0002 ; Number of locals 0233 INIT_0230: 0233 e404 | | Load 0x2,0x4 0234 0007 | | Action Break_Optional 0235 BODY_0230: 0235 4801 |H | Short_Literal 0x1 0236 e9ff | | Load 0x4,-0x1 0237 01db | | Execute Vector,Length 0238 00d8 | | Load_Top At_Offset_0 0239 00e2 | | Load_Encached Integer_Cache 023a 0260 | ` | Execute Discrete,In_Type 023b 7001 |p | Jump_Nonzero 0x23d 023c 0801 | | Execute_Immediate Raise,0x1 023d e404 | | Load 0x2,0x4 023e 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 023f 0039 | 9 | Store_Top Access,At_Offset_1 0240 00db | | Load_Top At_Offset_3 0241 00d9 | | Load_Top At_Offset_1 0242 0228 | ( | Execute Access,All_Write 0243 00d8 | | Load_Top At_Offset_0 0244 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0245 0000 0000 | | .XXX[0x3] 0247 0000 | | 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 0259 | Y | .CONST 0x0259 ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0003 | | .CONST 0x0003 ; Number of locals 024b INIT_0248: 024b 4809 |H | Short_Literal 0x9 024c e9fe | | Load 0x4,-0x2 024d e40d | | Load 0x2,0xd 024e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 024f 4800 |H | Short_Literal 0x0 0250 4809 |H | Short_Literal 0x9 0251 e9fe | | Load 0x4,-0x2 0252 e40d | | Load 0x2,0xd 0253 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0254 0279 | y | Execute Discrete,And 0255 00e1 | | Load_Encached Boolean_Cache 0256 03f1 | | Declare_Variable Discrete,With_Value 0257 e407 | | Load 0x2,0x7 0258 0007 | | Action Break_Optional 0259 BODY_0248: 0259 e407 | | Load 0x2,0x7 025a 03bc | | Declare_Variable Access,By_Allocation 025b 0039 | 9 | Store_Top Access,At_Offset_1 025c e9fc | | Load 0x4,-0x4 025d 01db | | Execute Vector,Length 025e 7006 |p | Jump_Nonzero 0x265 025f e9ff | | Load 0x4,-0x1 0260 8604 | | Call 0x3,0x4 0261 00d9 | | Load_Top At_Offset_1 0262 0227 | ' | Execute Access,All_Reference 0263 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0264 780d |x | Jump 0x272 0265 0092 0822 | "| Action Push_String_Extended,0x822 ; "!!" 0267 e9fc | | Load 0x4,-0x4 0268 01cc | | Execute Vector,Catenate 0269 0092 0823 | #| Action Push_String_Extended,0x823 ; "." 026b 01cc | | Execute Vector,Catenate 026c e9ff | | Load 0x4,-0x1 026d 01cc | | Execute Vector,Catenate 026e 8604 | | Call 0x3,0x4 026f 00d9 | | Load_Top At_Offset_1 0270 0227 | ' | Execute Access,All_Reference 0271 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0272 00d9 | | Load_Top At_Offset_1 0273 6807 |h | Jump_Zero 0x27b 0274 0092 0824 | $| Action Push_String_Extended,0x824 ; "Laser" 0276 8604 | | Call 0x3,0x4 0277 00d9 | | Load_Top At_Offset_1 0278 0227 | ' | Execute Access,All_Reference 0279 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 027a 7806 |x | Jump 0x281 027b 0092 0825 | %| Action Push_String_Extended,0x825 ; "Other" 027d 8604 | | Call 0x3,0x4 027e 00d9 | | Load_Top At_Offset_1 027f 0227 | ' | Execute Access,All_Reference 0280 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0281 00d9 | | Load_Top At_Offset_1 0282 6819 |h | Jump_Zero 0x29c 0283 480a |H | Short_Literal 0xa 0284 e9fe | | Load 0x4,-0x2 0285 e40d | | Load 0x2,0xd 0286 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0287 6814 |h | Jump_Zero 0x29c 0288 4800 |H | Short_Literal 0x0 0289 480a |H | Short_Literal 0xa 028a e9fe | | Load 0x4,-0x2 028b e40d | | Load 0x2,0xd 028c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 028d 6807 |h | Jump_Zero 0x295 028e 0092 0826 | &| Action Push_String_Extended,0x826 ; "Reversed => True" 0290 8604 | | Call 0x3,0x4 0291 00d9 | | Load_Top At_Offset_1 0292 0227 | ' | Execute Access,All_Reference 0293 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0294 780d |x | Jump 0x2a2 0295 0092 0827 | '| Action Push_String_Extended,0x827 ; "Reversed => False" 0297 8604 | | Call 0x3,0x4 0298 00d9 | | Load_Top At_Offset_1 0299 0227 | ' | Execute Access,All_Reference 029a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 029b 7806 |x | Jump 0x2a2 029c 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 029e 8604 | | Call 0x3,0x4 029f 00d9 | | Load_Top At_Offset_1 02a0 0227 | ' | Execute Access,All_Reference 02a1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02a2 e409 | | Load 0x2,0x9 02a3 4800 |H | Short_Literal 0x0 02a4 00da | | Load_Top At_Offset_2 02a5 e9ff | | Load 0x4,-0x1 02a6 e408 | | Load 0x2,0x8 02a7 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02a8 c409 | | Store 0x2,0x9 02a9 e405 | | Load 0x2,0x5 02aa 7003 |p | Jump_Nonzero 0x2ae 02ab e9ff | | Load 0x4,-0x1 02ac 8604 | | Call 0x3,0x4 02ad a405 | | Store_Unchecked 0x2,0x5 02ae 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02af 0000 | | .XXX[0x1] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 02be | | .CONST 0x02be ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 00da | | Load_Top At_Offset_2 02b4 01db | | Execute Vector,Length 02b5 7002 |p | Jump_Nonzero 0x2b8 02b6 4801 |H | Short_Literal 0x1 02b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b8 00da | | Load_Top At_Offset_2 02b9 e013 | | Load 0x0,0x13 02ba 180e | | Execute Package,Field_Execute,Field_Number 0xe 02bb e403 | | Load 0x2,0x3 02bc 01df | | Execute Vector,Equal 02bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02be TRAP_02b0: 02be e013 | | Load 0x0,0x13 02bf 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02c0 010f | | Execute Exception,Equal 02c1 6808 |h | Jump_Zero 0x2ca 02c2 00db | | Load_Top At_Offset_3 02c3 0092 0829 | )| Action Push_String_Extended,0x829 ; " is not defined on the server" 02c5 01cc | | Execute Vector,Catenate 02c6 e00e | | Load 0x0,0xe 02c7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 02c8 e014 | | Load 0x0,0x14 02c9 0257 | W | Execute Discrete,Raise 02ca 0100 | | Execute Exception,Raise 02cb 0000 0000 | | .BLANK 0000[0x5] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 4802 |H | Short_Literal 0x2 02d4 00db | | Load_Top At_Offset_3 02d5 e40d | | Load 0x2,0xd 02d6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02d7 4803 |H | Short_Literal 0x3 02d8 e9ff | | Load 0x4,-0x1 02d9 e40d | | Load 0x2,0xd 02da 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02db 0279 | y | Execute Discrete,And 02dc 6802 |h | Jump_Zero 0x2df 02dd 4801 |H | Short_Literal 0x1 02de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02df 4804 |H | Short_Literal 0x4 02e0 00db | | Load_Top At_Offset_3 02e1 e40d | | Load 0x2,0xd 02e2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02e3 4803 |H | Short_Literal 0x3 02e4 e9ff | | Load 0x4,-0x1 02e5 e40d | | Load 0x2,0xd 02e6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02e7 0279 | y | Execute Discrete,And 02e8 6802 |h | Jump_Zero 0x2eb 02e9 4802 |H | Short_Literal 0x2 02ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02eb 4805 |H | Short_Literal 0x5 02ec 00db | | Load_Top At_Offset_3 02ed e40d | | Load 0x2,0xd 02ee 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02ef 6802 |h | Jump_Zero 0x2f2 02f0 4803 |H | Short_Literal 0x3 02f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f2 4806 |H | Short_Literal 0x6 02f3 00db | | Load_Top At_Offset_3 02f4 e40d | | Load 0x2,0xd 02f5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02f6 4807 |H | Short_Literal 0x7 02f7 e9ff | | Load 0x4,-0x1 02f8 e40d | | Load 0x2,0xd 02f9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02fa 0279 | y | Execute Discrete,And 02fb 6802 |h | Jump_Zero 0x2fe 02fc 4804 |H | Short_Literal 0x4 02fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02fe 4800 |H | Short_Literal 0x0 02ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0304 | | .CONST 0x0304 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0002 | | .CONST 0x0002 ; Number of locals 0303 INIT_0300: 0303 00e1 | | Load_Encached Boolean_Cache 0304 BODY_0300: 0304 4809 |H | Short_Literal 0x9 0305 e9ff | | Load 0x4,-0x1 0306 e40d | | Load 0x2,0xd 0307 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0308 6810 |h | Jump_Zero 0x319 0309 4800 |H | Short_Literal 0x0 030a 4809 |H | Short_Literal 0x9 030b e9ff | | Load 0x4,-0x1 030c e40d | | Load 0x2,0xd 030d 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 030e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 030f 00d8 | | Load_Top At_Offset_0 0310 6808 |h | Jump_Zero 0x319 0311 e9fe | | Load 0x4,-0x2 0312 6803 |h | Jump_Zero 0x316 0313 0092 082a | *| Action Push_String_Extended,0x82a ; ", Laser_Comm" 0315 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0316 0092 082b | +| Action Push_String_Extended,0x82b ; "Laser_Comm" 0318 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0319 00ea | | Load_Encached Null_String_Cache 031a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 031b 0000 0000 | | .BLANK 0000[0x5] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 032b | + | .CONST 0x032b ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0002 | | .CONST 0x0002 ; Number of locals 0323 INIT_0320: 0323 4800 |H | Short_Literal 0x0 0324 4801 |H | Short_Literal 0x1 0325 4802 |H | Short_Literal 0x2 0326 e9ff | | Load 0x4,-0x1 0327 e410 | | Load 0x2,0x10 0328 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0329 e40f | | Load 0x2,0xf 032a 03f1 | | Declare_Variable Discrete,With_Value 032b BODY_0320: 032b 00d8 | | Load_Top At_Offset_0 032c 6806 |h | Jump_Zero 0x333 032d 00ea | | Load_Encached Null_String_Cache 032e 4802 |H | Short_Literal 0x2 032f e9ff | | Load 0x4,-0x1 0330 e40d | | Load 0x2,0xd 0331 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0332 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0333 00ea | | Load_Encached Null_String_Cache 0334 4802 |H | Short_Literal 0x2 0335 e9ff | | Load 0x4,-0x1 0336 e40d | | Load 0x2,0xd 0337 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0338 0092 082c | ,| Action Push_String_Extended,0x82c ; " is not a proper protocol" 033a 01cc | | Execute Vector,Catenate 033b e00e | | Load 0x0,0xe 033c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 033d e014 | | Load 0x0,0x14 033e 0257 | W | Execute Discrete,Raise 033f 0000 | | .XXX[0x1] 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0363 | c | .CONST 0x0363 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0006 | | .CONST 0x0006 ; Number of locals 0343 INIT_0340: 0343 00ea | | Load_Encached Null_String_Cache 0344 4806 |H | Short_Literal 0x6 0345 e9fe | | Load 0x4,-0x2 0346 e40d | | Load 0x2,0xd 0347 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0348 00ea | | Load_Encached Null_String_Cache 0349 4807 |H | Short_Literal 0x7 034a e9fe | | Load 0x4,-0x2 034b e40d | | Load 0x2,0xd 034c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 034d 00ea | | Load_Encached Null_String_Cache 034e 4808 |H | Short_Literal 0x8 034f e9fe | | Load 0x4,-0x2 0350 e40d | | Load 0x2,0xd 0351 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0352 e5fb | | Load 0x2,-0x5 0353 0092 0823 | #| Action Push_String_Extended,0x823 ; "." 0355 01cc | | Execute Vector,Catenate 0356 00db | | Load_Top At_Offset_3 0357 01cc | | Execute Vector,Catenate 0358 0092 082d | -| Action Push_String_Extended,0x82d ; "_" 035a 01cc | | Execute Vector,Catenate 035b e9ff | | Load 0x4,-0x1 035c 01cc | | Execute Vector,Catenate 035d 0007 | | Action Break_Optional 035e e00e | | Load 0x0,0xe 035f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0360 02c7 | | Declare_Variable Any 0361 00d8 | | Load_Top At_Offset_0 0362 1c00 | | Execute_Immediate Run_Utility,0x0 0363 BODY_0340: 0363 0092 082e | .| Action Push_String_Extended,0x82e ; "Creating a file " 0365 00da | | Load_Top At_Offset_2 0366 01cc | | Execute Vector,Catenate 0367 e00e | | Load 0x0,0xe 0368 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0369 0092 082f | /| Action Push_String_Extended,0x82f ; " containing -> " 036b e802 | | Load 0x4,0x2 036c 01cc | | Execute Vector,Catenate 036d 0092 0830 | 0| Action Push_String_Extended,0x830 ; " nl " 036f 01cc | | Execute Vector,Catenate 0370 e803 | | Load 0x4,0x3 0371 01cc | | Execute Vector,Catenate 0372 0092 0830 | 0| Action Push_String_Extended,0x830 ; " nl " 0374 01cc | | Execute Vector,Catenate 0375 00db | | Load_Top At_Offset_3 0376 01cc | | Execute Vector,Catenate 0377 0092 0830 | 0| Action Push_String_Extended,0x830 ; " nl " 0379 01cc | | Execute Vector,Catenate 037a e402 | | Load 0x2,0x2 037b 01cc | | Execute Vector,Catenate 037c e00e | | Load 0x0,0xe 037d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 037e e5fa | | Load 0x2,-0x6 037f 701b |p | Jump_Nonzero 0x39b 0380 00d8 | | Load_Top At_Offset_0 0381 00ea | | Load_Encached Null_String_Cache 0382 00db | | Load_Top At_Offset_3 0383 4801 |H | Short_Literal 0x1 0384 e00e | | Load 0x0,0xe 0385 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0386 c806 | | Store 0x4,0x6 0387 e802 | | Load 0x4,0x2 0388 00d9 | | Load_Top At_Offset_1 0389 e00e | | Load 0x0,0xe 038a 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 038b 00db | | Load_Top At_Offset_3 038c 00d9 | | Load_Top At_Offset_1 038d e00e | | Load 0x0,0xe 038e 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 038f 00da | | Load_Top At_Offset_2 0390 00d9 | | Load_Top At_Offset_1 0391 e00e | | Load 0x0,0xe 0392 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0393 e402 | | Load 0x2,0x2 0394 00d9 | | Load_Top At_Offset_1 0395 e00e | | Load 0x0,0xe 0396 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0397 00d8 | | Load_Top At_Offset_0 0398 e00e | | Load 0x0,0xe 0399 181b | | Execute Package,Field_Execute,Field_Number 0x1b 039a c806 | | Store 0x4,0x6 039b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 039c 0000 0000 | | .BLANK 0000[0x4] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a5 | | .CONST 0x03a5 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0002 | | .CONST 0x0002 ; Number of locals 03a3 INIT_03a0: 03a3 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call 03a5 BODY_03a0: 03a5 e9fd | | Load 0x4,-0x3 03a6 4604 |F | Jump_Case 0x5 03a7 781c |x | Jump 0x3c4 ; case 0x0 03a8 7813 |x | Jump 0x3bc ; case 0x1 03a9 7812 |x | Jump 0x3bc ; case 0x2 03aa 7813 |x | Jump 0x3be ; case 0x3 03ab 7800 |x | Jump 0x3ac ; case 0x4 03ac e5fb | | Load 0x2,-0x5 03ad 0092 0823 | #| Action Push_String_Extended,0x823 ; "." 03af 01cc | | Execute Vector,Catenate 03b0 00ea | | Load_Encached Null_String_Cache 03b1 4806 |H | Short_Literal 0x6 03b2 e9fe | | Load 0x4,-0x2 03b3 e40d | | Load 0x2,0xd 03b4 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03b5 01cc | | Execute Vector,Catenate 03b6 0092 082d | -| Action Push_String_Extended,0x82d ; "_" 03b8 01cc | | Execute Vector,Catenate 03b9 e9ff | | Load 0x4,-0x1 03ba 01cc | | Execute Vector,Catenate 03bb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03bc 8802 | | Call 0x4,0x2 03bd 7808 |x | Jump 0x3c6 03be 00ea | | Load_Encached Null_String_Cache 03bf 4805 |H | Short_Literal 0x5 03c0 e9fe | | Load 0x4,-0x2 03c1 e40d | | Load 0x2,0xd 03c2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03c3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03c4 e014 | | Load 0x0,0x14 03c5 0257 | W | Execute Discrete,Raise 03c6 0831 | 1 | Execute_Immediate Raise,0x31 03c7 0000 | | .XXX[0x1] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cb | | .CONST 0x03cb ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0001 | | .CONST 0x0001 ; Number of locals 03cb BODY_03c8: 03cb INIT_03c8: 03cb 00db | | Load_Top At_Offset_3 03cc 4604 |F | Jump_Case 0x5 03cd 781e |x | Jump 0x3ec ; case 0x0 03ce 7806 |x | Jump 0x3d5 ; case 0x1 03cf 780c |x | Jump 0x3dc ; case 0x2 03d0 7818 |x | Jump 0x3e9 ; case 0x3 03d1 7800 |x | Jump 0x3d2 ; case 0x4 03d2 0092 0831 | 1| Action Push_String_Extended,0x831 ; "FTP" 03d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03d5 00da | | Load_Top At_Offset_2 03d6 8609 | | Call 0x3,0x9 03d7 4801 |H | Short_Literal 0x1 03d8 e9ff | | Load 0x4,-0x1 03d9 8608 | | Call 0x3,0x8 03da 01cc | | Execute Vector,Catenate 03db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03dc 0092 0832 | 2| Action Push_String_Extended,0x832 ; "Host => " 03de 00ea | | Load_Encached Null_String_Cache 03df 4804 |H | Short_Literal 0x4 03e0 e9ff | | Load 0x4,-0x1 03e1 e40d | | Load 0x2,0xd 03e2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03e3 01cc | | Execute Vector,Catenate 03e4 4801 |H | Short_Literal 0x1 03e5 e9ff | | Load 0x4,-0x1 03e6 8608 | | Call 0x3,0x8 03e7 01cc | | Execute Vector,Catenate 03e8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03e9 0092 0833 | 3| Action Push_String_Extended,0x833 ; "Xon_Xoff" 03eb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03ec e014 | | Load 0x0,0x14 03ed 0257 | W | Execute Discrete,Raise 03ee 0000 0000 | | .XXX[0x2] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03fe | | .CONST 0x03fe ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0005 | | .CONST 0x0005 ; Number of locals 03f3 INIT_03f0: 03f3 e9fd | | Load 0x4,-0x3 03f4 e9fe | | Load 0x4,-0x2 03f5 e9ff | | Load 0x4,-0x1 03f6 860b | | Call 0x3,0xb 03f7 e9fd | | Load 0x4,-0x3 03f8 e9fe | | Load 0x4,-0x2 03f9 860c | | Call 0x3,0xc 03fa 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call 03fc 029f 068b | | Declare_Subprogram INIT_0688,For_Call 03fe BODY_03f0: 03fe 0092 0834 | 4| Action Push_String_Extended,0x834 ; "Setting up " 0400 e9ff | | Load 0x4,-0x1 0401 01cc | | Execute Vector,Catenate 0402 e00e | | Load 0x0,0xe 0403 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0404 0092 0835 | 5| Action Push_String_Extended,0x835 ; " Class -> " 0406 e9ff | | Load 0x4,-0x1 0407 01cc | | Execute Vector,Catenate 0408 e00e | | Load 0x0,0xe 0409 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 040a 0092 0836 | 6| Action Push_String_Extended,0x836 ; " Device -> " 040c e802 | | Load 0x4,0x2 040d 01cc | | Execute Vector,Catenate 040e e00e | | Load 0x0,0xe 040f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0410 0092 0837 | 7| Action Push_String_Extended,0x837 ; " Options -> " 0412 00db | | Load_Top At_Offset_3 0413 01cc | | Execute Vector,Catenate 0414 e00e | | Load 0x0,0xe 0415 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0416 e5fa | | Load 0x2,-0x6 0417 7050 |pP | Jump_Nonzero 0x468 0418 e00e | | Load 0x0,0xe 0419 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 041a e00e | | Load 0x0,0xe 041b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 041c 0092 081b | | Action Push_String_Extended,0x81b ; "Holding" 041e e00c | | Load 0x0,0xc 041f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0420 00db | | Load_Top At_Offset_3 0421 e00c | | Load 0x0,0xc 0422 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0423 680f |h | Jump_Zero 0x433 0424 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0426 e00e | | Load 0x0,0xe 0427 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0428 0092 0839 | 9| Action Push_String_Extended,0x839 ; "Disabling device: " 042a e802 | | Load 0x4,0x2 042b 01cc | | Execute Vector,Catenate 042c e00e | | Load 0x0,0xe 042d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 042e 4800 |H | Short_Literal 0x0 042f e802 | | Load 0x4,0x2 0430 e00c | | Load 0x0,0xc 0431 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0432 8804 | | Call 0x4,0x4 0433 6068 |`h | Indirect_Literal Discrete,0x49c,{0x00000000, 0x00050000} 0434 00ba | | Action Initiate_Delay 0435 e9ff | | Load 0x4,-0x1 0436 e00c | | Load 0x0,0xc 0437 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0438 6806 |h | Jump_Zero 0x43f 0439 0092 081b | | Action Push_String_Extended,0x81b ; "Holding" 043b e9ff | | Load 0x4,-0x1 043c e00c | | Load 0x0,0xc 043d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 043e 8805 | | Call 0x4,0x5 043f 00db | | Load_Top At_Offset_3 0440 e00c | | Load 0x0,0xc 0441 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0442 680e |h | Jump_Zero 0x451 0443 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0445 e00e | | Load 0x0,0xe 0446 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0447 0092 083a | :| Action Push_String_Extended,0x83a ; "Deleteing existing device: " 0449 e802 | | Load 0x4,0x2 044a 01cc | | Execute Vector,Catenate 044b e00e | | Load 0x0,0xe 044c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 044d 4800 |H | Short_Literal 0x0 044e e802 | | Load 0x4,0x2 044f e00c | | Load 0x0,0xc 0450 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0451 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0453 e00e | | Load 0x0,0xe 0454 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0455 0092 083b | ;| Action Push_String_Extended,0x83b ; "Creating class: " 0457 e9ff | | Load 0x4,-0x1 0458 01cc | | Execute Vector,Catenate 0459 e00e | | Load 0x0,0xe 045a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 045b e9ff | | Load 0x4,-0x1 045c e00c | | Load 0x0,0xc 045d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 045e 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0460 e00e | | Load 0x0,0xe 0461 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0462 0092 083c | <| Action Push_String_Extended,0x83c ; "Creating device: " 0464 e802 | | Load 0x4,0x2 0465 01cc | | Execute Vector,Catenate 0466 e00e | | Load 0x0,0xe 0467 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0468 e9fd | | Load 0x4,-0x3 0469 0f04 | | Execute_Immediate Equal,0x4 046a 6803 |h | Jump_Zero 0x46e 046b e9fe | | Load 0x4,-0x2 046c e9ff | | Load 0x4,-0x1 046d 860a | | Call 0x3,0xa 046e e5fa | | Load 0x2,-0x6 046f 702b |p+ | Jump_Nonzero 0x49b 0470 00da | | Load_Top At_Offset_2 0471 e802 | | Load 0x4,0x2 0472 e00c | | Load 0x0,0xc 0473 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0474 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0476 e00e | | Load 0x0,0xe 0477 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0478 0092 083d | =| Action Push_String_Extended,0x83d ; "Registering " 047a e802 | | Load 0x4,0x2 047b 01cc | | Execute Vector,Catenate 047c 0092 083e | >| Action Push_String_Extended,0x83e ; " with " 047e 01cc | | Execute Vector,Catenate 047f e9ff | | Load 0x4,-0x1 0480 01cc | | Execute Vector,Catenate 0481 e00e | | Load 0x0,0xe 0482 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0483 e9ff | | Load 0x4,-0x1 0484 e802 | | Load 0x4,0x2 0485 e00c | | Load 0x0,0xc 0486 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0487 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0489 e00e | | Load 0x0,0xe 048a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 048b 0092 083f | ?| Action Push_String_Extended,0x83f ; "Enabling device. See error log if there are errors for more information" 048d e00e | | Load 0x0,0xe 048e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 048f 00db | | Load_Top At_Offset_3 0490 e00c | | Load 0x0,0xc 0491 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0492 0092 0838 | 8| Action Push_String_Extended,0x838 ; "---" 0494 e00e | | Load 0x0,0xe 0495 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0496 e9ff | | Load 0x4,-0x1 0497 0092 081b | | Action Push_String_Extended,0x81b ; "Holding" 0499 e00c | | Load 0x0,0xc 049a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 049b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 049c 0000 0000 | | .LITERAL {0x00000000, 0x00050000} 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a7 | | .CONST 0x04a7 ; Address of begin 04a1 04c4 | | .CONST 0x04c4 ; Address of exception handler 04a2 0003 | | .CONST 0x0003 ; Number of locals 04a3 INIT_04a0: 04a3 e40d | | Load 0x2,0xd 04a4 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 04a5 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call 04a7 BODY_04a0: 04a7 e9fe | | Load 0x4,-0x2 04a8 01db | | Execute Vector,Length 04a9 6819 |h | Jump_Zero 0x4c3 04aa e9fe | | Load 0x4,-0x2 04ab e40d | | Load 0x2,0xd 04ac 1820 | | Execute Package,Field_Execute,Field_Number 0x20 04ad 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04ae 00d9 | | Load_Top At_Offset_1 04af e40d | | Load 0x2,0xd 04b0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04b1 6802 |h | Jump_Zero 0x4b4 04b2 8803 | | Call 0x4,0x3 04b3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04b4 0092 0840 | @| Action Push_String_Extended,0x840 ; "Illegal format: " 04b6 e9fe | | Load 0x4,-0x2 04b7 01cc | | Execute Vector,Catenate 04b8 e00e | | Load 0x0,0xe 04b9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04ba 0092 0841 | A| Action Push_String_Extended,0x841 ; " " 04bc 4800 |H | Short_Literal 0x0 04bd 00db | | Load_Top At_Offset_3 04be e40d | | Load 0x2,0xd 04bf 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 04c0 01cc | | Execute Vector,Catenate 04c1 e00e | | Load 0x0,0xe 04c2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04c4 TRAP_04a0: 04c4 e014 | | Load 0x0,0x14 04c5 010f | | Execute Exception,Equal 04c6 6807 |h | Jump_Zero 0x4ce 04c7 0092 0842 | B| Action Push_String_Extended,0x842 ; "Illegal item in line: " 04c9 e9fe | | Load 0x4,-0x2 04ca 01cc | | Execute Vector,Catenate 04cb e00e | | Load 0x0,0xe 04cc 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04cd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04ce 0100 | | Execute Exception,Raise 04cf 0000 | | .XXX[0x1] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04d7 | | .CONST 0x04d7 ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0003 | | .CONST 0x0003 ; Number of locals 04d3 INIT_04d0: 04d3 e40b | | Load 0x2,0xb 04d4 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 04d5 029f 06e3 | | Declare_Subprogram INIT_06e0,For_Call 04d7 BODY_04d0: 04d7 e9ff | | Load 0x4,-0x1 04d8 01db | | Execute Vector,Length 04d9 6846 |hF | Jump_Zero 0x520 04da e9ff | | Load 0x4,-0x1 04db 01db | | Execute Vector,Length 04dc 0c02 | | Execute_Immediate Greater_Equal,0x2 04dd 6811 |h | Jump_Zero 0x4ef 04de e9ff | | Load 0x4,-0x1 04df 01dd | | Execute Vector,First 04e0 e9ff | | Load 0x4,-0x1 04e1 01dd | | Execute Vector,First 04e2 0a01 | | Execute_Immediate Plus,0x1 04e3 00d8 | | Load_Top At_Offset_0 04e4 00e2 | | Load_Encached Integer_Cache 04e5 0260 | ` | Execute Discrete,In_Type 04e6 7001 |p | Jump_Nonzero 0x4e8 04e7 0801 | | Execute_Immediate Raise,0x1 04e8 e9ff | | Load 0x4,-0x1 04e9 01cf | | Execute Vector,Slice_Read 04ea 0092 0843 | C| Action Push_String_Extended,0x843 ; "--" 04ec 01df | | Execute Vector,Equal 04ed 6801 |h | Jump_Zero 0x4ef 04ee 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04ef e9ff | | Load 0x4,-0x1 04f0 8603 | | Call 0x3,0x3 04f1 e9ff | | Load 0x4,-0x1 04f2 e40b | | Load 0x2,0xb 04f3 1820 | | Execute Package,Field_Execute,Field_Number 0x20 04f4 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04f5 00d9 | | Load_Top At_Offset_1 04f6 e40b | | Load 0x2,0xb 04f7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04f8 6818 |h | Jump_Zero 0x511 04f9 4800 |H | Short_Literal 0x0 04fa 00da | | Load_Top At_Offset_2 04fb e40b | | Load 0x2,0xb 04fc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 04fd 6802 |h | Jump_Zero 0x500 04fe 8803 | | Call 0x4,0x3 04ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0500 480a |H | Short_Literal 0xa 0501 0092 0842 | B| Action Push_String_Extended,0x842 ; "Illegal item in line: " 0503 e9ff | | Load 0x4,-0x1 0504 01cc | | Execute Vector,Catenate 0505 01cb | | Execute Vector,Append 0506 0092 0841 | A| Action Push_String_Extended,0x841 ; " " 0508 01cc | | Execute Vector,Catenate 0509 4800 |H | Short_Literal 0x0 050a 00db | | Load_Top At_Offset_3 050b e40b | | Load 0x2,0xb 050c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 050d 01cc | | Execute Vector,Catenate 050e e00e | | Load 0x0,0xe 050f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0510 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0511 0092 0840 | @| Action Push_String_Extended,0x840 ; "Illegal format: " 0513 e9ff | | Load 0x4,-0x1 0514 01cc | | Execute Vector,Catenate 0515 e00e | | Load 0x0,0xe 0516 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0517 0092 0841 | A| Action Push_String_Extended,0x841 ; " " 0519 4800 |H | Short_Literal 0x0 051a 00db | | Load_Top At_Offset_3 051b e40b | | Load 0x2,0xb 051c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 051d 01cc | | Execute Vector,Catenate 051e e00e | | Load 0x0,0xe 051f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0520 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0521 0000 0000 | | .BLANK 0000[0x7] 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 053a | : | .CONST 0x053a ; Address of begin 0529 0546 | F | .CONST 0x0546 ; Address of exception handler 052a 0007 | | .CONST 0x0007 ; Number of locals 052b INIT_0528: 052b 4801 |H | Short_Literal 0x1 052c 4be8 |K | Short_Literal 0x3e8 052d 00e9 | | Load_Encached String_Cache 052e 035b | [ | Declare_Type Array,Constrained 052f 0337 | 7 | Declare_Variable Array 0530 00e3 | | Load_Encached Natural_Cache 0531 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0532 00e3 | | Load_Encached Natural_Cache 0533 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0534 00e3 | | Load_Encached Natural_Cache 0535 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0536 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call 0538 029f 071b | | Declare_Subprogram INIT_0718,For_Call 053a BODY_0528: 053a 00cf | | Action Mark_Auxiliary 053b 8807 | | Call 0x4,0x7 053c 00c9 | | Action Pop_Auxiliary_Loop 053d 7ffd | | Jump 0x53b 053e 00ce | | Action Pop_Auxiliary 053f 4801 |H | Short_Literal 0x1 0540 e803 | | Load 0x4,0x3 0541 e802 | | Load 0x4,0x2 0542 01cf | | Execute Vector,Slice_Read 0543 00e9 | | Load_Encached String_Cache 0544 01c6 | | Execute Vector,Convert_To_Formal 0545 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0546 TRAP_0528: 0546 00d8 | | Load_Top At_Offset_0 0547 0107 | | Execute Exception,Get_Name 0548 4950 |IP | Short_Literal 0x150 0549 495f |I_ | Short_Literal 0x15f 054a 0262 | b | Execute Discrete,In_Range 054b 680f |h | Jump_Zero 0x55b 054c e804 | | Load 0x4,0x4 054d e805 | | Load 0x4,0x5 054e 027e | ~ | Execute Discrete,Not_Equal 054f 6809 |h | Jump_Zero 0x559 0550 0092 0844 | D| Action Push_String_Extended,0x844 ; "The parentheses in the file " 0552 e7ff | | Load 0x3,-0x1 0553 01cc | | Execute Vector,Catenate 0554 0092 0845 | E| Action Push_String_Extended,0x845 ; " do not match" 0556 01cc | | Execute Vector,Catenate 0557 e00e | | Load 0x0,0xe 0558 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0559 00d8 | | Load_Top At_Offset_0 055a 0101 | | Execute Exception,Reraise 055b 0100 | | Execute Exception,Raise 055c 0000 0000 | | .BLANK 0000[0x4] 0560 ; -------------------------------------------------------------------------------------- 0560 ; SUBPROGRAM 0560 ; -------------------------------------------------------------------------------------- 0560 0569 | i | .CONST 0x0569 ; Address of begin 0561 0004 | | .CONST 0x0004 ; Address of exception handler 0562 0003 | | .CONST 0x0003 ; Number of locals 0563 INIT_0560: 0563 00da | | Load_Top At_Offset_2 0564 01dd | | Execute Vector,First 0565 00e2 | | Load_Encached Integer_Cache 0566 03f1 | | Declare_Variable Discrete,With_Value 0567 00e2 | | Load_Encached Integer_Cache 0568 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0569 BODY_0560: 0569 00cf | | Action Mark_Auxiliary 056a e9ff | | Load 0x4,-0x1 056b 01d9 | | Execute Vector,Reverse_Bounds 056c 0263 | c | Execute Discrete,Above_Bound 056d 701f |p | Jump_Nonzero 0x58d 056e 00d8 | | Load_Top At_Offset_0 056f e9ff | | Load 0x4,-0x1 0570 01d7 | | Execute Vector,Field_Read 0571 0f20 | | Execute_Immediate Equal,0x20 0572 6818 |h | Jump_Zero 0x58b 0573 e802 | | Load 0x4,0x2 0574 00d9 | | Load_Top At_Offset_1 0575 027f | | Execute Discrete,Equal 0576 6804 |h | Jump_Zero 0x57b 0577 00d8 | | Load_Top At_Offset_0 0578 0a01 | | Execute_Immediate Plus,0x1 0579 c802 | | Store 0x4,0x2 057a 7810 |x | Jump 0x58b 057b 00db | | Load_Top At_Offset_3 057c 0a01 | | Execute_Immediate Plus,0x1 057d c803 | | Store 0x4,0x3 057e 00db | | Load_Top At_Offset_3 057f e9fe | | Load 0x4,-0x2 0580 027f | | Execute Discrete,Equal 0581 6806 |h | Jump_Zero 0x588 0582 e802 | | Load 0x4,0x2 0583 00d9 | | Load_Top At_Offset_1 0584 0aff | | Execute_Immediate Plus,-0x1 0585 e9ff | | Load 0x4,-0x1 0586 01cf | | Execute Vector,Slice_Read 0587 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0588 00d8 | | Load_Top At_Offset_0 0589 0a01 | | Execute_Immediate Plus,0x1 058a c802 | | Store 0x4,0x2 058b 00c8 | | Action Pop_Auxiliary_Range 058c 3fe1 |? | Loop_Increasing 0x56e 058d 00ce | | Action Pop_Auxiliary 058e 00d8 | | Load_Top At_Offset_0 058f 0a01 | | Execute_Immediate Plus,0x1 0590 0059 | Y | Store_Top Discrete,At_Offset_1 0591 00d8 | | Load_Top At_Offset_0 0592 e9fe | | Load 0x4,-0x2 0593 027f | | Execute Discrete,Equal 0594 6806 |h | Jump_Zero 0x59b 0595 00d9 | | Load_Top At_Offset_1 0596 e9ff | | Load 0x4,-0x1 0597 01dc | | Execute Vector,Last 0598 e9ff | | Load 0x4,-0x1 0599 01cf | | Execute Vector,Slice_Read 059a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 059b 00ea | | Load_Encached Null_String_Cache 059c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 059d 0000 0000 | | .XXX[0x3] 059f 0000 | | 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05ab | | .CONST 0x05ab ; Address of begin 05a1 05c5 | | .CONST 0x05c5 ; Address of exception handler 05a2 0004 | | .CONST 0x0004 ; Number of locals 05a3 INIT_05a0: 05a3 4801 |H | Short_Literal 0x1 05a4 00db | | Load_Top At_Offset_3 05a5 8604 | | Call 0x3,0x4 05a6 4802 |H | Short_Literal 0x2 05a7 e9ff | | Load 0x4,-0x1 05a8 8604 | | Call 0x3,0x4 05a9 029f 077b | {| Declare_Subprogram INIT_0778,For_Call 05ab BODY_05a0: 05ab e9ff | | Load 0x4,-0x1 05ac 01db | | Execute Vector,Length 05ad 6816 |h | Jump_Zero 0x5c4 05ae e9ff | | Load 0x4,-0x1 05af 01db | | Execute Vector,Length 05b0 0c02 | | Execute_Immediate Greater_Equal,0x2 05b1 6811 |h | Jump_Zero 0x5c3 05b2 e9ff | | Load 0x4,-0x1 05b3 01dd | | Execute Vector,First 05b4 e9ff | | Load 0x4,-0x1 05b5 01dd | | Execute Vector,First 05b6 0a01 | | Execute_Immediate Plus,0x1 05b7 00d8 | | Load_Top At_Offset_0 05b8 00e2 | | Load_Encached Integer_Cache 05b9 0260 | ` | Execute Discrete,In_Type 05ba 7001 |p | Jump_Nonzero 0x5bc 05bb 0801 | | Execute_Immediate Raise,0x1 05bc e9ff | | Load 0x4,-0x1 05bd 01cf | | Execute Vector,Slice_Read 05be 0092 0843 | C| Action Push_String_Extended,0x843 ; "--" 05c0 01df | | Execute Vector,Equal 05c1 6801 |h | Jump_Zero 0x5c3 05c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05c3 8804 | | Call 0x4,0x4 05c4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05c5 TRAP_05a0: 05c5 e408 | | Load 0x2,0x8 05c6 1b20 | | Execute Package,Field_Read,Field_Number 0x20 05c7 010f | | Execute Exception,Equal 05c8 680d |h | Jump_Zero 0x5d6 05c9 00da | | Load_Top At_Offset_2 05ca 0092 0846 | F| Action Push_String_Extended,0x846 ; " is not a defined printer" 05cc 01cc | | Execute Vector,Catenate 05cd e00e | | Load 0x0,0xe 05ce 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05cf 0092 0847 | G| Action Push_String_Extended,0x847 ; " In line: " 05d1 e9ff | | Load 0x4,-0x1 05d2 01cc | | Execute Vector,Catenate 05d3 e00e | | Load 0x0,0xe 05d4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05d5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05d6 0100 | | Execute Exception,Raise 05d7 0000 | | .XXX[0x1] 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; SUBPROGRAM 05d8 ; -------------------------------------------------------------------------------------- 05d8 05e0 | | .CONST 0x05e0 ; Address of begin 05d9 0004 | | .CONST 0x0004 ; Address of exception handler 05da 0003 | | .CONST 0x0003 ; Number of locals 05db INIT_05d8: 05db e408 | | Load 0x2,0x8 05dc 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 05dd 0322 | " | Declare_Variable Record 05de 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call 05e0 BODY_05d8: 05e0 00d9 | | Load_Top At_Offset_1 05e1 e409 | | Load 0x2,0x9 05e2 e408 | | Load 0x2,0x8 05e3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 05e4 00d1 | | Pop_Control Pop_Count_1 05e5 00cf | | Action Mark_Auxiliary 05e6 7806 |x | Jump 0x5ed 05e7 8803 | | Call 0x4,0x3 05e8 00da | | Load_Top At_Offset_2 05e9 e408 | | Load 0x2,0x8 05ea 181d | | Execute Package,Field_Execute,Field_Number 0x1d 05eb 00d1 | | Pop_Control Pop_Count_1 05ec 00c9 | | Action Pop_Auxiliary_Loop 05ed 00da | | Load_Top At_Offset_2 05ee e408 | | Load 0x2,0x8 05ef 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05f0 6ff6 |o | Jump_Zero 0x5e7 05f1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05f2 0000 0000 | | .BLANK 0000[0x6] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fd | | .CONST 0x05fd ; Address of begin 05f9 0618 | | .CONST 0x0618 ; Address of exception handler 05fa 0002 | | .CONST 0x0002 ; Number of locals 05fb INIT_05f8: 05fb 029f 07e3 | | Declare_Subprogram INIT_07e0,For_Call 05fd BODY_05f8: 05fd e602 | | Load 0x3,0x2 05fe 00ea | | Load_Encached Null_String_Cache 05ff e7ff | | Load 0x3,-0x1 0600 4800 |H | Short_Literal 0x0 0601 e00e | | Load 0x0,0xe 0602 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0603 c602 | | Store 0x3,0x2 0604 00cf | | Action Mark_Auxiliary 0605 7808 |x | Jump 0x60e 0606 4820 |H | Short_Literal 0x20 0607 e602 | | Load 0x3,0x2 0608 e00e | | Load 0x0,0xe 0609 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 060a e00f | | Load 0x0,0xf 060b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 060c 8605 | | Call 0x3,0x5 060d 00c9 | | Action Pop_Auxiliary_Loop 060e e602 | | Load 0x3,0x2 060f e00e | | Load 0x0,0xe 0610 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0611 6ff4 |o | Jump_Zero 0x606 0612 00ce | | Action Pop_Auxiliary 0613 e602 | | Load 0x3,0x2 0614 e00e | | Load 0x0,0xe 0615 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0616 c602 | | Store 0x3,0x2 0617 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0618 TRAP_05f8: 0618 00d8 | | Load_Top At_Offset_0 0619 0107 | | Execute Exception,Get_Name 061a 4920 |I | Short_Literal 0x120 061b 492f |I/ | Short_Literal 0x12f 061c 0262 | b | Execute Discrete,In_Range 061d 6802 |h | Jump_Zero 0x620 061e 8802 | | Call 0x4,0x2 061f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0620 0100 | | Execute Exception,Raise 0621 0000 0000 | | .BLANK 0000[0x7] 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 0634 | 4 | .CONST 0x0634 ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0002 | | .CONST 0x0002 ; Number of locals 062b INIT_0628: 062b 4820 |H | Short_Literal 0x20 062c e9ff | | Load 0x4,-0x1 062d 01dd | | Execute Vector,First 062e e802 | | Load 0x4,0x2 062f 0aff | | Execute_Immediate Plus,-0x1 0630 e9ff | | Load 0x4,-0x1 0631 01cf | | Execute Vector,Slice_Read 0632 e00f | | Load 0x0,0xf 0633 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0634 BODY_0628: 0634 4800 |H | Short_Literal 0x0 0635 00ea | | Load_Encached Null_String_Cache 0636 4800 |H | Short_Literal 0x0 0637 00db | | Load_Top At_Offset_3 0638 4801 |H | Short_Literal 0x1 0639 e40b | | Load 0x2,0xb 063a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 063b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 063c 0000 0000 | | .BLANK 0000[0x4] 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 0648 | H | .CONST 0x0648 ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0002 | | .CONST 0x0002 ; Number of locals 0643 INIT_0640: 0643 00ea | | Load_Encached Null_String_Cache 0644 4803 |H | Short_Literal 0x3 0645 e9fe | | Load 0x4,-0x2 0646 e40d | | Load 0x2,0xd 0647 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0648 BODY_0640: 0648 4801 |H | Short_Literal 0x1 0649 00d9 | | Load_Top At_Offset_1 064a 0092 0848 | H| Action Push_String_Extended,0x848 ; "Terminal_" 064c e00f | | Load 0x0,0xf 064d 181d | | Execute Package,Field_Execute,Field_Number 0x1d 064e 0c01 | | Execute_Immediate Greater_Equal,0x1 064f 6803 |h | Jump_Zero 0x653 0650 00d8 | | Load_Top At_Offset_0 0651 00cb | | Action Pop_Block_With_Result 0652 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0653 00d8 | | Load_Top At_Offset_0 0654 0092 0849 | I| Action Push_String_Extended,0x849 ; " is not a proper device name" 0656 01cc | | Execute Vector,Catenate 0657 e00e | | Load 0x0,0xe 0658 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0659 e014 | | Load 0x0,0x14 065a 0257 | W | Execute Discrete,Raise 065b 0000 0000 | | .BLANK 0000[0x5] 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 066c | l | .CONST 0x066c ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0002 | | .CONST 0x0002 ; Number of locals 0663 INIT_0660: 0663 e015 | | Load 0x0,0x15 0664 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0665 02c7 | | Declare_Variable Any 0666 6019 |` | Indirect_Literal Discrete,0x680,{0x00000000, 0x012c0000} 0667 e015 | | Load 0x0,0x15 0668 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0669 e015 | | Load 0x0,0x15 066a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 066b aa02 | | Store_Unchecked 0x5,0x2 066c BODY_0660: 066c 00cf | | Action Mark_Auxiliary 066d 7803 |x | Jump 0x671 066e 600d |` | Indirect_Literal Discrete,0x67c,{0x00000000, 0x00028000} 066f 00ba | | Action Initiate_Delay 0670 00c9 | | Action Pop_Auxiliary_Loop 0671 e802 | | Load 0x4,0x2 0672 e00c | | Load 0x0,0xc 0673 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0674 00da | | Load_Top At_Offset_2 0675 e015 | | Load 0x0,0x15 0676 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0677 e015 | | Load 0x0,0x15 0678 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0679 0279 | y | Execute Discrete,And 067a 77f3 |w | Jump_Nonzero 0x66e 067b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 067c 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 0680 0000 0000 | | .LITERAL {0x00000000, 0x012c0000} 0684 0000 0000 | | .BLANK 0000[0x4] 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 0694 | | .CONST 0x0694 ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0002 | | .CONST 0x0002 ; Number of locals 068b INIT_0688: 068b e015 | | Load 0x0,0x15 068c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 068d 02c7 | | Declare_Variable Any 068e 6019 |` | Indirect_Literal Discrete,0x6a8,{0x00000000, 0x00960000} 068f e015 | | Load 0x0,0x15 0690 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0691 e015 | | Load 0x0,0x15 0692 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0693 aa02 | | Store_Unchecked 0x5,0x2 0694 BODY_0688: 0694 00cf | | Action Mark_Auxiliary 0695 7803 |x | Jump 0x699 0696 600d |` | Indirect_Literal Discrete,0x6a4,{0x00000000, 0x00010000} 0697 00ba | | Action Initiate_Delay 0698 00c9 | | Action Pop_Auxiliary_Loop 0699 e9ff | | Load 0x4,-0x1 069a e00c | | Load 0x0,0xc 069b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 069c 00da | | Load_Top At_Offset_2 069d e015 | | Load 0x0,0x15 069e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 069f e015 | | Load 0x0,0x15 06a0 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06a1 0279 | y | Execute Discrete,And 06a2 77f3 |w | Jump_Nonzero 0x696 06a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06a4 0000 0000 | | .LITERAL {0x00000000, 0x00010000} 06a8 0000 0000 | | .LITERAL {0x00000000, 0x00960000} 06ac 0000 0000 | | .BLANK 0000[0x4] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06bc | | .CONST 0x06bc ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0003 | | .CONST 0x0003 ; Number of locals 06b3 INIT_06b0: 06b3 00ea | | Load_Encached Null_String_Cache 06b4 4801 |H | Short_Literal 0x1 06b5 e802 | | Load 0x4,0x2 06b6 e40d | | Load 0x2,0xd 06b7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 06b8 e802 | | Load 0x4,0x2 06b9 8607 | | Call 0x3,0x7 06ba e40e | | Load 0x2,0xe 06bb 03f1 | | Declare_Variable Discrete,With_Value 06bc BODY_06b0: 06bc 00d9 | | Load_Top At_Offset_1 06bd 8606 | | Call 0x3,0x6 06be 6812 |h | Jump_Zero 0x6d1 06bf 00d8 | | Load_Top At_Offset_0 06c0 680a |h | Jump_Zero 0x6cb 06c1 00d8 | | Load_Top At_Offset_0 06c2 e802 | | Load 0x4,0x2 06c3 e9ff | | Load 0x4,-0x1 06c4 860d | | Call 0x3,0xd 06c5 00ea | | Load_Encached Null_String_Cache 06c6 00d9 | | Load_Top At_Offset_1 06c7 e802 | | Load 0x4,0x2 06c8 e9ff | | Load 0x4,-0x1 06c9 8605 | | Call 0x3,0x5 06ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06cb 0092 084a | J| Action Push_String_Extended,0x84a ; "The current options do not define a device" 06cd e00e | | Load 0x0,0xe 06ce 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06cf e014 | | Load 0x0,0x14 06d0 0257 | W | Execute Discrete,Raise 06d1 e9ff | | Load 0x4,-0x1 06d2 0092 084b | K| Action Push_String_Extended,0x84b ; " is located on " 06d4 01cc | | Execute Vector,Catenate 06d5 00da | | Load_Top At_Offset_2 06d6 01cc | | Execute Vector,Catenate 06d7 e00e | | Load 0x0,0xe 06d8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06d9 00d9 | | Load_Top At_Offset_1 06da 00d9 | | Load_Top At_Offset_1 06db e802 | | Load 0x4,0x2 06dc e9ff | | Load 0x4,-0x1 06dd 8605 | | Call 0x3,0x5 06de 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06df 0000 | | .XXX[0x1] 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e7 | | .CONST 0x06e7 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0002 | | .CONST 0x0002 ; Number of locals 06e3 INIT_06e0: 06e3 4800 |H | Short_Literal 0x0 06e4 e802 | | Load 0x4,0x2 06e5 e40b | | Load 0x2,0xb 06e6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 06e7 BODY_06e0: 06e7 4820 |H | Short_Literal 0x20 06e8 00ea | | Load_Encached Null_String_Cache 06e9 4800 |H | Short_Literal 0x0 06ea e802 | | Load 0x4,0x2 06eb e40b | | Load 0x2,0xb 06ec 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 06ed e00f | | Load 0x0,0xf 06ee 181c | | Execute Package,Field_Execute,Field_Number 0x1c 06ef 00d9 | | Load_Top At_Offset_1 06f0 860e | | Call 0x3,0xe 06f1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06f2 0000 0000 | | .BLANK 0000[0x6] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fb | | .CONST 0x06fb ; Address of begin 06f9 0004 | | .CONST 0x0004 ; Address of exception handler 06fa 0001 | | .CONST 0x0001 ; Number of locals 06fb BODY_06f8: 06fb INIT_06f8: 06fb 00cf | | Action Mark_Auxiliary 06fc 00db | | Load_Top At_Offset_3 06fd 01dc | | Execute Vector,Last 06fe ebff | | Load 0x5,-0x1 06ff 01dd | | Execute Vector,First 0700 0263 | c | Execute Discrete,Above_Bound 0701 7012 |p | Jump_Nonzero 0x714 0702 00d8 | | Load_Top At_Offset_0 0703 ebff | | Load 0x5,-0x1 0704 01d7 | | Execute Vector,Field_Read 0705 0f28 | ( | Execute_Immediate Equal,0x28 0706 6803 |h | Jump_Zero 0x70a 0707 ebfe | | Load 0x5,-0x2 0708 0a01 | | Execute_Immediate Plus,0x1 0709 cbfe | | Store 0x5,-0x2 070a 00d8 | | Load_Top At_Offset_0 070b ebff | | Load 0x5,-0x1 070c 01d7 | | Execute Vector,Field_Read 070d 0f29 | ) | Execute_Immediate Equal,0x29 070e 6803 |h | Jump_Zero 0x712 070f ebfd | | Load 0x5,-0x3 0710 0a01 | | Execute_Immediate Plus,0x1 0711 cbfd | | Store 0x5,-0x3 0712 00c8 | | Action Pop_Auxiliary_Range 0713 3fee |? | Loop_Increasing 0x702 0714 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0715 0000 0000 | | .XXX[0x3] 0717 0000 | | 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 0735 | 5 | .CONST 0x0735 ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0006 | | .CONST 0x0006 ; Number of locals 071b INIT_0718: 071b 4820 |H | Short_Literal 0x20 071c e9ff | | Load 0x4,-0x1 071d e00e | | Load 0x0,0xe 071e 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 071f e00f | | Load 0x0,0xf 0720 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0721 00d8 | | Load_Top At_Offset_0 0722 01dd | | Execute Vector,First 0723 00e3 | | Load_Encached Natural_Cache 0724 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0725 00d9 | | Load_Top At_Offset_1 0726 01dc | | Execute Vector,Last 0727 00e3 | | Load_Encached Natural_Cache 0728 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0729 00da | | Load_Top At_Offset_2 072a 01db | | Execute Vector,Length 072b 00e3 | | Load_Encached Natural_Cache 072c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 072d 4801 |H | Short_Literal 0x1 072e ea02 | | Load 0x5,0x2 072f 0092 0843 | C| Action Push_String_Extended,0x843 ; "--" 0731 e00f | | Load 0x0,0xf 0732 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0733 00e3 | | Load_Encached Natural_Cache 0734 03f1 | | Declare_Variable Discrete,With_Value 0735 BODY_0718: 0735 00d8 | | Load_Top At_Offset_0 0736 0c01 | | Execute_Immediate Greater_Equal,0x1 0737 6810 |h | Jump_Zero 0x748 0738 4820 |H | Short_Literal 0x20 0739 ea03 | | Load 0x5,0x3 073a 00da | | Load_Top At_Offset_2 073b 0aff | | Execute_Immediate Plus,-0x1 073c ea02 | | Load 0x5,0x2 073d 01cf | | Execute Vector,Slice_Read 073e e00f | | Load 0x0,0xf 073f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0740 01dc | | Execute Vector,Last 0741 005b | [ | Store_Top Discrete,At_Offset_3 0742 00db | | Load_Top At_Offset_3 0743 00db | | Load_Top At_Offset_3 0744 ea02 | | Load 0x5,0x2 0745 01cf | | Execute Vector,Slice_Read 0746 01db | | Execute Vector,Length 0747 005a | Z | Store_Top Discrete,At_Offset_2 0748 00da | | Load_Top At_Offset_2 0749 ea03 | | Load 0x5,0x3 074a 027d | } | Execute Discrete,Greater 074b 6828 |h( | Jump_Zero 0x774 074c 00db | | Load_Top At_Offset_3 074d 00db | | Load_Top At_Offset_3 074e ea02 | | Load 0x5,0x2 074f 01cf | | Execute Vector,Slice_Read 0750 e803 | | Load 0x4,0x3 0751 0a01 | | Execute_Immediate Plus,0x1 0752 00d8 | | Load_Top At_Offset_0 0753 00e2 | | Load_Encached Integer_Cache 0754 0260 | ` | Execute Discrete,In_Type 0755 7001 |p | Jump_Nonzero 0x757 0756 0801 | | Execute_Immediate Raise,0x1 0757 e803 | | Load 0x4,0x3 0758 ea05 | | Load 0x5,0x5 0759 0273 | s | Execute Discrete,Plus 075a 00d8 | | Load_Top At_Offset_0 075b 00e2 | | Load_Encached Integer_Cache 075c 0260 | ` | Execute Discrete,In_Type 075d 7001 |p | Jump_Nonzero 0x75f 075e 0801 | | Execute_Immediate Raise,0x1 075f e802 | | Load 0x4,0x2 0760 01ce | | Execute Vector,Slice_Write 0761 e803 | | Load 0x4,0x3 0762 00da | | Load_Top At_Offset_2 0763 0273 | s | Execute Discrete,Plus 0764 c803 | | Store 0x4,0x3 0765 e805 | | Load 0x4,0x5 0766 e804 | | Load 0x4,0x4 0767 ea03 | | Load 0x5,0x3 0768 ea04 | | Load 0x5,0x4 0769 ea02 | | Load 0x5,0x2 076a 01cf | | Execute Vector,Slice_Read 076b 8806 | | Call 0x4,0x6 076c c804 | | Store 0x4,0x4 076d c805 | | Store 0x4,0x5 076e e804 | | Load 0x4,0x4 076f e805 | | Load 0x4,0x5 0770 027f | | Execute Discrete,Equal 0771 6802 |h | Jump_Zero 0x774 0772 00cc | | Action Pop_Block 0773 7dca |} | Jump 0x53e 0774 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0775 0000 0000 | | .XXX[0x3] 0777 0000 | | 0778 ; -------------------------------------------------------------------------------------- 0778 ; SUBPROGRAM 0778 ; -------------------------------------------------------------------------------------- 0778 0799 | | .CONST 0x0799 ; Address of begin 0779 0004 | | .CONST 0x0004 ; Address of exception handler 077a 0003 | | .CONST 0x0003 ; Number of locals 077b INIT_0778: 077b e803 | | Load 0x4,0x3 077c e409 | | Load 0x2,0x9 077d e408 | | Load 0x2,0x8 077e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 077f e802 | | Load 0x4,0x2 0780 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 0782 01cc | | Execute Vector,Catenate 0783 00d9 | | Load_Top At_Offset_1 0784 0227 | ' | Execute Access,All_Reference 0785 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0786 0227 | ' | Execute Access,All_Reference 0787 01cc | | Execute Vector,Catenate 0788 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 078a 01cc | | Execute Vector,Catenate 078b 00d9 | | Load_Top At_Offset_1 078c 0227 | ' | Execute Access,All_Reference 078d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 078e 0227 | ' | Execute Access,All_Reference 078f 01cc | | Execute Vector,Catenate 0790 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 0792 01cc | | Execute Vector,Catenate 0793 00d9 | | Load_Top At_Offset_1 0794 0227 | ' | Execute Access,All_Reference 0795 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0796 0227 | ' | Execute Access,All_Reference 0797 01cc | | Execute Vector,Catenate 0798 0007 | | Action Break_Optional 0799 BODY_0778: 0799 00d8 | | Load_Top At_Offset_0 079a e00e | | Load 0x0,0xe 079b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 079c e5fa | | Load 0x2,-0x6 079d 7004 |p | Jump_Nonzero 0x7a2 079e 00d8 | | Load_Top At_Offset_0 079f e603 | | Load 0x3,0x3 07a0 e00e | | Load 0x0,0xe 07a1 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 07a2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07a3 0000 0000 | | .BLANK 0000[0x5] 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07cf | | .CONST 0x07cf ; Address of begin 07a9 0004 | | .CONST 0x0004 ; Address of exception handler 07aa 0004 | | .CONST 0x0004 ; Number of locals 07ab INIT_07a8: 07ab e802 | | Load 0x4,0x2 07ac e408 | | Load 0x2,0x8 07ad 181e | | Execute Package,Field_Execute,Field_Number 0x1e 07ae 00d8 | | Load_Top At_Offset_0 07af e409 | | Load 0x2,0x9 07b0 e408 | | Load 0x2,0x8 07b1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07b2 0092 084c | L| Action Push_String_Extended,0x84c ; "*" 07b4 00da | | Load_Top At_Offset_2 07b5 01cc | | Execute Vector,Catenate 07b6 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 07b8 01cc | | Execute Vector,Catenate 07b9 00d9 | | Load_Top At_Offset_1 07ba 0227 | ' | Execute Access,All_Reference 07bb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07bc 0227 | ' | Execute Access,All_Reference 07bd 01cc | | Execute Vector,Catenate 07be 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 07c0 01cc | | Execute Vector,Catenate 07c1 00d9 | | Load_Top At_Offset_1 07c2 0227 | ' | Execute Access,All_Reference 07c3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07c4 0227 | ' | Execute Access,All_Reference 07c5 01cc | | Execute Vector,Catenate 07c6 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 07c8 01cc | | Execute Vector,Catenate 07c9 00d9 | | Load_Top At_Offset_1 07ca 0227 | ' | Execute Access,All_Reference 07cb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07cc 0227 | ' | Execute Access,All_Reference 07cd 01cc | | Execute Vector,Catenate 07ce 0007 | | Action Break_Optional 07cf BODY_07a8: 07cf 00d8 | | Load_Top At_Offset_0 07d0 e00e | | Load 0x0,0xe 07d1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07d2 e5fa | | Load 0x2,-0x6 07d3 7004 |p | Jump_Nonzero 0x7d8 07d4 00d8 | | Load_Top At_Offset_0 07d5 e603 | | Load 0x3,0x3 07d6 e00e | | Load 0x0,0xe 07d7 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 07d8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07d9 0000 0000 | | .BLANK 0000[0x7] 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; SUBPROGRAM 07e0 ; -------------------------------------------------------------------------------------- 07e0 07f8 | | .CONST 0x07f8 ; Address of begin 07e1 0004 | | .CONST 0x0004 ; Address of exception handler 07e2 0003 | | .CONST 0x0003 ; Number of locals 07e3 INIT_07e0: 07e3 e405 | | Load 0x2,0x5 07e4 0227 | ' | Execute Access,All_Reference 07e5 e409 | | Load 0x2,0x9 07e6 e408 | | Load 0x2,0x8 07e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07e8 0092 084d | M| Action Push_String_Extended,0x84d ; "others " 07ea 00d9 | | Load_Top At_Offset_1 07eb 0227 | ' | Execute Access,All_Reference 07ec 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07ed 0227 | ' | Execute Access,All_Reference 07ee 01cc | | Execute Vector,Catenate 07ef 0092 0828 | (| Action Push_String_Extended,0x828 ; " " 07f1 01cc | | Execute Vector,Catenate 07f2 00d9 | | Load_Top At_Offset_1 07f3 0227 | ' | Execute Access,All_Reference 07f4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07f5 0227 | ' | Execute Access,All_Reference 07f6 01cc | | Execute Vector,Catenate 07f7 0007 | | Action Break_Optional 07f8 BODY_07e0: 07f8 00d8 | | Load_Top At_Offset_0 07f9 e00e | | Load 0x0,0xe 07fa 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07fb e5fa | | Load 0x2,-0x6 07fc 7004 |p | Jump_Nonzero 0x801 07fd 00d8 | | Load_Top At_Offset_0 07fe e603 | | Load 0x3,0x3 07ff e00e | | Load 0x0,0xe 0800 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0801 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0802 ; -------------------------------------------------------------------------------------- 0802 ; STRING TABLE 0802 ; -------------------------------------------------------------------------------------- 0802 009a | | .STRTAB 0x009a->0x084f ; "NIL" 0803 009b | | .STRTAB 0x009b->0x0850 ; "NEW_NAME" 0804 00a1 | | .STRTAB 0x00a1->0x0854 ; "NIL" 0805 00a2 | | .STRTAB 0x00a2->0x0856 ; "ON_NODE" 0806 00a7 | | .STRTAB 0x00a7->0x0859 ; "DIRECT" 0807 00ab | | .STRTAB 0x00ab->0x085c ; "DEVICE" 0808 00af | | .STRTAB 0x00af->0x085f ; "TELNET" 0809 00b3 | | .STRTAB 0x00b3->0x0862 ; "FILE" 080a 00b5 | | .STRTAB 0x00b5->0x0864 ; "WORKSTATION" 080b 00be | | .STRTAB 0x00be->0x086a ; "PATH" 080c 00c0 | | .STRTAB 0x00c0->0x086c ; "SUFFIX" 080d 00c4 | | .STRTAB 0x00c4->0x086f ; "LASER_COMM" 080e 00cc | | .STRTAB 0x00cc->0x0874 ; "REVERSE_OUTPUT_PAGES" 080f 00de | | .STRTAB 0x00de->0x087e ; "NIL" 0810 00df | | .STRTAB 0x00df->0x087f ; "DIRECT_CONNECTION" 0811 00ee | | .STRTAB 0x00ee->0x0888 ; "TELNET_CONNECTION" 0812 00fd | | .STRTAB 0x00fd->0x0890 ; "LOCAL_FILE" 0813 0105 | | .STRTAB 0x0105->0x0895 ; "REMOTE_FILE" 0814 010e | | .STRTAB 0x010e->0x089b ; "NIL" 0815 010f | | .STRTAB 0x010f->0x089c ; "XON_XOFF" 0816 0115 | | .STRTAB 0x0115->0x08a0 ; "RTS" 0817 0116 | | .STRTAB 0x0116->0x08a2 ; ".Remote_Access" 0818 0122 | " | .STRTAB 0x0122->0x08a9 ; "others => Unspecified" 0819 0135 | 5 | .STRTAB 0x0135->0x08b3 ; "Laser_Comm | Reverse_Output_Pages => Boolean_Valued, others => unspecified" 081a 017d | } | .STRTAB 0x017d->0x08d8 ; "<ERRORS>" 081b 0183 | | .STRTAB 0x0183->0x08dc ; "Holding" 081c 0188 | | .STRTAB 0x0188->0x08e0 ; "The file " 081d 018f | | .STRTAB 0x018f->0x08e4 ; " will not be created" 081e 01a1 | | .STRTAB 0x01a1->0x08ee ; " does not exist" 081f 01ae | | .STRTAB 0x01ae->0x08f6 ; "The contents of the file " 0820 01c5 | | .STRTAB 0x01c5->0x0902 ; " are:" 0821 01c8 | | .STRTAB 0x01c8->0x0905 ; "=" 0822 01c7 | | .STRTAB 0x01c7->0x0905 ; "!!" 0823 01c7 | | .STRTAB 0x01c7->0x0906 ; "." 0824 01c6 | | .STRTAB 0x01c6->0x0907 ; "Laser" 0825 01c9 | | .STRTAB 0x01c9->0x0909 ; "Other" 0826 01cc | | .STRTAB 0x01cc->0x090c ; "Reversed => True" 0827 01da | | .STRTAB 0x01da->0x0914 ; "Reversed => False" 0828 01e9 | | .STRTAB 0x01e9->0x091c ; " " 0829 01e8 | | .STRTAB 0x01e8->0x091d ; " is not defined on the server" 082a 0203 | | .STRTAB 0x0203->0x092b ; ", Laser_Comm" 082b 020d | | .STRTAB 0x020d->0x0931 ; "Laser_Comm" 082c 0215 | | .STRTAB 0x0215->0x0936 ; " is not a proper protocol" 082d 022c | , | .STRTAB 0x022c->0x0943 ; "_" 082e 022b | + | .STRTAB 0x022b->0x0943 ; "Creating a file " 082f 0239 | 9 | .STRTAB 0x0239->0x094b ; " containing -> " 0830 0248 | H | .STRTAB 0x0248->0x0954 ; " nl " 0831 024a | J | .STRTAB 0x024a->0x0956 ; "FTP" 0832 024b | K | .STRTAB 0x024b->0x0957 ; "Host => " 0833 0251 | Q | .STRTAB 0x0251->0x095b ; "Xon_Xoff" 0834 0257 | W | .STRTAB 0x0257->0x095f ; "Setting up " 0835 0260 | ` | .STRTAB 0x0260->0x0965 ; " Class -> " 0836 026b | k | .STRTAB 0x026b->0x096b ; " Device -> " 0837 0276 | v | .STRTAB 0x0276->0x0972 ; " Options -> " 0838 0281 | | .STRTAB 0x0281->0x0978 ; "---" 0839 0282 | | .STRTAB 0x0282->0x097a ; "Disabling device: " 083a 0292 | | .STRTAB 0x0292->0x0983 ; "Deleteing existing device: " 083b 02ab | | .STRTAB 0x02ab->0x0990 ; "Creating class: " 083c 02b9 | | .STRTAB 0x02b9->0x0998 ; "Creating device: " 083d 02c8 | | .STRTAB 0x02c8->0x09a1 ; "Registering " 083e 02d2 | | .STRTAB 0x02d2->0x09a7 ; " with " 083f 02d6 | | .STRTAB 0x02d6->0x09aa ; "Enabling device. See error log if there are errors for more information" 0840 031c | | .STRTAB 0x031c->0x09ce ; "Illegal format: " 0841 032a | * | .STRTAB 0x032a->0x09d6 ; " " 0842 032d | - | .STRTAB 0x032d->0x09d8 ; "Illegal item in line: " 0843 0341 | A | .STRTAB 0x0341->0x09e3 ; "--" 0844 0341 | A | .STRTAB 0x0341->0x09e4 ; "The parentheses in the file " 0845 035b | [ | .STRTAB 0x035b->0x09f2 ; " do not match" 0846 0366 | f | .STRTAB 0x0366->0x09f9 ; " is not a defined printer" 0847 037d | } | .STRTAB 0x037d->0x0a05 ; " In line: " 0848 0387 | | .STRTAB 0x0387->0x0a0b ; "Terminal_" 0849 038e | | .STRTAB 0x038e->0x0a10 ; " is not a proper device name" 084a 03a8 | | .STRTAB 0x03a8->0x0a1e ; "The current options do not define a device" 084b 03d0 | | .STRTAB 0x03d0->0x0a33 ; " is located on " 084c 03dd | | .STRTAB 0x03dd->0x0a3a ; "*" 084d 03dc | | .STRTAB 0x03dc->0x0a3b ; "others " 084e 03e1 | | .STREND 0x03e1->0x0a3e 084f 4e49 4c4e |NILN| .STRTAB_STRINGS 0a3f 0000 | | .XXX[0x1] 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; Debug Table 0a40 ; -------------------------------------------------------------------------------------- 0a40 0004 000e | | .DEBUG4 0x0004,0x000e,0xa359,0x0000,0x0001,0x0000 0a46 fe97 f914 | | .XXX[0xc6] 0a48 0800 0000 | | 0a4a 000f cc00 | | 0a4c 1000 0402 | | 0a4e 4853 e797 |HS | 0a50 fc03 ac60 | `| 0a52 a403 ac60 | `| 0a54 b407 3110 | 1 | 0a56 0400 0000 | | 0a58 0000 0000 | | 0a5a 0010 1010 | | 0a5c 7400 0803 |t | 0a5e b397 fc03 | | 0a60 ac60 502d | `P-| 0a62 c5c0 2c2d | ,-| 0a64 c1c0 2797 | ' | 0a66 fc03 ac60 | `| 0a68 59a0 0f90 |Y | 0a6a 0a09 7d10 | } | 0a6c 0403 a910 | | 0a6e 0797 fc03 | | 0a70 ac63 b003 | c | 0a72 ac63 3e90 | c> | 0a74 0b90 0a09 | | 0a76 7d10 0400 |} | 0a78 1c03 a910 | | 0a7a 0410 9000 | | 0a7c 1000 0803 | | 0a7e b397 fe09 | | 0a80 61a0 3b97 |a ; | 0a82 fb88 4404 | D | 0a84 6608 4a90 |f J | 0a86 0b97 f789 | | 0a88 3f90 0a09 |? | 0a8a 8007 3380 | 3 | 0a8c 1060 5717 | `W | 0a8e f514 0f97 | | 0a90 fc03 ac60 | `| 0a92 502d cdc0 |P- | 0a94 742d b9c0 |t- | 0a96 6c2d bdc0 |l- | 0a98 642d 91c0 |d- | 0a9a 5c2d 95c0 |\- | 0a9c 542d b1c0 |T- | 0a9e 4c2d c9c0 |L- | 0aa0 442d adc0 |D- | 0aa2 3c2d d1c0 |<- | 0aa4 342d d9c0 |4- | 0aa6 2c2d d5c0 |,- | 0aa8 242d c5c0 |$- | 0aaa 1c2d c1c0 | - | 0aac 1789 3380 | 3 | 0aae 1060 4717 | `G | 0ab0 f5e0 0f80 | | 0ab2 1060 6717 | `g | 0ab4 f403 4514 | E | 0ab6 0c00 0000 | | 0ab8 0000 0000 | | 0aba 0011 8c00 | | 0abc 1000 0797 | | 0abe fc03 ac60 | `| 0ac0 502d b9c0 |P- | 0ac2 0920 0110 | | 0ac4 0520 0510 | | 0ac6 0400 0000 | | 0ac8 0000 0000 | | 0aca 0011 cc00 | | 0acc 1000 0797 | | 0ace fc07 6c3c | l<| 0ad0 0da0 5797 | W | 0ad2 fc07 7797 | w | 0ad4 fc07 5c3c | \<| 0ad6 9da0 3f97 | ? | 0ad8 fc07 7397 | s | 0ada fc07 5c3c | \<| 0adc 9da0 2797 | ' | 0ade fc07 7428 | t(| 0ae0 0409 2397 | # | 0ae2 fc07 5c03 | \ | 0ae4 a807 2910 | ) | 0ae6 0797 fd10 | | 0ae8 0400 0000 | | 0aea 0012 4c00 | L | 0aec 1000 0797 | | 0aee f5a0 5b97 | [ | 0af0 f920 0121 | !| 0af2 fc09 89a0 | | 0af4 2b97 f803 |+ | 0af6 6003 a009 |` | 0af8 81c0 0923 | #| 0afa 8009 5c03 | \ | 0afc a807 2910 | ) | 0afe 0c02 4853 | HS| 0b00 ff97 f803 | | 0b02 8060 6007 | `` | 0b04 3110 0f97 |1 | 0b06 f809 2397 | # | 0b08 ff80 1460 | `| 0b0a 4510 0c00 |E | 0b0c 0000 0000 | | .BLANK 0000[0x6] 0b12 0013 0c00 | | .XXX[0xbe] 0b14 1000 1803 | | 0b16 b00e 7403 | t | 0b18 8403 8f88 | | 0b1a 3c0b 1f90 |< | 0b1c 1870 0003 | p | 0b1e b390 1804 | | 0b20 81a0 0b88 | | 0b22 3de0 0f90 |= | 0b24 1b88 3c04 | < | 0b26 6520 0797 |e | 0b28 fb88 3c04 | < | 0b2a 6797 fe08 |g | 0b2c 6b10 1b10 |k | 0b2e 0c03 8c03 | | 0b30 8790 0e08 | | 0b32 7b10 1310 |{ | 0b34 1790 11a0 | | 0b36 0920 0110 | | 0b38 0803 b390 | | 0b3a 1804 81a0 | | 0b3c 0b88 3de0 | = | 0b3e 0f90 1b88 | | 0b40 3c04 6520 |< e | 0b42 0397 fb88 | | 0b44 3c04 6797 |< g | 0b46 fe08 6b10 | k | 0b48 1b10 0b90 | | 0b4a 1b88 3c04 | < | 0b4c 6790 0a09 |g | 0b4e 7110 0800 |q | 0b50 0000 0000 | | 0b52 0013 f400 | | 0b54 1000 0c03 | | 0b56 bc03 b397 | | 0b58 ff80 1460 | `| 0b5a 5da0 0920 |] | 0b5c 0110 0b97 | | 0b5e ff80 1460 | `| 0b60 d397 ff80 | | 0b62 1460 cd25 | ` %| 0b64 d403 ac02 | | 0b66 6060 ae90 |`` | 0b68 09e0 4790 | G | 0b6a 0803 ac61 | a| 0b6c 9690 0f97 | | 0b6e fb88 3c04 | < | 0b70 6790 0e09 |g | 0b72 95a0 1790 | | 0b74 0803 ac61 | a| 0b76 9a90 09e0 | | 0b78 0920 0110 | | 0b7a 0b90 0803 | | 0b7c ac61 91bf | a | 0b7e ad20 0510 | | 0b80 0800 0000 | | 0b82 0014 bc15 | | 0b84 a400 1403 | | 0b86 b00e 740e | t | 0b88 740e 7797 |t w | 0b8a fc03 ac63 | c| 0b8c b290 0c02 | | 0b8e 4854 0390 |HT | 0b90 0c03 ac60 | `| 0b92 503c ef80 |P< | 0b94 2060 3b90 | `; | 0b96 0c03 ac63 | c| 0b98 3e90 1390 |> | 0b9a 1380 1460 | `| 0b9c f290 0b90 | | 0b9e 0803 ac60 | `| 0ba0 4da0 0f97 |M | 0ba2 fe97 f914 | | 0ba4 0803 b397 | | 0ba6 f404 81a0 | | 0ba8 0b88 3de0 | = | 0baa 0f97 f788 | | 0bac 3c04 6520 |< e | 0bae 0397 f788 | | 0bb0 3c04 6790 |< g | 0bb2 0a08 6b17 | k | 0bb4 f710 1790 | | 0bb6 1403 ac60 | `| 0bb8 5397 fc03 |S | 0bba ac60 5009 | `P | 0bbc fda0 0f90 | | 0bbe 1697 f914 | | 0bc0 0b97 fe97 | | 0bc2 f914 0800 | | 0bc4 1f97 fe97 | | 0bc6 f914 0800 | | 0bc8 0000 0000 | | 0bca 0015 cc00 | | 0bcc 1000 0518 | | 0bce 21e0 210c |! ! | 0bd0 090c 090c | | .BLANK 090c[0x7] 0bd7 0b9f fcd0 | | .XXX[0x1d] 0bd9 0404 979f | | 0bdb fcd0 0470 | p| 0bdd 0120 039f | | 0bdf fce0 0d0c | | 0be1 0800 0016 | | 0be3 2c00 1000 |, | 0be5 0403 479f | G | 0be7 fc07 739f | s | 0be9 fc07 7409 | t | 0beb 8dc0 1b98 | | 0bed 0f9f fc07 | | 0bef 5470 0028 |Tp (| 0bf1 05ff e10c | | 0bf3 0800 | | 0bf4 0000 0000 | | .BLANK 0000[0x6] 0bfa 0016 8c00 | | .XXX[0x6] 0bfc 1000 079f | | 0bfe ff88 7c04 | | |