|
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_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0ab8 | | .CONST 0x0ab8 ; 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 0850 | P| Action Push_String_Extended,0x850 ; ".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 e001 | | Load 0x0,0x1
0026 180f | | Execute Package,Field_Execute,Field_Number 0xf
0027 00e9 | | Load_Encached String_Cache
0028 02a0 | | Declare_Subprogram Null_Subprogram
0029 4818 |H | Short_Literal 0x18
002a 03d3 | | Declare_Type Access,Defined,Accesses_Protected
002b 00d8 | | Load_Top At_Offset_0
002c 0007 | | Action Break_Optional
002d 00d9 | | Load_Top At_Offset_1
002e 00da | | Load_Top At_Offset_2
002f 00db | | Load_Top At_Offset_3
0030 02a0 | | Declare_Subprogram Null_Subprogram
0031 4803 |H | Short_Literal 0x3
0032 032d | - | Declare_Type Record,Defined
0033 00d8 | | Load_Top At_Offset_0
0034 02a0 | | Declare_Subprogram Null_Subprogram
0035 4818 |H | Short_Literal 0x18
0036 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0037 e002 | | Load 0x0,0x2
0038 e003 | | Load 0x0,0x3
0039 4864 |Hd | Short_Literal 0x64
003a 00db | | Load_Top At_Offset_3
003b 4801 |H | Short_Literal 0x1
003c e004 | | Load 0x0,0x4
003d 0387 | | Declare_Variable Package
003e 00d8 | | Load_Top At_Offset_0
003f 020f | | Execute Module,Activate
0040 00d8 | | Load_Top At_Offset_0
0041 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0042 4800 |H | Short_Literal 0x0
0043 4801 |H | Short_Literal 0x1
0044 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call
0046 03fd | | Declare_Type Discrete,Defined
0047 e005 | | Load 0x0,0x5
0048 e006 | | Load 0x0,0x6
0049 00da | | Load_Top At_Offset_2
004a 4800 |H | Short_Literal 0x0
004b 4801 |H | Short_Literal 0x1
004c 4801 |H | Short_Literal 0x1
004d 0092 0851 | Q| Action Push_String_Extended,0x851 ; "others => Unspecified"
004f 00ea | | Load_Encached Null_String_Cache
0050 00ea | | Load_Encached Null_String_Cache
0051 4801 |H | Short_Literal 0x1
0052 4801 |H | Short_Literal 0x1
0053 e007 | | Load 0x0,0x7
0054 0387 | | Declare_Variable Package
0055 00d8 | | Load_Top At_Offset_0
0056 020f | | Execute Module,Activate
0057 4800 |H | Short_Literal 0x0
0058 480b |H | Short_Literal 0xb
0059 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
005b 03fd | | Declare_Type Discrete,Defined
005c e008 | | Load 0x0,0x8
005d e009 | | Load 0x0,0x9
005e 00da | | Load_Top At_Offset_2
005f 4800 |H | Short_Literal 0x0
0060 4801 |H | Short_Literal 0x1
0061 480b |H | Short_Literal 0xb
0062 0092 0852 | R| Action Push_String_Extended,0x852 ; "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 e007 | | Load 0x0,0x7
0069 0387 | | Declare_Variable Package
006a 00d8 | | Load_Top At_Offset_0
006b 020f | | Execute Module,Activate
006c 4800 |H | Short_Literal 0x0
006d 4804 |H | Short_Literal 0x4
006e 029f 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 e00a | | Load 0x0,0xa
0077 e00b | | Load 0x0,0xb
0078 00da | | Load_Top At_Offset_2
0079 4800 |H | Short_Literal 0x0
007a 4800 |H | Short_Literal 0x0
007b 4801 |H | Short_Literal 0x1
007c e40d | | Load 0x2,0xd
007d 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
007e 0387 | | Declare_Variable Package
007f 00d8 | | Load_Top At_Offset_0
0080 020f | | Execute Module,Activate
0081 029f 016b | k| Declare_Subprogram INIT_0168,For_Call
0083 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call
0085 029f 01f3 | | Declare_Subprogram INIT_01f0,For_Call
0087 BODY_0018:
0087 e5fa | | Load 0x2,-0x6
0088 7018 |p | Jump_Nonzero 0xa1
0089 e00c | | Load 0x0,0xc
008a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008b e5fb | | Load 0x2,-0x5
008c 8413 | | Call 0x2,0x13
008d 7008 |p | Jump_Nonzero 0x96
008e 0092 0853 | S| Action Push_String_Extended,0x853 ; "<ERRORS>"
0090 00ea | | Load_Encached Null_String_Cache
0091 4800 |H | Short_Literal 0x0
0092 4801 |H | Short_Literal 0x1
0093 e5fb | | Load 0x2,-0x5
0094 e00d | | Load 0x0,0xd
0095 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0096 0092 0854 | T| Action Push_String_Extended,0x854 ; "Holding"
0098 e00c | | Load 0x0,0xc
0099 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
009a 680d |h | Jump_Zero 0xa8
009b 00ea | | Load_Encached Null_String_Cache
009c 0092 0854 | T| Action Push_String_Extended,0x854 ; "Holding"
009e e00c | | Load 0x0,0xc
009f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00a0 7807 |x | Jump 0xa8
00a1 0092 0855 | U| Action Push_String_Extended,0x855 ; ">>> Set EFFORT_ONLY to false for these settings to take effect <<<"
00a3 e00e | | Load 0x0,0xe
00a4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00a5 4801 |H | Short_Literal 0x1
00a6 e00e | | Load 0x0,0xe
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 0856 | V| Action Push_String_Extended,0x856 ; "The file "
00ba e5fc | | Load 0x2,-0x4
00bb 01cc | | Execute Vector,Catenate
00bc 0092 0857 | W| Action Push_String_Extended,0x857 ; " will not be created"
00be 01cc | | Execute Vector,Catenate
00bf e00e | | Load 0x0,0xe
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 7806 |x | Jump 0xd4 ; case 0x1
00ce 7809 |x | Jump 0xd8 ; case 0x2
00cf 780d |x | Jump 0xdd ; case 0x3
00d0 7810 |x | Jump 0xe1 ; case 0x4
00d1 7811 |x | Jump 0xe3 ; case 0x5
00d2 7812 |x | Jump 0xe5 ; case 0x6
00d3 7815 |x | Jump 0xe9 ; case 0x7
00d4 00da | | Load_Top At_Offset_2
00d5 0091 083a | :| Action Push_String_Extended_Indexed,0x83a ; "NIL"
00d7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00d8 00db | | Load_Top At_Offset_3
00d9 00db | | Load_Top At_Offset_3
00da 00e0 | | Load_Encached Standard_Cache
00db 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00dd 00da | | Load_Top At_Offset_2
00de 00e0 | | Load_Encached Standard_Cache
00df 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00e0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00e1 00db | | Load_Top At_Offset_3
00e2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00e3 00db | | Load_Top At_Offset_3
00e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00e5 e40a | | Load 0x2,0xa
00e6 00dc | | Load_Top At_Offset_4
00e7 0267 | g | Execute Discrete,Predecessor
00e8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00e9 e40a | | Load 0x2,0xa
00ea 00dc | | Load_Top At_Offset_4
00eb 0268 | h | Execute Discrete,Successor
00ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00ed 0000 0000 | | .XXX[0x3]
00ef 0000 | |
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 7806 |x | Jump 0xfc ; case 0x1
00f6 7809 |x | Jump 0x100 ; case 0x2
00f7 780d |x | Jump 0x105 ; case 0x3
00f8 7810 |x | Jump 0x109 ; case 0x4
00f9 7811 |x | Jump 0x10b ; case 0x5
00fa 7812 |x | Jump 0x10d ; case 0x6
00fb 7815 |x | Jump 0x111 ; case 0x7
00fc 00da | | Load_Top At_Offset_2
00fd 0091 083c | <| Action Push_String_Extended_Indexed,0x83c ; "NIL"
00ff 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0100 00db | | Load_Top At_Offset_3
0101 00db | | Load_Top At_Offset_3
0102 00e0 | | Load_Encached Standard_Cache
0103 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0104 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0105 00da | | Load_Top At_Offset_2
0106 00e0 | | Load_Encached Standard_Cache
0107 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0108 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0109 00db | | Load_Top At_Offset_3
010a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
010b 00db | | Load_Top At_Offset_3
010c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
010d e40c | | Load 0x2,0xc
010e 00dc | | Load_Top At_Offset_4
010f 0267 | g | Execute Discrete,Predecessor
0110 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0111 e40c | | Load 0x2,0xc
0112 00dc | | Load_Top At_Offset_4
0113 0268 | h | Execute Discrete,Successor
0114 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0115 0000 0000 | | .XXX[0x3]
0117 0000 | |
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 7806 |x | Jump 0x124 ; case 0x1
011e 7809 |x | Jump 0x128 ; case 0x2
011f 780d |x | Jump 0x12d ; case 0x3
0120 7810 |x | Jump 0x131 ; case 0x4
0121 7811 |x | Jump 0x133 ; case 0x5
0122 7812 |x | Jump 0x135 ; case 0x6
0123 7815 |x | Jump 0x139 ; case 0x7
0124 00da | | Load_Top At_Offset_2
0125 0091 0848 | H| Action Push_String_Extended_Indexed,0x848 ; "NIL"
0127 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0128 00db | | Load_Top At_Offset_3
0129 00db | | Load_Top At_Offset_3
012a 00e0 | | Load_Encached Standard_Cache
012b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
012c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
012d 00da | | Load_Top At_Offset_2
012e 00e0 | | Load_Encached Standard_Cache
012f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0130 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0131 00db | | Load_Top At_Offset_3
0132 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0133 00db | | Load_Top At_Offset_3
0134 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0135 e40e | | Load 0x2,0xe
0136 00dc | | Load_Top At_Offset_4
0137 0267 | g | Execute Discrete,Predecessor
0138 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0139 e40e | | Load 0x2,0xe
013a 00dc | | Load_Top At_Offset_4
013b 0268 | h | Execute Discrete,Successor
013c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
013d 0000 0000 | | .XXX[0x3]
013f 0000 | |
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 7806 |x | Jump 0x14c ; case 0x1
0146 7809 |x | Jump 0x150 ; case 0x2
0147 780d |x | Jump 0x155 ; case 0x3
0148 7810 |x | Jump 0x159 ; case 0x4
0149 7811 |x | Jump 0x15b ; case 0x5
014a 7812 |x | Jump 0x15d ; case 0x6
014b 7815 |x | Jump 0x161 ; case 0x7
014c 00da | | Load_Top At_Offset_2
014d 0091 084d | M| Action Push_String_Extended_Indexed,0x84d ; "NIL"
014f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0150 00db | | Load_Top At_Offset_3
0151 00db | | Load_Top At_Offset_3
0152 00e0 | | Load_Encached Standard_Cache
0153 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0154 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0155 00da | | Load_Top At_Offset_2
0156 00e0 | | Load_Encached Standard_Cache
0157 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0158 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0159 00db | | Load_Top At_Offset_3
015a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
015b 00db | | Load_Top At_Offset_3
015c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
015d e40f | | Load 0x2,0xf
015e 00dc | | Load_Top At_Offset_4
015f 0267 | g | Execute Discrete,Predecessor
0160 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0161 e40f | | Load 0x2,0xf
0162 00dc | | Load_Top At_Offset_4
0163 0268 | h | Execute Discrete,Successor
0164 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0165 0000 0000 | | .XXX[0x3]
0167 0000 | |
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 018c | | .CONST 0x018c ; Address of begin
0169 01a3 | | .CONST 0x01a3 ; Address of exception handler
016a 0010 | | .CONST 0x0010 ; Number of locals
016b INIT_0168:
016b e00e | | Load 0x0,0xe
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 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call
0172 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call
0174 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call
0176 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
0178 029f 02db | | Declare_Subprogram INIT_02d8,For_Call
017a 029f 030b | | Declare_Subprogram INIT_0308,For_Call
017c 029f 032b | +| Declare_Subprogram INIT_0328,For_Call
017e 029f 034b | K| Declare_Subprogram INIT_0348,For_Call
0180 029f 03bb | | Declare_Subprogram INIT_03b8,For_Call
0182 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call
0184 029f 042b | +| Declare_Subprogram INIT_0428,For_Call
0186 029f 04db | | Declare_Subprogram INIT_04d8,For_Call
0188 029f 050b | | Declare_Subprogram INIT_0508,For_Call
018a 029f 0563 | c| Declare_Subprogram INIT_0560,For_Call
018c BODY_0168:
018c e602 | | Load 0x3,0x2
018d 00ea | | Load_Encached Null_String_Cache
018e e7ff | | Load 0x3,-0x1
018f 4800 |H | Short_Literal 0x0
0190 e00e | | Load 0x0,0xe
0191 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0192 c602 | | Store 0x3,0x2
0193 00cf | | Action Mark_Auxiliary
0194 7804 |x | Jump 0x199
0195 e602 | | Load 0x3,0x2
0196 8610 | | Call 0x3,0x10
0197 860f | | Call 0x3,0xf
0198 00c9 | | Action Pop_Auxiliary_Loop
0199 e602 | | Load 0x3,0x2
019a e00e | | Load 0x0,0xe
019b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
019c 6ff8 |o | Jump_Zero 0x195
019d 00ce | | Action Pop_Auxiliary
019e e602 | | Load 0x3,0x2
019f e00e | | Load 0x0,0xe
01a0 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01a1 c602 | | Store 0x3,0x2
01a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01a3 TRAP_0168:
01a3 00d8 | | Load_Top At_Offset_0
01a4 0107 | | Execute Exception,Get_Name
01a5 4920 |I | Short_Literal 0x120
01a6 492f |I/ | Short_Literal 0x12f
01a7 0262 | b | Execute Discrete,In_Range
01a8 6807 |h | Jump_Zero 0x1b0
01a9 e7ff | | Load 0x3,-0x1
01aa 0092 0858 | X| Action Push_String_Extended,0x858 ; " does not exist"
01ac 01cc | | Execute Vector,Catenate
01ad e00e | | Load 0x0,0xe
01ae 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01af 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b0 00d8 | | Load_Top At_Offset_0
01b1 0107 | | Execute Exception,Get_Name
01b2 4950 |IP | Short_Literal 0x150
01b3 495f |I_ | Short_Literal 0x15f
01b4 0262 | b | Execute Discrete,In_Range
01b5 6801 |h | Jump_Zero 0x1b7
01b6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b7 0100 | | Execute Exception,Raise
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01cd | | .CONST 0x01cd ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0007 | | .CONST 0x0007 ; Number of locals
01bb INIT_01b8:
01bb e00e | | Load 0x0,0xe
01bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01bd 02c7 | | Declare_Variable Any
01be 00d8 | | Load_Top At_Offset_0
01bf 1c00 | | Execute_Immediate Run_Utility,0x0
01c0 e00e | | Load 0x0,0xe
01c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c2 02c7 | | Declare_Variable Any
01c3 00d8 | | Load_Top At_Offset_0
01c4 1c00 | | Execute_Immediate Run_Utility,0x0
01c5 029f 059b | | Declare_Subprogram INIT_0598,For_Call
01c7 029f 05db | | Declare_Subprogram INIT_05d8,For_Call
01c9 029f 0613 | | Declare_Subprogram INIT_0610,For_Call
01cb 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call
01cd BODY_01b8:
01cd e5fa | | Load 0x2,-0x6
01ce 7007 |p | Jump_Nonzero 0x1d6
01cf e603 | | Load 0x3,0x3
01d0 00ea | | Load_Encached Null_String_Cache
01d1 e7fe | | Load 0x3,-0x2
01d2 4801 |H | Short_Literal 0x1
01d3 e00e | | Load 0x0,0xe
01d4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01d5 c603 | | Store 0x3,0x3
01d6 00ea | | Load_Encached Null_String_Cache
01d7 e00e | | Load 0x0,0xe
01d8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01d9 0092 0859 | Y| Action Push_String_Extended,0x859 ; "The contents of the file "
01db e7fe | | Load 0x3,-0x2
01dc e00f | | Load 0x0,0xf
01dd 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01de 01cc | | Execute Vector,Catenate
01df 0092 085a | Z| Action Push_String_Extended,0x85a ; " are:"
01e1 01cc | | Execute Vector,Catenate
01e2 e00e | | Load 0x0,0xe
01e3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01e4 8607 | | Call 0x3,0x7
01e5 8606 | | Call 0x3,0x6
01e6 e5fa | | Load 0x2,-0x6
01e7 7004 |p | Jump_Nonzero 0x1ec
01e8 e603 | | Load 0x3,0x3
01e9 e00e | | Load 0x0,0xe
01ea 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01eb c603 | | Store 0x3,0x3
01ec 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01ed 0000 0000 | | .XXX[0x3]
01ef 0000 | |
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01fb | | .CONST 0x01fb ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0003 | | .CONST 0x0003 ; Number of locals
01f3 INIT_01f0:
01f3 e010 | | Load 0x0,0x10
01f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01f5 02c7 | | Declare_Variable Any
01f6 00d8 | | Load_Top At_Offset_0
01f7 1c00 | | Execute_Immediate Run_Utility,0x0
01f8 e010 | | Load 0x0,0x10
01f9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fb BODY_01f0:
01fb e010 | | Load 0x0,0x10
01fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fe 00da | | Load_Top At_Offset_2
01ff 0120 | | Execute Any,Is_Value
0200 6803 |h | Jump_Zero 0x204
0201 e010 | | Load 0x0,0x10
0202 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0203 7801 |x | Jump 0x205
0204 00da | | Load_Top At_Offset_2
0205 6012 |` | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
0206 e011 | | Load 0x0,0x11
0207 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0208 e012 | | Load 0x0,0x12
0209 1811 | | Execute Package,Field_Execute,Field_Number 0x11
020a e010 | | Load 0x0,0x10
020b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
020c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
020d e7ff | | Load 0x3,-0x1
020e e010 | | Load 0x0,0x10
020f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0210 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0211 c602 | | Store 0x3,0x2
0212 0059 | Y | Store_Top Discrete,At_Offset_1
0213 00d8 | | Load_Top At_Offset_0
0214 0f00 | | Execute_Immediate Equal,0x0
0215 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0216 0000 0000 | | .XXX[0x2]
0218 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
021c 0000 0000 | | .BLANK 0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022d | - | .CONST 0x022d ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0003 | | .CONST 0x0003 ; Number of locals
0223 INIT_0220:
0223 4801 |H | Short_Literal 0x1
0224 00db | | Load_Top At_Offset_3
0225 0092 085b | [| Action Push_String_Extended,0x85b ; "="
0227 e00f | | Load 0x0,0xf
0228 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0229 00e3 | | Load_Encached Natural_Cache
022a 03f1 | | Declare_Variable Discrete,With_Value
022b 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call
022d BODY_0220:
022d 00d9 | | Load_Top At_Offset_1
022e 0c01 | | Execute_Immediate Greater_Equal,0x1
022f 6801 |h | Jump_Zero 0x231
0230 8803 | | Call 0x4,0x3
0231 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0232 0000 0000 | | .BLANK 0000[0x6]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023d | = | .CONST 0x023d ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0002 | | .CONST 0x0002 ; Number of locals
023b INIT_0238:
023b e404 | | Load 0x2,0x4
023c 0007 | | Action Break_Optional
023d BODY_0238:
023d 4801 |H | Short_Literal 0x1
023e e9ff | | Load 0x4,-0x1
023f 01db | | Execute Vector,Length
0240 00d8 | | Load_Top At_Offset_0
0241 00e2 | | Load_Encached Integer_Cache
0242 0260 | ` | Execute Discrete,In_Type
0243 7001 |p | Jump_Nonzero 0x245
0244 0801 | | Execute_Immediate Raise,0x1
0245 e404 | | Load 0x2,0x4
0246 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
0247 0039 | 9 | Store_Top Access,At_Offset_1
0248 00db | | Load_Top At_Offset_3
0249 00d9 | | Load_Top At_Offset_1
024a 0228 | ( | Execute Access,All_Write
024b 00d8 | | Load_Top At_Offset_0
024c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
024d 0000 0000 | | .XXX[0x3]
024f 0000 | |
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0261 | a | .CONST 0x0261 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0003 | | .CONST 0x0003 ; Number of locals
0253 INIT_0250:
0253 480a |H | Short_Literal 0xa
0254 e9fe | | Load 0x4,-0x2
0255 e40d | | Load 0x2,0xd
0256 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0257 4800 |H | Short_Literal 0x0
0258 480a |H | Short_Literal 0xa
0259 e9fe | | Load 0x4,-0x2
025a e40d | | Load 0x2,0xd
025b 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
025c 0279 | y | Execute Discrete,And
025d 00e1 | | Load_Encached Boolean_Cache
025e 03f1 | | Declare_Variable Discrete,With_Value
025f e407 | | Load 0x2,0x7
0260 0007 | | Action Break_Optional
0261 BODY_0250:
0261 e407 | | Load 0x2,0x7
0262 03bc | | Declare_Variable Access,By_Allocation
0263 0039 | 9 | Store_Top Access,At_Offset_1
0264 e9fc | | Load 0x4,-0x4
0265 01db | | Execute Vector,Length
0266 7006 |p | Jump_Nonzero 0x26d
0267 e9ff | | Load 0x4,-0x1
0268 8604 | | Call 0x3,0x4
0269 00d9 | | Load_Top At_Offset_1
026a 0227 | ' | Execute Access,All_Reference
026b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
026c 780d |x | Jump 0x27a
026d 0092 085c | \| Action Push_String_Extended,0x85c ; "!!"
026f e9fc | | Load 0x4,-0x4
0270 01cc | | Execute Vector,Catenate
0271 0092 085d | ]| Action Push_String_Extended,0x85d ; "."
0273 01cc | | Execute Vector,Catenate
0274 e9ff | | Load 0x4,-0x1
0275 01cc | | Execute Vector,Catenate
0276 8604 | | Call 0x3,0x4
0277 00d9 | | Load_Top At_Offset_1
0278 0227 | ' | Execute Access,All_Reference
0279 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
027a 00d9 | | Load_Top At_Offset_1
027b 6807 |h | Jump_Zero 0x283
027c 0092 085e | ^| Action Push_String_Extended,0x85e ; "Laser"
027e 8604 | | Call 0x3,0x4
027f 00d9 | | Load_Top At_Offset_1
0280 0227 | ' | Execute Access,All_Reference
0281 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0282 7806 |x | Jump 0x289
0283 0092 085f | _| Action Push_String_Extended,0x85f ; "Other"
0285 8604 | | Call 0x3,0x4
0286 00d9 | | Load_Top At_Offset_1
0287 0227 | ' | Execute Access,All_Reference
0288 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0289 00d9 | | Load_Top At_Offset_1
028a 6819 |h | Jump_Zero 0x2a4
028b 480b |H | Short_Literal 0xb
028c e9fe | | Load 0x4,-0x2
028d e40d | | Load 0x2,0xd
028e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
028f 6814 |h | Jump_Zero 0x2a4
0290 4800 |H | Short_Literal 0x0
0291 480b |H | Short_Literal 0xb
0292 e9fe | | Load 0x4,-0x2
0293 e40d | | Load 0x2,0xd
0294 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0295 6807 |h | Jump_Zero 0x29d
0296 0092 0860 | `| Action Push_String_Extended,0x860 ; "Reversed => True"
0298 8604 | | Call 0x3,0x4
0299 00d9 | | Load_Top At_Offset_1
029a 0227 | ' | Execute Access,All_Reference
029b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
029c 780d |x | Jump 0x2aa
029d 0092 0861 | a| Action Push_String_Extended,0x861 ; "Reversed => False"
029f 8604 | | Call 0x3,0x4
02a0 00d9 | | Load_Top At_Offset_1
02a1 0227 | ' | Execute Access,All_Reference
02a2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02a3 7806 |x | Jump 0x2aa
02a4 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
02a6 8604 | | Call 0x3,0x4
02a7 00d9 | | Load_Top At_Offset_1
02a8 0227 | ' | Execute Access,All_Reference
02a9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02aa e409 | | Load 0x2,0x9
02ab 4800 |H | Short_Literal 0x0
02ac 00da | | Load_Top At_Offset_2
02ad e9ff | | Load 0x4,-0x1
02ae e408 | | Load 0x2,0x8
02af 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02b0 c409 | | Store 0x2,0x9
02b1 e405 | | Load 0x2,0x5
02b2 7003 |p | Jump_Nonzero 0x2b6
02b3 e9ff | | Load 0x4,-0x1
02b4 8604 | | Call 0x3,0x4
02b5 a405 | | Store_Unchecked 0x2,0x5
02b6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02b7 0000 | | .XXX[0x1]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 02c6 | | .CONST 0x02c6 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc 01db | | Execute Vector,Length
02bd 7002 |p | Jump_Nonzero 0x2c0
02be 4801 |H | Short_Literal 0x1
02bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c0 00da | | Load_Top At_Offset_2
02c1 e013 | | Load 0x0,0x13
02c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c3 e403 | | Load 0x2,0x3
02c4 01df | | Execute Vector,Equal
02c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c6 TRAP_02b8:
02c6 e013 | | Load 0x0,0x13
02c7 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02c8 010f | | Execute Exception,Equal
02c9 6808 |h | Jump_Zero 0x2d2
02ca 00db | | Load_Top At_Offset_3
02cb 0092 0863 | c| Action Push_String_Extended,0x863 ; " is not defined on the server"
02cd 01cc | | Execute Vector,Catenate
02ce e00e | | Load 0x0,0xe
02cf 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02d0 e014 | | Load 0x0,0x14
02d1 0257 | W | Execute Discrete,Raise
02d2 0100 | | Execute Exception,Raise
02d3 0000 0000 | | .BLANK 0000[0x5]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db 4802 |H | Short_Literal 0x2
02dc 00db | | Load_Top At_Offset_3
02dd e40d | | Load 0x2,0xd
02de 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02df 4803 |H | Short_Literal 0x3
02e0 e9ff | | Load 0x4,-0x1
02e1 e40d | | Load 0x2,0xd
02e2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02e3 0279 | y | Execute Discrete,And
02e4 6802 |h | Jump_Zero 0x2e7
02e5 4801 |H | Short_Literal 0x1
02e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02e7 4804 |H | Short_Literal 0x4
02e8 00db | | Load_Top At_Offset_3
02e9 e40d | | Load 0x2,0xd
02ea 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02eb 4803 |H | Short_Literal 0x3
02ec e9ff | | Load 0x4,-0x1
02ed e40d | | Load 0x2,0xd
02ee 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02ef 0279 | y | Execute Discrete,And
02f0 6802 |h | Jump_Zero 0x2f3
02f1 4802 |H | Short_Literal 0x2
02f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f3 4806 |H | Short_Literal 0x6
02f4 00db | | Load_Top At_Offset_3
02f5 e40d | | Load 0x2,0xd
02f6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02f7 6802 |h | Jump_Zero 0x2fa
02f8 4803 |H | Short_Literal 0x3
02f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02fa 4807 |H | Short_Literal 0x7
02fb 00db | | Load_Top At_Offset_3
02fc e40d | | Load 0x2,0xd
02fd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02fe 4808 |H | Short_Literal 0x8
02ff e9ff | | Load 0x4,-0x1
0300 e40d | | Load 0x2,0xd
0301 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0302 0279 | y | Execute Discrete,And
0303 6802 |h | Jump_Zero 0x306
0304 4804 |H | Short_Literal 0x4
0305 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0306 4800 |H | Short_Literal 0x0
0307 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030c | | .CONST 0x030c ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0002 | | .CONST 0x0002 ; Number of locals
030b INIT_0308:
030b 00e1 | | Load_Encached Boolean_Cache
030c BODY_0308:
030c 480a |H | Short_Literal 0xa
030d e9ff | | Load 0x4,-0x1
030e e40d | | Load 0x2,0xd
030f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0310 6810 |h | Jump_Zero 0x321
0311 4800 |H | Short_Literal 0x0
0312 480a |H | Short_Literal 0xa
0313 e9ff | | Load 0x4,-0x1
0314 e40d | | Load 0x2,0xd
0315 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0316 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0317 00d8 | | Load_Top At_Offset_0
0318 6808 |h | Jump_Zero 0x321
0319 e9fe | | Load 0x4,-0x2
031a 6803 |h | Jump_Zero 0x31e
031b 0092 0864 | d| Action Push_String_Extended,0x864 ; ", Laser_Comm"
031d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
031e 0092 0865 | e| Action Push_String_Extended,0x865 ; "Laser_Comm"
0320 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0321 00ea | | Load_Encached Null_String_Cache
0322 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0323 0000 0000 | | .BLANK 0000[0x5]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0333 | 3 | .CONST 0x0333 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0002 | | .CONST 0x0002 ; Number of locals
032b INIT_0328:
032b 4800 |H | Short_Literal 0x0
032c 4801 |H | Short_Literal 0x1
032d 4802 |H | Short_Literal 0x2
032e e9ff | | Load 0x4,-0x1
032f e410 | | Load 0x2,0x10
0330 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0331 e40f | | Load 0x2,0xf
0332 03f1 | | Declare_Variable Discrete,With_Value
0333 BODY_0328:
0333 00d8 | | Load_Top At_Offset_0
0334 6806 |h | Jump_Zero 0x33b
0335 00ea | | Load_Encached Null_String_Cache
0336 4802 |H | Short_Literal 0x2
0337 e9ff | | Load 0x4,-0x1
0338 e40d | | Load 0x2,0xd
0339 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
033a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033b 00ea | | Load_Encached Null_String_Cache
033c 4802 |H | Short_Literal 0x2
033d e9ff | | Load 0x4,-0x1
033e e40d | | Load 0x2,0xd
033f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0340 0092 0866 | f| Action Push_String_Extended,0x866 ; " is not a proper protocol"
0342 01cc | | Execute Vector,Catenate
0343 e00e | | Load 0x0,0xe
0344 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0345 e014 | | Load 0x0,0x14
0346 0257 | W | Execute Discrete,Raise
0347 0000 | | .XXX[0x1]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 036b | k | .CONST 0x036b ; Address of begin
0349 03a4 | | .CONST 0x03a4 ; Address of exception handler
034a 0006 | | .CONST 0x0006 ; Number of locals
034b INIT_0348:
034b 00ea | | Load_Encached Null_String_Cache
034c 4807 |H | Short_Literal 0x7
034d e9fe | | Load 0x4,-0x2
034e e40d | | Load 0x2,0xd
034f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0350 00ea | | Load_Encached Null_String_Cache
0351 4808 |H | Short_Literal 0x8
0352 e9fe | | Load 0x4,-0x2
0353 e40d | | Load 0x2,0xd
0354 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0355 00ea | | Load_Encached Null_String_Cache
0356 4809 |H | Short_Literal 0x9
0357 e9fe | | Load 0x4,-0x2
0358 e40d | | Load 0x2,0xd
0359 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
035a e5fb | | Load 0x2,-0x5
035b 0092 085d | ]| Action Push_String_Extended,0x85d ; "."
035d 01cc | | Execute Vector,Catenate
035e 00db | | Load_Top At_Offset_3
035f 01cc | | Execute Vector,Catenate
0360 0092 0867 | g| Action Push_String_Extended,0x867 ; "_"
0362 01cc | | Execute Vector,Catenate
0363 e9ff | | Load 0x4,-0x1
0364 01cc | | Execute Vector,Catenate
0365 0007 | | Action Break_Optional
0366 e00e | | Load 0x0,0xe
0367 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0368 02c7 | | Declare_Variable Any
0369 00d8 | | Load_Top At_Offset_0
036a 1c00 | | Execute_Immediate Run_Utility,0x0
036b BODY_0348:
036b 0092 0868 | h| Action Push_String_Extended,0x868 ; "Creating a file "
036d 00da | | Load_Top At_Offset_2
036e 01cc | | Execute Vector,Catenate
036f e00e | | Load 0x0,0xe
0370 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0371 0092 0869 | i| Action Push_String_Extended,0x869 ; " containing -> "
0373 e802 | | Load 0x4,0x2
0374 01cc | | Execute Vector,Catenate
0375 0092 086a | j| Action Push_String_Extended,0x86a ; " nl "
0377 01cc | | Execute Vector,Catenate
0378 e803 | | Load 0x4,0x3
0379 01cc | | Execute Vector,Catenate
037a 0092 086a | j| Action Push_String_Extended,0x86a ; " nl "
037c 01cc | | Execute Vector,Catenate
037d 00db | | Load_Top At_Offset_3
037e 01cc | | Execute Vector,Catenate
037f 0092 086a | j| Action Push_String_Extended,0x86a ; " nl "
0381 01cc | | Execute Vector,Catenate
0382 e402 | | Load 0x2,0x2
0383 01cc | | Execute Vector,Catenate
0384 e00e | | Load 0x0,0xe
0385 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0386 e5fa | | Load 0x2,-0x6
0387 701b |p | Jump_Nonzero 0x3a3
0388 00d8 | | Load_Top At_Offset_0
0389 00ea | | Load_Encached Null_String_Cache
038a 00db | | Load_Top At_Offset_3
038b 4801 |H | Short_Literal 0x1
038c e00e | | Load 0x0,0xe
038d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
038e c806 | | Store 0x4,0x6
038f e802 | | Load 0x4,0x2
0390 00d9 | | Load_Top At_Offset_1
0391 e00e | | Load 0x0,0xe
0392 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0393 00db | | Load_Top At_Offset_3
0394 00d9 | | Load_Top At_Offset_1
0395 e00e | | Load 0x0,0xe
0396 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0397 00da | | Load_Top At_Offset_2
0398 00d9 | | Load_Top At_Offset_1
0399 e00e | | Load 0x0,0xe
039a 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
039b e402 | | Load 0x2,0x2
039c 00d9 | | Load_Top At_Offset_1
039d e00e | | Load 0x0,0xe
039e 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
039f 00d8 | | Load_Top At_Offset_0
03a0 e00e | | Load 0x0,0xe
03a1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03a2 c806 | | Store 0x4,0x6
03a3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03a4 TRAP_0348:
03a4 00d8 | | Load_Top At_Offset_0
03a5 0107 | | Execute Exception,Get_Name
03a6 4920 |I | Short_Literal 0x120
03a7 492f |I/ | Short_Literal 0x12f
03a8 0262 | b | Execute Discrete,In_Range
03a9 6808 |h | Jump_Zero 0x3b2
03aa 0092 086b | k| Action Push_String_Extended,0x86b ; "*** Cound not create the file "
03ac 00db | | Load_Top At_Offset_3
03ad 01cc | | Execute Vector,Catenate
03ae e00e | | Load 0x0,0xe
03af 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03b0 e014 | | Load 0x0,0x14
03b1 0257 | W | Execute Discrete,Raise
03b2 0100 | | Execute Exception,Raise
03b3 0000 0000 | | .BLANK 0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bd | | .CONST 0x03bd ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0002 | | .CONST 0x0002 ; Number of locals
03bb INIT_03b8:
03bb 029f 067b | {| Declare_Subprogram INIT_0678,For_Call
03bd BODY_03b8:
03bd e9fd | | Load 0x4,-0x3
03be 4604 |F | Jump_Case 0x5
03bf 781c |x | Jump 0x3dc ; case 0x0
03c0 7813 |x | Jump 0x3d4 ; case 0x1
03c1 7812 |x | Jump 0x3d4 ; case 0x2
03c2 7813 |x | Jump 0x3d6 ; case 0x3
03c3 7800 |x | Jump 0x3c4 ; case 0x4
03c4 e5fb | | Load 0x2,-0x5
03c5 0092 085d | ]| Action Push_String_Extended,0x85d ; "."
03c7 01cc | | Execute Vector,Catenate
03c8 00ea | | Load_Encached Null_String_Cache
03c9 4807 |H | Short_Literal 0x7
03ca e9fe | | Load 0x4,-0x2
03cb e40d | | Load 0x2,0xd
03cc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
03cd 01cc | | Execute Vector,Catenate
03ce 0092 0867 | g| Action Push_String_Extended,0x867 ; "_"
03d0 01cc | | Execute Vector,Catenate
03d1 e9ff | | Load 0x4,-0x1
03d2 01cc | | Execute Vector,Catenate
03d3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03d4 8802 | | Call 0x4,0x2
03d5 7808 |x | Jump 0x3de
03d6 00ea | | Load_Encached Null_String_Cache
03d7 4806 |H | Short_Literal 0x6
03d8 e9fe | | Load 0x4,-0x2
03d9 e40d | | Load 0x2,0xd
03da 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
03db 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03dc e014 | | Load 0x0,0x14
03dd 0257 | W | Execute Discrete,Raise
03de 0831 | 1 | Execute_Immediate Raise,0x31
03df 0000 | | .XXX[0x1]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00db | | Load_Top At_Offset_3
03e4 4604 |F | Jump_Case 0x5
03e5 783c |x< | Jump 0x422 ; case 0x0
03e6 7806 |x | Jump 0x3ed ; case 0x1
03e7 780c |x | Jump 0x3f4 ; case 0x2
03e8 7836 |x6 | Jump 0x41f ; case 0x3
03e9 7800 |x | Jump 0x3ea ; case 0x4
03ea 0092 086c | l| Action Push_String_Extended,0x86c ; "FTP"
03ec 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ed 00da | | Load_Top At_Offset_2
03ee 8609 | | Call 0x3,0x9
03ef 4801 |H | Short_Literal 0x1
03f0 e9ff | | Load 0x4,-0x1
03f1 8608 | | Call 0x3,0x8
03f2 01cc | | Execute Vector,Catenate
03f3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03f4 4805 |H | Short_Literal 0x5
03f5 00db | | Load_Top At_Offset_3
03f6 e40d | | Load 0x2,0xd
03f7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03f8 6819 |h | Jump_Zero 0x412
03f9 0092 086d | m| Action Push_String_Extended,0x86d ; "Host => "
03fb 00ea | | Load_Encached Null_String_Cache
03fc 4804 |H | Short_Literal 0x4
03fd e9ff | | Load 0x4,-0x1
03fe e40d | | Load 0x2,0xd
03ff 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0400 01cc | | Execute Vector,Catenate
0401 0092 086e | n| Action Push_String_Extended,0x86e ; ", Socket => ("
0403 01cc | | Execute Vector,Catenate
0404 00ea | | Load_Encached Null_String_Cache
0405 4805 |H | Short_Literal 0x5
0406 e9ff | | Load 0x4,-0x1
0407 e40d | | Load 0x2,0xd
0408 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0409 01cc | | Execute Vector,Catenate
040a 0092 086f | o| Action Push_String_Extended,0x86f ; ")"
040c 01cc | | Execute Vector,Catenate
040d 4801 |H | Short_Literal 0x1
040e e9ff | | Load 0x4,-0x1
040f 8608 | | Call 0x3,0x8
0410 01cc | | Execute Vector,Catenate
0411 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0412 0092 086d | m| Action Push_String_Extended,0x86d ; "Host => "
0414 00ea | | Load_Encached Null_String_Cache
0415 4804 |H | Short_Literal 0x4
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 4801 |H | Short_Literal 0x1
041b e9ff | | Load 0x4,-0x1
041c 8608 | | Call 0x3,0x8
041d 01cc | | Execute Vector,Catenate
041e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
041f 0092 0870 | p| Action Push_String_Extended,0x870 ; "Xon_Xoff"
0421 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0422 e014 | | Load 0x0,0x14
0423 0257 | W | Execute Discrete,Raise
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0436 | 6 | .CONST 0x0436 ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0005 | | .CONST 0x0005 ; Number of locals
042b INIT_0428:
042b e9fd | | Load 0x4,-0x3
042c e9fe | | Load 0x4,-0x2
042d e9ff | | Load 0x4,-0x1
042e 860b | | Call 0x3,0xb
042f e9fd | | Load 0x4,-0x3
0430 e9fe | | Load 0x4,-0x2
0431 860c | | Call 0x3,0xc
0432 029f 069b | | Declare_Subprogram INIT_0698,For_Call
0434 029f 06c3 | | Declare_Subprogram INIT_06c0,For_Call
0436 BODY_0428:
0436 0092 0871 | q| Action Push_String_Extended,0x871 ; "Setting up "
0438 e9ff | | Load 0x4,-0x1
0439 01cc | | Execute Vector,Catenate
043a e00e | | Load 0x0,0xe
043b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
043c 0092 0872 | r| Action Push_String_Extended,0x872 ; " Class -> "
043e e9ff | | Load 0x4,-0x1
043f 01cc | | Execute Vector,Catenate
0440 e00e | | Load 0x0,0xe
0441 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0442 0092 0873 | s| Action Push_String_Extended,0x873 ; " Device -> "
0444 e802 | | Load 0x4,0x2
0445 01cc | | Execute Vector,Catenate
0446 e00e | | Load 0x0,0xe
0447 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0448 0092 0874 | t| Action Push_String_Extended,0x874 ; " Options -> "
044a 00db | | Load_Top At_Offset_3
044b 01cc | | Execute Vector,Catenate
044c e00e | | Load 0x0,0xe
044d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
044e e5fa | | Load 0x2,-0x6
044f 7050 |pP | Jump_Nonzero 0x4a0
0450 e00e | | Load 0x0,0xe
0451 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0452 e00e | | Load 0x0,0xe
0453 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0454 0092 0854 | T| Action Push_String_Extended,0x854 ; "Holding"
0456 e00c | | Load 0x0,0xc
0457 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0458 00db | | Load_Top At_Offset_3
0459 e00c | | Load 0x0,0xc
045a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
045b 680f |h | Jump_Zero 0x46b
045c 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
045e e00e | | Load 0x0,0xe
045f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0460 0092 0876 | v| Action Push_String_Extended,0x876 ; "Disabling device: "
0462 e802 | | Load 0x4,0x2
0463 01cc | | Execute Vector,Catenate
0464 e00e | | Load 0x0,0xe
0465 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0466 4800 |H | Short_Literal 0x0
0467 e802 | | Load 0x4,0x2
0468 e00c | | Load 0x0,0xc
0469 1820 | | Execute Package,Field_Execute,Field_Number 0x20
046a 8804 | | Call 0x4,0x4
046b 6068 |`h | Indirect_Literal Discrete,0x4d4,{0x00000000, 0x00050000}
046c 00ba | | Action Initiate_Delay
046d e9ff | | Load 0x4,-0x1
046e e00c | | Load 0x0,0xc
046f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0470 6806 |h | Jump_Zero 0x477
0471 0092 0854 | T| Action Push_String_Extended,0x854 ; "Holding"
0473 e9ff | | Load 0x4,-0x1
0474 e00c | | Load 0x0,0xc
0475 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0476 8805 | | Call 0x4,0x5
0477 00db | | Load_Top At_Offset_3
0478 e00c | | Load 0x0,0xc
0479 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
047a 680e |h | Jump_Zero 0x489
047b 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
047d e00e | | Load 0x0,0xe
047e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
047f 0092 0877 | w| Action Push_String_Extended,0x877 ; "Deleting existing device: "
0481 e802 | | Load 0x4,0x2
0482 01cc | | Execute Vector,Catenate
0483 e00e | | Load 0x0,0xe
0484 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0485 4800 |H | Short_Literal 0x0
0486 e802 | | Load 0x4,0x2
0487 e00c | | Load 0x0,0xc
0488 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0489 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
048b e00e | | Load 0x0,0xe
048c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
048d 0092 0878 | x| Action Push_String_Extended,0x878 ; "Creating class: "
048f e9ff | | Load 0x4,-0x1
0490 01cc | | Execute Vector,Catenate
0491 e00e | | Load 0x0,0xe
0492 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0493 e9ff | | Load 0x4,-0x1
0494 e00c | | Load 0x0,0xc
0495 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0496 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
0498 e00e | | Load 0x0,0xe
0499 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
049a 0092 0879 | y| Action Push_String_Extended,0x879 ; "Creating device: "
049c e802 | | Load 0x4,0x2
049d 01cc | | Execute Vector,Catenate
049e e00e | | Load 0x0,0xe
049f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04a0 e9fd | | Load 0x4,-0x3
04a1 0f04 | | Execute_Immediate Equal,0x4
04a2 6803 |h | Jump_Zero 0x4a6
04a3 e9fe | | Load 0x4,-0x2
04a4 e9ff | | Load 0x4,-0x1
04a5 860a | | Call 0x3,0xa
04a6 e5fa | | Load 0x2,-0x6
04a7 702b |p+ | Jump_Nonzero 0x4d3
04a8 00da | | Load_Top At_Offset_2
04a9 e802 | | Load 0x4,0x2
04aa e00c | | Load 0x0,0xc
04ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04ac 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
04ae e00e | | Load 0x0,0xe
04af 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04b0 0092 087a | z| Action Push_String_Extended,0x87a ; "Registering "
04b2 e802 | | Load 0x4,0x2
04b3 01cc | | Execute Vector,Catenate
04b4 0092 087b | {| Action Push_String_Extended,0x87b ; " with "
04b6 01cc | | Execute Vector,Catenate
04b7 e9ff | | Load 0x4,-0x1
04b8 01cc | | Execute Vector,Catenate
04b9 e00e | | Load 0x0,0xe
04ba 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04bb e9ff | | Load 0x4,-0x1
04bc e802 | | Load 0x4,0x2
04bd e00c | | Load 0x0,0xc
04be 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04bf 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
04c1 e00e | | Load 0x0,0xe
04c2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04c3 0092 087c | || Action Push_String_Extended,0x87c ; "Enabling device. See error log if there are errors for more information"
04c5 e00e | | Load 0x0,0xe
04c6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04c7 00db | | Load_Top At_Offset_3
04c8 e00c | | Load 0x0,0xc
04c9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
04ca 0092 0875 | u| Action Push_String_Extended,0x875 ; "---"
04cc e00e | | Load 0x0,0xe
04cd 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04ce e9ff | | Load 0x4,-0x1
04cf 0092 0854 | T| Action Push_String_Extended,0x854 ; "Holding"
04d1 e00c | | Load 0x0,0xc
04d2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04d3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04d4 0000 0000 | | .LITERAL {0x00000000, 0x00050000}
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04df | | .CONST 0x04df ; Address of begin
04d9 04fc | | .CONST 0x04fc ; Address of exception handler
04da 0003 | | .CONST 0x0003 ; Number of locals
04db INIT_04d8:
04db e40d | | Load 0x2,0xd
04dc 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
04dd 029f 06eb | | Declare_Subprogram INIT_06e8,For_Call
04df BODY_04d8:
04df e9fe | | Load 0x4,-0x2
04e0 01db | | Execute Vector,Length
04e1 6819 |h | Jump_Zero 0x4fb
04e2 e9fe | | Load 0x4,-0x2
04e3 e40d | | Load 0x2,0xd
04e4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
04e5 0032 | 2 | Store_Top Heap_Access,At_Offset_2
04e6 00d9 | | Load_Top At_Offset_1
04e7 e40d | | Load 0x2,0xd
04e8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
04e9 6802 |h | Jump_Zero 0x4ec
04ea 8803 | | Call 0x4,0x3
04eb 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04ec 0092 087d | }| Action Push_String_Extended,0x87d ; "Illegal format: "
04ee e9fe | | Load 0x4,-0x2
04ef 01cc | | Execute Vector,Catenate
04f0 e00e | | Load 0x0,0xe
04f1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04f2 0092 087e | ~| Action Push_String_Extended,0x87e ; " "
04f4 4800 |H | Short_Literal 0x0
04f5 00db | | Load_Top At_Offset_3
04f6 e40d | | Load 0x2,0xd
04f7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
04f8 01cc | | Execute Vector,Catenate
04f9 e00e | | Load 0x0,0xe
04fa 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04fb 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04fc TRAP_04d8:
04fc e014 | | Load 0x0,0x14
04fd 010f | | Execute Exception,Equal
04fe 6807 |h | Jump_Zero 0x506
04ff 0092 087f | | Action Push_String_Extended,0x87f ; "Illegal item in line: "
0501 e9fe | | Load 0x4,-0x2
0502 01cc | | Execute Vector,Catenate
0503 e00e | | Load 0x0,0xe
0504 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0505 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0506 0100 | | Execute Exception,Raise
0507 0000 | | .XXX[0x1]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050f | | .CONST 0x050f ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0003 | | .CONST 0x0003 ; Number of locals
050b INIT_0508:
050b e40b | | Load 0x2,0xb
050c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
050d 029f 071b | | Declare_Subprogram INIT_0718,For_Call
050f BODY_0508:
050f e9ff | | Load 0x4,-0x1
0510 01db | | Execute Vector,Length
0511 6846 |hF | Jump_Zero 0x558
0512 e9ff | | Load 0x4,-0x1
0513 01db | | Execute Vector,Length
0514 0c02 | | Execute_Immediate Greater_Equal,0x2
0515 6811 |h | Jump_Zero 0x527
0516 e9ff | | Load 0x4,-0x1
0517 01dd | | Execute Vector,First
0518 e9ff | | Load 0x4,-0x1
0519 01dd | | Execute Vector,First
051a 0a01 | | Execute_Immediate Plus,0x1
051b 00d8 | | Load_Top At_Offset_0
051c 00e2 | | Load_Encached Integer_Cache
051d 0260 | ` | Execute Discrete,In_Type
051e 7001 |p | Jump_Nonzero 0x520
051f 0801 | | Execute_Immediate Raise,0x1
0520 e9ff | | Load 0x4,-0x1
0521 01cf | | Execute Vector,Slice_Read
0522 0092 0880 | | Action Push_String_Extended,0x880 ; "--"
0524 01df | | Execute Vector,Equal
0525 6801 |h | Jump_Zero 0x527
0526 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0527 e9ff | | Load 0x4,-0x1
0528 8603 | | Call 0x3,0x3
0529 e9ff | | Load 0x4,-0x1
052a e40b | | Load 0x2,0xb
052b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
052c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
052d 00d9 | | Load_Top At_Offset_1
052e e40b | | Load 0x2,0xb
052f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0530 6818 |h | Jump_Zero 0x549
0531 4800 |H | Short_Literal 0x0
0532 00da | | Load_Top At_Offset_2
0533 e40b | | Load 0x2,0xb
0534 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0535 6802 |h | Jump_Zero 0x538
0536 8803 | | Call 0x4,0x3
0537 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0538 480a |H | Short_Literal 0xa
0539 0092 087f | | Action Push_String_Extended,0x87f ; "Illegal item in line: "
053b e9ff | | Load 0x4,-0x1
053c 01cc | | Execute Vector,Catenate
053d 01cb | | Execute Vector,Append
053e 0092 087e | ~| Action Push_String_Extended,0x87e ; " "
0540 01cc | | Execute Vector,Catenate
0541 4800 |H | Short_Literal 0x0
0542 00db | | Load_Top At_Offset_3
0543 e40b | | Load 0x2,0xb
0544 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0545 01cc | | Execute Vector,Catenate
0546 e00e | | Load 0x0,0xe
0547 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0548 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0549 0092 087d | }| Action Push_String_Extended,0x87d ; "Illegal format: "
054b e9ff | | Load 0x4,-0x1
054c 01cc | | Execute Vector,Catenate
054d e00e | | Load 0x0,0xe
054e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
054f 0092 087e | ~| Action Push_String_Extended,0x87e ; " "
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 e00e | | Load 0x0,0xe
0557 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0558 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0559 0000 0000 | | .BLANK 0000[0x7]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0572 | r | .CONST 0x0572 ; Address of begin
0561 057e | ~ | .CONST 0x057e ; Address of exception handler
0562 0007 | | .CONST 0x0007 ; Number of locals
0563 INIT_0560:
0563 4801 |H | Short_Literal 0x1
0564 4be8 |K | Short_Literal 0x3e8
0565 00e9 | | Load_Encached String_Cache
0566 035b | [ | Declare_Type Array,Constrained
0567 0337 | 7 | Declare_Variable Array
0568 00e3 | | Load_Encached Natural_Cache
0569 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
056a 00e3 | | Load_Encached Natural_Cache
056b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
056c 00e3 | | Load_Encached Natural_Cache
056d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
056e 029f 0733 | 3| Declare_Subprogram INIT_0730,For_Call
0570 029f 0753 | S| Declare_Subprogram INIT_0750,For_Call
0572 BODY_0560:
0572 00cf | | Action Mark_Auxiliary
0573 8807 | | Call 0x4,0x7
0574 00c9 | | Action Pop_Auxiliary_Loop
0575 7ffd | | Jump 0x573
0576 00ce | | Action Pop_Auxiliary
0577 4801 |H | Short_Literal 0x1
0578 e803 | | Load 0x4,0x3
0579 e802 | | Load 0x4,0x2
057a 01cf | | Execute Vector,Slice_Read
057b 00e9 | | Load_Encached String_Cache
057c 01c6 | | Execute Vector,Convert_To_Formal
057d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
057e TRAP_0560:
057e 00d8 | | Load_Top At_Offset_0
057f 0107 | | Execute Exception,Get_Name
0580 4950 |IP | Short_Literal 0x150
0581 495f |I_ | Short_Literal 0x15f
0582 0262 | b | Execute Discrete,In_Range
0583 680f |h | Jump_Zero 0x593
0584 e804 | | Load 0x4,0x4
0585 e805 | | Load 0x4,0x5
0586 027e | ~ | Execute Discrete,Not_Equal
0587 6809 |h | Jump_Zero 0x591
0588 0092 0881 | | Action Push_String_Extended,0x881 ; "The parentheses in the file "
058a e7ff | | Load 0x3,-0x1
058b 01cc | | Execute Vector,Catenate
058c 0092 0882 | | Action Push_String_Extended,0x882 ; " do not match"
058e 01cc | | Execute Vector,Catenate
058f e00e | | Load 0x0,0xe
0590 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0591 00d8 | | Load_Top At_Offset_0
0592 0101 | | Execute Exception,Reraise
0593 0100 | | Execute Exception,Raise
0594 0000 0000 | | .BLANK 0000[0x4]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a1 | | .CONST 0x05a1 ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0003 | | .CONST 0x0003 ; Number of locals
059b INIT_0598:
059b 00da | | Load_Top At_Offset_2
059c 01dd | | Execute Vector,First
059d 00e2 | | Load_Encached Integer_Cache
059e 03f1 | | Declare_Variable Discrete,With_Value
059f 00e2 | | Load_Encached Integer_Cache
05a0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05a1 BODY_0598:
05a1 00cf | | Action Mark_Auxiliary
05a2 e9ff | | Load 0x4,-0x1
05a3 01d9 | | Execute Vector,Reverse_Bounds
05a4 0263 | c | Execute Discrete,Above_Bound
05a5 701f |p | Jump_Nonzero 0x5c5
05a6 00d8 | | Load_Top At_Offset_0
05a7 e9ff | | Load 0x4,-0x1
05a8 01d7 | | Execute Vector,Field_Read
05a9 0f20 | | Execute_Immediate Equal,0x20
05aa 6818 |h | Jump_Zero 0x5c3
05ab e802 | | Load 0x4,0x2
05ac 00d9 | | Load_Top At_Offset_1
05ad 027f | | Execute Discrete,Equal
05ae 6804 |h | Jump_Zero 0x5b3
05af 00d8 | | Load_Top At_Offset_0
05b0 0a01 | | Execute_Immediate Plus,0x1
05b1 c802 | | Store 0x4,0x2
05b2 7810 |x | Jump 0x5c3
05b3 00db | | Load_Top At_Offset_3
05b4 0a01 | | Execute_Immediate Plus,0x1
05b5 c803 | | Store 0x4,0x3
05b6 00db | | Load_Top At_Offset_3
05b7 e9fe | | Load 0x4,-0x2
05b8 027f | | Execute Discrete,Equal
05b9 6806 |h | Jump_Zero 0x5c0
05ba e802 | | Load 0x4,0x2
05bb 00d9 | | Load_Top At_Offset_1
05bc 0aff | | Execute_Immediate Plus,-0x1
05bd e9ff | | Load 0x4,-0x1
05be 01cf | | Execute Vector,Slice_Read
05bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05c0 00d8 | | Load_Top At_Offset_0
05c1 0a01 | | Execute_Immediate Plus,0x1
05c2 c802 | | Store 0x4,0x2
05c3 00c8 | | Action Pop_Auxiliary_Range
05c4 3fe1 |? | Loop_Increasing 0x5a6
05c5 00ce | | Action Pop_Auxiliary
05c6 00d8 | | Load_Top At_Offset_0
05c7 0a01 | | Execute_Immediate Plus,0x1
05c8 0059 | Y | Store_Top Discrete,At_Offset_1
05c9 00d8 | | Load_Top At_Offset_0
05ca e9fe | | Load 0x4,-0x2
05cb 027f | | Execute Discrete,Equal
05cc 6806 |h | Jump_Zero 0x5d3
05cd 00d9 | | Load_Top At_Offset_1
05ce e9ff | | Load 0x4,-0x1
05cf 01dc | | Execute Vector,Last
05d0 e9ff | | Load 0x4,-0x1
05d1 01cf | | Execute Vector,Slice_Read
05d2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05d3 00ea | | Load_Encached Null_String_Cache
05d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05d5 0000 0000 | | .XXX[0x3]
05d7 0000 | |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05e3 | | .CONST 0x05e3 ; Address of begin
05d9 05fd | | .CONST 0x05fd ; Address of exception handler
05da 0004 | | .CONST 0x0004 ; Number of locals
05db INIT_05d8:
05db 4801 |H | Short_Literal 0x1
05dc 00db | | Load_Top At_Offset_3
05dd 8604 | | Call 0x3,0x4
05de 4802 |H | Short_Literal 0x2
05df e9ff | | Load 0x4,-0x1
05e0 8604 | | Call 0x3,0x4
05e1 029f 07b3 | | Declare_Subprogram INIT_07b0,For_Call
05e3 BODY_05d8:
05e3 e9ff | | Load 0x4,-0x1
05e4 01db | | Execute Vector,Length
05e5 6816 |h | Jump_Zero 0x5fc
05e6 e9ff | | Load 0x4,-0x1
05e7 01db | | Execute Vector,Length
05e8 0c02 | | Execute_Immediate Greater_Equal,0x2
05e9 6811 |h | Jump_Zero 0x5fb
05ea e9ff | | Load 0x4,-0x1
05eb 01dd | | Execute Vector,First
05ec e9ff | | Load 0x4,-0x1
05ed 01dd | | Execute Vector,First
05ee 0a01 | | Execute_Immediate Plus,0x1
05ef 00d8 | | Load_Top At_Offset_0
05f0 00e2 | | Load_Encached Integer_Cache
05f1 0260 | ` | Execute Discrete,In_Type
05f2 7001 |p | Jump_Nonzero 0x5f4
05f3 0801 | | Execute_Immediate Raise,0x1
05f4 e9ff | | Load 0x4,-0x1
05f5 01cf | | Execute Vector,Slice_Read
05f6 0092 0880 | | Action Push_String_Extended,0x880 ; "--"
05f8 01df | | Execute Vector,Equal
05f9 6801 |h | Jump_Zero 0x5fb
05fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05fb 8804 | | Call 0x4,0x4
05fc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05fd TRAP_05d8:
05fd e408 | | Load 0x2,0x8
05fe 1b20 | | Execute Package,Field_Read,Field_Number 0x20
05ff 010f | | Execute Exception,Equal
0600 680d |h | Jump_Zero 0x60e
0601 00da | | Load_Top At_Offset_2
0602 0092 0883 | | Action Push_String_Extended,0x883 ; " is not a defined printer"
0604 01cc | | Execute Vector,Catenate
0605 e00e | | Load 0x0,0xe
0606 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0607 0092 0884 | | Action Push_String_Extended,0x884 ; " In line: "
0609 e9ff | | Load 0x4,-0x1
060a 01cc | | Execute Vector,Catenate
060b e00e | | Load 0x0,0xe
060c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
060d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
060e 0100 | | Execute Exception,Raise
060f 0000 | | .XXX[0x1]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0618 | | .CONST 0x0618 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0003 | | .CONST 0x0003 ; Number of locals
0613 INIT_0610:
0613 e408 | | Load 0x2,0x8
0614 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0615 0322 | " | Declare_Variable Record
0616 029f 07e3 | | Declare_Subprogram INIT_07e0,For_Call
0618 BODY_0610:
0618 00d9 | | Load_Top At_Offset_1
0619 e409 | | Load 0x2,0x9
061a e408 | | Load 0x2,0x8
061b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
061c 00d1 | | Pop_Control Pop_Count_1
061d 00cf | | Action Mark_Auxiliary
061e 7806 |x | Jump 0x625
061f 8803 | | Call 0x4,0x3
0620 00da | | Load_Top At_Offset_2
0621 e408 | | Load 0x2,0x8
0622 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0623 00d1 | | Pop_Control Pop_Count_1
0624 00c9 | | Action Pop_Auxiliary_Loop
0625 00da | | Load_Top At_Offset_2
0626 e408 | | Load 0x2,0x8
0627 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0628 6ff6 |o | Jump_Zero 0x61f
0629 4501 |E | Exit_Suprogram New_Top_Offset 0x1
062a 0000 0000 | | .BLANK 0000[0x6]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0635 | 5 | .CONST 0x0635 ; Address of begin
0631 0650 | P | .CONST 0x0650 ; Address of exception handler
0632 0002 | | .CONST 0x0002 ; Number of locals
0633 INIT_0630:
0633 029f 081b | | Declare_Subprogram INIT_0818,For_Call
0635 BODY_0630:
0635 e602 | | Load 0x3,0x2
0636 00ea | | Load_Encached Null_String_Cache
0637 e7ff | | Load 0x3,-0x1
0638 4800 |H | Short_Literal 0x0
0639 e00e | | Load 0x0,0xe
063a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
063b c602 | | Store 0x3,0x2
063c 00cf | | Action Mark_Auxiliary
063d 7808 |x | Jump 0x646
063e 4820 |H | Short_Literal 0x20
063f e602 | | Load 0x3,0x2
0640 e00e | | Load 0x0,0xe
0641 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0642 e00f | | Load 0x0,0xf
0643 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0644 8605 | | Call 0x3,0x5
0645 00c9 | | Action Pop_Auxiliary_Loop
0646 e602 | | Load 0x3,0x2
0647 e00e | | Load 0x0,0xe
0648 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0649 6ff4 |o | Jump_Zero 0x63e
064a 00ce | | Action Pop_Auxiliary
064b e602 | | Load 0x3,0x2
064c e00e | | Load 0x0,0xe
064d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
064e c602 | | Store 0x3,0x2
064f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0650 TRAP_0630:
0650 00d8 | | Load_Top At_Offset_0
0651 0107 | | Execute Exception,Get_Name
0652 4920 |I | Short_Literal 0x120
0653 492f |I/ | Short_Literal 0x12f
0654 0262 | b | Execute Discrete,In_Range
0655 6802 |h | Jump_Zero 0x658
0656 8802 | | Call 0x4,0x2
0657 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0658 0100 | | Execute Exception,Raise
0659 0000 0000 | | .BLANK 0000[0x7]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 066c | l | .CONST 0x066c ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0002 | | .CONST 0x0002 ; Number of locals
0663 INIT_0660:
0663 4820 |H | Short_Literal 0x20
0664 e9ff | | Load 0x4,-0x1
0665 01dd | | Execute Vector,First
0666 e802 | | Load 0x4,0x2
0667 0aff | | Execute_Immediate Plus,-0x1
0668 e9ff | | Load 0x4,-0x1
0669 01cf | | Execute Vector,Slice_Read
066a e00f | | Load 0x0,0xf
066b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
066c BODY_0660:
066c 4800 |H | Short_Literal 0x0
066d 00ea | | Load_Encached Null_String_Cache
066e 4800 |H | Short_Literal 0x0
066f 00db | | Load_Top At_Offset_3
0670 4801 |H | Short_Literal 0x1
0671 e40b | | Load 0x2,0xb
0672 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0673 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0674 0000 0000 | | .BLANK 0000[0x4]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 0680 | | .CONST 0x0680 ; Address of begin
0679 0004 | | .CONST 0x0004 ; Address of exception handler
067a 0002 | | .CONST 0x0002 ; Number of locals
067b INIT_0678:
067b 00ea | | Load_Encached Null_String_Cache
067c 4803 |H | Short_Literal 0x3
067d e9fe | | Load 0x4,-0x2
067e e40d | | Load 0x2,0xd
067f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0680 BODY_0678:
0680 4801 |H | Short_Literal 0x1
0681 00d9 | | Load_Top At_Offset_1
0682 0092 0885 | | Action Push_String_Extended,0x885 ; "Terminal_"
0684 e00f | | Load 0x0,0xf
0685 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0686 0c01 | | Execute_Immediate Greater_Equal,0x1
0687 6803 |h | Jump_Zero 0x68b
0688 00d8 | | Load_Top At_Offset_0
0689 00cb | | Action Pop_Block_With_Result
068a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
068b 00d8 | | Load_Top At_Offset_0
068c 0092 0886 | | Action Push_String_Extended,0x886 ; " is not a proper device name"
068e 01cc | | Execute Vector,Catenate
068f e00e | | Load 0x0,0xe
0690 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0691 e014 | | Load 0x0,0x14
0692 0257 | W | Execute Discrete,Raise
0693 0000 0000 | | .BLANK 0000[0x5]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06a4 | | .CONST 0x06a4 ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0002 | | .CONST 0x0002 ; Number of locals
069b INIT_0698:
069b e015 | | Load 0x0,0x15
069c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
069d 02c7 | | Declare_Variable Any
069e 6019 |` | Indirect_Literal Discrete,0x6b8,{0x00000000, 0x012c0000}
069f e015 | | Load 0x0,0x15
06a0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06a1 e015 | | Load 0x0,0x15
06a2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06a3 aa02 | | Store_Unchecked 0x5,0x2
06a4 BODY_0698:
06a4 00cf | | Action Mark_Auxiliary
06a5 7803 |x | Jump 0x6a9
06a6 600d |` | Indirect_Literal Discrete,0x6b4,{0x00000000, 0x00028000}
06a7 00ba | | Action Initiate_Delay
06a8 00c9 | | Action Pop_Auxiliary_Loop
06a9 e802 | | Load 0x4,0x2
06aa e00c | | Load 0x0,0xc
06ab 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
06ac 00da | | Load_Top At_Offset_2
06ad e015 | | Load 0x0,0x15
06ae 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06af e015 | | Load 0x0,0x15
06b0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
06b1 0279 | y | Execute Discrete,And
06b2 77f3 |w | Jump_Nonzero 0x6a6
06b3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06b4 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
06b8 0000 0000 | | .LITERAL {0x00000000, 0x012c0000}
06bc 0000 0000 | | .BLANK 0000[0x4]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06cc | | .CONST 0x06cc ; Address of begin
06c1 0004 | | .CONST 0x0004 ; Address of exception handler
06c2 0002 | | .CONST 0x0002 ; Number of locals
06c3 INIT_06c0:
06c3 e015 | | Load 0x0,0x15
06c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06c5 02c7 | | Declare_Variable Any
06c6 6019 |` | Indirect_Literal Discrete,0x6e0,{0x00000000, 0x00960000}
06c7 e015 | | Load 0x0,0x15
06c8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06c9 e015 | | Load 0x0,0x15
06ca 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06cb aa02 | | Store_Unchecked 0x5,0x2
06cc BODY_06c0:
06cc 00cf | | Action Mark_Auxiliary
06cd 7803 |x | Jump 0x6d1
06ce 600d |` | Indirect_Literal Discrete,0x6dc,{0x00000000, 0x00010000}
06cf 00ba | | Action Initiate_Delay
06d0 00c9 | | Action Pop_Auxiliary_Loop
06d1 e9ff | | Load 0x4,-0x1
06d2 e00c | | Load 0x0,0xc
06d3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
06d4 00da | | Load_Top At_Offset_2
06d5 e015 | | Load 0x0,0x15
06d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06d7 e015 | | Load 0x0,0x15
06d8 181d | | Execute Package,Field_Execute,Field_Number 0x1d
06d9 0279 | y | Execute Discrete,And
06da 77f3 |w | Jump_Nonzero 0x6ce
06db 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06dc 0000 0000 | | .LITERAL {0x00000000, 0x00010000}
06e0 0000 0000 | | .LITERAL {0x00000000, 0x00960000}
06e4 0000 0000 | | .BLANK 0000[0x4]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06f4 | | .CONST 0x06f4 ; Address of begin
06e9 0004 | | .CONST 0x0004 ; Address of exception handler
06ea 0003 | | .CONST 0x0003 ; Number of locals
06eb INIT_06e8:
06eb 00ea | | Load_Encached Null_String_Cache
06ec 4801 |H | Short_Literal 0x1
06ed e802 | | Load 0x4,0x2
06ee e40d | | Load 0x2,0xd
06ef 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06f0 e802 | | Load 0x4,0x2
06f1 8607 | | Call 0x3,0x7
06f2 e40e | | Load 0x2,0xe
06f3 03f1 | | Declare_Variable Discrete,With_Value
06f4 BODY_06e8:
06f4 00d9 | | Load_Top At_Offset_1
06f5 8606 | | Call 0x3,0x6
06f6 6812 |h | Jump_Zero 0x709
06f7 00d8 | | Load_Top At_Offset_0
06f8 680a |h | Jump_Zero 0x703
06f9 00d8 | | Load_Top At_Offset_0
06fa e802 | | Load 0x4,0x2
06fb e9ff | | Load 0x4,-0x1
06fc 860d | | Call 0x3,0xd
06fd 00ea | | Load_Encached Null_String_Cache
06fe 00d9 | | Load_Top At_Offset_1
06ff e802 | | Load 0x4,0x2
0700 e9ff | | Load 0x4,-0x1
0701 8605 | | Call 0x3,0x5
0702 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0703 0092 0887 | | Action Push_String_Extended,0x887 ; "The current options do not define a device"
0705 e00e | | Load 0x0,0xe
0706 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0707 e014 | | Load 0x0,0x14
0708 0257 | W | Execute Discrete,Raise
0709 e9ff | | Load 0x4,-0x1
070a 0092 0888 | | Action Push_String_Extended,0x888 ; " is located on "
070c 01cc | | Execute Vector,Catenate
070d 00da | | Load_Top At_Offset_2
070e 01cc | | Execute Vector,Catenate
070f e00e | | Load 0x0,0xe
0710 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0711 00d9 | | Load_Top At_Offset_1
0712 00d9 | | Load_Top At_Offset_1
0713 e802 | | Load 0x4,0x2
0714 e9ff | | Load 0x4,-0x1
0715 8605 | | Call 0x3,0x5
0716 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0717 0000 | | .XXX[0x1]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071f | | .CONST 0x071f ; Address of begin
0719 0004 | | .CONST 0x0004 ; Address of exception handler
071a 0002 | | .CONST 0x0002 ; Number of locals
071b INIT_0718:
071b 4800 |H | Short_Literal 0x0
071c e802 | | Load 0x4,0x2
071d e40b | | Load 0x2,0xb
071e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
071f BODY_0718:
071f 4820 |H | Short_Literal 0x20
0720 00ea | | Load_Encached Null_String_Cache
0721 4800 |H | Short_Literal 0x0
0722 e802 | | Load 0x4,0x2
0723 e40b | | Load 0x2,0xb
0724 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0725 e00f | | Load 0x0,0xf
0726 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0727 00d9 | | Load_Top At_Offset_1
0728 860e | | Call 0x3,0xe
0729 4501 |E | Exit_Suprogram New_Top_Offset 0x1
072a 0000 0000 | | .BLANK 0000[0x6]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0733 | 3 | .CONST 0x0733 ; Address of begin
0731 0004 | | .CONST 0x0004 ; Address of exception handler
0732 0001 | | .CONST 0x0001 ; Number of locals
0733 BODY_0730:
0733 INIT_0730:
0733 00cf | | Action Mark_Auxiliary
0734 00db | | Load_Top At_Offset_3
0735 01dc | | Execute Vector,Last
0736 ebff | | Load 0x5,-0x1
0737 01dd | | Execute Vector,First
0738 0263 | c | Execute Discrete,Above_Bound
0739 7012 |p | Jump_Nonzero 0x74c
073a 00d8 | | Load_Top At_Offset_0
073b ebff | | Load 0x5,-0x1
073c 01d7 | | Execute Vector,Field_Read
073d 0f28 | ( | Execute_Immediate Equal,0x28
073e 6803 |h | Jump_Zero 0x742
073f ebfe | | Load 0x5,-0x2
0740 0a01 | | Execute_Immediate Plus,0x1
0741 cbfe | | Store 0x5,-0x2
0742 00d8 | | Load_Top At_Offset_0
0743 ebff | | Load 0x5,-0x1
0744 01d7 | | Execute Vector,Field_Read
0745 0f29 | ) | Execute_Immediate Equal,0x29
0746 6803 |h | Jump_Zero 0x74a
0747 ebfd | | Load 0x5,-0x3
0748 0a01 | | Execute_Immediate Plus,0x1
0749 cbfd | | Store 0x5,-0x3
074a 00c8 | | Action Pop_Auxiliary_Range
074b 3fee |? | Loop_Increasing 0x73a
074c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
074d 0000 0000 | | .XXX[0x3]
074f 0000 | |
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 076d | m | .CONST 0x076d ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0006 | | .CONST 0x0006 ; Number of locals
0753 INIT_0750:
0753 4820 |H | Short_Literal 0x20
0754 e9ff | | Load 0x4,-0x1
0755 e00e | | Load 0x0,0xe
0756 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0757 e00f | | Load 0x0,0xf
0758 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0759 00d8 | | Load_Top At_Offset_0
075a 01dd | | Execute Vector,First
075b 00e3 | | Load_Encached Natural_Cache
075c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
075d 00d9 | | Load_Top At_Offset_1
075e 01dc | | Execute Vector,Last
075f 00e3 | | Load_Encached Natural_Cache
0760 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0761 00da | | Load_Top At_Offset_2
0762 01db | | Execute Vector,Length
0763 00e3 | | Load_Encached Natural_Cache
0764 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0765 4801 |H | Short_Literal 0x1
0766 ea02 | | Load 0x5,0x2
0767 0092 0880 | | Action Push_String_Extended,0x880 ; "--"
0769 e00f | | Load 0x0,0xf
076a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
076b 00e3 | | Load_Encached Natural_Cache
076c 03f1 | | Declare_Variable Discrete,With_Value
076d BODY_0750:
076d 00d8 | | Load_Top At_Offset_0
076e 0c01 | | Execute_Immediate Greater_Equal,0x1
076f 6810 |h | Jump_Zero 0x780
0770 4820 |H | Short_Literal 0x20
0771 ea03 | | Load 0x5,0x3
0772 00da | | Load_Top At_Offset_2
0773 0aff | | Execute_Immediate Plus,-0x1
0774 ea02 | | Load 0x5,0x2
0775 01cf | | Execute Vector,Slice_Read
0776 e00f | | Load 0x0,0xf
0777 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0778 01dc | | Execute Vector,Last
0779 005b | [ | Store_Top Discrete,At_Offset_3
077a 00db | | Load_Top At_Offset_3
077b 00db | | Load_Top At_Offset_3
077c ea02 | | Load 0x5,0x2
077d 01cf | | Execute Vector,Slice_Read
077e 01db | | Execute Vector,Length
077f 005a | Z | Store_Top Discrete,At_Offset_2
0780 00da | | Load_Top At_Offset_2
0781 ea03 | | Load 0x5,0x3
0782 027d | } | Execute Discrete,Greater
0783 6828 |h( | Jump_Zero 0x7ac
0784 00db | | Load_Top At_Offset_3
0785 00db | | Load_Top At_Offset_3
0786 ea02 | | Load 0x5,0x2
0787 01cf | | Execute Vector,Slice_Read
0788 e803 | | Load 0x4,0x3
0789 0a01 | | Execute_Immediate Plus,0x1
078a 00d8 | | Load_Top At_Offset_0
078b 00e2 | | Load_Encached Integer_Cache
078c 0260 | ` | Execute Discrete,In_Type
078d 7001 |p | Jump_Nonzero 0x78f
078e 0801 | | Execute_Immediate Raise,0x1
078f e803 | | Load 0x4,0x3
0790 ea05 | | Load 0x5,0x5
0791 0273 | s | Execute Discrete,Plus
0792 00d8 | | Load_Top At_Offset_0
0793 00e2 | | Load_Encached Integer_Cache
0794 0260 | ` | Execute Discrete,In_Type
0795 7001 |p | Jump_Nonzero 0x797
0796 0801 | | Execute_Immediate Raise,0x1
0797 e802 | | Load 0x4,0x2
0798 01ce | | Execute Vector,Slice_Write
0799 e803 | | Load 0x4,0x3
079a 00da | | Load_Top At_Offset_2
079b 0273 | s | Execute Discrete,Plus
079c c803 | | Store 0x4,0x3
079d e805 | | Load 0x4,0x5
079e e804 | | Load 0x4,0x4
079f ea03 | | Load 0x5,0x3
07a0 ea04 | | Load 0x5,0x4
07a1 ea02 | | Load 0x5,0x2
07a2 01cf | | Execute Vector,Slice_Read
07a3 8806 | | Call 0x4,0x6
07a4 c804 | | Store 0x4,0x4
07a5 c805 | | Store 0x4,0x5
07a6 e804 | | Load 0x4,0x4
07a7 e805 | | Load 0x4,0x5
07a8 027f | | Execute Discrete,Equal
07a9 6802 |h | Jump_Zero 0x7ac
07aa 00cc | | Action Pop_Block
07ab 7dca |} | Jump 0x576
07ac 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07ad 0000 0000 | | .XXX[0x3]
07af 0000 | |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07d1 | | .CONST 0x07d1 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0003 | | .CONST 0x0003 ; Number of locals
07b3 INIT_07b0:
07b3 e803 | | Load 0x4,0x3
07b4 e409 | | Load 0x2,0x9
07b5 e408 | | Load 0x2,0x8
07b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07b7 e802 | | Load 0x4,0x2
07b8 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
07ba 01cc | | Execute Vector,Catenate
07bb 00d9 | | Load_Top At_Offset_1
07bc 0227 | ' | Execute Access,All_Reference
07bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07be 0227 | ' | Execute Access,All_Reference
07bf 01cc | | Execute Vector,Catenate
07c0 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
07c2 01cc | | Execute Vector,Catenate
07c3 00d9 | | Load_Top At_Offset_1
07c4 0227 | ' | Execute Access,All_Reference
07c5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07c6 0227 | ' | Execute Access,All_Reference
07c7 01cc | | Execute Vector,Catenate
07c8 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
07ca 01cc | | Execute Vector,Catenate
07cb 00d9 | | Load_Top At_Offset_1
07cc 0227 | ' | Execute Access,All_Reference
07cd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
07ce 0227 | ' | Execute Access,All_Reference
07cf 01cc | | Execute Vector,Catenate
07d0 0007 | | Action Break_Optional
07d1 BODY_07b0:
07d1 00d8 | | Load_Top At_Offset_0
07d2 e00e | | Load 0x0,0xe
07d3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
07d4 e5fa | | Load 0x2,-0x6
07d5 7004 |p | Jump_Nonzero 0x7da
07d6 00d8 | | Load_Top At_Offset_0
07d7 e603 | | Load 0x3,0x3
07d8 e00e | | Load 0x0,0xe
07d9 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
07da 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07db 0000 0000 | | .BLANK 0000[0x5]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 0807 | | .CONST 0x0807 ; Address of begin
07e1 0004 | | .CONST 0x0004 ; Address of exception handler
07e2 0004 | | .CONST 0x0004 ; Number of locals
07e3 INIT_07e0:
07e3 e802 | | Load 0x4,0x2
07e4 e408 | | Load 0x2,0x8
07e5 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07e6 00d8 | | Load_Top At_Offset_0
07e7 e409 | | Load 0x2,0x9
07e8 e408 | | Load 0x2,0x8
07e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07ea 0092 0889 | | Action Push_String_Extended,0x889 ; "*"
07ec 00da | | Load_Top At_Offset_2
07ed 01cc | | Execute Vector,Catenate
07ee 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
07f0 01cc | | Execute Vector,Catenate
07f1 00d9 | | Load_Top At_Offset_1
07f2 0227 | ' | Execute Access,All_Reference
07f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07f4 0227 | ' | Execute Access,All_Reference
07f5 01cc | | Execute Vector,Catenate
07f6 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
07f8 01cc | | Execute Vector,Catenate
07f9 00d9 | | Load_Top At_Offset_1
07fa 0227 | ' | Execute Access,All_Reference
07fb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07fc 0227 | ' | Execute Access,All_Reference
07fd 01cc | | Execute Vector,Catenate
07fe 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
0800 01cc | | Execute Vector,Catenate
0801 00d9 | | Load_Top At_Offset_1
0802 0227 | ' | Execute Access,All_Reference
0803 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0804 0227 | ' | Execute Access,All_Reference
0805 01cc | | Execute Vector,Catenate
0806 0007 | | Action Break_Optional
0807 BODY_07e0:
0807 00d8 | | Load_Top At_Offset_0
0808 e00e | | Load 0x0,0xe
0809 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
080a e5fa | | Load 0x2,-0x6
080b 7004 |p | Jump_Nonzero 0x810
080c 00d8 | | Load_Top At_Offset_0
080d e603 | | Load 0x3,0x3
080e e00e | | Load 0x0,0xe
080f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0810 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0811 0000 0000 | | .BLANK 0000[0x7]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 0830 | 0 | .CONST 0x0830 ; Address of begin
0819 0004 | | .CONST 0x0004 ; Address of exception handler
081a 0003 | | .CONST 0x0003 ; Number of locals
081b INIT_0818:
081b e405 | | Load 0x2,0x5
081c 0227 | ' | Execute Access,All_Reference
081d e409 | | Load 0x2,0x9
081e e408 | | Load 0x2,0x8
081f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0820 0092 088a | | Action Push_String_Extended,0x88a ; "others "
0822 00d9 | | Load_Top At_Offset_1
0823 0227 | ' | Execute Access,All_Reference
0824 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0825 0227 | ' | Execute Access,All_Reference
0826 01cc | | Execute Vector,Catenate
0827 0092 0862 | b| Action Push_String_Extended,0x862 ; " "
0829 01cc | | Execute Vector,Catenate
082a 00d9 | | Load_Top At_Offset_1
082b 0227 | ' | Execute Access,All_Reference
082c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
082d 0227 | ' | Execute Access,All_Reference
082e 01cc | | Execute Vector,Catenate
082f 0007 | | Action Break_Optional
0830 BODY_0818:
0830 00d8 | | Load_Top At_Offset_0
0831 e00e | | Load 0x0,0xe
0832 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0833 e5fa | | Load 0x2,-0x6
0834 7004 |p | Jump_Nonzero 0x839
0835 00d8 | | Load_Top At_Offset_0
0836 e603 | | Load 0x3,0x3
0837 e00e | | Load 0x0,0xe
0838 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0839 4501 |E | Exit_Suprogram New_Top_Offset 0x1
083a ; --------------------------------------------------------------------------------------
083a ; STRING TABLE
083a ; --------------------------------------------------------------------------------------
083a 00a4 | | .STRTAB 0x00a4->0x088c ; "NIL"
083b 00a5 | | .STRTAB 0x00a5->0x088d ; "NEW_NAME"
083c 00ab | | .STRTAB 0x00ab->0x0891 ; "NIL"
083d 00ac | | .STRTAB 0x00ac->0x0893 ; "ON_NODE"
083e 00b1 | | .STRTAB 0x00b1->0x0896 ; "DIRECT"
083f 00b5 | | .STRTAB 0x00b5->0x0899 ; "DEVICE"
0840 00b9 | | .STRTAB 0x00b9->0x089c ; "TELNET"
0841 00bd | | .STRTAB 0x00bd->0x089f ; "SOCKET"
0842 00c1 | | .STRTAB 0x00c1->0x08a2 ; "FILE"
0843 00c3 | | .STRTAB 0x00c3->0x08a4 ; "WORKSTATION"
0844 00cc | | .STRTAB 0x00cc->0x08aa ; "PATH"
0845 00ce | | .STRTAB 0x00ce->0x08ac ; "SUFFIX"
0846 00d2 | | .STRTAB 0x00d2->0x08af ; "LASER_COMM"
0847 00da | | .STRTAB 0x00da->0x08b4 ; "REVERSE_OUTPUT_PAGES"
0848 00ec | | .STRTAB 0x00ec->0x08be ; "NIL"
0849 00ed | | .STRTAB 0x00ed->0x08bf ; "DIRECT_CONNECTION"
084a 00fc | | .STRTAB 0x00fc->0x08c8 ; "TELNET_CONNECTION"
084b 010b | | .STRTAB 0x010b->0x08d0 ; "LOCAL_FILE"
084c 0113 | | .STRTAB 0x0113->0x08d5 ; "REMOTE_FILE"
084d 011c | | .STRTAB 0x011c->0x08db ; "NIL"
084e 011d | | .STRTAB 0x011d->0x08dc ; "XON_XOFF"
084f 0123 | # | .STRTAB 0x0123->0x08e0 ; "RTS"
0850 0124 | $ | .STRTAB 0x0124->0x08e2 ; ".Remote_Access"
0851 0130 | 0 | .STRTAB 0x0130->0x08e9 ; "others => Unspecified"
0852 0143 | C | .STRTAB 0x0143->0x08f3 ; "Laser_Comm | Reverse_Output_Pages => Boolean_Valued, others => unspecified"
0853 018b | | .STRTAB 0x018b->0x0918 ; "<ERRORS>"
0854 0191 | | .STRTAB 0x0191->0x091c ; "Holding"
0855 0196 | | .STRTAB 0x0196->0x0920 ; ">>> Set EFFORT_ONLY to false for these settings to take effect <<<"
0856 01d7 | | .STRTAB 0x01d7->0x0941 ; "The file "
0857 01de | | .STRTAB 0x01de->0x0946 ; " will not be created"
0858 01f0 | | .STRTAB 0x01f0->0x0950 ; " does not exist"
0859 01fd | | .STRTAB 0x01fd->0x0957 ; "The contents of the file "
085a 0214 | | .STRTAB 0x0214->0x0964 ; " are:"
085b 0217 | | .STRTAB 0x0217->0x0966 ; "="
085c 0216 | | .STRTAB 0x0216->0x0967 ; "!!"
085d 0216 | | .STRTAB 0x0216->0x0968 ; "."
085e 0215 | | .STRTAB 0x0215->0x0968 ; "Laser"
085f 0218 | | .STRTAB 0x0218->0x096b ; "Other"
0860 021b | | .STRTAB 0x021b->0x096d ; "Reversed => True"
0861 0229 | ) | .STRTAB 0x0229->0x0975 ; "Reversed => False"
0862 0238 | 8 | .STRTAB 0x0238->0x097e ; " "
0863 0237 | 7 | .STRTAB 0x0237->0x097e ; " is not defined on the server"
0864 0252 | R | .STRTAB 0x0252->0x098d ; ", Laser_Comm"
0865 025c | \ | .STRTAB 0x025c->0x0993 ; "Laser_Comm"
0866 0264 | d | .STRTAB 0x0264->0x0998 ; " is not a proper protocol"
0867 027b | { | .STRTAB 0x027b->0x09a4 ; "_"
0868 027a | z | .STRTAB 0x027a->0x09a5 ; "Creating a file "
0869 0288 | | .STRTAB 0x0288->0x09ad ; " containing -> "
086a 0297 | | .STRTAB 0x0297->0x09b5 ; " nl "
086b 0299 | | .STRTAB 0x0299->0x09b7 ; "*** Cound not create the file "
086c 02b5 | | .STRTAB 0x02b5->0x09c6 ; "FTP"
086d 02b6 | | .STRTAB 0x02b6->0x09c8 ; "Host => "
086e 02bc | | .STRTAB 0x02bc->0x09cc ; ", Socket => ("
086f 02c7 | | .STRTAB 0x02c7->0x09d2 ; ")"
0870 02c6 | | .STRTAB 0x02c6->0x09d3 ; "Xon_Xoff"
0871 02cc | | .STRTAB 0x02cc->0x09d7 ; "Setting up "
0872 02d5 | | .STRTAB 0x02d5->0x09dc ; " Class -> "
0873 02e0 | | .STRTAB 0x02e0->0x09e3 ; " Device -> "
0874 02eb | | .STRTAB 0x02eb->0x09e9 ; " Options -> "
0875 02f6 | | .STRTAB 0x02f6->0x09f0 ; "---"
0876 02f7 | | .STRTAB 0x02f7->0x09f1 ; "Disabling device: "
0877 0307 | | .STRTAB 0x0307->0x09fa ; "Deleting existing device: "
0878 031f | | .STRTAB 0x031f->0x0a07 ; "Creating class: "
0879 032d | - | .STRTAB 0x032d->0x0a0f ; "Creating device: "
087a 033c | < | .STRTAB 0x033c->0x0a18 ; "Registering "
087b 0346 | F | .STRTAB 0x0346->0x0a1e ; " with "
087c 034a | J | .STRTAB 0x034a->0x0a21 ; "Enabling device. See error log if there are errors for more information"
087d 0390 | | .STRTAB 0x0390->0x0a45 ; "Illegal format: "
087e 039e | | .STRTAB 0x039e->0x0a4d ; " "
087f 03a1 | | .STRTAB 0x03a1->0x0a4f ; "Illegal item in line: "
0880 03b5 | | .STRTAB 0x03b5->0x0a5a ; "--"
0881 03b5 | | .STRTAB 0x03b5->0x0a5b ; "The parentheses in the file "
0882 03cf | | .STRTAB 0x03cf->0x0a69 ; " do not match"
0883 03da | | .STRTAB 0x03da->0x0a70 ; " is not a defined printer"
0884 03f1 | | .STRTAB 0x03f1->0x0a7c ; " In line: "
0885 03fb | | .STRTAB 0x03fb->0x0a82 ; "Terminal_"
0886 0402 | | .STRTAB 0x0402->0x0a87 ; " is not a proper device name"
0887 041c | | .STRTAB 0x041c->0x0a95 ; "The current options do not define a device"
0888 0444 | D | .STRTAB 0x0444->0x0aaa ; " is located on "
0889 0451 | Q | .STRTAB 0x0451->0x0ab1 ; "*"
088a 0450 | P | .STRTAB 0x0450->0x0ab2 ; "others "
088b 0455 | U | .STREND 0x0455->0x0ab5
088c 4e49 4c4e |NILN| .STRTAB_STRINGS
0ab6 0000 0000 | | .XXX[0x2]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; Debug Table
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x7715,0x0000,0x0001,0x0000
0abe 78e1 b000 |x | .XXX[0x17]
0ac0 0000 001a | |
0ac2 78f1 b000 |x |
0ac4 3021 6010 |0!` |
0ac6 0007 d3d0 | |
0ac8 41c4 2e00 |A . |
0aca 0400 00fa | |
0acc 7a00 00fe |z |
0ace 4803 14f5 |H |
0ad0 da00 0000 | |
0ad2 0003 4f20 | O |
0ad4 3800 |8 |
0ad5 0000 0000 | | .BLANK 0000[0x4]
0ad9 0604 2c02 | , | .XXX[0x15]
0adb 0000 fa7a | z|
0add 0838 85c0 | 8 |
0adf 0080 001f | |
0ae1 4f40 34f1 |O@4 |
0ae3 d380 0000 | |
0ae5 0000 0000 | |
0ae7 0040 0000 | @ |
0ae9 0000 0000 | |
0aeb 00c0 0060 | `|
0aed 42c0 |B |
0aee 0000 0000 | | .BLANK 0000[0x4]
0af2 34f1 f380 |4 | .XXX[0xc]
0af4 0000 0000 | |
0af6 0000 0040 | @|
0af8 0000 0000 | |
0afa 097b 3780 | {7 |
0afc 0010 2aa0 | * |
0afe 0000 0000 | | .BLANK 0000[0x4]
0b02 1a79 09d0 | y | .XXX[0xc]
0b04 0000 0000 | |
0b06 0000 0020 | |
0b08 0000 0000 | |
0b0a 0000 0060 | `|
0b0c 0030 2160 | 0!`|
0b0e 0000 0000 | | .BLANK 0000[0x5]
0b13 0090 0007 | | .XXX[0x5]
0b15 f240 1a78 | @ x|
0b17 af20 | |
0b18 0000 0000 | | .BLANK 0000[0x4]
0b1c 0d3c 9000 | < | .XXX[0x26]
0b1e 0001 e4fa | |
0b20 01a7 9240 | @|
0b22 01a7 9393 | |
0b24 0000 61ee | a |
0b26 034d 68b8 | Mh |
0b28 0000 0000 | |
0b2a 034f 29cc | O) |
0b2c 0000 0000 | |
0b2e 034f 2bcc | O+ |
0b30 0001 2aa8 | * |
0b32 0200 0061 | a|
0b34 c608 1a85 | |
0b36 4000 8000 |@ |
0b38 0c38 c000 | 8 |
0b3a 0c3d c069 | = i|
0b3c ad17 0000 | |
0b3e 0000 0069 | i|
0b40 e5b9 c000 | |
0b42 0000 0000 | | .BLANK 0000[0x4]
0b46 2555 0040 |%U @| .XXX[0x35]
0b48 000c 38c1 | 8 |
0b4a 0350 a800 | P |
0b4c 0c00 0187 | |
0b4e 1806 9e55 | U|
0b50 9c00 0000 | |
0b52 0000 0000 | |
0b54 0800 0000 | |
0b56 0000 0000 | |
0b58 0400 0255 | U|
0b5a 5000 0000 |P |
0b5c 0000 0000 | |
0b5e 0006 9e59 | Y|
0b60 9c00 0000 | |
0b62 0000 0000 | |
0b64 0800 0000 | |
0b66 0000 12e2 | |
0b68 0000 00d6 | |
0b6a d000 0000 | |
0b6c 0000 0000 | |
0b6e 0003 4f2e | O.|
0b70 d000 0000 | |
0b72 0000 0000 | |
0b74 0400 0000 | |
0b76 0000 0000 | |
0b78 0200 012a | *|
0b7a a800 | |
0b7b 0000 0000 | | .BLANK 0000[0x5]
0b80 1200 0061 | a| .XXX[0x19]
0b82 ee03 4f23 | O#|
0b84 7a00 0000 |z |
0b86 0000 0000 | |
0b88 0001 a798 | |
0b8a cb00 013c | <|
0b8c 7f60 34f3 | `4 |
0b8e 2160 34f3 |!`4 |
0b90 4bc0 0016 |K |
0b92 0380 0249 | I|
0b94 4f80 0000 |O |
0b96 0000 69e6 | i |
0b98 ec40 | @ |
0b99 0000 0000 | | .BLANK 0000[0x4]
0b9d 00a4 af00 | | .XXX[0x11]
0b9f 4000 1068 |@ h|
0ba1 4103 50a0 |A P |
0ba3 0010 0002 | |
0ba5 0d08 0002 | |
0ba7 c070 0049 | p I|
0ba9 29f0 0000 |) |
0bab 0000 0d3c | <|
0bad e588 | |
0bae 0000 0000 | | .BLANK 0000[0x4]
0bb2 0014 95e0 | | .XXX[0x15]
0bb4 0800 020d | |
0bb6 0820 6a14 | j |
0bb8 0001 8000 | |
0bba 41a1 00d3 |A |
0bbc ce19 0000 | |
0bbe 0000 0000 | |
0bc0 0001 0000 | |
0bc2 0000 0000 | |
0bc4 0001 0001 | |
0bc6 495e |I^ |
0bc7 0000 0000 | | .BLANK 0000[0x4]
0bcb 00d3 ce99 | | .XXX[0xc]
0bcd 0000 0000 | |
0bcf 0000 0001 | |
0bd1 0000 0000 | |
0bd3 0000 0001 | |
0bd5 0001 495e | I^|
0bd7 0000 0000 | | .BLANK 0000[0x5]
0bdc 0004 8000 | | .XXX[0x1a]
0bde 2c07 00d3 |, |
0be0 cc44 00d3 | D |
0be2 cbf3 80d3 | |
0be4 d1bd 8069 | i|
0be6 e7a5 4000 | @ |
0be8 712d 480d |q-H |
0bea 3cf6 a80d |< |
0bec 3d01 4000 |= @ |
0bee 07f2 5006 | P |
0bf0 7850 6000 |xP` |
0bf2 0000 001a | |
0bf4 7a17 b000 |z |
0bf6 0000 0000 | | .BLANK 0000[0x4]
0bfa 2f57 0010 |/W | .XXX[0x6]
0bfc 0007 d3d0 | |
0bfe 40d4 2e00 |@ . |