|
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_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0ac8 | | .CONST 0x0ac8 ; 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 0860 | `| Action Push_String_Extended,0x860 ; ".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 509f |P | Indirect_Literal Any,0xc4,{0x7463702f, 0x69702020} 0025 e002 | | Load 0x0,0x2 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 e003 | | Load 0x0,0x3 0038 e004 | | Load 0x0,0x4 0039 4864 |Hd | Short_Literal 0x64 003a 00db | | Load_Top At_Offset_3 003b 4801 |H | Short_Literal 0x1 003c e005 | | Load 0x0,0x5 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 00cb | | Declare_Subprogram INIT_00c8,For_Call 0046 03fd | | Declare_Type Discrete,Defined 0047 e006 | | Load 0x0,0x6 0048 e007 | | Load 0x0,0x7 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 0861 | a| Action Push_String_Extended,0x861 ; "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 e008 | | Load 0x0,0x8 0054 0387 | | Declare_Variable Package 0055 00d8 | | Load_Top At_Offset_0 0056 020f | | Execute Module,Activate 0057 4800 |H | Short_Literal 0x0 0058 480b |H | Short_Literal 0xb 0059 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call 005b 03fd | | Declare_Type Discrete,Defined 005c e009 | | Load 0x0,0x9 005d e00a | | Load 0x0,0xa 005e 00da | | Load_Top At_Offset_2 005f 4800 |H | Short_Literal 0x0 0060 4801 |H | Short_Literal 0x1 0061 480b |H | Short_Literal 0xb 0062 0092 0862 | b| Action Push_String_Extended,0x862 ; "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 480b |H | Short_Literal 0xb 0068 e008 | | Load 0x0,0x8 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 011b | | Declare_Subprogram INIT_0118,For_Call 0070 03fd | | Declare_Type Discrete,Defined 0071 4800 |H | Short_Literal 0x0 0072 4802 |H | Short_Literal 0x2 0073 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call 0075 03fd | | Declare_Type Discrete,Defined 0076 e00b | | Load 0x0,0xb 0077 e00c | | Load 0x0,0xc 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 016b | k| Declare_Subprogram INIT_0168,For_Call 0083 029f 01cb | | Declare_Subprogram INIT_01c8,For_Call 0085 029f 0203 | | Declare_Subprogram INIT_0200,For_Call 0087 BODY_0018: 0087 e5fa | | Load 0x2,-0x6 0088 7018 |p | Jump_Nonzero 0xa1 0089 e00d | | Load 0x0,0xd 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 0863 | c| Action Push_String_Extended,0x863 ; "<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 e00e | | Load 0x0,0xe 0095 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0096 0092 0864 | d| Action Push_String_Extended,0x864 ; "Holding" 0098 e00d | | Load 0x0,0xd 0099 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 009a 680d |h | Jump_Zero 0xa8 009b 00ea | | Load_Encached Null_String_Cache 009c 0092 0864 | d| Action Push_String_Extended,0x864 ; "Holding" 009e e00d | | Load 0x0,0xd 009f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00a0 7807 |x | Jump 0xa8 00a1 0092 0865 | e| Action Push_String_Extended,0x865 ; ">>> Set EFFORT_ONLY to false for these settings to take effect <<<" 00a3 e00f | | Load 0x0,0xf 00a4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00a5 4801 |H | Short_Literal 0x1 00a6 e00f | | Load 0x0,0xf 00a7 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 00a8 e408 | | Load 0x2,0x8 00a9 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00aa 4864 |Hd | Short_Literal 0x64 00ab e408 | | Load 0x2,0x8 00ac 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00ad c409 | | Store 0x2,0x9 00ae e5ff | | Load 0x2,-0x1 00af 8411 | | Call 0x2,0x11 00b0 e5fe | | Load 0x2,-0x2 00b1 8411 | | Call 0x2,0x11 00b2 e405 | | Load 0x2,0x5 00b3 6804 |h | Jump_Zero 0xb8 00b4 e5fc | | Load 0x2,-0x4 00b5 e5fd | | Load 0x2,-0x3 00b6 8412 | | Call 0x2,0x12 00b7 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00b8 0092 0866 | f| Action Push_String_Extended,0x866 ; "The file " 00ba e5fc | | Load 0x2,-0x4 00bb 01cc | | Execute Vector,Catenate 00bc 0092 0867 | g| Action Push_String_Extended,0x867 ; " will not be created" 00be 01cc | | Execute Vector,Catenate 00bf e00f | | Load 0x0,0xf 00c0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00c1 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00c2 0000 0000 | | .XXX[0x2] 00c4 7463 702f |tcp/| .LITERAL {0x7463702f, 0x69702020} 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb 4607 |F | Jump_Case 0x8 00cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00cd 7807 |x | Jump 0xd5 ; case 0x1 00ce 780a |x | Jump 0xd9 ; case 0x2 00cf 780e |x | Jump 0xde ; case 0x3 00d0 7811 |x | Jump 0xe2 ; case 0x4 00d1 7812 |x | Jump 0xe4 ; case 0x5 00d2 7813 |x | Jump 0xe6 ; case 0x6 00d3 7816 |x | Jump 0xea ; case 0x7 00d4 4302 |C | .XXX[0x1] 00d5 00da | | Load_Top At_Offset_2 00d6 0091 084a | J| Action Push_String_Extended_Indexed,0x84a ; "NIL" 00d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00d9 00db | | Load_Top At_Offset_3 00da 00db | | Load_Top At_Offset_3 00db 00e0 | | Load_Encached Standard_Cache 00dc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00dd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00de 00da | | Load_Top At_Offset_2 00df 00e0 | | Load_Encached Standard_Cache 00e0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00e1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00e2 00db | | Load_Top At_Offset_3 00e3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e4 00db | | Load_Top At_Offset_3 00e5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e6 e40a | | Load 0x2,0xa 00e7 00dc | | Load_Top At_Offset_4 00e8 0267 | g | Execute Discrete,Predecessor 00e9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ea e40a | | Load 0x2,0xa 00eb 00dc | | Load_Top At_Offset_4 00ec 0268 | h | Execute Discrete,Successor 00ed 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ee 0000 0000 | | .XXX[0x2] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f3 | | .CONST 0x00f3 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0001 | | .CONST 0x0001 ; Number of locals 00f3 BODY_00f0: 00f3 INIT_00f0: 00f3 4607 |F | Jump_Case 0x8 00f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00f5 7807 |x | Jump 0xfd ; case 0x1 00f6 780a |x | Jump 0x101 ; case 0x2 00f7 780e |x | Jump 0x106 ; case 0x3 00f8 7811 |x | Jump 0x10a ; case 0x4 00f9 7812 |x | Jump 0x10c ; case 0x5 00fa 7813 |x | Jump 0x10e ; case 0x6 00fb 7816 |x | Jump 0x112 ; case 0x7 00fc 4302 |C | .XXX[0x1] 00fd 00da | | Load_Top At_Offset_2 00fe 0091 084c | L| Action Push_String_Extended_Indexed,0x84c ; "NIL" 0100 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0101 00db | | Load_Top At_Offset_3 0102 00db | | Load_Top At_Offset_3 0103 00e0 | | Load_Encached Standard_Cache 0104 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0105 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0106 00da | | Load_Top At_Offset_2 0107 00e0 | | Load_Encached Standard_Cache 0108 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0109 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 010a 00db | | Load_Top At_Offset_3 010b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010c 00db | | Load_Top At_Offset_3 010d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010e e40c | | Load 0x2,0xc 010f 00dc | | Load_Top At_Offset_4 0110 0267 | g | Execute Discrete,Predecessor 0111 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0112 e40c | | Load 0x2,0xc 0113 00dc | | Load_Top At_Offset_4 0114 0268 | h | Execute Discrete,Successor 0115 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0116 0000 0000 | | .XXX[0x2] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 4607 |F | Jump_Case 0x8 011c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 011d 7807 |x | Jump 0x125 ; case 0x1 011e 780a |x | Jump 0x129 ; case 0x2 011f 780e |x | Jump 0x12e ; case 0x3 0120 7811 |x | Jump 0x132 ; case 0x4 0121 7812 |x | Jump 0x134 ; case 0x5 0122 7813 |x | Jump 0x136 ; case 0x6 0123 7816 |x | Jump 0x13a ; case 0x7 0124 4302 |C | .XXX[0x1] 0125 00da | | Load_Top At_Offset_2 0126 0091 0858 | X| Action Push_String_Extended_Indexed,0x858 ; "NIL" 0128 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0129 00db | | Load_Top At_Offset_3 012a 00db | | Load_Top At_Offset_3 012b 00e0 | | Load_Encached Standard_Cache 012c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 012d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 012e 00da | | Load_Top At_Offset_2 012f 00e0 | | Load_Encached Standard_Cache 0130 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0131 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0132 00db | | Load_Top At_Offset_3 0133 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0134 00db | | Load_Top At_Offset_3 0135 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0136 e40e | | Load 0x2,0xe 0137 00dc | | Load_Top At_Offset_4 0138 0267 | g | Execute Discrete,Predecessor 0139 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 013a e40e | | Load 0x2,0xe 013b 00dc | | Load_Top At_Offset_4 013c 0268 | h | Execute Discrete,Successor 013d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 013e 0000 0000 | | .XXX[0x2] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 4607 |F | Jump_Case 0x8 0144 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0145 7807 |x | Jump 0x14d ; case 0x1 0146 780a |x | Jump 0x151 ; case 0x2 0147 780e |x | Jump 0x156 ; case 0x3 0148 7811 |x | Jump 0x15a ; case 0x4 0149 7812 |x | Jump 0x15c ; case 0x5 014a 7813 |x | Jump 0x15e ; case 0x6 014b 7816 |x | Jump 0x162 ; case 0x7 014c 4302 |C | .XXX[0x1] 014d 00da | | Load_Top At_Offset_2 014e 0091 085d | ]| Action Push_String_Extended_Indexed,0x85d ; "NIL" 0150 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0151 00db | | Load_Top At_Offset_3 0152 00db | | Load_Top At_Offset_3 0153 00e0 | | Load_Encached Standard_Cache 0154 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0155 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0156 00da | | Load_Top At_Offset_2 0157 00e0 | | Load_Encached Standard_Cache 0158 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0159 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 015a 00db | | Load_Top At_Offset_3 015b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 015c 00db | | Load_Top At_Offset_3 015d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 015e e40f | | Load 0x2,0xf 015f 00dc | | Load_Top At_Offset_4 0160 0267 | g | Execute Discrete,Predecessor 0161 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0162 e40f | | Load 0x2,0xf 0163 00dc | | Load_Top At_Offset_4 0164 0268 | h | Execute Discrete,Successor 0165 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0166 0000 0000 | | .XXX[0x2] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0191 | | .CONST 0x0191 ; Address of begin 0169 01a8 | | .CONST 0x01a8 ; Address of exception handler 016a 0011 | | .CONST 0x0011 ; Number of locals 016b INIT_0168: 016b e00f | | Load 0x0,0xf 016c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 016d 02c7 | | Declare_Variable Any 016e 00d8 | | Load_Top At_Offset_0 016f 1c00 | | Execute_Immediate Run_Utility,0x0 0170 0093 0000 | | push_full_address 0x0 0172 604d |`M | Indirect_Literal Discrete,0x1c0,{0x80000000, 0x00010000} 0173 0273 | s | Execute Discrete,Plus 0174 0007 | | Action Break_Optional 0175 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call 0177 029f 024b | K| Declare_Subprogram INIT_0248,For_Call 0179 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 017b 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call 017d 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call 017f 029f 031b | | Declare_Subprogram INIT_0318,For_Call 0181 029f 033b | ;| Declare_Subprogram INIT_0338,For_Call 0183 029f 035b | [| Declare_Subprogram INIT_0358,For_Call 0185 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call 0187 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call 0189 029f 043b | ;| Declare_Subprogram INIT_0438,For_Call 018b 029f 04eb | | Declare_Subprogram INIT_04e8,For_Call 018d 029f 051b | | Declare_Subprogram INIT_0518,For_Call 018f 029f 0573 | s| Declare_Subprogram INIT_0570,For_Call 0191 BODY_0168: 0191 e602 | | Load 0x3,0x2 0192 00ea | | Load_Encached Null_String_Cache 0193 e7ff | | Load 0x3,-0x1 0194 4800 |H | Short_Literal 0x0 0195 e00f | | Load 0x0,0xf 0196 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0197 c602 | | Store 0x3,0x2 0198 00cf | | Action Mark_Auxiliary 0199 7804 |x | Jump 0x19e 019a e602 | | Load 0x3,0x2 019b 8611 | | Call 0x3,0x11 019c 8610 | | Call 0x3,0x10 019d 00c9 | | Action Pop_Auxiliary_Loop 019e e602 | | Load 0x3,0x2 019f e00f | | Load 0x0,0xf 01a0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 01a1 6ff8 |o | Jump_Zero 0x19a 01a2 00ce | | Action Pop_Auxiliary 01a3 e602 | | Load 0x3,0x2 01a4 e00f | | Load 0x0,0xf 01a5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01a6 c602 | | Store 0x3,0x2 01a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01a8 TRAP_0168: 01a8 00d8 | | Load_Top At_Offset_0 01a9 0107 | | Execute Exception,Get_Name 01aa 4920 |I | Short_Literal 0x120 01ab 492f |I/ | Short_Literal 0x12f 01ac 0262 | b | Execute Discrete,In_Range 01ad 6807 |h | Jump_Zero 0x1b5 01ae e7ff | | Load 0x3,-0x1 01af 0092 0868 | h| Action Push_String_Extended,0x868 ; " does not exist" 01b1 01cc | | Execute Vector,Catenate 01b2 e00f | | Load 0x0,0xf 01b3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01b4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01b5 00d8 | | Load_Top At_Offset_0 01b6 0107 | | Execute Exception,Get_Name 01b7 4950 |IP | Short_Literal 0x150 01b8 495f |I_ | Short_Literal 0x15f 01b9 0262 | b | Execute Discrete,In_Range 01ba 6801 |h | Jump_Zero 0x1bc 01bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01bc 0100 | | Execute Exception,Raise 01bd 0000 0000 | | .XXX[0x3] 01bf 0000 | | 01c0 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 01c4 0000 0000 | | .BLANK 0000[0x4] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01dd | | .CONST 0x01dd ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0007 | | .CONST 0x0007 ; Number of locals 01cb INIT_01c8: 01cb e00f | | Load 0x0,0xf 01cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01cd 02c7 | | Declare_Variable Any 01ce 00d8 | | Load_Top At_Offset_0 01cf 1c00 | | Execute_Immediate Run_Utility,0x0 01d0 e00f | | Load 0x0,0xf 01d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01d2 02c7 | | Declare_Variable Any 01d3 00d8 | | Load_Top At_Offset_0 01d4 1c00 | | Execute_Immediate Run_Utility,0x0 01d5 029f 05ab | | Declare_Subprogram INIT_05a8,For_Call 01d7 029f 05eb | | Declare_Subprogram INIT_05e8,For_Call 01d9 029f 0623 | #| Declare_Subprogram INIT_0620,For_Call 01db 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call 01dd BODY_01c8: 01dd e5fa | | Load 0x2,-0x6 01de 7007 |p | Jump_Nonzero 0x1e6 01df e603 | | Load 0x3,0x3 01e0 00ea | | Load_Encached Null_String_Cache 01e1 e7fe | | Load 0x3,-0x2 01e2 4801 |H | Short_Literal 0x1 01e3 e00f | | Load 0x0,0xf 01e4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01e5 c603 | | Store 0x3,0x3 01e6 00ea | | Load_Encached Null_String_Cache 01e7 e00f | | Load 0x0,0xf 01e8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01e9 0092 0869 | i| Action Push_String_Extended,0x869 ; "The contents of the file " 01eb e7fe | | Load 0x3,-0x2 01ec e010 | | Load 0x0,0x10 01ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 01ee 01cc | | Execute Vector,Catenate 01ef 0092 086a | j| Action Push_String_Extended,0x86a ; " are:" 01f1 01cc | | Execute Vector,Catenate 01f2 e00f | | Load 0x0,0xf 01f3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01f4 8607 | | Call 0x3,0x7 01f5 8606 | | Call 0x3,0x6 01f6 e5fa | | Load 0x2,-0x6 01f7 7004 |p | Jump_Nonzero 0x1fc 01f8 e603 | | Load 0x3,0x3 01f9 e00f | | Load 0x0,0xf 01fa 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01fb c603 | | Store 0x3,0x3 01fc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01fd 0000 0000 | | .XXX[0x3] 01ff 0000 | | 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 020b | | .CONST 0x020b ; Address of begin 0201 0004 | | .CONST 0x0004 ; Address of exception handler 0202 0003 | | .CONST 0x0003 ; Number of locals 0203 INIT_0200: 0203 e011 | | Load 0x0,0x11 0204 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0205 02c7 | | Declare_Variable Any 0206 00d8 | | Load_Top At_Offset_0 0207 1c00 | | Execute_Immediate Run_Utility,0x0 0208 e011 | | Load 0x0,0x11 0209 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 020a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 020b BODY_0200: 020b e011 | | Load 0x0,0x11 020c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 020d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 020e 00da | | Load_Top At_Offset_2 020f 0120 | | Execute Any,Is_Value 0210 6803 |h | Jump_Zero 0x214 0211 e011 | | Load 0x0,0x11 0212 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0213 7801 |x | Jump 0x215 0214 00da | | Load_Top At_Offset_2 0215 6012 |` | Indirect_Literal Discrete,0x228,{0x00000000, 0x00004000} 0216 e012 | | Load 0x0,0x12 0217 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0218 e013 | | Load 0x0,0x13 0219 1811 | | Execute Package,Field_Execute,Field_Number 0x11 021a e011 | | Load 0x0,0x11 021b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 021c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 021d e7ff | | Load 0x3,-0x1 021e e011 | | Load 0x0,0x11 021f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0220 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0221 c602 | | Store 0x3,0x2 0222 0059 | Y | Store_Top Discrete,At_Offset_1 0223 00d8 | | Load_Top At_Offset_0 0224 0f00 | | Execute_Immediate Equal,0x0 0225 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0226 0000 0000 | | .XXX[0x2] 0228 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 022c 0000 0000 | | .BLANK 0000[0x4] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 023d | = | .CONST 0x023d ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0003 | | .CONST 0x0003 ; Number of locals 0233 INIT_0230: 0233 4801 |H | Short_Literal 0x1 0234 00db | | Load_Top At_Offset_3 0235 0092 086b | k| Action Push_String_Extended,0x86b ; "=" 0237 e010 | | Load 0x0,0x10 0238 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0239 00e3 | | Load_Encached Natural_Cache 023a 03f1 | | Declare_Variable Discrete,With_Value 023b 029f 0673 | s| Declare_Subprogram INIT_0670,For_Call 023d BODY_0230: 023d 00d9 | | Load_Top At_Offset_1 023e 0c01 | | Execute_Immediate Greater_Equal,0x1 023f 6801 |h | Jump_Zero 0x241 0240 8803 | | Call 0x4,0x3 0241 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0242 0000 0000 | | .BLANK 0000[0x6] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024d | M | .CONST 0x024d ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0002 | | .CONST 0x0002 ; Number of locals 024b INIT_0248: 024b e404 | | Load 0x2,0x4 024c 0007 | | Action Break_Optional 024d BODY_0248: 024d 4801 |H | Short_Literal 0x1 024e e9ff | | Load 0x4,-0x1 024f 01db | | Execute Vector,Length 0250 00d8 | | Load_Top At_Offset_0 0251 00e2 | | Load_Encached Integer_Cache 0252 0260 | ` | Execute Discrete,In_Type 0253 7001 |p | Jump_Nonzero 0x255 0254 0801 | | Execute_Immediate Raise,0x1 0255 e404 | | Load 0x2,0x4 0256 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0257 0039 | 9 | Store_Top Access,At_Offset_1 0258 00db | | Load_Top At_Offset_3 0259 00d9 | | Load_Top At_Offset_1 025a 0228 | ( | Execute Access,All_Write 025b 00d8 | | Load_Top At_Offset_0 025c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 025d 0000 0000 | | .XXX[0x3] 025f 0000 | | 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0271 | q | .CONST 0x0271 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0003 | | .CONST 0x0003 ; Number of locals 0263 INIT_0260: 0263 480a |H | Short_Literal 0xa 0264 e9fe | | Load 0x4,-0x2 0265 e40d | | Load 0x2,0xd 0266 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0267 4800 |H | Short_Literal 0x0 0268 480a |H | Short_Literal 0xa 0269 e9fe | | Load 0x4,-0x2 026a e40d | | Load 0x2,0xd 026b 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 026c 0279 | y | Execute Discrete,And 026d 00e1 | | Load_Encached Boolean_Cache 026e 03f1 | | Declare_Variable Discrete,With_Value 026f e407 | | Load 0x2,0x7 0270 0007 | | Action Break_Optional 0271 BODY_0260: 0271 e407 | | Load 0x2,0x7 0272 03bc | | Declare_Variable Access,By_Allocation 0273 0039 | 9 | Store_Top Access,At_Offset_1 0274 e9fc | | Load 0x4,-0x4 0275 01db | | Execute Vector,Length 0276 7006 |p | Jump_Nonzero 0x27d 0277 e9ff | | Load 0x4,-0x1 0278 8605 | | Call 0x3,0x5 0279 00d9 | | Load_Top At_Offset_1 027a 0227 | ' | Execute Access,All_Reference 027b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 027c 780d |x | Jump 0x28a 027d 0092 086c | l| Action Push_String_Extended,0x86c ; "!!" 027f e9fc | | Load 0x4,-0x4 0280 01cc | | Execute Vector,Catenate 0281 0092 086d | m| Action Push_String_Extended,0x86d ; "." 0283 01cc | | Execute Vector,Catenate 0284 e9ff | | Load 0x4,-0x1 0285 01cc | | Execute Vector,Catenate 0286 8605 | | Call 0x3,0x5 0287 00d9 | | Load_Top At_Offset_1 0288 0227 | ' | Execute Access,All_Reference 0289 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 028a 00d9 | | Load_Top At_Offset_1 028b 6807 |h | Jump_Zero 0x293 028c 0092 086e | n| Action Push_String_Extended,0x86e ; "Laser" 028e 8605 | | Call 0x3,0x5 028f 00d9 | | Load_Top At_Offset_1 0290 0227 | ' | Execute Access,All_Reference 0291 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0292 7806 |x | Jump 0x299 0293 0092 086f | o| Action Push_String_Extended,0x86f ; "Other" 0295 8605 | | Call 0x3,0x5 0296 00d9 | | Load_Top At_Offset_1 0297 0227 | ' | Execute Access,All_Reference 0298 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0299 00d9 | | Load_Top At_Offset_1 029a 6819 |h | Jump_Zero 0x2b4 029b 480b |H | Short_Literal 0xb 029c e9fe | | Load 0x4,-0x2 029d e40d | | Load 0x2,0xd 029e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 029f 6814 |h | Jump_Zero 0x2b4 02a0 4800 |H | Short_Literal 0x0 02a1 480b |H | Short_Literal 0xb 02a2 e9fe | | Load 0x4,-0x2 02a3 e40d | | Load 0x2,0xd 02a4 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 02a5 6807 |h | Jump_Zero 0x2ad 02a6 0092 0870 | p| Action Push_String_Extended,0x870 ; "Reversed => True" 02a8 8605 | | Call 0x3,0x5 02a9 00d9 | | Load_Top At_Offset_1 02aa 0227 | ' | Execute Access,All_Reference 02ab 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02ac 780d |x | Jump 0x2ba 02ad 0092 0871 | q| Action Push_String_Extended,0x871 ; "Reversed => False" 02af 8605 | | Call 0x3,0x5 02b0 00d9 | | Load_Top At_Offset_1 02b1 0227 | ' | Execute Access,All_Reference 02b2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02b3 7806 |x | Jump 0x2ba 02b4 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 02b6 8605 | | Call 0x3,0x5 02b7 00d9 | | Load_Top At_Offset_1 02b8 0227 | ' | Execute Access,All_Reference 02b9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02ba e409 | | Load 0x2,0x9 02bb 4800 |H | Short_Literal 0x0 02bc 00da | | Load_Top At_Offset_2 02bd e9ff | | Load 0x4,-0x1 02be e408 | | Load 0x2,0x8 02bf 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02c0 c409 | | Store 0x2,0x9 02c1 e405 | | Load 0x2,0x5 02c2 7003 |p | Jump_Nonzero 0x2c6 02c3 e9ff | | Load 0x4,-0x1 02c4 8605 | | Call 0x3,0x5 02c5 a405 | | Store_Unchecked 0x2,0x5 02c6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02c7 0000 | | .XXX[0x1] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 02d6 | | .CONST 0x02d6 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 00da | | Load_Top At_Offset_2 02cc 01db | | Execute Vector,Length 02cd 7002 |p | Jump_Nonzero 0x2d0 02ce 4801 |H | Short_Literal 0x1 02cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d0 00da | | Load_Top At_Offset_2 02d1 e014 | | Load 0x0,0x14 02d2 180e | | Execute Package,Field_Execute,Field_Number 0xe 02d3 e403 | | Load 0x2,0x3 02d4 01df | | Execute Vector,Equal 02d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d6 TRAP_02c8: 02d6 e014 | | Load 0x0,0x14 02d7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02d8 010f | | Execute Exception,Equal 02d9 6808 |h | Jump_Zero 0x2e2 02da 00db | | Load_Top At_Offset_3 02db 0092 0873 | s| Action Push_String_Extended,0x873 ; " is not defined on the server" 02dd 01cc | | Execute Vector,Catenate 02de e00f | | Load 0x0,0xf 02df 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 02e0 e603 | | Load 0x3,0x3 02e1 0257 | W | Execute Discrete,Raise 02e2 0100 | | Execute Exception,Raise 02e3 0000 0000 | | .BLANK 0000[0x5] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02eb | | .CONST 0x02eb ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0001 | | .CONST 0x0001 ; Number of locals 02eb BODY_02e8: 02eb INIT_02e8: 02eb 4802 |H | Short_Literal 0x2 02ec 00db | | Load_Top At_Offset_3 02ed e40d | | Load 0x2,0xd 02ee 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02ef 4803 |H | Short_Literal 0x3 02f0 e9ff | | Load 0x4,-0x1 02f1 e40d | | Load 0x2,0xd 02f2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02f3 0279 | y | Execute Discrete,And 02f4 6802 |h | Jump_Zero 0x2f7 02f5 4801 |H | Short_Literal 0x1 02f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f7 4804 |H | Short_Literal 0x4 02f8 00db | | Load_Top At_Offset_3 02f9 e40d | | Load 0x2,0xd 02fa 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02fb 4803 |H | Short_Literal 0x3 02fc e9ff | | Load 0x4,-0x1 02fd e40d | | Load 0x2,0xd 02fe 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 02ff 0279 | y | Execute Discrete,And 0300 6802 |h | Jump_Zero 0x303 0301 4802 |H | Short_Literal 0x2 0302 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0303 4806 |H | Short_Literal 0x6 0304 00db | | Load_Top At_Offset_3 0305 e40d | | Load 0x2,0xd 0306 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0307 6802 |h | Jump_Zero 0x30a 0308 4803 |H | Short_Literal 0x3 0309 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 030a 4807 |H | Short_Literal 0x7 030b 00db | | Load_Top At_Offset_3 030c e40d | | Load 0x2,0xd 030d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 030e 4808 |H | Short_Literal 0x8 030f e9ff | | Load 0x4,-0x1 0310 e40d | | Load 0x2,0xd 0311 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0312 0279 | y | Execute Discrete,And 0313 6802 |h | Jump_Zero 0x316 0314 4804 |H | Short_Literal 0x4 0315 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0316 4800 |H | Short_Literal 0x0 0317 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 031c | | .CONST 0x031c ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0002 | | .CONST 0x0002 ; Number of locals 031b INIT_0318: 031b 00e1 | | Load_Encached Boolean_Cache 031c BODY_0318: 031c 480a |H | Short_Literal 0xa 031d e9ff | | Load 0x4,-0x1 031e e40d | | Load 0x2,0xd 031f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0320 6810 |h | Jump_Zero 0x331 0321 4800 |H | Short_Literal 0x0 0322 480a |H | Short_Literal 0xa 0323 e9ff | | Load 0x4,-0x1 0324 e40d | | Load 0x2,0xd 0325 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0326 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0327 00d8 | | Load_Top At_Offset_0 0328 6808 |h | Jump_Zero 0x331 0329 e9fe | | Load 0x4,-0x2 032a 6803 |h | Jump_Zero 0x32e 032b 0092 0874 | t| Action Push_String_Extended,0x874 ; ", Laser_Comm" 032d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 032e 0092 0875 | u| Action Push_String_Extended,0x875 ; "Laser_Comm" 0330 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0331 00ea | | Load_Encached Null_String_Cache 0332 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0333 0000 0000 | | .BLANK 0000[0x5] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 0343 | C | .CONST 0x0343 ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0002 | | .CONST 0x0002 ; Number of locals 033b INIT_0338: 033b 4800 |H | Short_Literal 0x0 033c 4801 |H | Short_Literal 0x1 033d 4802 |H | Short_Literal 0x2 033e e9ff | | Load 0x4,-0x1 033f e410 | | Load 0x2,0x10 0340 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0341 e40f | | Load 0x2,0xf 0342 03f1 | | Declare_Variable Discrete,With_Value 0343 BODY_0338: 0343 00d8 | | Load_Top At_Offset_0 0344 6806 |h | Jump_Zero 0x34b 0345 00ea | | Load_Encached Null_String_Cache 0346 4802 |H | Short_Literal 0x2 0347 e9ff | | Load 0x4,-0x1 0348 e40d | | Load 0x2,0xd 0349 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 034a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 034b 00ea | | Load_Encached Null_String_Cache 034c 4802 |H | Short_Literal 0x2 034d e9ff | | Load 0x4,-0x1 034e e40d | | Load 0x2,0xd 034f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0350 0092 0876 | v| Action Push_String_Extended,0x876 ; " is not a proper protocol" 0352 01cc | | Execute Vector,Catenate 0353 e00f | | Load 0x0,0xf 0354 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0355 e603 | | Load 0x3,0x3 0356 0257 | W | Execute Discrete,Raise 0357 0000 | | .XXX[0x1] 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 037b | { | .CONST 0x037b ; Address of begin 0359 03b4 | | .CONST 0x03b4 ; Address of exception handler 035a 0006 | | .CONST 0x0006 ; Number of locals 035b INIT_0358: 035b 00ea | | Load_Encached Null_String_Cache 035c 4807 |H | Short_Literal 0x7 035d e9fe | | Load 0x4,-0x2 035e e40d | | Load 0x2,0xd 035f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0360 00ea | | Load_Encached Null_String_Cache 0361 4808 |H | Short_Literal 0x8 0362 e9fe | | Load 0x4,-0x2 0363 e40d | | Load 0x2,0xd 0364 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0365 00ea | | Load_Encached Null_String_Cache 0366 4809 |H | Short_Literal 0x9 0367 e9fe | | Load 0x4,-0x2 0368 e40d | | Load 0x2,0xd 0369 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 036a e5fb | | Load 0x2,-0x5 036b 0092 086d | m| Action Push_String_Extended,0x86d ; "." 036d 01cc | | Execute Vector,Catenate 036e 00db | | Load_Top At_Offset_3 036f 01cc | | Execute Vector,Catenate 0370 0092 0877 | w| Action Push_String_Extended,0x877 ; "_" 0372 01cc | | Execute Vector,Catenate 0373 e9ff | | Load 0x4,-0x1 0374 01cc | | Execute Vector,Catenate 0375 0007 | | Action Break_Optional 0376 e00f | | Load 0x0,0xf 0377 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0378 02c7 | | Declare_Variable Any 0379 00d8 | | Load_Top At_Offset_0 037a 1c00 | | Execute_Immediate Run_Utility,0x0 037b BODY_0358: 037b 0092 0878 | x| Action Push_String_Extended,0x878 ; "Creating a file " 037d 00da | | Load_Top At_Offset_2 037e 01cc | | Execute Vector,Catenate 037f e00f | | Load 0x0,0xf 0380 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0381 0092 0879 | y| Action Push_String_Extended,0x879 ; " containing -> " 0383 e802 | | Load 0x4,0x2 0384 01cc | | Execute Vector,Catenate 0385 0092 087a | z| Action Push_String_Extended,0x87a ; " nl " 0387 01cc | | Execute Vector,Catenate 0388 e803 | | Load 0x4,0x3 0389 01cc | | Execute Vector,Catenate 038a 0092 087a | z| Action Push_String_Extended,0x87a ; " nl " 038c 01cc | | Execute Vector,Catenate 038d 00db | | Load_Top At_Offset_3 038e 01cc | | Execute Vector,Catenate 038f 0092 087a | z| Action Push_String_Extended,0x87a ; " nl " 0391 01cc | | Execute Vector,Catenate 0392 e402 | | Load 0x2,0x2 0393 01cc | | Execute Vector,Catenate 0394 e00f | | Load 0x0,0xf 0395 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0396 e5fa | | Load 0x2,-0x6 0397 701b |p | Jump_Nonzero 0x3b3 0398 00d8 | | Load_Top At_Offset_0 0399 00ea | | Load_Encached Null_String_Cache 039a 00db | | Load_Top At_Offset_3 039b 4801 |H | Short_Literal 0x1 039c e00f | | Load 0x0,0xf 039d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 039e c806 | | Store 0x4,0x6 039f e802 | | Load 0x4,0x2 03a0 00d9 | | Load_Top At_Offset_1 03a1 e00f | | Load 0x0,0xf 03a2 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 03a3 00db | | Load_Top At_Offset_3 03a4 00d9 | | Load_Top At_Offset_1 03a5 e00f | | Load 0x0,0xf 03a6 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 03a7 00da | | Load_Top At_Offset_2 03a8 00d9 | | Load_Top At_Offset_1 03a9 e00f | | Load 0x0,0xf 03aa 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 03ab e402 | | Load 0x2,0x2 03ac 00d9 | | Load_Top At_Offset_1 03ad e00f | | Load 0x0,0xf 03ae 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 03af 00d8 | | Load_Top At_Offset_0 03b0 e00f | | Load 0x0,0xf 03b1 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03b2 c806 | | Store 0x4,0x6 03b3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03b4 TRAP_0358: 03b4 00d8 | | Load_Top At_Offset_0 03b5 0107 | | Execute Exception,Get_Name 03b6 4920 |I | Short_Literal 0x120 03b7 492f |I/ | Short_Literal 0x12f 03b8 0262 | b | Execute Discrete,In_Range 03b9 6808 |h | Jump_Zero 0x3c2 03ba 0092 087b | {| Action Push_String_Extended,0x87b ; "*** Cound not create the file " 03bc 00db | | Load_Top At_Offset_3 03bd 01cc | | Execute Vector,Catenate 03be e00f | | Load 0x0,0xf 03bf 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 03c0 e603 | | Load 0x3,0x3 03c1 0257 | W | Execute Discrete,Raise 03c2 0100 | | Execute Exception,Raise 03c3 0000 0000 | | .BLANK 0000[0x5] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cd | | .CONST 0x03cd ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0002 | | .CONST 0x0002 ; Number of locals 03cb INIT_03c8: 03cb 029f 068b | | Declare_Subprogram INIT_0688,For_Call 03cd BODY_03c8: 03cd e9fd | | Load 0x4,-0x3 03ce 4604 |F | Jump_Case 0x5 03cf 781c |x | Jump 0x3ec ; case 0x0 03d0 7813 |x | Jump 0x3e4 ; case 0x1 03d1 7812 |x | Jump 0x3e4 ; case 0x2 03d2 7813 |x | Jump 0x3e6 ; case 0x3 03d3 7800 |x | Jump 0x3d4 ; case 0x4 03d4 e5fb | | Load 0x2,-0x5 03d5 0092 086d | m| Action Push_String_Extended,0x86d ; "." 03d7 01cc | | Execute Vector,Catenate 03d8 00ea | | Load_Encached Null_String_Cache 03d9 4807 |H | Short_Literal 0x7 03da e9fe | | Load 0x4,-0x2 03db e40d | | Load 0x2,0xd 03dc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03dd 01cc | | Execute Vector,Catenate 03de 0092 0877 | w| Action Push_String_Extended,0x877 ; "_" 03e0 01cc | | Execute Vector,Catenate 03e1 e9ff | | Load 0x4,-0x1 03e2 01cc | | Execute Vector,Catenate 03e3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03e4 8802 | | Call 0x4,0x2 03e5 7808 |x | Jump 0x3ee 03e6 00ea | | Load_Encached Null_String_Cache 03e7 4806 |H | Short_Literal 0x6 03e8 e9fe | | Load 0x4,-0x2 03e9 e40d | | Load 0x2,0xd 03ea 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03eb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03ec e603 | | Load 0x3,0x3 03ed 0257 | W | Execute Discrete,Raise 03ee 0831 | 1 | Execute_Immediate Raise,0x31 03ef 0000 | | .XXX[0x1] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00db | | Load_Top At_Offset_3 03f4 4604 |F | Jump_Case 0x5 03f5 783c |x< | Jump 0x432 ; case 0x0 03f6 7806 |x | Jump 0x3fd ; case 0x1 03f7 780c |x | Jump 0x404 ; case 0x2 03f8 7836 |x6 | Jump 0x42f ; case 0x3 03f9 7800 |x | Jump 0x3fa ; case 0x4 03fa 0092 087c | || Action Push_String_Extended,0x87c ; "FTP" 03fc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03fd 00da | | Load_Top At_Offset_2 03fe 860a | | Call 0x3,0xa 03ff 4801 |H | Short_Literal 0x1 0400 e9ff | | Load 0x4,-0x1 0401 8609 | | Call 0x3,0x9 0402 01cc | | Execute Vector,Catenate 0403 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0404 4805 |H | Short_Literal 0x5 0405 00db | | Load_Top At_Offset_3 0406 e40d | | Load 0x2,0xd 0407 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0408 6819 |h | Jump_Zero 0x422 0409 0092 087d | }| Action Push_String_Extended,0x87d ; "Host => " 040b 00ea | | Load_Encached Null_String_Cache 040c 4804 |H | Short_Literal 0x4 040d e9ff | | Load 0x4,-0x1 040e e40d | | Load 0x2,0xd 040f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0410 01cc | | Execute Vector,Catenate 0411 0092 087e | ~| Action Push_String_Extended,0x87e ; ", Socket => (" 0413 01cc | | Execute Vector,Catenate 0414 00ea | | Load_Encached Null_String_Cache 0415 4805 |H | Short_Literal 0x5 0416 e9ff | | Load 0x4,-0x1 0417 e40d | | Load 0x2,0xd 0418 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0419 01cc | | Execute Vector,Catenate 041a 0092 087f | | Action Push_String_Extended,0x87f ; ")" 041c 01cc | | Execute Vector,Catenate 041d 4801 |H | Short_Literal 0x1 041e e9ff | | Load 0x4,-0x1 041f 8609 | | Call 0x3,0x9 0420 01cc | | Execute Vector,Catenate 0421 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0422 0092 087d | }| Action Push_String_Extended,0x87d ; "Host => " 0424 00ea | | Load_Encached Null_String_Cache 0425 4804 |H | Short_Literal 0x4 0426 e9ff | | Load 0x4,-0x1 0427 e40d | | Load 0x2,0xd 0428 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0429 01cc | | Execute Vector,Catenate 042a 4801 |H | Short_Literal 0x1 042b e9ff | | Load 0x4,-0x1 042c 8609 | | Call 0x3,0x9 042d 01cc | | Execute Vector,Catenate 042e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 042f 0092 0880 | | Action Push_String_Extended,0x880 ; "Xon_Xoff" 0431 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0432 e603 | | Load 0x3,0x3 0433 0257 | W | Execute Discrete,Raise 0434 0000 0000 | | .BLANK 0000[0x4] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 0446 | F | .CONST 0x0446 ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0005 | | .CONST 0x0005 ; Number of locals 043b INIT_0438: 043b e9fd | | Load 0x4,-0x3 043c e9fe | | Load 0x4,-0x2 043d e9ff | | Load 0x4,-0x1 043e 860c | | Call 0x3,0xc 043f e9fd | | Load 0x4,-0x3 0440 e9fe | | Load 0x4,-0x2 0441 860d | | Call 0x3,0xd 0442 029f 06ab | | Declare_Subprogram INIT_06a8,For_Call 0444 029f 06d3 | | Declare_Subprogram INIT_06d0,For_Call 0446 BODY_0438: 0446 0092 0881 | | Action Push_String_Extended,0x881 ; "Setting up " 0448 e9ff | | Load 0x4,-0x1 0449 01cc | | Execute Vector,Catenate 044a e00f | | Load 0x0,0xf 044b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 044c 0092 0882 | | Action Push_String_Extended,0x882 ; " Class -> " 044e e9ff | | Load 0x4,-0x1 044f 01cc | | Execute Vector,Catenate 0450 e00f | | Load 0x0,0xf 0451 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0452 0092 0883 | | Action Push_String_Extended,0x883 ; " Device -> " 0454 e802 | | Load 0x4,0x2 0455 01cc | | Execute Vector,Catenate 0456 e00f | | Load 0x0,0xf 0457 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0458 0092 0884 | | Action Push_String_Extended,0x884 ; " Options -> " 045a 00db | | Load_Top At_Offset_3 045b 01cc | | Execute Vector,Catenate 045c e00f | | Load 0x0,0xf 045d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 045e e5fa | | Load 0x2,-0x6 045f 7050 |pP | Jump_Nonzero 0x4b0 0460 e00f | | Load 0x0,0xf 0461 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0462 e00f | | Load 0x0,0xf 0463 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0464 0092 0864 | d| Action Push_String_Extended,0x864 ; "Holding" 0466 e00d | | Load 0x0,0xd 0467 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0468 00db | | Load_Top At_Offset_3 0469 e00d | | Load 0x0,0xd 046a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 046b 680f |h | Jump_Zero 0x47b 046c 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 046e e00f | | Load 0x0,0xf 046f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0470 0092 0886 | | Action Push_String_Extended,0x886 ; "Disabling device: " 0472 e802 | | Load 0x4,0x2 0473 01cc | | Execute Vector,Catenate 0474 e00f | | Load 0x0,0xf 0475 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0476 4800 |H | Short_Literal 0x0 0477 e802 | | Load 0x4,0x2 0478 e00d | | Load 0x0,0xd 0479 1820 | | Execute Package,Field_Execute,Field_Number 0x20 047a 8804 | | Call 0x4,0x4 047b 6068 |`h | Indirect_Literal Discrete,0x4e4,{0x00000000, 0x00050000} 047c 00ba | | Action Initiate_Delay 047d e9ff | | Load 0x4,-0x1 047e e00d | | Load 0x0,0xd 047f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0480 6806 |h | Jump_Zero 0x487 0481 0092 0864 | d| Action Push_String_Extended,0x864 ; "Holding" 0483 e9ff | | Load 0x4,-0x1 0484 e00d | | Load 0x0,0xd 0485 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0486 8805 | | Call 0x4,0x5 0487 00db | | Load_Top At_Offset_3 0488 e00d | | Load 0x0,0xd 0489 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 048a 680e |h | Jump_Zero 0x499 048b 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 048d e00f | | Load 0x0,0xf 048e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 048f 0092 0887 | | Action Push_String_Extended,0x887 ; "Deleting existing device: " 0491 e802 | | Load 0x4,0x2 0492 01cc | | Execute Vector,Catenate 0493 e00f | | Load 0x0,0xf 0494 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0495 4800 |H | Short_Literal 0x0 0496 e802 | | Load 0x4,0x2 0497 e00d | | Load 0x0,0xd 0498 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0499 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 049b e00f | | Load 0x0,0xf 049c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 049d 0092 0888 | | Action Push_String_Extended,0x888 ; "Creating class: " 049f e9ff | | Load 0x4,-0x1 04a0 01cc | | Execute Vector,Catenate 04a1 e00f | | Load 0x0,0xf 04a2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04a3 e9ff | | Load 0x4,-0x1 04a4 e00d | | Load 0x0,0xd 04a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04a6 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 04a8 e00f | | Load 0x0,0xf 04a9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04aa 0092 0889 | | Action Push_String_Extended,0x889 ; "Creating device: " 04ac e802 | | Load 0x4,0x2 04ad 01cc | | Execute Vector,Catenate 04ae e00f | | Load 0x0,0xf 04af 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04b0 e9fd | | Load 0x4,-0x3 04b1 0f04 | | Execute_Immediate Equal,0x4 04b2 6803 |h | Jump_Zero 0x4b6 04b3 e9fe | | Load 0x4,-0x2 04b4 e9ff | | Load 0x4,-0x1 04b5 860b | | Call 0x3,0xb 04b6 e5fa | | Load 0x2,-0x6 04b7 702b |p+ | Jump_Nonzero 0x4e3 04b8 00da | | Load_Top At_Offset_2 04b9 e802 | | Load 0x4,0x2 04ba e00d | | Load 0x0,0xd 04bb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 04bc 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 04be e00f | | Load 0x0,0xf 04bf 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04c0 0092 088a | | Action Push_String_Extended,0x88a ; "Registering " 04c2 e802 | | Load 0x4,0x2 04c3 01cc | | Execute Vector,Catenate 04c4 0092 088b | | Action Push_String_Extended,0x88b ; " with " 04c6 01cc | | Execute Vector,Catenate 04c7 e9ff | | Load 0x4,-0x1 04c8 01cc | | Execute Vector,Catenate 04c9 e00f | | Load 0x0,0xf 04ca 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04cb e9ff | | Load 0x4,-0x1 04cc e802 | | Load 0x4,0x2 04cd e00d | | Load 0x0,0xd 04ce 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04cf 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 04d1 e00f | | Load 0x0,0xf 04d2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04d3 0092 088c | | Action Push_String_Extended,0x88c ; "Enabling device. See error log if there are errors for more information" 04d5 e00f | | Load 0x0,0xf 04d6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04d7 00db | | Load_Top At_Offset_3 04d8 e00d | | Load 0x0,0xd 04d9 181f | | Execute Package,Field_Execute,Field_Number 0x1f 04da 0092 0885 | | Action Push_String_Extended,0x885 ; "---" 04dc e00f | | Load 0x0,0xf 04dd 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04de e9ff | | Load 0x4,-0x1 04df 0092 0864 | d| Action Push_String_Extended,0x864 ; "Holding" 04e1 e00d | | Load 0x0,0xd 04e2 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04e3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04e4 0000 0000 | | .LITERAL {0x00000000, 0x00050000} 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; SUBPROGRAM 04e8 ; -------------------------------------------------------------------------------------- 04e8 04ef | | .CONST 0x04ef ; Address of begin 04e9 050c | | .CONST 0x050c ; Address of exception handler 04ea 0003 | | .CONST 0x0003 ; Number of locals 04eb INIT_04e8: 04eb e40d | | Load 0x2,0xd 04ec 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 04ed 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call 04ef BODY_04e8: 04ef e9fe | | Load 0x4,-0x2 04f0 01db | | Execute Vector,Length 04f1 6819 |h | Jump_Zero 0x50b 04f2 e9fe | | Load 0x4,-0x2 04f3 e40d | | Load 0x2,0xd 04f4 1820 | | Execute Package,Field_Execute,Field_Number 0x20 04f5 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04f6 00d9 | | Load_Top At_Offset_1 04f7 e40d | | Load 0x2,0xd 04f8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04f9 6802 |h | Jump_Zero 0x4fc 04fa 8803 | | Call 0x4,0x3 04fb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04fc 0092 088d | | Action Push_String_Extended,0x88d ; "Illegal format: " 04fe e9fe | | Load 0x4,-0x2 04ff 01cc | | Execute Vector,Catenate 0500 e00f | | Load 0x0,0xf 0501 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0502 0092 088e | | Action Push_String_Extended,0x88e ; " " 0504 4800 |H | Short_Literal 0x0 0505 00db | | Load_Top At_Offset_3 0506 e40d | | Load 0x2,0xd 0507 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0508 01cc | | Execute Vector,Catenate 0509 e00f | | Load 0x0,0xf 050a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 050b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 050c TRAP_04e8: 050c e603 | | Load 0x3,0x3 050d 010f | | Execute Exception,Equal 050e 6807 |h | Jump_Zero 0x516 050f 0092 088f | | Action Push_String_Extended,0x88f ; "Illegal item in line: " 0511 e9fe | | Load 0x4,-0x2 0512 01cc | | Execute Vector,Catenate 0513 e00f | | Load 0x0,0xf 0514 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0515 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0516 0100 | | Execute Exception,Raise 0517 0000 | | .XXX[0x1] 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 051f | | .CONST 0x051f ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0003 | | .CONST 0x0003 ; Number of locals 051b INIT_0518: 051b e40b | | Load 0x2,0xb 051c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 051d 029f 072b | +| Declare_Subprogram INIT_0728,For_Call 051f BODY_0518: 051f e9ff | | Load 0x4,-0x1 0520 01db | | Execute Vector,Length 0521 6846 |hF | Jump_Zero 0x568 0522 e9ff | | Load 0x4,-0x1 0523 01db | | Execute Vector,Length 0524 0c02 | | Execute_Immediate Greater_Equal,0x2 0525 6811 |h | Jump_Zero 0x537 0526 e9ff | | Load 0x4,-0x1 0527 01dd | | Execute Vector,First 0528 e9ff | | Load 0x4,-0x1 0529 01dd | | Execute Vector,First 052a 0a01 | | Execute_Immediate Plus,0x1 052b 00d8 | | Load_Top At_Offset_0 052c 00e2 | | Load_Encached Integer_Cache 052d 0260 | ` | Execute Discrete,In_Type 052e 7001 |p | Jump_Nonzero 0x530 052f 0801 | | Execute_Immediate Raise,0x1 0530 e9ff | | Load 0x4,-0x1 0531 01cf | | Execute Vector,Slice_Read 0532 0092 0890 | | Action Push_String_Extended,0x890 ; "--" 0534 01df | | Execute Vector,Equal 0535 6801 |h | Jump_Zero 0x537 0536 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0537 e9ff | | Load 0x4,-0x1 0538 8604 | | Call 0x3,0x4 0539 e9ff | | Load 0x4,-0x1 053a e40b | | Load 0x2,0xb 053b 1820 | | Execute Package,Field_Execute,Field_Number 0x20 053c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 053d 00d9 | | Load_Top At_Offset_1 053e e40b | | Load 0x2,0xb 053f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0540 6818 |h | Jump_Zero 0x559 0541 4800 |H | Short_Literal 0x0 0542 00da | | Load_Top At_Offset_2 0543 e40b | | Load 0x2,0xb 0544 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0545 6802 |h | Jump_Zero 0x548 0546 8803 | | Call 0x4,0x3 0547 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0548 480a |H | Short_Literal 0xa 0549 0092 088f | | Action Push_String_Extended,0x88f ; "Illegal item in line: " 054b e9ff | | Load 0x4,-0x1 054c 01cc | | Execute Vector,Catenate 054d 01cb | | Execute Vector,Append 054e 0092 088e | | Action Push_String_Extended,0x88e ; " " 0550 01cc | | Execute Vector,Catenate 0551 4800 |H | Short_Literal 0x0 0552 00db | | Load_Top At_Offset_3 0553 e40b | | Load 0x2,0xb 0554 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0555 01cc | | Execute Vector,Catenate 0556 e00f | | Load 0x0,0xf 0557 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0558 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0559 0092 088d | | Action Push_String_Extended,0x88d ; "Illegal format: " 055b e9ff | | Load 0x4,-0x1 055c 01cc | | Execute Vector,Catenate 055d e00f | | Load 0x0,0xf 055e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 055f 0092 088e | | Action Push_String_Extended,0x88e ; " " 0561 4800 |H | Short_Literal 0x0 0562 00db | | Load_Top At_Offset_3 0563 e40b | | Load 0x2,0xb 0564 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0565 01cc | | Execute Vector,Catenate 0566 e00f | | Load 0x0,0xf 0567 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0568 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0569 0000 0000 | | .BLANK 0000[0x7] 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 0582 | | .CONST 0x0582 ; Address of begin 0571 058e | | .CONST 0x058e ; Address of exception handler 0572 0007 | | .CONST 0x0007 ; Number of locals 0573 INIT_0570: 0573 4801 |H | Short_Literal 0x1 0574 4be8 |K | Short_Literal 0x3e8 0575 00e9 | | Load_Encached String_Cache 0576 035b | [ | Declare_Type Array,Constrained 0577 0337 | 7 | Declare_Variable Array 0578 00e3 | | Load_Encached Natural_Cache 0579 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 057a 00e3 | | Load_Encached Natural_Cache 057b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 057c 00e3 | | Load_Encached Natural_Cache 057d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 057e 029f 0743 | C| Declare_Subprogram INIT_0740,For_Call 0580 029f 0763 | c| Declare_Subprogram INIT_0760,For_Call 0582 BODY_0570: 0582 00cf | | Action Mark_Auxiliary 0583 8807 | | Call 0x4,0x7 0584 00c9 | | Action Pop_Auxiliary_Loop 0585 7ffd | | Jump 0x583 0586 00ce | | Action Pop_Auxiliary 0587 4801 |H | Short_Literal 0x1 0588 e803 | | Load 0x4,0x3 0589 e802 | | Load 0x4,0x2 058a 01cf | | Execute Vector,Slice_Read 058b 00e9 | | Load_Encached String_Cache 058c 01c6 | | Execute Vector,Convert_To_Formal 058d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 058e TRAP_0570: 058e 00d8 | | Load_Top At_Offset_0 058f 0107 | | Execute Exception,Get_Name 0590 4950 |IP | Short_Literal 0x150 0591 495f |I_ | Short_Literal 0x15f 0592 0262 | b | Execute Discrete,In_Range 0593 680f |h | Jump_Zero 0x5a3 0594 e804 | | Load 0x4,0x4 0595 e805 | | Load 0x4,0x5 0596 027e | ~ | Execute Discrete,Not_Equal 0597 6809 |h | Jump_Zero 0x5a1 0598 0092 0891 | | Action Push_String_Extended,0x891 ; "The parentheses in the file " 059a e7ff | | Load 0x3,-0x1 059b 01cc | | Execute Vector,Catenate 059c 0092 0892 | | Action Push_String_Extended,0x892 ; " do not match" 059e 01cc | | Execute Vector,Catenate 059f e00f | | Load 0x0,0xf 05a0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05a1 00d8 | | Load_Top At_Offset_0 05a2 0101 | | Execute Exception,Reraise 05a3 0100 | | Execute Exception,Raise 05a4 0000 0000 | | .BLANK 0000[0x4] 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05b1 | | .CONST 0x05b1 ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0003 | | .CONST 0x0003 ; Number of locals 05ab INIT_05a8: 05ab 00da | | Load_Top At_Offset_2 05ac 01dd | | Execute Vector,First 05ad 00e2 | | Load_Encached Integer_Cache 05ae 03f1 | | Declare_Variable Discrete,With_Value 05af 00e2 | | Load_Encached Integer_Cache 05b0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 05b1 BODY_05a8: 05b1 00cf | | Action Mark_Auxiliary 05b2 e9ff | | Load 0x4,-0x1 05b3 01d9 | | Execute Vector,Reverse_Bounds 05b4 0263 | c | Execute Discrete,Above_Bound 05b5 701f |p | Jump_Nonzero 0x5d5 05b6 00d8 | | Load_Top At_Offset_0 05b7 e9ff | | Load 0x4,-0x1 05b8 01d7 | | Execute Vector,Field_Read 05b9 0f20 | | Execute_Immediate Equal,0x20 05ba 6818 |h | Jump_Zero 0x5d3 05bb e802 | | Load 0x4,0x2 05bc 00d9 | | Load_Top At_Offset_1 05bd 027f | | Execute Discrete,Equal 05be 6804 |h | Jump_Zero 0x5c3 05bf 00d8 | | Load_Top At_Offset_0 05c0 0a01 | | Execute_Immediate Plus,0x1 05c1 c802 | | Store 0x4,0x2 05c2 7810 |x | Jump 0x5d3 05c3 00db | | Load_Top At_Offset_3 05c4 0a01 | | Execute_Immediate Plus,0x1 05c5 c803 | | Store 0x4,0x3 05c6 00db | | Load_Top At_Offset_3 05c7 e9fe | | Load 0x4,-0x2 05c8 027f | | Execute Discrete,Equal 05c9 6806 |h | Jump_Zero 0x5d0 05ca e802 | | Load 0x4,0x2 05cb 00d9 | | Load_Top At_Offset_1 05cc 0aff | | Execute_Immediate Plus,-0x1 05cd e9ff | | Load 0x4,-0x1 05ce 01cf | | Execute Vector,Slice_Read 05cf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05d0 00d8 | | Load_Top At_Offset_0 05d1 0a01 | | Execute_Immediate Plus,0x1 05d2 c802 | | Store 0x4,0x2 05d3 00c8 | | Action Pop_Auxiliary_Range 05d4 3fe1 |? | Loop_Increasing 0x5b6 05d5 00ce | | Action Pop_Auxiliary 05d6 00d8 | | Load_Top At_Offset_0 05d7 0a01 | | Execute_Immediate Plus,0x1 05d8 0059 | Y | Store_Top Discrete,At_Offset_1 05d9 00d8 | | Load_Top At_Offset_0 05da e9fe | | Load 0x4,-0x2 05db 027f | | Execute Discrete,Equal 05dc 6806 |h | Jump_Zero 0x5e3 05dd 00d9 | | Load_Top At_Offset_1 05de e9ff | | Load 0x4,-0x1 05df 01dc | | Execute Vector,Last 05e0 e9ff | | Load 0x4,-0x1 05e1 01cf | | Execute Vector,Slice_Read 05e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05e3 00ea | | Load_Encached Null_String_Cache 05e4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05e5 0000 0000 | | .XXX[0x3] 05e7 0000 | | 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05f3 | | .CONST 0x05f3 ; Address of begin 05e9 060d | | .CONST 0x060d ; Address of exception handler 05ea 0004 | | .CONST 0x0004 ; Number of locals 05eb INIT_05e8: 05eb 4801 |H | Short_Literal 0x1 05ec 00db | | Load_Top At_Offset_3 05ed 8604 | | Call 0x3,0x4 05ee 4802 |H | Short_Literal 0x2 05ef e9ff | | Load 0x4,-0x1 05f0 8604 | | Call 0x3,0x4 05f1 029f 07c3 | | Declare_Subprogram INIT_07c0,For_Call 05f3 BODY_05e8: 05f3 e9ff | | Load 0x4,-0x1 05f4 01db | | Execute Vector,Length 05f5 6816 |h | Jump_Zero 0x60c 05f6 e9ff | | Load 0x4,-0x1 05f7 01db | | Execute Vector,Length 05f8 0c02 | | Execute_Immediate Greater_Equal,0x2 05f9 6811 |h | Jump_Zero 0x60b 05fa e9ff | | Load 0x4,-0x1 05fb 01dd | | Execute Vector,First 05fc e9ff | | Load 0x4,-0x1 05fd 01dd | | Execute Vector,First 05fe 0a01 | | Execute_Immediate Plus,0x1 05ff 00d8 | | Load_Top At_Offset_0 0600 00e2 | | Load_Encached Integer_Cache 0601 0260 | ` | Execute Discrete,In_Type 0602 7001 |p | Jump_Nonzero 0x604 0603 0801 | | Execute_Immediate Raise,0x1 0604 e9ff | | Load 0x4,-0x1 0605 01cf | | Execute Vector,Slice_Read 0606 0092 0890 | | Action Push_String_Extended,0x890 ; "--" 0608 01df | | Execute Vector,Equal 0609 6801 |h | Jump_Zero 0x60b 060a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 060b 8804 | | Call 0x4,0x4 060c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 060d TRAP_05e8: 060d e408 | | Load 0x2,0x8 060e 1b20 | | Execute Package,Field_Read,Field_Number 0x20 060f 010f | | Execute Exception,Equal 0610 680d |h | Jump_Zero 0x61e 0611 00da | | Load_Top At_Offset_2 0612 0092 0893 | | Action Push_String_Extended,0x893 ; " is not a defined printer" 0614 01cc | | Execute Vector,Catenate 0615 e00f | | Load 0x0,0xf 0616 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0617 0092 0894 | | Action Push_String_Extended,0x894 ; " In line: " 0619 e9ff | | Load 0x4,-0x1 061a 01cc | | Execute Vector,Catenate 061b e00f | | Load 0x0,0xf 061c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 061d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 061e 0100 | | Execute Exception,Raise 061f 0000 | | .XXX[0x1] 0620 ; -------------------------------------------------------------------------------------- 0620 ; SUBPROGRAM 0620 ; -------------------------------------------------------------------------------------- 0620 0628 | ( | .CONST 0x0628 ; Address of begin 0621 0004 | | .CONST 0x0004 ; Address of exception handler 0622 0003 | | .CONST 0x0003 ; Number of locals 0623 INIT_0620: 0623 e408 | | Load 0x2,0x8 0624 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0625 0322 | " | Declare_Variable Record 0626 029f 07f3 | | Declare_Subprogram INIT_07f0,For_Call 0628 BODY_0620: 0628 00d9 | | Load_Top At_Offset_1 0629 e409 | | Load 0x2,0x9 062a e408 | | Load 0x2,0x8 062b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 062c 00d1 | | Pop_Control Pop_Count_1 062d 00cf | | Action Mark_Auxiliary 062e 7806 |x | Jump 0x635 062f 8803 | | Call 0x4,0x3 0630 00da | | Load_Top At_Offset_2 0631 e408 | | Load 0x2,0x8 0632 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0633 00d1 | | Pop_Control Pop_Count_1 0634 00c9 | | Action Pop_Auxiliary_Loop 0635 00da | | Load_Top At_Offset_2 0636 e408 | | Load 0x2,0x8 0637 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0638 6ff6 |o | Jump_Zero 0x62f 0639 4501 |E | Exit_Suprogram New_Top_Offset 0x1 063a 0000 0000 | | .BLANK 0000[0x6] 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 0645 | E | .CONST 0x0645 ; Address of begin 0641 0660 | ` | .CONST 0x0660 ; Address of exception handler 0642 0002 | | .CONST 0x0002 ; Number of locals 0643 INIT_0640: 0643 029f 082b | +| Declare_Subprogram INIT_0828,For_Call 0645 BODY_0640: 0645 e602 | | Load 0x3,0x2 0646 00ea | | Load_Encached Null_String_Cache 0647 e7ff | | Load 0x3,-0x1 0648 4800 |H | Short_Literal 0x0 0649 e00f | | Load 0x0,0xf 064a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 064b c602 | | Store 0x3,0x2 064c 00cf | | Action Mark_Auxiliary 064d 7808 |x | Jump 0x656 064e 4820 |H | Short_Literal 0x20 064f e602 | | Load 0x3,0x2 0650 e00f | | Load 0x0,0xf 0651 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 0652 e010 | | Load 0x0,0x10 0653 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0654 8605 | | Call 0x3,0x5 0655 00c9 | | Action Pop_Auxiliary_Loop 0656 e602 | | Load 0x3,0x2 0657 e00f | | Load 0x0,0xf 0658 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0659 6ff4 |o | Jump_Zero 0x64e 065a 00ce | | Action Pop_Auxiliary 065b e602 | | Load 0x3,0x2 065c e00f | | Load 0x0,0xf 065d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 065e c602 | | Store 0x3,0x2 065f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0660 TRAP_0640: 0660 00d8 | | Load_Top At_Offset_0 0661 0107 | | Execute Exception,Get_Name 0662 4920 |I | Short_Literal 0x120 0663 492f |I/ | Short_Literal 0x12f 0664 0262 | b | Execute Discrete,In_Range 0665 6802 |h | Jump_Zero 0x668 0666 8802 | | Call 0x4,0x2 0667 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0668 0100 | | Execute Exception,Raise 0669 0000 0000 | | .BLANK 0000[0x7] 0670 ; -------------------------------------------------------------------------------------- 0670 ; SUBPROGRAM 0670 ; -------------------------------------------------------------------------------------- 0670 067c | | | .CONST 0x067c ; Address of begin 0671 0004 | | .CONST 0x0004 ; Address of exception handler 0672 0002 | | .CONST 0x0002 ; Number of locals 0673 INIT_0670: 0673 4820 |H | Short_Literal 0x20 0674 e9ff | | Load 0x4,-0x1 0675 01dd | | Execute Vector,First 0676 e802 | | Load 0x4,0x2 0677 0aff | | Execute_Immediate Plus,-0x1 0678 e9ff | | Load 0x4,-0x1 0679 01cf | | Execute Vector,Slice_Read 067a e010 | | Load 0x0,0x10 067b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 067c BODY_0670: 067c 4800 |H | Short_Literal 0x0 067d 00ea | | Load_Encached Null_String_Cache 067e 4800 |H | Short_Literal 0x0 067f 00db | | Load_Top At_Offset_3 0680 4801 |H | Short_Literal 0x1 0681 e40b | | Load 0x2,0xb 0682 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0683 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0684 0000 0000 | | .BLANK 0000[0x4] 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 0690 | | .CONST 0x0690 ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0002 | | .CONST 0x0002 ; Number of locals 068b INIT_0688: 068b 00ea | | Load_Encached Null_String_Cache 068c 4803 |H | Short_Literal 0x3 068d e9fe | | Load 0x4,-0x2 068e e40d | | Load 0x2,0xd 068f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0690 BODY_0688: 0690 4801 |H | Short_Literal 0x1 0691 00d9 | | Load_Top At_Offset_1 0692 0092 0895 | | Action Push_String_Extended,0x895 ; "Terminal_" 0694 e010 | | Load 0x0,0x10 0695 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0696 0c01 | | Execute_Immediate Greater_Equal,0x1 0697 6803 |h | Jump_Zero 0x69b 0698 00d8 | | Load_Top At_Offset_0 0699 00cb | | Action Pop_Block_With_Result 069a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 069b 00d8 | | Load_Top At_Offset_0 069c 0092 0896 | | Action Push_String_Extended,0x896 ; " is not a proper device name" 069e 01cc | | Execute Vector,Catenate 069f e00f | | Load 0x0,0xf 06a0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06a1 e603 | | Load 0x3,0x3 06a2 0257 | W | Execute Discrete,Raise 06a3 0000 0000 | | .BLANK 0000[0x5] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06b4 | | .CONST 0x06b4 ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0002 | | .CONST 0x0002 ; Number of locals 06ab INIT_06a8: 06ab e015 | | Load 0x0,0x15 06ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06ad 02c7 | | Declare_Variable Any 06ae 6019 |` | Indirect_Literal Discrete,0x6c8,{0x00000000, 0x012c0000} 06af e015 | | Load 0x0,0x15 06b0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06b1 e015 | | Load 0x0,0x15 06b2 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06b3 aa02 | | Store_Unchecked 0x5,0x2 06b4 BODY_06a8: 06b4 00cf | | Action Mark_Auxiliary 06b5 7803 |x | Jump 0x6b9 06b6 600d |` | Indirect_Literal Discrete,0x6c4,{0x00000000, 0x00028000} 06b7 00ba | | Action Initiate_Delay 06b8 00c9 | | Action Pop_Auxiliary_Loop 06b9 e802 | | Load 0x4,0x2 06ba e00d | | Load 0x0,0xd 06bb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 06bc 00da | | Load_Top At_Offset_2 06bd e015 | | Load 0x0,0x15 06be 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06bf e015 | | Load 0x0,0x15 06c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06c1 0279 | y | Execute Discrete,And 06c2 77f3 |w | Jump_Nonzero 0x6b6 06c3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06c4 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 06c8 0000 0000 | | .LITERAL {0x00000000, 0x012c0000} 06cc 0000 0000 | | .BLANK 0000[0x4] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06dc | | .CONST 0x06dc ; Address of begin 06d1 0004 | | .CONST 0x0004 ; Address of exception handler 06d2 0002 | | .CONST 0x0002 ; Number of locals 06d3 INIT_06d0: 06d3 e015 | | Load 0x0,0x15 06d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06d5 02c7 | | Declare_Variable Any 06d6 6019 |` | Indirect_Literal Discrete,0x6f0,{0x00000000, 0x00960000} 06d7 e015 | | Load 0x0,0x15 06d8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06d9 e015 | | Load 0x0,0x15 06da 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06db aa02 | | Store_Unchecked 0x5,0x2 06dc BODY_06d0: 06dc 00cf | | Action Mark_Auxiliary 06dd 7803 |x | Jump 0x6e1 06de 600d |` | Indirect_Literal Discrete,0x6ec,{0x00000000, 0x00010000} 06df 00ba | | Action Initiate_Delay 06e0 00c9 | | Action Pop_Auxiliary_Loop 06e1 e9ff | | Load 0x4,-0x1 06e2 e00d | | Load 0x0,0xd 06e3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 06e4 00da | | Load_Top At_Offset_2 06e5 e015 | | Load 0x0,0x15 06e6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06e7 e015 | | Load 0x0,0x15 06e8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06e9 0279 | y | Execute Discrete,And 06ea 77f3 |w | Jump_Nonzero 0x6de 06eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06ec 0000 0000 | | .LITERAL {0x00000000, 0x00010000} 06f0 0000 0000 | | .LITERAL {0x00000000, 0x00960000} 06f4 0000 0000 | | .BLANK 0000[0x4] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 0704 | | .CONST 0x0704 ; Address of begin 06f9 0004 | | .CONST 0x0004 ; Address of exception handler 06fa 0003 | | .CONST 0x0003 ; Number of locals 06fb INIT_06f8: 06fb 00ea | | Load_Encached Null_String_Cache 06fc 4801 |H | Short_Literal 0x1 06fd e802 | | Load 0x4,0x2 06fe e40d | | Load 0x2,0xd 06ff 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0700 e802 | | Load 0x4,0x2 0701 8608 | | Call 0x3,0x8 0702 e40e | | Load 0x2,0xe 0703 03f1 | | Declare_Variable Discrete,With_Value 0704 BODY_06f8: 0704 00d9 | | Load_Top At_Offset_1 0705 8607 | | Call 0x3,0x7 0706 6812 |h | Jump_Zero 0x719 0707 00d8 | | Load_Top At_Offset_0 0708 680a |h | Jump_Zero 0x713 0709 00d8 | | Load_Top At_Offset_0 070a e802 | | Load 0x4,0x2 070b e9ff | | Load 0x4,-0x1 070c 860e | | Call 0x3,0xe 070d 00ea | | Load_Encached Null_String_Cache 070e 00d9 | | Load_Top At_Offset_1 070f e802 | | Load 0x4,0x2 0710 e9ff | | Load 0x4,-0x1 0711 8606 | | Call 0x3,0x6 0712 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0713 0092 0897 | | Action Push_String_Extended,0x897 ; "The current options do not define a device" 0715 e00f | | Load 0x0,0xf 0716 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0717 e603 | | Load 0x3,0x3 0718 0257 | W | Execute Discrete,Raise 0719 e9ff | | Load 0x4,-0x1 071a 0092 0898 | | Action Push_String_Extended,0x898 ; " is located on " 071c 01cc | | Execute Vector,Catenate 071d 00da | | Load_Top At_Offset_2 071e 01cc | | Execute Vector,Catenate 071f e00f | | Load 0x0,0xf 0720 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0721 00d9 | | Load_Top At_Offset_1 0722 00d9 | | Load_Top At_Offset_1 0723 e802 | | Load 0x4,0x2 0724 e9ff | | Load 0x4,-0x1 0725 8606 | | Call 0x3,0x6 0726 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0727 0000 | | .XXX[0x1] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072f | / | .CONST 0x072f ; Address of begin 0729 0004 | | .CONST 0x0004 ; Address of exception handler 072a 0002 | | .CONST 0x0002 ; Number of locals 072b INIT_0728: 072b 4800 |H | Short_Literal 0x0 072c e802 | | Load 0x4,0x2 072d e40b | | Load 0x2,0xb 072e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 072f BODY_0728: 072f 4820 |H | Short_Literal 0x20 0730 00ea | | Load_Encached Null_String_Cache 0731 4800 |H | Short_Literal 0x0 0732 e802 | | Load 0x4,0x2 0733 e40b | | Load 0x2,0xb 0734 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0735 e010 | | Load 0x0,0x10 0736 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0737 00d9 | | Load_Top At_Offset_1 0738 860f | | Call 0x3,0xf 0739 4501 |E | Exit_Suprogram New_Top_Offset 0x1 073a 0000 0000 | | .BLANK 0000[0x6] 0740 ; -------------------------------------------------------------------------------------- 0740 ; SUBPROGRAM 0740 ; -------------------------------------------------------------------------------------- 0740 0743 | C | .CONST 0x0743 ; Address of begin 0741 0004 | | .CONST 0x0004 ; Address of exception handler 0742 0001 | | .CONST 0x0001 ; Number of locals 0743 BODY_0740: 0743 INIT_0740: 0743 00cf | | Action Mark_Auxiliary 0744 00db | | Load_Top At_Offset_3 0745 01dc | | Execute Vector,Last 0746 ebff | | Load 0x5,-0x1 0747 01dd | | Execute Vector,First 0748 0263 | c | Execute Discrete,Above_Bound 0749 7012 |p | Jump_Nonzero 0x75c 074a 00d8 | | Load_Top At_Offset_0 074b ebff | | Load 0x5,-0x1 074c 01d7 | | Execute Vector,Field_Read 074d 0f28 | ( | Execute_Immediate Equal,0x28 074e 6803 |h | Jump_Zero 0x752 074f ebfe | | Load 0x5,-0x2 0750 0a01 | | Execute_Immediate Plus,0x1 0751 cbfe | | Store 0x5,-0x2 0752 00d8 | | Load_Top At_Offset_0 0753 ebff | | Load 0x5,-0x1 0754 01d7 | | Execute Vector,Field_Read 0755 0f29 | ) | Execute_Immediate Equal,0x29 0756 6803 |h | Jump_Zero 0x75a 0757 ebfd | | Load 0x5,-0x3 0758 0a01 | | Execute_Immediate Plus,0x1 0759 cbfd | | Store 0x5,-0x3 075a 00c8 | | Action Pop_Auxiliary_Range 075b 3fee |? | Loop_Increasing 0x74a 075c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 075d 0000 0000 | | .XXX[0x3] 075f 0000 | | 0760 ; -------------------------------------------------------------------------------------- 0760 ; SUBPROGRAM 0760 ; -------------------------------------------------------------------------------------- 0760 077d | } | .CONST 0x077d ; Address of begin 0761 0004 | | .CONST 0x0004 ; Address of exception handler 0762 0006 | | .CONST 0x0006 ; Number of locals 0763 INIT_0760: 0763 4820 |H | Short_Literal 0x20 0764 e9ff | | Load 0x4,-0x1 0765 e00f | | Load 0x0,0xf 0766 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 0767 e010 | | Load 0x0,0x10 0768 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0769 00d8 | | Load_Top At_Offset_0 076a 01dd | | Execute Vector,First 076b 00e3 | | Load_Encached Natural_Cache 076c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 076d 00d9 | | Load_Top At_Offset_1 076e 01dc | | Execute Vector,Last 076f 00e3 | | Load_Encached Natural_Cache 0770 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0771 00da | | Load_Top At_Offset_2 0772 01db | | Execute Vector,Length 0773 00e3 | | Load_Encached Natural_Cache 0774 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0775 4801 |H | Short_Literal 0x1 0776 ea02 | | Load 0x5,0x2 0777 0092 0890 | | Action Push_String_Extended,0x890 ; "--" 0779 e010 | | Load 0x0,0x10 077a 181d | | Execute Package,Field_Execute,Field_Number 0x1d 077b 00e3 | | Load_Encached Natural_Cache 077c 03f1 | | Declare_Variable Discrete,With_Value 077d BODY_0760: 077d 00d8 | | Load_Top At_Offset_0 077e 0c01 | | Execute_Immediate Greater_Equal,0x1 077f 6810 |h | Jump_Zero 0x790 0780 4820 |H | Short_Literal 0x20 0781 ea03 | | Load 0x5,0x3 0782 00da | | Load_Top At_Offset_2 0783 0aff | | Execute_Immediate Plus,-0x1 0784 ea02 | | Load 0x5,0x2 0785 01cf | | Execute Vector,Slice_Read 0786 e010 | | Load 0x0,0x10 0787 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0788 01dc | | Execute Vector,Last 0789 005b | [ | Store_Top Discrete,At_Offset_3 078a 00db | | Load_Top At_Offset_3 078b 00db | | Load_Top At_Offset_3 078c ea02 | | Load 0x5,0x2 078d 01cf | | Execute Vector,Slice_Read 078e 01db | | Execute Vector,Length 078f 005a | Z | Store_Top Discrete,At_Offset_2 0790 00da | | Load_Top At_Offset_2 0791 ea03 | | Load 0x5,0x3 0792 027d | } | Execute Discrete,Greater 0793 6828 |h( | Jump_Zero 0x7bc 0794 00db | | Load_Top At_Offset_3 0795 00db | | Load_Top At_Offset_3 0796 ea02 | | Load 0x5,0x2 0797 01cf | | Execute Vector,Slice_Read 0798 e803 | | Load 0x4,0x3 0799 0a01 | | Execute_Immediate Plus,0x1 079a 00d8 | | Load_Top At_Offset_0 079b 00e2 | | Load_Encached Integer_Cache 079c 0260 | ` | Execute Discrete,In_Type 079d 7001 |p | Jump_Nonzero 0x79f 079e 0801 | | Execute_Immediate Raise,0x1 079f e803 | | Load 0x4,0x3 07a0 ea05 | | Load 0x5,0x5 07a1 0273 | s | Execute Discrete,Plus 07a2 00d8 | | Load_Top At_Offset_0 07a3 00e2 | | Load_Encached Integer_Cache 07a4 0260 | ` | Execute Discrete,In_Type 07a5 7001 |p | Jump_Nonzero 0x7a7 07a6 0801 | | Execute_Immediate Raise,0x1 07a7 e802 | | Load 0x4,0x2 07a8 01ce | | Execute Vector,Slice_Write 07a9 e803 | | Load 0x4,0x3 07aa 00da | | Load_Top At_Offset_2 07ab 0273 | s | Execute Discrete,Plus 07ac c803 | | Store 0x4,0x3 07ad e805 | | Load 0x4,0x5 07ae e804 | | Load 0x4,0x4 07af ea03 | | Load 0x5,0x3 07b0 ea04 | | Load 0x5,0x4 07b1 ea02 | | Load 0x5,0x2 07b2 01cf | | Execute Vector,Slice_Read 07b3 8806 | | Call 0x4,0x6 07b4 c804 | | Store 0x4,0x4 07b5 c805 | | Store 0x4,0x5 07b6 e804 | | Load 0x4,0x4 07b7 e805 | | Load 0x4,0x5 07b8 027f | | Execute Discrete,Equal 07b9 6802 |h | Jump_Zero 0x7bc 07ba 00cc | | Action Pop_Block 07bb 7dca |} | Jump 0x586 07bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07bd 0000 0000 | | .XXX[0x3] 07bf 0000 | | 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07e1 | | .CONST 0x07e1 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0003 | | .CONST 0x0003 ; Number of locals 07c3 INIT_07c0: 07c3 e803 | | Load 0x4,0x3 07c4 e409 | | Load 0x2,0x9 07c5 e408 | | Load 0x2,0x8 07c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07c7 e802 | | Load 0x4,0x2 07c8 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 07ca 01cc | | Execute Vector,Catenate 07cb 00d9 | | Load_Top At_Offset_1 07cc 0227 | ' | Execute Access,All_Reference 07cd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07ce 0227 | ' | Execute Access,All_Reference 07cf 01cc | | Execute Vector,Catenate 07d0 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 07d2 01cc | | Execute Vector,Catenate 07d3 00d9 | | Load_Top At_Offset_1 07d4 0227 | ' | Execute Access,All_Reference 07d5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07d6 0227 | ' | Execute Access,All_Reference 07d7 01cc | | Execute Vector,Catenate 07d8 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 07da 01cc | | Execute Vector,Catenate 07db 00d9 | | Load_Top At_Offset_1 07dc 0227 | ' | Execute Access,All_Reference 07dd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07de 0227 | ' | Execute Access,All_Reference 07df 01cc | | Execute Vector,Catenate 07e0 0007 | | Action Break_Optional 07e1 BODY_07c0: 07e1 00d8 | | Load_Top At_Offset_0 07e2 e00f | | Load 0x0,0xf 07e3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07e4 e5fa | | Load 0x2,-0x6 07e5 7004 |p | Jump_Nonzero 0x7ea 07e6 00d8 | | Load_Top At_Offset_0 07e7 e603 | | Load 0x3,0x3 07e8 e00f | | Load 0x0,0xf 07e9 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 07ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07eb 0000 0000 | | .BLANK 0000[0x5] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 0817 | | .CONST 0x0817 ; Address of begin 07f1 0004 | | .CONST 0x0004 ; Address of exception handler 07f2 0004 | | .CONST 0x0004 ; Number of locals 07f3 INIT_07f0: 07f3 e802 | | Load 0x4,0x2 07f4 e408 | | Load 0x2,0x8 07f5 181e | | Execute Package,Field_Execute,Field_Number 0x1e 07f6 00d8 | | Load_Top At_Offset_0 07f7 e409 | | Load 0x2,0x9 07f8 e408 | | Load 0x2,0x8 07f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07fa 0092 0899 | | Action Push_String_Extended,0x899 ; "*" 07fc 00da | | Load_Top At_Offset_2 07fd 01cc | | Execute Vector,Catenate 07fe 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 0800 01cc | | Execute Vector,Catenate 0801 00d9 | | Load_Top At_Offset_1 0802 0227 | ' | Execute Access,All_Reference 0803 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0804 0227 | ' | Execute Access,All_Reference 0805 01cc | | Execute Vector,Catenate 0806 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 0808 01cc | | Execute Vector,Catenate 0809 00d9 | | Load_Top At_Offset_1 080a 0227 | ' | Execute Access,All_Reference 080b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 080c 0227 | ' | Execute Access,All_Reference 080d 01cc | | Execute Vector,Catenate 080e 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 0810 01cc | | Execute Vector,Catenate 0811 00d9 | | Load_Top At_Offset_1 0812 0227 | ' | Execute Access,All_Reference 0813 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0814 0227 | ' | Execute Access,All_Reference 0815 01cc | | Execute Vector,Catenate 0816 0007 | | Action Break_Optional 0817 BODY_07f0: 0817 00d8 | | Load_Top At_Offset_0 0818 e00f | | Load 0x0,0xf 0819 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 081a e5fa | | Load 0x2,-0x6 081b 7004 |p | Jump_Nonzero 0x820 081c 00d8 | | Load_Top At_Offset_0 081d e603 | | Load 0x3,0x3 081e e00f | | Load 0x0,0xf 081f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0820 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0821 0000 0000 | | .BLANK 0000[0x7] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 0840 | @ | .CONST 0x0840 ; Address of begin 0829 0004 | | .CONST 0x0004 ; Address of exception handler 082a 0003 | | .CONST 0x0003 ; Number of locals 082b INIT_0828: 082b e405 | | Load 0x2,0x5 082c 0227 | ' | Execute Access,All_Reference 082d e409 | | Load 0x2,0x9 082e e408 | | Load 0x2,0x8 082f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0830 0092 089a | | Action Push_String_Extended,0x89a ; "others " 0832 00d9 | | Load_Top At_Offset_1 0833 0227 | ' | Execute Access,All_Reference 0834 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0835 0227 | ' | Execute Access,All_Reference 0836 01cc | | Execute Vector,Catenate 0837 0092 0872 | r| Action Push_String_Extended,0x872 ; " " 0839 01cc | | Execute Vector,Catenate 083a 00d9 | | Load_Top At_Offset_1 083b 0227 | ' | Execute Access,All_Reference 083c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 083d 0227 | ' | Execute Access,All_Reference 083e 01cc | | Execute Vector,Catenate 083f 0007 | | Action Break_Optional 0840 BODY_0828: 0840 00d8 | | Load_Top At_Offset_0 0841 e00f | | Load 0x0,0xf 0842 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0843 e5fa | | Load 0x2,-0x6 0844 7004 |p | Jump_Nonzero 0x849 0845 00d8 | | Load_Top At_Offset_0 0846 e603 | | Load 0x3,0x3 0847 e00f | | Load 0x0,0xf 0848 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0849 4501 |E | Exit_Suprogram New_Top_Offset 0x1 084a ; -------------------------------------------------------------------------------------- 084a ; STRING TABLE 084a ; -------------------------------------------------------------------------------------- 084a 00a4 | | .STRTAB 0x00a4->0x089c ; "NIL" 084b 00a5 | | .STRTAB 0x00a5->0x089d ; "NEW_NAME" 084c 00ab | | .STRTAB 0x00ab->0x08a1 ; "NIL" 084d 00ac | | .STRTAB 0x00ac->0x08a3 ; "ON_NODE" 084e 00b1 | | .STRTAB 0x00b1->0x08a6 ; "DIRECT" 084f 00b5 | | .STRTAB 0x00b5->0x08a9 ; "DEVICE" 0850 00b9 | | .STRTAB 0x00b9->0x08ac ; "TELNET" 0851 00bd | | .STRTAB 0x00bd->0x08af ; "SOCKET" 0852 00c1 | | .STRTAB 0x00c1->0x08b2 ; "FILE" 0853 00c3 | | .STRTAB 0x00c3->0x08b4 ; "WORKSTATION" 0854 00cc | | .STRTAB 0x00cc->0x08ba ; "PATH" 0855 00ce | | .STRTAB 0x00ce->0x08bc ; "SUFFIX" 0856 00d2 | | .STRTAB 0x00d2->0x08bf ; "LASER_COMM" 0857 00da | | .STRTAB 0x00da->0x08c4 ; "REVERSE_OUTPUT_PAGES" 0858 00ec | | .STRTAB 0x00ec->0x08ce ; "NIL" 0859 00ed | | .STRTAB 0x00ed->0x08cf ; "DIRECT_CONNECTION" 085a 00fc | | .STRTAB 0x00fc->0x08d8 ; "TELNET_CONNECTION" 085b 010b | | .STRTAB 0x010b->0x08e0 ; "LOCAL_FILE" 085c 0113 | | .STRTAB 0x0113->0x08e5 ; "REMOTE_FILE" 085d 011c | | .STRTAB 0x011c->0x08eb ; "NIL" 085e 011d | | .STRTAB 0x011d->0x08ec ; "XON_XOFF" 085f 0123 | # | .STRTAB 0x0123->0x08f0 ; "RTS" 0860 0124 | $ | .STRTAB 0x0124->0x08f2 ; ".Remote_Access" 0861 0130 | 0 | .STRTAB 0x0130->0x08f9 ; "others => Unspecified" 0862 0143 | C | .STRTAB 0x0143->0x0903 ; "Laser_Comm | Reverse_Output_Pages => Boolean_Valued, others => unspecified" 0863 018b | | .STRTAB 0x018b->0x0928 ; "<ERRORS>" 0864 0191 | | .STRTAB 0x0191->0x092c ; "Holding" 0865 0196 | | .STRTAB 0x0196->0x0930 ; ">>> Set EFFORT_ONLY to false for these settings to take effect <<<" 0866 01d7 | | .STRTAB 0x01d7->0x0951 ; "The file " 0867 01de | | .STRTAB 0x01de->0x0956 ; " will not be created" 0868 01f0 | | .STRTAB 0x01f0->0x0960 ; " does not exist" 0869 01fd | | .STRTAB 0x01fd->0x0967 ; "The contents of the file " 086a 0214 | | .STRTAB 0x0214->0x0974 ; " are:" 086b 0217 | | .STRTAB 0x0217->0x0976 ; "=" 086c 0216 | | .STRTAB 0x0216->0x0977 ; "!!" 086d 0216 | | .STRTAB 0x0216->0x0978 ; "." 086e 0215 | | .STRTAB 0x0215->0x0978 ; "Laser" 086f 0218 | | .STRTAB 0x0218->0x097b ; "Other" 0870 021b | | .STRTAB 0x021b->0x097d ; "Reversed => True" 0871 0229 | ) | .STRTAB 0x0229->0x0985 ; "Reversed => False" 0872 0238 | 8 | .STRTAB 0x0238->0x098e ; " " 0873 0237 | 7 | .STRTAB 0x0237->0x098e ; " is not defined on the server" 0874 0252 | R | .STRTAB 0x0252->0x099d ; ", Laser_Comm" 0875 025c | \ | .STRTAB 0x025c->0x09a3 ; "Laser_Comm" 0876 0264 | d | .STRTAB 0x0264->0x09a8 ; " is not a proper protocol" 0877 027b | { | .STRTAB 0x027b->0x09b4 ; "_" 0878 027a | z | .STRTAB 0x027a->0x09b5 ; "Creating a file " 0879 0288 | | .STRTAB 0x0288->0x09bd ; " containing -> " 087a 0297 | | .STRTAB 0x0297->0x09c5 ; " nl " 087b 0299 | | .STRTAB 0x0299->0x09c7 ; "*** Cound not create the file " 087c 02b5 | | .STRTAB 0x02b5->0x09d6 ; "FTP" 087d 02b6 | | .STRTAB 0x02b6->0x09d8 ; "Host => " 087e 02bc | | .STRTAB 0x02bc->0x09dc ; ", Socket => (" 087f 02c7 | | .STRTAB 0x02c7->0x09e2 ; ")" 0880 02c6 | | .STRTAB 0x02c6->0x09e3 ; "Xon_Xoff" 0881 02cc | | .STRTAB 0x02cc->0x09e7 ; "Setting up " 0882 02d5 | | .STRTAB 0x02d5->0x09ec ; " Class -> " 0883 02e0 | | .STRTAB 0x02e0->0x09f3 ; " Device -> " 0884 02eb | | .STRTAB 0x02eb->0x09f9 ; " Options -> " 0885 02f6 | | .STRTAB 0x02f6->0x0a00 ; "---" 0886 02f7 | | .STRTAB 0x02f7->0x0a01 ; "Disabling device: " 0887 0307 | | .STRTAB 0x0307->0x0a0a ; "Deleting existing device: " 0888 031f | | .STRTAB 0x031f->0x0a17 ; "Creating class: " 0889 032d | - | .STRTAB 0x032d->0x0a1f ; "Creating device: " 088a 033c | < | .STRTAB 0x033c->0x0a28 ; "Registering " 088b 0346 | F | .STRTAB 0x0346->0x0a2e ; " with " 088c 034a | J | .STRTAB 0x034a->0x0a31 ; "Enabling device. See error log if there are errors for more information" 088d 0390 | | .STRTAB 0x0390->0x0a55 ; "Illegal format: " 088e 039e | | .STRTAB 0x039e->0x0a5d ; " " 088f 03a1 | | .STRTAB 0x03a1->0x0a5f ; "Illegal item in line: " 0890 03b5 | | .STRTAB 0x03b5->0x0a6a ; "--" 0891 03b5 | | .STRTAB 0x03b5->0x0a6b ; "The parentheses in the file " 0892 03cf | | .STRTAB 0x03cf->0x0a79 ; " do not match" 0893 03da | | .STRTAB 0x03da->0x0a80 ; " is not a defined printer" 0894 03f1 | | .STRTAB 0x03f1->0x0a8c ; " In line: " 0895 03fb | | .STRTAB 0x03fb->0x0a92 ; "Terminal_" 0896 0402 | | .STRTAB 0x0402->0x0a97 ; " is not a proper device name" 0897 041c | | .STRTAB 0x041c->0x0aa5 ; "The current options do not define a device" 0898 0444 | D | .STRTAB 0x0444->0x0aba ; " is located on " 0899 0451 | Q | .STRTAB 0x0451->0x0ac1 ; "*" 089a 0450 | P | .STRTAB 0x0450->0x0ac2 ; "others " 089b 0455 | U | .STREND 0x0455->0x0ac5 089c 4e49 4c4e |NILN| .STRTAB_STRINGS 0ac6 0000 0000 | | .XXX[0x2] 0ac8 ; -------------------------------------------------------------------------------------- 0ac8 ; Debug Table 0ac8 ; -------------------------------------------------------------------------------------- 0ac8 0004 0002 | | .DEBUG4 0x0004,0x0002,0x06d6,0x0000,0x0001,0x0000 0ace 0000 0000 | | .BLANK 0000[0x46] 0b14 0404 0070 | p| .XXX[0x2] 0b16 0000 0000 | | .BLANK 0000[0x8] 0b1e 005a 3f60 | Z?`| .XXX[0x24] 0b20 000a fa1c | | 0b22 0000 009f | | 0b24 5580 0000 |U | 0b26 0016 9e10 | | 0b28 0198 0044 | D| 0b2a 18c1 3c00 | < | 0b2c 0000 0000 | | 0b2e 0061 805a | a Z| 0b30 ce20 1691 | | 0b32 c000 11a4 | | 0b34 2000 0000 | | 0b36 0000 169c | | 0b38 2800 02d2 |( | 0b3a 3800 0000 |8 | 0b3c 20c6 01e0 | | 0b3e 1694 e800 | | 0b40 0001 6800 | h | 0b42 0000 0000 | | .BLANK 0000[0x4] 0b46 16a3 a800 | | .XXX[0xf] 0b48 02d2 3800 | 8 | 0b4a 0000 26ce | & | 0b4c e016 af38 | 8| 0b4e 0000 008c | | 0b50 1480 5abc | Z | 0b52 e017 3db0 | = | 0b54 0860 | ` | 0b55 0000 0000 | | .BLANK 0000[0x7] 0b5c 02d4 f800 | | .XXX[0x10] 0b5e 5d04 3e00 |] > | 0b60 2b5d c000 |+] | 0b62 0000 0b53 | S| 0b64 e002 d4b2 | | 0b66 0000 402e | @.| 0b68 ce20 0b57 | W| 0b6a 9e19 1800 | | 0b6c 0000 0000 | | .BLANK 0000[0x5] 0b71 16b9 b000 | | .XXX[0xa] 0b73 0000 0000 | | 0b75 0000 0b5d | ]| 0b77 d800 0000 | | 0b79 0000 0002 | | 0b7b 0000 0000 | | .BLANK 0000[0x85]