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

⟦96ed9afed⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0358       | X  |		.CONST	0x0358								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0038       | 8  |		.CONST	0x0038								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0019       |    |		.CONST	0x0019								; Number of locals
000b			INIT_0008:
000b 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x03da,0x8000,0x0000,0x0056,0xf405,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
000d 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xd,0xfffc
000f 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0xf,0xfffb
0011 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x11,0xfffa
0013 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x13,0xfff9
0015 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x15,0xfff8
0017 00bf       |    |		Action	Accept_Activation
0018 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1 = .DEBUG	0x0018,0x03ec,0x8000,0x0000,0x0056,0xf515,0x0000,0x0019
													; Debug Table 0x1.0x0 = 0x18,0xffff
0019 4802       |H   |		Short_Literal	0x2
001a e001       |    |		Load	0x0,0x1
001b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001c 0334       | 4  |		Declare_Variable	Array,With_Constraint
001d 52a2       |R   |		Indirect_Literal	Any,0x2c0,{0x49502020, 0x20202020}
001e 4830       |H0  |		Short_Literal	0x30							; Debug Table 0x1.0x1 = 0x1e,0xfffe
													; Debug Table 0x1.0x2 = 0x1e,0xfffd
													; Debug Table 0x1.0x3 = 0x1e,0xfffc
													; Debug Table 0x1.0x4 = 0x1e,0xfffb
													; Debug Table 0x1.0x5 = 0x1e,0xfffa
													; Debug Table 0x1.0x6 = 0x1e,0xfff9
													; Debug Table 0x1.0x7 = 0x1e,0xfff8
001f 4839       |H9  |		Short_Literal	0x39
0020 00e8       |    |		Load_Encached	Character_Cache
0021 03f8       |    |		Declare_Type	Discrete,Constrained
0022 029d 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call			; Debug Table 0x1.0x8 = 0x22,0xfff7
0024 029d 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call			; Debug Table 0x1.0x9 = 0x24,0xfff6
0026 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0xa = 0x26,0xfff5
0028 029d 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call			; Debug Table 0x1.0xb = 0x28,0xfff4
002a 029d 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call			; Debug Table 0x1.0xc = 0x2a,0xfff3
002c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xd = 0x2c,0xfff2
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xe = 0x2e,0xfff1
002f 00c7       |    |		Action	Elaborate_Subprogram
0030 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0xf = 0x30,0xfff0
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x10 = 0x32,0xffef
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x11 = 0x34,0xffee
0035 00c7       |    |		Action	Elaborate_Subprogram
0036 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x12 = 0x36,0xffed
0037 00c7       |    |		Action	Elaborate_Subprogram
0038			BODY_0008:
0038 00bc       |    |		Action	Signal_Activated
0039 00bb       |    |		Action	Signal_Completion
003a 0000 0000  |    |		.BLANK	0000[0x6]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0064       | d  |		.CONST	0x0064								; Address of begin
0041 00d6       |    |		.CONST	0x00d6								; Address of exception handler
0042 0009       |    |		.CONST	0x0009								; Number of locals
0043			INIT_0040:
0043 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x2 = .DEBUG	0x0043,0x0414,0x0001,0x0000,0x0056,0xf405,0x0000,0x000f
													; Debug Table 0x2.0x0 = 0x43,0xffff
