DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦bd026f610⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_2248fd

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0240       | @  |		.CONST	0x0240								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0026       | &  |		.CONST	0x0026								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0013       |    |		.CONST	0x0013								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
000f 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated
0011 00bf       |    |		Action	Accept_Activation
0012 0092 0184  |    |		Action	Push_String_Extended,0x184					; "r1000"
0014 0092 0185  |    |		Action	Push_String_Extended,0x185					; "Rational"
0016 e002       |    |		Load	0x0,0x2
0017 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0018 02c7       |    |		Declare_Variable	Any
0019 00d8       |    |		Load_Top	At_Offset_0
001a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
001b e002       |    |		Load	0x0,0x2
001c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001d 02c7       |    |		Declare_Variable	Any
001e 00d8       |    |		Load_Top	At_Offset_0
001f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0020 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0021 00c7       |    |		Action	Elaborate_Subprogram
0022 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0023 00c7       |    |		Action	Elaborate_Subprogram
0024 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0025 00c7       |    |		Action	Elaborate_Subprogram
0026			BODY_0008:
0026 00bc       |    |		Action	Signal_Activated
0027 00bb       |    |		Action	Signal_Completion
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b       | +  |		.CONST	0x002b								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0001       |    |		.CONST	0x0001								; Number of locals
002b			BODY_0028:
002b			INIT_0028:
002b 0092 0186  |    |		Action	Push_String_Extended,0x186					; "--- acquiring connection to "
002d e5fd       |    |		Load	0x2,-0x3
002e 01cc       |    |		Execute	Vector,Catenate
002f e003       |    |		Load	0x0,0x3
0030 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0031 e213       |    |		Load	0x1,0x13
0032 0120       |    |		Execute	Any,Is_Value
0033 6803       |h   |		Jump_Zero	0x37
0034 e002       |    |		Load	0x0,0x2
0035 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0036 7801       |x   |		Jump	0x38
0037 e213       |    |		Load	0x1,0x13
0038 e212       |    |		Load	0x1,0x12
0039 0120       |    |		Execute	Any,Is_Value
003a 6803       |h   |		Jump_Zero	0x3e
003b e002       |    |		Load	0x0,0x2
003c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
003d 7801       |x   |		Jump	0x3f
003e e212       |    |		Load	0x1,0x12
003f 00ea       |    |		Load_Encached	Null_String_Cache
0040 00ea       |    |		Load_Encached	Null_String_Cache
0041 e004       |    |		Load	0x0,0x4
0042 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0043 e004       |    |		Load	0x0,0x4
0044 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0045 e5fd       |    |		Load	0x2,-0x3
0046 e002       |    |		Load	0x0,0x2
0047 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0048 c212       |    |		Store	0x1,0x12
0049 c213       |    |		Store	0x1,0x13
004a e212       |    |		Load	0x1,0x12
004b e002       |    |		Load	0x0,0x2
004c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
004d 012f       | /  |		Execute	Any,Equal
004e 6804       |h   |		Jump_Zero	0x53
004f 0092 0187  |    |		Action	Push_String_Extended,0x187					; "*** Can't obtain context, check Dtia server"
0051 e003       |    |		Load	0x0,0x3
0052 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0053 0092 0188  |    |		Action	Push_String_Extended,0x188					; "--- extracting file from diskette"
0055 e003       |    |		Load	0x0,0x3
0056 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0057 e213       |    |		Load	0x1,0x13
0058 0120       |    |		Execute	Any,Is_Value
0059 6803       |h   |		Jump_Zero	0x5d
005a e002       |    |		Load	0x0,0x2
005b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005c 7801       |x   |		Jump	0x5e
005d e213       |    |		Load	0x1,0x13
005e 6055       |`U  |		Indirect_Literal	Discrete,0xb4,{0x00007fff, 0xffffffff}
005f e212       |    |		Load	0x1,0x12
0060 0092 0189  |    |		Action	Push_String_Extended,0x189					; "dosread "
0062 e5ff       |    |		Load	0x2,-0x1
0063 01cc       |    |		Execute	Vector,Catenate
0064 0092 018a  |    |		Action	Push_String_Extended,0x18a					; " /tmp/"
0066 01cc       |    |		Execute	Vector,Catenate
0067 e5ff       |    |		Load	0x2,-0x1
0068 01cc       |    |		Execute	Vector,Catenate
0069 e002       |    |		Load	0x0,0x2
006a 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
006b c213       |    |		Store	0x1,0x13
006c 0092 018b  |    |		Action	Push_String_Extended,0x18b					; "--- transferring file to destination library"
006e e003       |    |		Load	0x0,0x3
006f 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0070 e005       |    |		Load	0x0,0x5
0071 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0072 e004       |    |		Load	0x0,0x4
0073 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0074 e004       |    |		Load	0x0,0x4
0075 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0076 e004       |    |		Load	0x0,0x4
0077 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0078 e004       |    |		Load	0x0,0x4
0079 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
007a 4800       |H   |		Short_Literal	0x0
007b e004       |    |		Load	0x0,0x4
007c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
007d e004       |    |		Load	0x0,0x4
007e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
007f e004       |    |		Load	0x0,0x4
0080 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0081 e004       |    |		Load	0x0,0x4
0082 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0083 e004       |    |		Load	0x0,0x4
0084 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0085 e5fd       |    |		Load	0x2,-0x3
0086 e5fe       |    |		Load	0x2,-0x2
0087 0092 018c  |    |		Action	Push_String_Extended,0x18c					; "/tmp/"
0089 e5ff       |    |		Load	0x2,-0x1
008a 01cc       |    |		Execute	Vector,Catenate
008b e005       |    |		Load	0x0,0x5
008c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
008d 0092 018d  |    |		Action	Push_String_Extended,0x18d					; "--- deleting temporary file"
008f e003       |    |		Load	0x0,0x3
0090 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0091 e213       |    |		Load	0x1,0x13
0092 0120       |    |		Execute	Any,Is_Value
0093 6803       |h   |		Jump_Zero	0x97
0094 e002       |    |		Load	0x0,0x2
0095 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0096 7801       |x   |		Jump	0x98
0097 e213       |    |		Load	0x1,0x13
0098 601b       |`   |		Indirect_Literal	Discrete,0xb4,{0x00007fff, 0xffffffff}
0099 e212       |    |		Load	0x1,0x12
009a 0092 018e  |    |		Action	Push_String_Extended,0x18e					; "rm /tmp/"
009c e5ff       |    |		Load	0x2,-0x1
009d 01cc       |    |		Execute	Vector,Catenate
009e e002       |    |		Load	0x0,0x2
009f 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
00a0 c213       |    |		Store	0x1,0x13
00a1 e213       |    |		Load	0x1,0x13
00a2 0120       |    |		Execute	Any,Is_Value
00a3 6803       |h   |		Jump_Zero	0xa7
00a4 e002       |    |		Load	0x0,0x2
00a5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a6 7801       |x   |		Jump	0xa8
00a7 e213       |    |		Load	0x1,0x13
00a8 e212       |    |		Load	0x1,0x12
00a9 6006       |`   |		Indirect_Literal	Discrete,0xb0,{0xffffffff, 0xffff8000}
00aa e002       |    |		Load	0x0,0x2
00ab 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00ac c212       |    |		Store	0x1,0x12
00ad c213       |    |		Store	0x1,0x13
00ae 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00af 0000       |    |		.XXX[0x1]
00b0 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffff8000}
00b4 0000 7fff  |    |		.LITERAL	{0x00007fff, 0xffffffff}
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 0092 0186  |    |		Action	Push_String_Extended,0x186					; "--- acquiring connection to "
00bd e5fd       |    |		Load	0x2,-0x3
00be 01cc       |    |		Execute	Vector,Catenate
00bf e003       |    |		Load	0x0,0x3
00c0 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
00c1 e213       |    |		Load	0x1,0x13
00c2 0120       |    |		Execute	Any,Is_Value
00c3 6803       |h   |		Jump_Zero	0xc7
00c4 e002       |    |		Load	0x0,0x2
00c5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00c6 7801       |x   |		Jump	0xc8
00c7 e213       |    |		Load	0x1,0x13
00c8 e212       |    |		Load	0x1,0x12
00c9 0120       |    |		Execute	Any,Is_Value
00ca 6803       |h   |		Jump_Zero	0xce
00cb e002       |    |		Load	0x0,0x2
00cc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00cd 7801       |x   |		Jump	0xcf
00ce e212       |    |		Load	0x1,0x12
00cf 00ea       |    |		Load_Encached	Null_String_Cache
00d0 00ea       |    |		Load_Encached	Null_String_Cache
00d1 e211       |    |		Load	0x1,0x11
00d2 e210       |    |		Load	0x1,0x10
00d3 e5fd       |    |		Load	0x2,-0x3
00d4 e002       |    |		Load	0x0,0x2
00d5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00d6 c212       |    |		Store	0x1,0x12
00d7 c213       |    |		Store	0x1,0x13
00d8 e212       |    |		Load	0x1,0x12
00d9 e002       |    |		Load	0x0,0x2
00da 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00db 012f       | /  |		Execute	Any,Equal
00dc 6804       |h   |		Jump_Zero	0xe1
00dd 0092 0187  |    |		Action	Push_String_Extended,0x187					; "*** Can't obtain context, check Dtia server"
00df e003       |    |		Load	0x0,0x3
00e0 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
00e1 0092 018f  |    |		Action	Push_String_Extended,0x18f					; "--- transfering file to destination library"
00e3 e003       |    |		Load	0x0,0x3
00e4 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
00e5 e006       |    |		Load	0x0,0x6
00e6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00e7 e004       |    |		Load	0x0,0x4
00e8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00e9 e004       |    |		Load	0x0,0x4
00ea 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00eb e004       |    |		Load	0x0,0x4
00ec 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00ed e004       |    |		Load	0x0,0x4
00ee 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00ef 4800       |H   |		Short_Literal	0x0
00f0 e004       |    |		Load	0x0,0x4
00f1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00f2 e004       |    |		Load	0x0,0x4
00f3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00f4 e004       |    |		Load	0x0,0x4
00f5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00f6 e004       |    |		Load	0x0,0x4
00f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00f8 e004       |    |		Load	0x0,0x4
00f9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00fa e5fd       |    |		Load	0x2,-0x3
00fb 0092 018c  |    |		Action	Push_String_Extended,0x18c					; "/tmp/"
00fd e5ff       |    |		Load	0x2,-0x1
00fe 01cc       |    |		Execute	Vector,Catenate
00ff e5ff       |    |		Load	0x2,-0x1
0100 e005       |    |		Load	0x0,0x5
0101 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0102 0092 0190  |    |		Action	Push_String_Extended,0x190					; "--- writing file to diskette "
0104 e003       |    |		Load	0x0,0x3
0105 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
0106 e213       |    |		Load	0x1,0x13
0107 0120       |    |		Execute	Any,Is_Value
0108 6803       |h   |		Jump_Zero	0x10c
0109 e002       |    |		Load	0x0,0x2
010a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010b 7801       |x   |		Jump	0x10d
010c e213       |    |		Load	0x1,0x13
010d 67a6       |g   |		Indirect_Literal	Discrete,0xb4,{0x00007fff, 0xffffffff}
010e e212       |    |		Load	0x1,0x12
010f 0092 0191  |    |		Action	Push_String_Extended,0x191					; "cd /tmp; doswrite "
0111 e5ff       |    |		Load	0x2,-0x1
0112 01cc       |    |		Execute	Vector,Catenate
0113 0092 0192  |    |		Action	Push_String_Extended,0x192					; " "
0115 01cc       |    |		Execute	Vector,Catenate
0116 e5fe       |    |		Load	0x2,-0x2
0117 01cc       |    |		Execute	Vector,Catenate
0118 e002       |    |		Load	0x0,0x2
0119 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
011a c213       |    |		Store	0x1,0x13
011b 0092 018d  |    |		Action	Push_String_Extended,0x18d					; "--- deleting temporary file"
011d e003       |    |		Load	0x0,0x3
011e 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
011f e213       |    |		Load	0x1,0x13
0120 0120       |    |		Execute	Any,Is_Value
0121 6803       |h   |		Jump_Zero	0x125
0122 e002       |    |		Load	0x0,0x2
0123 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0124 7801       |x   |		Jump	0x126
0125 e213       |    |		Load	0x1,0x13
0126 00ea       |    |		Load_Encached	Null_String_Cache
0127 0092 018c  |    |		Action	Push_String_Extended,0x18c					; "/tmp/"
0129 e5ff       |    |		Load	0x2,-0x1
012a 01cc       |    |		Execute	Vector,Catenate
012b e212       |    |		Load	0x1,0x12
012c e002       |    |		Load	0x0,0x2
012d 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
012e c213       |    |		Store	0x1,0x13
012f e213       |    |		Load	0x1,0x13
0130 0120       |    |		Execute	Any,Is_Value
0131 6803       |h   |		Jump_Zero	0x135
0132 e002       |    |		Load	0x0,0x2
0133 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0134 7801       |x   |		Jump	0x136
0135 e213       |    |		Load	0x1,0x13
0136 e212       |    |		Load	0x1,0x12
0137 6778       |gx  |		Indirect_Literal	Discrete,0xb0,{0xffffffff, 0xffff8000}
0138 e002       |    |		Load	0x0,0x2
0139 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
013a c212       |    |		Store	0x1,0x12
013b c213       |    |		Store	0x1,0x13
013c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
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 0092 0193  |    |		Action	Push_String_Extended,0x193					; "--- reading diskette"
0145 e003       |    |		Load	0x0,0x3
0146 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0147 e213       |    |		Load	0x1,0x13
0148 0120       |    |		Execute	Any,Is_Value
0149 6803       |h   |		Jump_Zero	0x14d
014a e002       |    |		Load	0x0,0x2
014b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014c 7801       |x   |		Jump	0x14e
014d e213       |    |		Load	0x1,0x13
014e e212       |    |		Load	0x1,0x12
014f 0120       |    |		Execute	Any,Is_Value
0150 6803       |h   |		Jump_Zero	0x154
0151 e002       |    |		Load	0x0,0x2
0152 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0153 7801       |x   |		Jump	0x155
0154 e212       |    |		Load	0x1,0x12
0155 00ea       |    |		Load_Encached	Null_String_Cache
0156 00ea       |    |		Load_Encached	Null_String_Cache
0157 e004       |    |		Load	0x0,0x4
0158 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0159 e004       |    |		Load	0x0,0x4
015a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
015b e5ff       |    |		Load	0x2,-0x1
015c e002       |    |		Load	0x0,0x2
015d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
015e c212       |    |		Store	0x1,0x12
015f c213       |    |		Store	0x1,0x13
0160 e213       |    |		Load	0x1,0x13
0161 0120       |    |		Execute	Any,Is_Value
0162 6803       |h   |		Jump_Zero	0x166
0163 e002       |    |		Load	0x0,0x2
0164 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0165 7801       |x   |		Jump	0x167
0166 e213       |    |		Load	0x1,0x13
0167 6018       |`   |		Indirect_Literal	Discrete,0x180,{0x00007fff, 0xffffffff}
0168 e212       |    |		Load	0x1,0x12
0169 0092 0194  |    |		Action	Push_String_Extended,0x194					; "dosdir"
016b e002       |    |		Load	0x0,0x2
016c 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
016d c213       |    |		Store	0x1,0x13
016e e213       |    |		Load	0x1,0x13
016f 0120       |    |		Execute	Any,Is_Value
0170 6803       |h   |		Jump_Zero	0x174
0171 e002       |    |		Load	0x0,0x2
0172 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0173 7801       |x   |		Jump	0x175
0174 e213       |    |		Load	0x1,0x13
0175 e212       |    |		Load	0x1,0x12
0176 6005       |`   |		Indirect_Literal	Discrete,0x17c,{0xffffffff, 0xffff8000}
0177 e002       |    |		Load	0x0,0x2
0178 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0179 c212       |    |		Store	0x1,0x12
017a c213       |    |		Store	0x1,0x13
017b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
017c ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffff8000}
0180 0000 7fff  |    |		.LITERAL	{0x00007fff, 0xffffffff}
0184 ; --------------------------------------------------------------------------------------
0184 ; STRING TABLE
0184 ; --------------------------------------------------------------------------------------
0184 0024       | $  |		.STRTAB	0x0024->0x0196							; "r1000"
0185 0027       | '  |		.STRTAB	0x0027->0x0198							; "Rational"
0186 002d       | -  |		.STRTAB	0x002d->0x019c							; "--- acquiring connection to "
0187 0047       | G  |		.STRTAB	0x0047->0x01aa							; "*** Can't obtain context, check Dtia server"
0188 0070       | p  |		.STRTAB	0x0070->0x01c0							; "--- extracting file from diskette"
0189 008f       |    |		.STRTAB	0x008f->0x01d0							; "dosread "
018a 0095       |    |		.STRTAB	0x0095->0x01d4							; " /tmp/"
018b 0099       |    |		.STRTAB	0x0099->0x01d7							; "--- transferring file to destination library"
018c 00c3       |    |		.STRTAB	0x00c3->0x01ed							; "/tmp/"
018d 00c6       |    |		.STRTAB	0x00c6->0x01f0							; "--- deleting temporary file"
018e 00df       |    |		.STRTAB	0x00df->0x01fd							; "rm /tmp/"
018f 00e5       |    |		.STRTAB	0x00e5->0x0201							; "--- transfering file to destination library"
0190 010e       |    |		.STRTAB	0x010e->0x0217							; "--- writing file to diskette "
0191 0129       | )  |		.STRTAB	0x0129->0x0225							; "cd /tmp; doswrite "
0192 0139       | 9  |		.STRTAB	0x0139->0x022e							; " "
0193 0138       | 8  |		.STRTAB	0x0138->0x022f							; "--- reading diskette"
0194 014a       | J  |		.STRTAB	0x014a->0x0239							; "dosdir"
0195 014e       | N  |		.STREND 0x014e->0x023c
0196 7231 3030  |r100|		.STRTAB_STRINGS
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; Debug Table
0240 ; --------------------------------------------------------------------------------------
0240 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0xc999,0x0000,0x0001,0x0005
0246 000b 025a  |   Z|		.DBG4T	0x000b,0x025a,0x8000,0x0000
024a 0012 025f  |   _|		.DBG4T	0x0012,0x025f,0x8000,0x8000
024e 002b 026f  | + o|		.DBG4T	0x002b,0x026f,0x0001,0x0000
0252 00bb 027c  |   ||		.DBG4T	0x00bb,0x027c,0x0001,0x0000
0256 0143 0289  | C  |		.DBG4T	0x0143,0x0289,0x0001,0x0000
025a ; --------------------------------------------------------------------------------------
025a ; Debug chain
025a ; --------------------------------------------------------------------------------------
025a 0003 0000  |    |		.DBGLEN	0x0003,0x0000
025c 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f
025f ; --------------------------------------------------------------------------------------
025f ; Debug chain
025f ; --------------------------------------------------------------------------------------
025f 0007 0000  |    |		.DBGLEN	0x0007,0x0000
0261 0012 0014  |    |		.DBGLNO	0x0012,0x0014,0x0016,0x001b,0x0020,0x0022,0x0024
0268 0004 0005  |    |		.XXX[0x7]
026a 0006 0007  |    |
026c 0008 0009  |    |
026e 000a       |    |
026f ; --------------------------------------------------------------------------------------
026f ; Debug chain
026f ; --------------------------------------------------------------------------------------
026f 0000 000b  |    |		.DBGLEN	0x0000,0x000b
0271 002b 0031  | + 1|		.DBGLNO	0x002b,0x0031,0x004a,0x004f,0x0053,0x0057,0x006c,0x0070,0x008d,0x0091,0x00a1
027c ; --------------------------------------------------------------------------------------
027c ; Debug chain
027c ; --------------------------------------------------------------------------------------
027c 0000 000b  |    |		.DBGLEN	0x0000,0x000b
027e 00bb 00c1  |    |		.DBGLNO	0x00bb,0x00c1,0x00d8,0x00dd,0x00e1,0x00e5,0x0102,0x0106,0x011b,0x011f,0x012f
0289 ; --------------------------------------------------------------------------------------
0289 ; Debug chain
0289 ; --------------------------------------------------------------------------------------
0289 0000 0004  |    |		.DBGLEN	0x0000,0x0004
028b 0143 0147  | C G|		.DBGLNO	0x0143,0x0147,0x0160,0x016e
028f 0000 0000  |    |		.BLANK	0000[0x171]