0044 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x1 = 0x44,0xfffe
0045 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x2 = 0x45,0xfffd
0046 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0047 02c7       |    |		Declare_Variable	Any
0048 e5fc       |    |		Load	0x2,-0x4
0049 e002       |    |		Load	0x0,0x2
004a 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
004b c404       |    |		Store	0x2,0x4
004c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x3 = 0x4c,0xfffc
004d e5ff       |    |		Load	0x2,-0x1
004e 8216       |    |		Call	0x1,0x16
004f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x4 = 0x4f,0xfffb
0050 e5fe       |    |		Load	0x2,-0x2
0051 8216       |    |		Call	0x1,0x16
0052 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x5 = 0x52,0xfffa
0053 e001       |    |		Load	0x0,0x1
0054 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0055 e003       |    |		Load	0x0,0x3								; Debug Table 0x2.0x6 = 0x55,0xfff9
0056 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0057 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0058 02c7       |    |		Declare_Variable	Any
0059 00d8       |    |		Load_Top	At_Offset_0
005a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
005b 6260       |b`  |		Indirect_Literal	Discrete,0x2bc,{0x00000000, 0x0056f515}		; Debug Table 0x2.0x7 = 0x5b,0xfff8
005c 625b       |b[  |		Indirect_Literal	Discrete,0x2b8,{0x00000000, 0x000004a8}
005d 4804       |H   |		Short_Literal	0x4
005e 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; " "
0060 e004       |    |		Load	0x0,0x4
0061 0387       |    |		Declare_Variable	Package
0062 00d8       |    |		Load_Top	At_Offset_0
0063 020f       |    |		Execute	Module,Activate
0064			BODY_0040:
0064 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x8 = 0x64,0x1
0065 0092 02c5  |    |		Action	Push_String_Extended,0x2c5					; "Route"
0067 00da       |    |		Load_Top	At_Offset_2
0068 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0069 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x9 = 0x69,0x2
006a 0092 02c6  |    |		Action	Push_String_Extended,0x2c6					; "Destination"
006c 00da       |    |		Load_Top	At_Offset_2
006d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
006e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0xa = 0x6e,0x3
006f 0092 02c7  |    |		Action	Push_String_Extended,0x2c7					; "Network"
0071 00da       |    |		Load_Top	At_Offset_2
0072 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0073 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0xb = 0x73,0x4
0074 0092 02c8  |    |		Action	Push_String_Extended,0x2c8					; "Subnet_Mask"
0076 00da       |    |		Load_Top	At_Offset_2
0077 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0078 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0xc = 0x78,0x5
0079 0120       |    |		Execute	Any,Is_Value
007a 6804       |h   |		Jump_Zero	0x7f
007b e003       |    |		Load	0x0,0x3
007c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
007d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
007e 7801       |x   |		Jump	0x80
007f 00d9       |    |		Load_Top	At_Offset_1
0080 e003       |    |		Load	0x0,0x3
0081 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0082 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0083 c408       |    |		Store	0x2,0x8
0084 00cf       |    |		Action	Mark_Auxiliary
0085 7845       |xE  |		Jump	0xcb
0086 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x2.0xd = 0x86,0x7
0087 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xe = 0x87,0xfbff
0088 e003       |    |		Load	0x0,0x3
0089 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
008a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
008b e408       |    |		Load	0x2,0x8								; Debug Table 0x2.0xf = 0x8b,0xfbfe
008c e003       |    |		Load	0x0,0x3
008d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
008e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
008f e408       |    |		Load	0x2,0x8								; Debug Table 0x2.0x10 = 0x8f,0xfbfd
0090 e003       |    |		Load	0x0,0x3
0091 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0092 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0093 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x11 = 0x93,0x401
0094 e402       |    |		Load	0x2,0x2
0095 01df       |    |		Execute	Vector,Equal
0096 7004       |p   |		Jump_Nonzero	0x9b
0097 e405       |    |		Load	0x2,0x5
0098 00db       |    |		Load_Top	At_Offset_3
0099 01df       |    |		Execute	Vector,Equal
009a 7801       |x   |		Jump	0x9c
009b 4801       |H   |		Short_Literal	0x1
009c 6826       |h&  |		Jump_Zero	0xc3
009d e5fe       |    |		Load	0x2,-0x2
009e e402       |    |		Load	0x2,0x2
009f 01df       |    |		Execute	Vector,Equal
00a0 7004       |p   |		Jump_Nonzero	0xa5
00a1 e406       |    |		Load	0x2,0x6
00a2 00da       |    |		Load_Top	At_Offset_2
00a3 01df       |    |		Execute	Vector,Equal
00a4 7801       |x   |		Jump	0xa6
00a5 4801       |H   |		Short_Literal	0x1
00a6 681c       |h   |		Jump_Zero	0xc3
00a7 e5fd       |    |		Load	0x2,-0x3
00a8 e403       |    |		Load	0x2,0x3
00a9 01df       |    |		Execute	Vector,Equal
00aa 7004       |p   |		Jump_Nonzero	0xaf
00ab e407       |    |		Load	0x2,0x7
00ac 00d9       |    |		Load_Top	At_Offset_1
00ad 01df       |    |		Execute	Vector,Equal
00ae 7801       |x   |		Jump	0xb0
00af 4801       |H   |		Short_Literal	0x1
00b0 6812       |h   |		Jump_Zero	0xc3
00b1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x12 = 0xb1,0x402
00b2 8217       |    |		Call	0x1,0x17
00b3 e409       |    |		Load	0x2,0x9
00b4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x13 = 0xb5,0x403
00b6 8217       |    |		Call	0x1,0x17
00b7 e409       |    |		Load	0x2,0x9
00b8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x14 = 0xb9,0x404
00ba e409       |    |		Load	0x2,0x9
00bb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00bc e408       |    |		Load	0x2,0x8								; Debug Table 0x2.0x15 = 0xbc,0x405
00bd e003       |    |		Load	0x0,0x3
00be 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00bf 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00c0 8217       |    |		Call	0x1,0x17
00c1 e409       |    |		Load	0x2,0x9
00c2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00c3 00d3       |    |		Pop_Control	Pop_Count_3
00c4 00ce       |    |		Action	Pop_Auxiliary
00c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x16 = 0xc5,0x8
00c6 e003       |    |		Load	0x0,0x3
00c7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00c8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00c9 c408       |    |		Store	0x2,0x8
00ca 00c9       |    |		Action	Pop_Auxiliary_Loop
00cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x17 = 0xcb,0x6
00cc e003       |    |		Load	0x0,0x3
00cd 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ce 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00cf 6fb6       |o   |		Jump_Zero	0x86
00d0 00ce       |    |		Action	Pop_Auxiliary
00d1 e005       |    |		Load	0x0,0x5								; Debug Table 0x2.0x18 = 0xd1,0x9
00d2 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
00d3 00d9       |    |		Load_Top	At_Offset_1
00d4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00d5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00d6			TRAP_0040:
00d6 0007       |    |		Action	Break_Optional
00d7 e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x19 = 0xd7,0xa
00d8 4805       |H   |		Short_Literal	0x5
00d9 0092 02c9  |    |		Action	Push_String_Extended,0x2c9					; "Transport_Route.Show failed."
00db e006       |    |		Load	0x0,0x6
00dc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00dd e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x1a = 0xdd,0xb
00de e002       |    |		Load	0x0,0x2
00df 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00e0 6802       |h   |		Jump_Zero	0xe3
00e1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x1b = 0xe1,0xc
00e2 0101       |    |		Execute	Exception,Reraise
00e3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00e4 0000 0000  |    |		.BLANK	0000[0x4]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f8       |    |		.CONST	0x00f8								; Address of begin
00e9 010a       |    |		.CONST	0x010a								; Address of exception handler
00ea 0005       |    |		.CONST	0x0005								; Number of locals
00eb			INIT_00e8:
00eb e002       |    |		Load	0x0,0x2								; Debug Table 0x3 = .DEBUG	0x00eb,0x044e,0x0001,0x0000,0x0056,0xf405,0x0000,0x0029
													; Debug Table 0x3.0x0 = 0xeb,0xffff
00ec 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ed 02c7       |    |		Declare_Variable	Any
00ee e5fd       |    |		Load	0x2,-0x3
00ef e002       |    |		Load	0x0,0x2
00f0 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
00f1 c402       |    |		Store	0x2,0x2
00f2 e007       |    |		Load	0x0,0x7								; Debug Table 0x3.0x1 = 0xf2,0xfffe
00f3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f4 029f 024b  |   K|		Declare_Subprogram	INIT_0248,For_Call
00f6 029f 026b  |   k|		Declare_Subprogram	INIT_0268,For_Call
00f8			BODY_00e8:
00f8 8404       |    |		Call	0x2,0x4								; Debug Table 0x3.0x2 = 0xf8,0x1
00f9 00cf       |    |		Action	Mark_Auxiliary
00fa 7805       |x   |		Jump	0x100
00fb 8405       |    |		Call	0x2,0x5								; Debug Table 0x3.0x3 = 0xfb,0x3
00fc 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x4 = 0xfc,0x4
00fd e007       |    |		Load	0x0,0x7
00fe 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ff 00c9       |    |		Action	Pop_Auxiliary_Loop
0100 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x5 = 0x100,0x2
0101 e007       |    |		Load	0x0,0x7
0102 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0103 6ff7       |o   |		Jump_Zero	0xfb
0104 00ce       |    |		Action	Pop_Auxiliary
0105 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x6 = 0x105,0x5
0106 e007       |    |		Load	0x0,0x7
0107 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0108 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0109 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
010a			TRAP_00e8:
010a 0007       |    |		Action	Break_Optional
010b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x7 = 0x10b,0x6
010c e007       |    |		Load	0x0,0x7
010d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
010e c403       |    |		Store	0x2,0x3
010f e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x8 = 0x10f,0x7
0110 4805       |H   |		Short_Literal	0x5
0111 0092 02ca  |    |		Action	Push_String_Extended,0x2ca					; "Transport_Route.Load failed."
0113 e006       |    |		Load	0x0,0x6
0114 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0115 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x9 = 0x115,0x8
0116 e002       |    |		Load	0x0,0x2
0117 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0118 6802       |h   |		Jump_Zero	0x11b
0119 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xa = 0x119,0x9
011a 0101       |    |		Execute	Exception,Reraise
011b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
011c 0000 0000  |    |		.BLANK	0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x4 = .DEBUG	0x0123,0x0466,0x0001,0x0000,0x0056,0xf405,0x0000,0x003c
													; Debug Table 0x4.0x0 = 0x123,0x1
0124 e002       |    |		Load	0x0,0x2
0125 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0126 00ea       |    |		Load_Encached	Null_String_Cache
0127 e5fd       |    |		Load	0x2,-0x3
0128 e5fe       |    |		Load	0x2,-0x2
0129 e5ff       |    |		Load	0x2,-0x1
012a 8218       |    |		Call	0x1,0x18
012b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
012c 0000 0000  |    |		.BLANK	0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x5 = .DEBUG	0x0133,0x046a,0x0001,0x0000,0x0056,0xf405,0x0000,0x0055
													; Debug Table 0x5.0x0 = 0x133,0x1
0134 e002       |    |		Load	0x0,0x2
0135 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0136 00ea       |    |		Load_Encached	Null_String_Cache
0137 e5fd       |    |		Load	0x2,-0x3
0138 e5fe       |    |		Load	0x2,-0x2
0139 e5ff       |    |		Load	0x2,-0x1
013a 8219       |    |		Call	0x1,0x19
013b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
013c 0000 0000  |    |		.BLANK	0000[0x4]
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 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x6 = .DEBUG	0x0143,0x046e,0x0001,0x0000,0x0056,0xf405,0x0000,0x006e
													; Debug Table 0x6.0x0 = 0x143,0x1
0144 e002       |    |		Load	0x0,0x2
0145 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0146 e5fc       |    |		Load	0x2,-0x4
0147 e5fd       |    |		Load	0x2,-0x3
0148 e5fe       |    |		Load	0x2,-0x2
0149 e5ff       |    |		Load	0x2,-0x1
014a 8218       |    |		Call	0x1,0x18
014b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
014c 0000 0000  |    |		.BLANK	0000[0x4]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x7 = .DEBUG	0x0153,0x0472,0x0001,0x0000,0x0056,0xf405,0x0000,0x008b
													; Debug Table 0x7.0x0 = 0x153,0x1
0154 e002       |    |		Load	0x0,0x2
0155 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0156 e5fc       |    |		Load	0x2,-0x4
0157 e5fd       |    |		Load	0x2,-0x3
0158 e5fe       |    |		Load	0x2,-0x2
0159 e5ff       |    |		Load	0x2,-0x1
015a 8219       |    |		Call	0x1,0x19
015b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
015c 0000 0000  |    |		.BLANK	0000[0x4]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0178       | x  |		.CONST	0x0178								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0003       |    |		.CONST	0x0003								; Number of locals
0163			INIT_0160:
0163 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8 = .DEBUG	0x0163,0x0476,0x0002,0x0000,0x0056,0xf515,0x0000,0x008f
													; Debug Table 0x8.0x0 = 0x163,0xffff
0164 4900       |I   |		Short_Literal	0x100
0165 e001       |    |		Load	0x0,0x1
0166 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0167 0334       | 4  |		Declare_Variable	Array,With_Constraint
0168 4801       |H   |		Short_Literal	0x1
0169 4900       |I   |		Short_Literal	0x100
016a e001       |    |		Load	0x0,0x1
016b 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
016c 0334       | 4  |		Declare_Variable	Array,With_Constraint
016d 4900       |I   |		Short_Literal	0x100
016e 4801       |H   |		Short_Literal	0x1
016f 4800       |H   |		Short_Literal	0x0
0170 00d9       |    |		Load_Top	At_Offset_1
0171 e403       |    |		Load	0x2,0x3
0172 01d6       |    |		Execute	Vector,Field_Write
0173 3ffb       |?   |		Loop_Increasing	0x16f
0174 00d9       |    |		Load_Top	At_Offset_1
0175 01d4       |    |		Execute	Vector,Structure_Write
0176 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x8.0x1 = 0x176,0xfffe
0177 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0178			BODY_0160:
0178 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x2 = 0x178,0xfffd
													; Debug Table 0x8.0x3 = 0x178,0x1
0179 01db       |    |		Execute	Vector,Length
017a 6805       |h   |		Jump_Zero	0x180
017b e5ff       |    |		Load	0x2,-0x1
017c 0092 02cb  |    |		Action	Push_String_Extended,0x2cb					; "."
017e 01df       |    |		Execute	Vector,Equal
017f 6803       |h   |		Jump_Zero	0x183
0180 e001       |    |		Load	0x0,0x1								; Debug Table 0x8.0x4 = 0x180,0x2
0181 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0182 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0183 00cf       |    |		Action	Mark_Auxiliary
0184 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x5 = 0x184,0x3
0185 01d9       |    |		Execute	Vector,Reverse_Bounds
0186 0263       | c  |		Execute	Discrete,Above_Bound
0187 7024       |p$  |		Jump_Nonzero	0x1ac
0188 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x6 = 0x188,0x4
0189 e5ff       |    |		Load	0x2,-0x1
018a 01d7       |    |		Execute	Vector,Field_Read
018b 00d8       |    |		Load_Top	At_Offset_0
018c 4830       |H0  |		Short_Literal	0x30
018d 4839       |H9  |		Short_Literal	0x39
018e 0262       | b  |		Execute	Discrete,In_Range
018f 7004       |p   |		Jump_Nonzero	0x194
0190 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
0191 7014       |p   |		Jump_Nonzero	0x1a6
0192 48e0       |H   |		Short_Literal	0xe0							; Debug Table 0x8.0x7 = 0x192,0x7
0193 0257       | W  |		Execute	Discrete,Raise
0194 e403       |    |		Load	0x2,0x3								; Debug Table 0x8.0x8 = 0x194,0x5
0195 e402       |    |		Load	0x2,0x2
0196 01d7       |    |		Execute	Vector,Field_Read
0197 480a       |H   |		Short_Literal	0xa
0198 0271       | q  |		Execute	Discrete,Times
0199 0248       | H  |		Execute	Discrete,Check_In_Integer
019a 00da       |    |		Load_Top	At_Offset_2
019b e5ff       |    |		Load	0x2,-0x1
019c 01d7       |    |		Execute	Vector,Field_Read
019d 0ad0       |    |		Execute_Immediate	Plus,-0x30
019e e008       |    |		Load	0x0,0x8
019f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01a0 025b       | [  |		Execute	Discrete,Check_In_Type
01a1 0273       | s  |		Execute	Discrete,Plus
01a2 e403       |    |		Load	0x2,0x3
01a3 e402       |    |		Load	0x2,0x2
01a4 01d6       |    |		Execute	Vector,Field_Write
01a5 7803       |x   |		Jump	0x1a9
01a6 e403       |    |		Load	0x2,0x3								; Debug Table 0x8.0x9 = 0x1a6,0x6
01a7 0a01       |    |		Execute_Immediate	Plus,0x1
01a8 c403       |    |		Store	0x2,0x3
01a9 00d1       |    |		Pop_Control	Pop_Count_1
01aa 00c8       |    |		Action	Pop_Auxiliary_Range
01ab 3fdc       |?   |		Loop_Increasing	0x188
01ac 00ce       |    |		Action	Pop_Auxiliary
01ad 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0xa = 0x1ad,0x8
01ae 00d9       |    |		Load_Top	At_Offset_1
01af 00db       |    |		Load_Top	At_Offset_3
01b0 01cf       |    |		Execute	Vector,Slice_Read
01b1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b2 0000 0000  |    |		.BLANK	0000[0x6]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bd       |    |		.CONST	0x01bd								; Address of begin
01b9 01c3       |    |		.CONST	0x01c3								; Address of exception handler
01ba 0002       |    |		.CONST	0x0002								; Number of locals
01bb			INIT_01b8:
01bb 029f 0293  |    |		Declare_Subprogram	INIT_0290,For_Call				; Debug Table 0x9 = .DEBUG	0x01bb,0x048e,0x0002,0x0000,0x0056,0xf515,0x0000,0x0121
01bd			BODY_01b8:
01bd 4820       |H   |		Short_Literal	0x20							; Debug Table 0x9.0x0 = 0x1bd,0x1
01be e5ff       |    |		Load	0x2,-0x1
01bf e009       |    |		Load	0x0,0x9
01c0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01c1 8215       |    |		Call	0x1,0x15
01c2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01c3			TRAP_01b8:
01c3 010e       |    |		Execute	Exception,Is_Constraint_Error
01c4 6803       |h   |		Jump_Zero	0x1c8
01c5 8402       |    |		Call	0x2,0x2								; Debug Table 0x9.0x1 = 0x1c5,0x2
01c6 4831       |H1  |		Short_Literal	0x31
01c7 0257       | W  |		Execute	Discrete,Raise
01c8 0100       |    |		Execute	Exception,Raise
01c9 0000 0000  |    |		.BLANK	0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x01d3,0x0494,0x0002,0x0000,0x0056,0xf515,0x0000,0x0183
													; Debug Table 0xa.0x0 = 0x1d3,0x1
01d4 e00a       |    |		Load	0x0,0xa
01d5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d7 0000       |    |		.XXX[0x1]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01dd       |    |		.CONST	0x01dd								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0002       |    |		.CONST	0x0002								; Number of locals
01db			INIT_01d8:
01db e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x01db,0x0498,0x0001,0x0000,0x0056,0xf515,0x0000,0x019e
													; Debug Table 0xb.0x0 = 0x1db,0xffff
01dc 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
01dd			BODY_01d8:
01dd e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x1dd,0x1
01de 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
01df e5fb       |    |		Load	0x2,-0x5
01e0 e5ff       |    |		Load	0x2,-0x1
01e1 8216       |    |		Call	0x1,0x16
01e2 e5fb       |    |		Load	0x2,-0x5
01e3 e5fc       |    |		Load	0x2,-0x4
01e4 8216       |    |		Call	0x1,0x16
01e5 e5fb       |    |		Load	0x2,-0x5
01e6 e5fe       |    |		Load	0x2,-0x2
01e7 8216       |    |		Call	0x1,0x16
01e8 e5fd       |    |		Load	0x2,-0x3
01e9 e003       |    |		Load	0x0,0x3
01ea 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01eb 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01ec 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01ed 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x2 = 0x1ed,0x2
01ee 681b       |h   |		Jump_Zero	0x20a
01ef e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xb.0x3 = 0x1ef,0x3
01f0 4805       |H   |		Short_Literal	0x5
01f1 0092 02cc  |    |		Action	Push_String_Extended,0x2cc					; "Transport_Route.Define (\x22"
01f3 e5ff       |    |		Load	0x2,-0x1
01f4 01cc       |    |		Execute	Vector,Catenate
01f5 0092 02cd  |    |		Action	Push_String_Extended,0x2cd					; "\x22, \x22"
01f7 01cc       |    |		Execute	Vector,Catenate
01f8 e5fe       |    |		Load	0x2,-0x2
01f9 01cc       |    |		Execute	Vector,Catenate
01fa 0092 02ce  |    |		Action	Push_String_Extended,0x2ce					; "\x22) failed: Status = "
01fc 01cc       |    |		Execute	Vector,Catenate
01fd 00db       |    |		Load_Top	At_Offset_3
01fe e001       |    |		Load	0x0,0x1
01ff 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0200 01cc       |    |		Execute	Vector,Catenate
0201 e006       |    |		Load	0x0,0x6
0202 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0203 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xb.0x4 = 0x203,0x4
0204 e002       |    |		Load	0x0,0x2
0205 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0206 6803       |h   |		Jump_Zero	0x20a
0207 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x5 = 0x207,0x5
0208 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0209 0257       | W  |		Execute	Discrete,Raise
020a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
020b 0000 0000  |    |		.BLANK	0000[0x5]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0215       |    |		.CONST	0x0215								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0002       |    |		.CONST	0x0002								; Number of locals
0213			INIT_0210:
0213 e001       |    |		Load	0x0,0x1								; Debug Table 0xc = .DEBUG	0x0213,0x04a6,0x0001,0x0000,0x0056,0xf515,0x0000,0x0222
													; Debug Table 0xc.0x0 = 0x213,0xffff
0214 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0215			BODY_0210:
0215 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x1 = 0x215,0x1
0216 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0217 e5fb       |    |		Load	0x2,-0x5
0218 e5ff       |    |		Load	0x2,-0x1
0219 8216       |    |		Call	0x1,0x16
021a e5fb       |    |		Load	0x2,-0x5
021b e5fc       |    |		Load	0x2,-0x4
021c 8216       |    |		Call	0x1,0x16
021d e5fb       |    |		Load	0x2,-0x5
021e e5fe       |    |		Load	0x2,-0x2
021f 8216       |    |		Call	0x1,0x16
0220 e5fd       |    |		Load	0x2,-0x3
0221 e003       |    |		Load	0x0,0x3
0222 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0223 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0224 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0225 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2 = 0x225,0x2
0226 681b       |h   |		Jump_Zero	0x242
0227 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xc.0x3 = 0x227,0x3
0228 4805       |H   |		Short_Literal	0x5
0229 0092 02cf  |    |		Action	Push_String_Extended,0x2cf					; "Transport_Route.Undefine (\x22"
022b e5ff       |    |		Load	0x2,-0x1
022c 01cc       |    |		Execute	Vector,Catenate
022d 0092 02cd  |    |		Action	Push_String_Extended,0x2cd					; "\x22, \x22"
022f 01cc       |    |		Execute	Vector,Catenate
0230 e5fe       |    |		Load	0x2,-0x2
0231 01cc       |    |		Execute	Vector,Catenate
0232 0092 02ce  |    |		Action	Push_String_Extended,0x2ce					; "\x22) failed: Status = "
0234 01cc       |    |		Execute	Vector,Catenate
0235 00db       |    |		Load_Top	At_Offset_3
0236 e001       |    |		Load	0x0,0x1
0237 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0238 01cc       |    |		Execute	Vector,Catenate
0239 e006       |    |		Load	0x0,0x6
023a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
023b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xc.0x4 = 0x23b,0x4
023c e002       |    |		Load	0x0,0x2
023d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
023e 6803       |h   |		Jump_Zero	0x242
023f e002       |    |		Load	0x0,0x2								; Debug Table 0xc.0x5 = 0x23f,0x5
0240 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0241 0257       | W  |		Execute	Discrete,Raise
0242 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0243 0000 0000  |    |		.BLANK	0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0253       | S  |		.CONST	0x0253								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b e403       |    |		Load	0x2,0x3								; Debug Table 0xd = .DEBUG	0x024b,0x04b4,0x0004,0x0000,0x0056,0xf515,0x0000,0x03b4
													; Debug Table 0xd.0x0 = 0x24b,0x1
024c e5fe       |    |		Load	0x2,-0x2
024d e5ff       |    |		Load	0x2,-0x1
024e 4800       |H   |		Short_Literal	0x0
024f e00b       |    |		Load	0x0,0xb
0250 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0251 c403       |    |		Store	0x2,0x3
0252 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0253			TRAP_0248:
0253 0007       |    |		Action	Break_Optional
0254 e402       |    |		Load	0x2,0x2								; Debug Table 0xd.0x1 = 0x254,0x2
0255 4807       |H   |		Short_Literal	0x7
0256 4822       |H"  |		Short_Literal	0x22
0257 e5ff       |    |		Load	0x2,-0x1
0258 01ca       |    |		Execute	Vector,Prepend
0259 0092 02d0  |    |		Action	Push_String_Extended,0x2d0					; "\x22 cannot be opened."
025b 01cc       |    |		Execute	Vector,Catenate
025c e006       |    |		Load	0x0,0x6
025d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
025e e402       |    |		Load	0x2,0x2								; Debug Table 0xd.0x2 = 0x25e,0x3
025f e002       |    |		Load	0x0,0x2
0260 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0261 6802       |h   |		Jump_Zero	0x264
0262 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x3 = 0x262,0x4
0263 0101       |    |		Execute	Exception,Reraise
0264 00cc       |    |		Action	Pop_Block							; Debug Table 0xd.0x4 = 0x264,0x5
0265 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0266 0000 0000  |    |		.XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0277       | w  |		.CONST	0x0277								; Address of begin
0269 0288       |    |		.CONST	0x0288								; Address of exception handler
026a 0005       |    |		.CONST	0x0005								; Number of locals
026b			INIT_0268:
026b e403       |    |		Load	0x2,0x3								; Debug Table 0xe = .DEBUG	0x026b,0x04c0,0x0004,0x0000,0x0056,0xf515,0x0000,0x0416
													; Debug Table 0xe.0x0 = 0x26b,0xffff
026c e007       |    |		Load	0x0,0x7
026d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
026e e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x1 = 0x26e,0xfffe
026f e007       |    |		Load	0x0,0x7
0270 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0271 e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x2 = 0x271,0xfffd
0272 e007       |    |		Load	0x0,0x7
0273 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0274 e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x3 = 0x274,0xfffc
0275 e007       |    |		Load	0x0,0x7
0276 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0277			BODY_0268:
0277 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x4 = 0x277,0x1
0278 01db       |    |		Execute	Vector,Length
0279 7007       |p   |		Jump_Nonzero	0x281
027a e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x5 = 0x27a,0x2
027b 00d9       |    |		Load_Top	At_Offset_1
027c e213       |    |		Load	0x1,0x13
027d e603       |    |		Load	0x3,0x3
027e e602       |    |		Load	0x3,0x2
027f 8218       |    |		Call	0x1,0x18
0280 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0281 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x6 = 0x281,0x3
0282 00d9       |    |		Load_Top	At_Offset_1
0283 00db       |    |		Load_Top	At_Offset_3
0284 e603       |    |		Load	0x3,0x3
0285 e602       |    |		Load	0x3,0x2
0286 8218       |    |		Call	0x1,0x18
0287 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0288			TRAP_0268:
0288 0007       |    |		Action	Break_Optional
0289 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x7 = 0x289,0x4
028a e002       |    |		Load	0x0,0x2
028b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
028c 7002       |p   |		Jump_Nonzero	0x28f
028d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x8 = 0x28d,0x5
028e 0101       |    |		Execute	Exception,Reraise
028f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0298       |    |		.CONST	0x0298								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf = .DEBUG	0x0293,0x04d4,0x0004,0x0000,0x0056,0xf515,0x0000,0x017d
													; Debug Table 0xf.0x0 = 0x293,0x1
0294 e00c       |    |		Load	0x0,0xc
0295 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0296 00cb       |    |		Action	Pop_Block_With_Result
0297 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0298			TRAP_0290:
0298 e00c       |    |		Load	0x0,0xc
0299 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
029a 010f       |    |		Execute	Exception,Equal
029b 680f       |h   |		Jump_Zero	0x2ab
029c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x1 = 0x29c,0x2
029d 4807       |H   |		Short_Literal	0x7
029e 4822       |H"  |		Short_Literal	0x22
029f e5ff       |    |		Load	0x2,-0x1
02a0 01ca       |    |		Execute	Vector,Prepend
02a1 0092 02d1  |    |		Action	Push_String_Extended,0x2d1					; "\x22 cannot be resolved"
02a3 01cc       |    |		Execute	Vector,Catenate
02a4 0092 02d2  |    |		Action	Push_String_Extended,0x2d2					; " (Transport_Name.Undefined)."
02a6 01cc       |    |		Execute	Vector,Catenate
02a7 e006       |    |		Load	0x0,0x6
02a8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02a9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x2a9,0x3
02aa 0101       |    |		Execute	Exception,Reraise
02ab e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x3 = 0x2ab,0x4
02ac 4807       |H   |		Short_Literal	0x7
02ad 4822       |H"  |		Short_Literal	0x22
02ae e5ff       |    |		Load	0x2,-0x1
02af 01ca       |    |		Execute	Vector,Prepend
02b0 0092 02d3  |    |		Action	Push_String_Extended,0x2d3					; "\x22 cannot be resolved."
02b2 01cc       |    |		Execute	Vector,Catenate
02b3 e006       |    |		Load	0x0,0x6
02b4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02b5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x4 = 0x2b5,0x5
02b6 0101       |    |		Execute	Exception,Reraise
02b7 0000       |    |		.XXX[0x1]
02b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000004a8}
02bc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0056f515}
02c0 4950 2020  |IP  |		.LITERAL	{0x49502020, 0x20202020}
02c4 ; --------------------------------------------------------------------------------------
02c4 ; STRING TABLE
02c4 ; --------------------------------------------------------------------------------------
02c4 0022       | "  |		.STRTAB	0x0022->0x02d5							; " "
02c5 0021       | !  |		.STRTAB	0x0021->0x02d5							; "Route"
02c6 0024       | $  |		.STRTAB	0x0024->0x02d8							; "Destination"
02c7 002d       | -  |		.STRTAB	0x002d->0x02dd							; "Network"
02c8 0032       | 2  |		.STRTAB	0x0032->0x02e1							; "Subnet_Mask"
02c9 003b       | ;  |		.STRTAB	0x003b->0x02e6							; "Transport_Route.Show failed."
02ca 0055       | U  |		.STRTAB	0x0055->0x02f4							; "Transport_Route.Load failed."
02cb 006f       | o  |		.STRTAB	0x006f->0x0302							; "."
02cc 006e       | n  |		.STRTAB	0x006e->0x0303							; "Transport_Route.Define (\x22"
02cd 0085       |    |		.STRTAB	0x0085->0x030f							; "\x22, \x22"
02ce 0087       |    |		.STRTAB	0x0087->0x0311							; "\x22) failed: Status = "
02cf 0099       |    |		.STRTAB	0x0099->0x031b							; "Transport_Route.Undefine (\x22"
02d0 00b2       |    |		.STRTAB	0x00b2->0x0329							; "\x22 cannot be opened."
02d1 00c3       |    |		.STRTAB	0x00c3->0x0332							; "\x22 cannot be resolved"
02d2 00d5       |    |		.STRTAB	0x00d5->0x033c							; " (Transport_Name.Undefined)."
02d3 00ef       |    |		.STRTAB	0x00ef->0x034a							; "\x22 cannot be resolved."
02d4 0102       |    |		.STREND 0x0102->0x0355
02d5 2052 6f75  | Rou|		.STRTAB_STRINGS
0355 0000 0000  |    |		.XXX[0x3]
0357 0000       |    |
0358 ; --------------------------------------------------------------------------------------
0358 ; Debug Table
0358 ; --------------------------------------------------------------------------------------
0358 0003 0010  |    |		.CONST	0x0003,0x0010
035a 000b 03da  |    |		.DEBUG	0x000b,0x03da,0x8000,0x0000,0x0056,0xf405,0x0000,0x0005
0362 0018 03ec  |    |		.DEBUG	0x0018,0x03ec,0x8000,0x0000,0x0056,0xf515,0x0000,0x0019
036a 0043 0414  | C  |		.DEBUG	0x0043,0x0414,0x0001,0x0000,0x0056,0xf405,0x0000,0x000f
0372 00eb 044e  |   N|		.DEBUG	0x00eb,0x044e,0x0001,0x0000,0x0056,0xf405,0x0000,0x0029
037a 0123 0466  | # f|		.DEBUG	0x0123,0x0466,0x0001,0x0000,0x0056,0xf405,0x0000,0x003c
0382 0133 046a  | 3 j|		.DEBUG	0x0133,0x046a,0x0001,0x0000,0x0056,0xf405,0x0000,0x0055
038a 0143 046e  | C n|		.DEBUG	0x0143,0x046e,0x0001,0x0000,0x0056,0xf405,0x0000,0x006e
0392 0153 0472  | S r|		.DEBUG	0x0153,0x0472,0x0001,0x0000,0x0056,0xf405,0x0000,0x008b
039a 0163 0476  | c v|		.DEBUG	0x0163,0x0476,0x0002,0x0000,0x0056,0xf515,0x0000,0x008f
03a2 01bb 048e  |    |		.DEBUG	0x01bb,0x048e,0x0002,0x0000,0x0056,0xf515,0x0000,0x0121
03aa 01d3 0494  |    |		.DEBUG	0x01d3,0x0494,0x0002,0x0000,0x0056,0xf515,0x0000,0x0183
03b2 01db 0498  |    |		.DEBUG	0x01db,0x0498,0x0001,0x0000,0x0056,0xf515,0x0000,0x019e
03ba 0213 04a6  |    |		.DEBUG	0x0213,0x04a6,0x0001,0x0000,0x0056,0xf515,0x0000,0x0222
03c2 024b 04b4  | K  |		.DEBUG	0x024b,0x04b4,0x0004,0x0000,0x0056,0xf515,0x0000,0x03b4
03ca 026b 04c0  | k  |		.DEBUG	0x026b,0x04c0,0x0004,0x0000,0x0056,0xf515,0x0000,0x0416
03d2 0293 04d4  |    |		.DEBUG	0x0293,0x04d4,0x0004,0x0000,0x0056,0xf515,0x0000,0x017d
03da ; --------------------------------------------------------------------------------------
03da ; Debug3 Subtable 0x0
03da ; --------------------------------------------------------------------------------------
03da 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
03dc 000b ffff  |    |		.CONST	0x000b,0xffff
03de 000b fffe  |    |		.CONST	0x000b,0xfffe
03e0 000b fffd  |    |		.CONST	0x000b,0xfffd
03e2 000d fffc  |    |		.CONST	0x000d,0xfffc
03e4 000f fffb  |    |		.CONST	0x000f,0xfffb
03e6 0011 fffa  |    |		.CONST	0x0011,0xfffa
03e8 0013 fff9  |    |		.CONST	0x0013,0xfff9
03ea 0015 fff8  |    |		.CONST	0x0015,0xfff8
03ec ; --------------------------------------------------------------------------------------
03ec ; Debug3 Subtable 0x1
03ec ; --------------------------------------------------------------------------------------
03ec 0013 0000  |    |		.DBG3TAB	0x0013,0x0000
03ee 0018 ffff  |    |		.CONST	0x0018,0xffff
03f0 001e fffe  |    |		.CONST	0x001e,0xfffe
03f2 001e fffd  |    |		.CONST	0x001e,0xfffd
03f4 001e fffc  |    |		.CONST	0x001e,0xfffc
03f6 001e fffb  |    |		.CONST	0x001e,0xfffb
03f8 001e fffa  |    |		.CONST	0x001e,0xfffa
03fa 001e fff9  |    |		.CONST	0x001e,0xfff9
03fc 001e fff8  |    |		.CONST	0x001e,0xfff8
03fe 0022 fff7  | "  |		.CONST	0x0022,0xfff7
0400 0024 fff6  | $  |		.CONST	0x0024,0xfff6
0402 0026 fff5  | &  |		.CONST	0x0026,0xfff5
0404 0028 fff4  | (  |		.CONST	0x0028,0xfff4
0406 002a fff3  | *  |		.CONST	0x002a,0xfff3
0408 002c fff2  | ,  |		.CONST	0x002c,0xfff2
040a 002e fff1  | .  |		.CONST	0x002e,0xfff1
040c 0030 fff0  | 0  |		.CONST	0x0030,0xfff0
040e 0032 ffef  | 2  |		.CONST	0x0032,0xffef
0410 0034 ffee  | 4  |		.CONST	0x0034,0xffee
0412 0036 ffed  | 6  |		.CONST	0x0036,0xffed
0414 ; --------------------------------------------------------------------------------------
0414 ; Debug3 Subtable 0x2
0414 ; --------------------------------------------------------------------------------------
0414 000b 0011  |    |		.DBG3TAB	0x000b,0x0011
0416 0043 ffff  | C  |		.CONST	0x0043,0xffff
0418 0044 fffe  | D  |		.CONST	0x0044,0xfffe
041a 0045 fffd  | E  |		.CONST	0x0045,0xfffd
041c 004c fffc  | L  |		.CONST	0x004c,0xfffc
041e 004f fffb  | O  |		.CONST	0x004f,0xfffb
0420 0052 fffa  | R  |		.CONST	0x0052,0xfffa
0422 0055 fff9  | U  |		.CONST	0x0055,0xfff9
0424 005b fff8  | [  |		.CONST	0x005b,0xfff8
0426 0064 0001  | d  |		.CONST	0x0064,0x0001
0428 0069 0002  | i  |		.CONST	0x0069,0x0002
042a 006e 0003  | n  |		.CONST	0x006e,0x0003
042c 0073 0004  | s  |		.CONST	0x0073,0x0004
042e 0078 0005  | x  |		.CONST	0x0078,0x0005
0430 0086 0007  |    |		.CONST	0x0086,0x0007
0432 0087 fbff  |    |		.CONST	0x0087,0xfbff
0434 008b fbfe  |    |		.CONST	0x008b,0xfbfe
0436 008f fbfd  |    |		.CONST	0x008f,0xfbfd
0438 0093 0401  |    |		.CONST	0x0093,0x0401
043a 00b1 0402  |    |		.CONST	0x00b1,0x0402
043c 00b5 0403  |    |		.CONST	0x00b5,0x0403
043e 00b9 0404  |    |		.CONST	0x00b9,0x0404
0440 00bc 0405  |    |		.CONST	0x00bc,0x0405
0442 00c5 0008  |    |		.CONST	0x00c5,0x0008
0444 00cb 0006  |    |		.CONST	0x00cb,0x0006
0446 00d1 0009  |    |		.CONST	0x00d1,0x0009
0448 00d7 000a  |    |		.CONST	0x00d7,0x000a
044a 00dd 000b  |    |		.CONST	0x00dd,0x000b
044c 00e1 000c  |    |		.CONST	0x00e1,0x000c
044e ; --------------------------------------------------------------------------------------
044e ; Debug3 Subtable 0x3
044e ; --------------------------------------------------------------------------------------
044e 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
0450 00eb ffff  |    |		.CONST	0x00eb,0xffff
0452 00f2 fffe  |    |		.CONST	0x00f2,0xfffe
0454 00f8 0001  |    |		.CONST	0x00f8,0x0001
0456 00fb 0003  |    |		.CONST	0x00fb,0x0003
0458 00fc 0004  |    |		.CONST	0x00fc,0x0004
045a 0100 0002  |    |		.CONST	0x0100,0x0002
045c 0105 0005  |    |		.CONST	0x0105,0x0005
045e 010b 0006  |    |		.CONST	0x010b,0x0006
0460 010f 0007  |    |		.CONST	0x010f,0x0007
0462 0115 0008  |    |		.CONST	0x0115,0x0008
0464 0119 0009  |    |		.CONST	0x0119,0x0009
0466 ; --------------------------------------------------------------------------------------
0466 ; Debug3 Subtable 0x4
0466 ; --------------------------------------------------------------------------------------
0466 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0468 0123 0001  | #  |		.CONST	0x0123,0x0001
046a ; --------------------------------------------------------------------------------------
046a ; Debug3 Subtable 0x5
046a ; --------------------------------------------------------------------------------------
046a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
046c 0133 0001  | 3  |		.CONST	0x0133,0x0001
046e ; --------------------------------------------------------------------------------------
046e ; Debug3 Subtable 0x6
046e ; --------------------------------------------------------------------------------------
046e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0470 0143 0001  | C  |		.CONST	0x0143,0x0001
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug3 Subtable 0x7
0472 ; --------------------------------------------------------------------------------------
0472 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0474 0153 0001  | S  |		.CONST	0x0153,0x0001
0476 ; --------------------------------------------------------------------------------------
0476 ; Debug3 Subtable 0x8
0476 ; --------------------------------------------------------------------------------------
0476 0003 0008  |    |		.DBG3TAB	0x0003,0x0008
0478 0163 ffff  | c  |		.CONST	0x0163,0xffff
047a 0176 fffe  | v  |		.CONST	0x0176,0xfffe
047c 0178 fffd  | x  |		.CONST	0x0178,0xfffd
047e 0178 0001  | x  |		.CONST	0x0178,0x0001
0480 0180 0002  |    |		.CONST	0x0180,0x0002
0482 0184 0003  |    |		.CONST	0x0184,0x0003
0484 0188 0004  |    |		.CONST	0x0188,0x0004
0486 0192 0007  |    |		.CONST	0x0192,0x0007
0488 0194 0005  |    |		.CONST	0x0194,0x0005
048a 01a6 0006  |    |		.CONST	0x01a6,0x0006
048c 01ad 0008  |    |		.CONST	0x01ad,0x0008
048e ; --------------------------------------------------------------------------------------
048e ; Debug3 Subtable 0x9
048e ; --------------------------------------------------------------------------------------
048e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0490 01bd 0001  |    |		.CONST	0x01bd,0x0001
0492 01c5 0002  |    |		.CONST	0x01c5,0x0002
0494 ; --------------------------------------------------------------------------------------
0494 ; Debug3 Subtable 0xa
0494 ; --------------------------------------------------------------------------------------
0494 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0496 01d3 0001  |    |		.CONST	0x01d3,0x0001
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug3 Subtable 0xb
0498 ; --------------------------------------------------------------------------------------
0498 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
049a 01db ffff  |    |		.CONST	0x01db,0xffff
049c 01dd 0001  |    |		.CONST	0x01dd,0x0001
049e 01ed 0002  |    |		.CONST	0x01ed,0x0002
04a0 01ef 0003  |    |		.CONST	0x01ef,0x0003
04a2 0203 0004  |    |		.CONST	0x0203,0x0004
04a4 0207 0005  |    |		.CONST	0x0207,0x0005
04a6 ; --------------------------------------------------------------------------------------
04a6 ; Debug3 Subtable 0xc
04a6 ; --------------------------------------------------------------------------------------
04a6 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
04a8 0213 ffff  |    |		.CONST	0x0213,0xffff
04aa 0215 0001  |    |		.CONST	0x0215,0x0001
04ac 0225 0002  | %  |		.CONST	0x0225,0x0002
04ae 0227 0003  | '  |		.CONST	0x0227,0x0003
04b0 023b 0004  | ;  |		.CONST	0x023b,0x0004
04b2 023f 0005  | ?  |		.CONST	0x023f,0x0005
04b4 ; --------------------------------------------------------------------------------------
04b4 ; Debug3 Subtable 0xd
04b4 ; --------------------------------------------------------------------------------------
04b4 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
04b6 024b 0001  | K  |		.CONST	0x024b,0x0001
04b8 0254 0002  | T  |		.CONST	0x0254,0x0002
04ba 025e 0003  | ^  |		.CONST	0x025e,0x0003
04bc 0262 0004  | b  |		.CONST	0x0262,0x0004
04be 0264 0005  | d  |		.CONST	0x0264,0x0005
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug3 Subtable 0xe
04c0 ; --------------------------------------------------------------------------------------
04c0 0004 0005  |    |		.DBG3TAB	0x0004,0x0005
04c2 026b ffff  | k  |		.CONST	0x026b,0xffff
04c4 026e fffe  | n  |		.CONST	0x026e,0xfffe
04c6 0271 fffd  | q  |		.CONST	0x0271,0xfffd
04c8 0274 fffc  | t  |		.CONST	0x0274,0xfffc
04ca 0277 0001  | w  |		.CONST	0x0277,0x0001
04cc 027a 0002  | z  |		.CONST	0x027a,0x0002
04ce 0281 0003  |    |		.CONST	0x0281,0x0003
04d0 0289 0004  |    |		.CONST	0x0289,0x0004
04d2 028d 0005  |    |		.CONST	0x028d,0x0005
04d4 ; --------------------------------------------------------------------------------------
04d4 ; Debug3 Subtable 0xf
04d4 ; --------------------------------------------------------------------------------------
04d4 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
04d6 0293 0001  |    |		.CONST	0x0293,0x0001
04d8 029c 0002  |    |		.CONST	0x029c,0x0002
04da 02a9 0003  |    |		.CONST	0x02a9,0x0003
04dc 02ab 0004  |    |		.CONST	0x02ab,0x0004
04de 02b5 0005  |    |		.CONST	0x02b5,0x0005
04e0 0000 0000  |    |		.BLANK	0000[0x120]