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

⟦8022c11fe⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0578       | x  |		.CONST	0x0578								; 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 8003       |    |		.CONST	0x8003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0178       | x  |		.CONST	0x0178								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0086       |    |		.CONST	0x0086								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1
000c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000d 0129       | )  |		Execute	Any,Make_Visible
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e 00c4       |    |		Action	Make_Default
001f 00c4       |    |		Action	Make_Default
0020 00c4       |    |		Action	Make_Default
0021 00c4       |    |		Action	Make_Default
0022 00c4       |    |		Action	Make_Default
0023 00c4       |    |		Action	Make_Default
0024 00c4       |    |		Action	Make_Default
0025 00c4       |    |		Action	Make_Default
0026 00c4       |    |		Action	Make_Default
0027 00c4       |    |		Action	Make_Default
0028 00c4       |    |		Action	Make_Default
0029 00c4       |    |		Action	Make_Default
002a 00c4       |    |		Action	Make_Default
002b 00c4       |    |		Action	Make_Default
002c 00c4       |    |		Action	Make_Default
002d 00c4       |    |		Action	Make_Default
002e 00c4       |    |		Action	Make_Default
002f 00c4       |    |		Action	Make_Default
0030 00c4       |    |		Action	Make_Default
0031 00c4       |    |		Action	Make_Default
0032 00c4       |    |		Action	Make_Default
0033 00c4       |    |		Action	Make_Default
0034 00c4       |    |		Action	Make_Default
0035 00c4       |    |		Action	Make_Default
0036 00c4       |    |		Action	Make_Default
0037 00c4       |    |		Action	Make_Default
0038 00c4       |    |		Action	Make_Default
0039 00c4       |    |		Action	Make_Default
003a 00c4       |    |		Action	Make_Default
003b 00c4       |    |		Action	Make_Default
003c 00c4       |    |		Action	Make_Default
003d 00c4       |    |		Action	Make_Default
003e 00c4       |    |		Action	Make_Default
003f 00c4       |    |		Action	Make_Default
0040 00c4       |    |		Action	Make_Default
0041 00c4       |    |		Action	Make_Default
0042 00c4       |    |		Action	Make_Default
0043 00c4       |    |		Action	Make_Default
0044 00c4       |    |		Action	Make_Default
0045 00c4       |    |		Action	Make_Default
0046 00c4       |    |		Action	Make_Default
0047 00c4       |    |		Action	Make_Default
0048 00c4       |    |		Action	Make_Default
0049 00c4       |    |		Action	Make_Default
004a 00c4       |    |		Action	Make_Default
004b 00c4       |    |		Action	Make_Default
004c 00c4       |    |		Action	Make_Default
004d 00c4       |    |		Action	Make_Default
004e 00c4       |    |		Action	Make_Default
004f 00c4       |    |		Action	Make_Default
0050 00c4       |    |		Action	Make_Default
0051 00c4       |    |		Action	Make_Default
0052 00c4       |    |		Action	Make_Default
0053 00c4       |    |		Action	Make_Default
0054 00c4       |    |		Action	Make_Default
0055 00c4       |    |		Action	Make_Default
0056 00c4       |    |		Action	Make_Default
0057 00c4       |    |		Action	Make_Default
0058 00c4       |    |		Action	Make_Default
0059 00c4       |    |		Action	Make_Default
005a 00c4       |    |		Action	Make_Default
005b 00c4       |    |		Action	Make_Default
005c 00c4       |    |		Action	Make_Default
005d 00c4       |    |		Action	Make_Default
005e 00c4       |    |		Action	Make_Default
005f 00c4       |    |		Action	Make_Default
0060 00c4       |    |		Action	Make_Default
0061 00c4       |    |		Action	Make_Default
0062 00c4       |    |		Action	Make_Default
0063 00c4       |    |		Action	Make_Default
0064 00c4       |    |		Action	Make_Default
0065 00c4       |    |		Action	Make_Default
0066 00c4       |    |		Action	Make_Default
0067 00c4       |    |		Action	Make_Default
0068 e001       |    |		Load	0x0,0x1
0069 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
006a 0129       | )  |		Execute	Any,Make_Visible
006b c23f       | ?  |		Store	0x1,0x3f
006c 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated
006e c249       | I  |		Store	0x1,0x49
006f 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
0071 c24a       | J  |		Store	0x1,0x4a
0072 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated
0074 c24b       | K  |		Store	0x1,0x4b
0075 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0077 c24c       | L  |		Store	0x1,0x4c
0078 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated
007a c24d       | M  |		Store	0x1,0x4d
007b 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated
007d c24e       | N  |		Store	0x1,0x4e
007e 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated
0080 c24f       | O  |		Store	0x1,0x4f
0081 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
0083 c250       | P  |		Store	0x1,0x50
0084 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0086 c251       | Q  |		Store	0x1,0x51
0087 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated
0089 c252       | R  |		Store	0x1,0x52
008a 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
008c c253       | S  |		Store	0x1,0x53
008d 029a 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call,Visible,Unelaborated
008f c254       | T  |		Store	0x1,0x54
0090 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
0092 c255       | U  |		Store	0x1,0x55
0093 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
0095 c256       | V  |		Store	0x1,0x56
0096 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
0097 0129       | )  |		Execute	Any,Make_Visible
0098 c257       | W  |		Store	0x1,0x57
0099 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
009b c258       | X  |		Store	0x1,0x58
009c 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
009e c259       | Y  |		Store	0x1,0x59
009f 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
00a1 c25a       | Z  |		Store	0x1,0x5a
00a2 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
00a4 c25b       | [  |		Store	0x1,0x5b
00a5 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
00a7 c25c       | \  |		Store	0x1,0x5c
00a8 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
00aa c236       | 6  |		Store	0x1,0x36
00ab 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated
00ad c25d       | ]  |		Store	0x1,0x5d
00ae 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated
00b0 c25e       | ^  |		Store	0x1,0x5e
00b1 029a 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call,Visible,Unelaborated
00b3 c25f       | _  |		Store	0x1,0x5f
00b4 1d5f       | _  |		Execute_Immediate	Reference_Lex_1,0x5f
00b5 0129       | )  |		Execute	Any,Make_Visible
00b6 c260       | `  |		Store	0x1,0x60
00b7 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated
00b9 c261       | a  |		Store	0x1,0x61
00ba 0092 04c5  |    |		Action	Push_String_Extended,0x4c5					; "DATA"
00bc 0129       | )  |		Execute	Any,Make_Visible
00bd c243       | C  |		Store	0x1,0x43
00be e002       |    |		Load	0x0,0x2
00bf 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00c0 e003       |    |		Load	0x0,0x3
00c1 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
00c2 011e       |    |		Execute	Any,Convert
00c3 0129       | )  |		Execute	Any,Make_Visible
00c4 c244       | D  |		Store	0x1,0x44
00c5 e004       |    |		Load	0x0,0x4
00c6 1860       | `  |		Execute	Package,Field_Execute,Field_Number 0x60
00c7 0129       | )  |		Execute	Any,Make_Visible
00c8 c245       | E  |		Store	0x1,0x45
00c9 e004       |    |		Load	0x0,0x4
00ca 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
00cb 0129       | )  |		Execute	Any,Make_Visible
00cc c246       | F  |		Store	0x1,0x46
00cd e004       |    |		Load	0x0,0x4
00ce 1853       | S  |		Execute	Package,Field_Execute,Field_Number 0x53
00cf 0129       | )  |		Execute	Any,Make_Visible
00d0 c247       | G  |		Store	0x1,0x47
00d1 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
00d3 c262       | b  |		Store	0x1,0x62
00d4 029a 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call,Visible,Unelaborated
00d6 c23a       | :  |		Store	0x1,0x3a
00d7 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated
00d9 c23b       | ;  |		Store	0x1,0x3b
00da 029a 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call,Visible,Unelaborated
00dc c23c       | <  |		Store	0x1,0x3c
00dd 029a 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call,Visible,Unelaborated
00df c241       | A  |		Store	0x1,0x41
00e0 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated
00e2 c230       | 0  |		Store	0x1,0x30
00e3 029a 0443  |   C|		Declare_Subprogram	INIT_0440,For_Outer_Call,Visible,Unelaborated
00e5 c263       | c  |		Store	0x1,0x63
00e6 029a 044b  |   K|		Declare_Subprogram	INIT_0448,For_Outer_Call,Visible,Unelaborated
00e8 c264       | d  |		Store	0x1,0x64
00e9 029a 0453  |   S|		Declare_Subprogram	INIT_0450,For_Outer_Call,Visible,Unelaborated
00eb c265       | e  |		Store	0x1,0x65
00ec 029a 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call,Visible,Unelaborated
00ee c266       | f  |		Store	0x1,0x66
00ef 029a 0463  |   c|		Declare_Subprogram	INIT_0460,For_Outer_Call,Visible,Unelaborated
00f1 c267       | g  |		Store	0x1,0x67
00f2 00bf       |    |		Action	Accept_Activation
00f3 e005       |    |		Load	0x0,0x5
00f4 191b       |    |		Execute	Package,Field_Reference,Field_Number 0x1b
00f5 0007       |    |		Action	Break_Optional
00f6 0092 04c6  |    |		Action	Push_String_Extended,0x4c6					; "TPS_Interface"
00f8 e006       |    |		Load	0x0,0x6
00f9 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00fa 0322       | "  |		Declare_Variable	Record
00fb 4802       |H   |		Short_Literal	0x2
00fc 0092 04c7  |    |		Action	Push_String_Extended,0x4c7					; "SET_PROPERTY_ERROR"
00fe e007       |    |		Load	0x0,0x7
00ff 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0100 e007       |    |		Load	0x0,0x7
0101 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0102 011e       |    |		Execute	Any,Convert
0103 029d 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call
0105 e006       |    |		Load	0x0,0x6
0106 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
0107 00c6       |    |		Action	Check_Subprogram_Elaborated
0108 00e1       |    |		Load_Encached	Boolean_Cache
0109 4800       |H   |		Short_Literal	0x0
010a 1d6c       | l  |		Execute_Immediate	Reference_Lex_1,0x6c
010b 4800       |H   |		Short_Literal	0x0
010c e006       |    |		Load	0x0,0x6
010d 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
010e e26a       | j  |		Load	0x1,0x6a
010f 0320       |    |		Declare_Variable	Record,Duplicate
0110 00cd       |    |		Action	Spare6_Action
0111 e006       |    |		Load	0x0,0x6
0112 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0113 4801       |H   |		Short_Literal	0x1
0114 e008       |    |		Load	0x0,0x8
0115 e009       |    |		Load	0x0,0x9
0116 4800       |H   |		Short_Literal	0x0
0117 0007       |    |		Action	Break_Optional
0118 029d 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call
011a 029d 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call
011c e006       |    |		Load	0x0,0x6
011d 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
011e 00c6       |    |		Action	Check_Subprogram_Elaborated
011f 00e1       |    |		Load_Encached	Boolean_Cache
0120 4800       |H   |		Short_Literal	0x0
0121 1d79       | y  |		Execute_Immediate	Reference_Lex_1,0x79
0122 4800       |H   |		Short_Literal	0x0
0123 e006       |    |		Load	0x0,0x6
0124 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0125 e26a       | j  |		Load	0x1,0x6a
0126 0320       |    |		Declare_Variable	Record,Duplicate
0127 00cd       |    |		Action	Spare6_Action
0128 1d78       | x  |		Execute_Immediate	Reference_Lex_1,0x78
0129 4801       |H   |		Short_Literal	0x1
012a e00a       |    |		Load	0x0,0xa
012b e00b       |    |		Load	0x0,0xb
012c 4800       |H   |		Short_Literal	0x0
012d 0007       |    |		Action	Break_Optional
012e 029d 0483  |    |		Declare_Subprogram	INIT_0480,For_Outer_Call
0130 029d 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call
0132 1d49       | I  |		Execute_Immediate	Reference_Lex_1,0x49
0133 00c7       |    |		Action	Elaborate_Subprogram
0134 1d4a       | J  |		Execute_Immediate	Reference_Lex_1,0x4a
0135 00c7       |    |		Action	Elaborate_Subprogram
0136 1d4b       | K  |		Execute_Immediate	Reference_Lex_1,0x4b
0137 00c7       |    |		Action	Elaborate_Subprogram
0138 1d4c       | L  |		Execute_Immediate	Reference_Lex_1,0x4c
0139 00c7       |    |		Action	Elaborate_Subprogram
013a 1d4d       | M  |		Execute_Immediate	Reference_Lex_1,0x4d
013b 00c7       |    |		Action	Elaborate_Subprogram
013c 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
013d 00c7       |    |		Action	Elaborate_Subprogram
013e 1d4f       | O  |		Execute_Immediate	Reference_Lex_1,0x4f
013f 00c7       |    |		Action	Elaborate_Subprogram
0140 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0141 00c7       |    |		Action	Elaborate_Subprogram
0142 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
0143 00c7       |    |		Action	Elaborate_Subprogram
0144 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
0145 00c7       |    |		Action	Elaborate_Subprogram
0146 1d53       | S  |		Execute_Immediate	Reference_Lex_1,0x53
0147 00c7       |    |		Action	Elaborate_Subprogram
0148 1d54       | T  |		Execute_Immediate	Reference_Lex_1,0x54
0149 00c7       |    |		Action	Elaborate_Subprogram
014a 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
014b 00c7       |    |		Action	Elaborate_Subprogram
014c 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
014d 00c7       |    |		Action	Elaborate_Subprogram
014e 1d58       | X  |		Execute_Immediate	Reference_Lex_1,0x58
014f 00c7       |    |		Action	Elaborate_Subprogram
0150 1d59       | Y  |		Execute_Immediate	Reference_Lex_1,0x59
0151 00c7       |    |		Action	Elaborate_Subprogram
0152 1d5a       | Z  |		Execute_Immediate	Reference_Lex_1,0x5a
0153 00c7       |    |		Action	Elaborate_Subprogram
0154 1d5b       | [  |		Execute_Immediate	Reference_Lex_1,0x5b
0155 00c7       |    |		Action	Elaborate_Subprogram
0156 1d5c       | \  |		Execute_Immediate	Reference_Lex_1,0x5c
0157 00c7       |    |		Action	Elaborate_Subprogram
0158 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
0159 00c7       |    |		Action	Elaborate_Subprogram
015a 1d5d       | ]  |		Execute_Immediate	Reference_Lex_1,0x5d
015b 00c7       |    |		Action	Elaborate_Subprogram
015c 1d5e       | ^  |		Execute_Immediate	Reference_Lex_1,0x5e
015d 00c7       |    |		Action	Elaborate_Subprogram
015e 1d5f       | _  |		Execute_Immediate	Reference_Lex_1,0x5f
015f 00c7       |    |		Action	Elaborate_Subprogram
0160 1d61       | a  |		Execute_Immediate	Reference_Lex_1,0x61
0161 00c7       |    |		Action	Elaborate_Subprogram
0162 1d62       | b  |		Execute_Immediate	Reference_Lex_1,0x62
0163 00c7       |    |		Action	Elaborate_Subprogram
0164 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
0165 00c7       |    |		Action	Elaborate_Subprogram
0166 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
0167 00c7       |    |		Action	Elaborate_Subprogram
0168 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
0169 00c7       |    |		Action	Elaborate_Subprogram
016a 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
016b 00c7       |    |		Action	Elaborate_Subprogram
016c 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
016d 00c7       |    |		Action	Elaborate_Subprogram
016e 1d63       | c  |		Execute_Immediate	Reference_Lex_1,0x63
016f 00c7       |    |		Action	Elaborate_Subprogram
0170 1d64       | d  |		Execute_Immediate	Reference_Lex_1,0x64
0171 00c7       |    |		Action	Elaborate_Subprogram
0172 1d65       | e  |		Execute_Immediate	Reference_Lex_1,0x65
0173 00c7       |    |		Action	Elaborate_Subprogram
0174 1d66       | f  |		Execute_Immediate	Reference_Lex_1,0x66
0175 00c7       |    |		Action	Elaborate_Subprogram
0176 1d67       | g  |		Execute_Immediate	Reference_Lex_1,0x67
0177 00c7       |    |		Action	Elaborate_Subprogram
0178			BODY_0008:
0178 e269       | i  |		Load	0x1,0x69
0179 e00c       |    |		Load	0x0,0xc
017a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
017b 7009       |p   |		Jump_Nonzero	0x185
017c e00d       |    |		Load	0x0,0xd
017d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
017e 4807       |H   |		Short_Literal	0x7
017f 0092 04c8  |    |		Action	Push_String_Extended,0x4c8					; "TPS_Interface is not authorized on this machine"
0181 e00e       |    |		Load	0x0,0xe
0182 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0183 e00f       |    |		Load	0x0,0xf
0184 0257       | W  |		Execute	Discrete,Raise
0185 e010       |    |		Load	0x0,0x10
0186 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0187 4801       |H   |		Short_Literal	0x1
0188 e269       | i  |		Load	0x1,0x69
0189 e011       |    |		Load	0x0,0x11
018a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
018b e011       |    |		Load	0x0,0x11
018c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
018d 7009       |p   |		Jump_Nonzero	0x197
018e e00d       |    |		Load	0x0,0xd
018f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0190 4807       |H   |		Short_Literal	0x7
0191 0092 04c9  |    |		Action	Push_String_Extended,0x4c9					; "No tokens are available for using TPS_Interface"
0193 e00e       |    |		Load	0x0,0xe
0194 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0195 e00f       |    |		Load	0x0,0xf
0196 0257       | W  |		Execute	Discrete,Raise
0197 00bc       |    |		Action	Signal_Activated
0198 00bb       |    |		Action	Signal_Completion
0199 0000 0000  |    |		.BLANK	0000[0x7]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 e5fe       |    |		Load	0x2,-0x2
01a4 e012       |    |		Load	0x0,0x12
01a5 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
01a6 e5ff       |    |		Load	0x2,-0x1
01a7 8286       |    |		Call	0x1,0x86
01a8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a9 0000 0000  |    |		.BLANK	0000[0x7]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 01bd       |    |		.CONST	0x01bd								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00ea       |    |		Load_Encached	Null_String_Cache
01b4 e012       |    |		Load	0x0,0x12
01b5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01b6 e5ff       |    |		Load	0x2,-0x1
01b7 e006       |    |		Load	0x0,0x6
01b8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01b9 e012       |    |		Load	0x0,0x12
01ba 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
01bb 1c02       |    |		Execute_Immediate	Run_Utility,0x2
01bc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01bd			TRAP_01b0:
01bd 0007       |    |		Action	Break_Optional
01be 4816       |H   |		Short_Literal	0x16
01bf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 e5fe       |    |		Load	0x2,-0x2
01c4 e012       |    |		Load	0x0,0x12
01c5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01c6 e5ff       |    |		Load	0x2,-0x1
01c7 8285       |    |		Call	0x1,0x85
01c8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
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 e5fe       |    |		Load	0x2,-0x2
01d4 e012       |    |		Load	0x0,0x12
01d5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01d6 e5ff       |    |		Load	0x2,-0x1
01d7 8285       |    |		Call	0x1,0x85
01d8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01d9 0000 0000  |    |		.BLANK	0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 e5fe       |    |		Load	0x2,-0x2
01e4 e012       |    |		Load	0x0,0x12
01e5 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01e6 e5ff       |    |		Load	0x2,-0x1
01e7 8286       |    |		Call	0x1,0x86
01e8 e005       |    |		Load	0x0,0x5
01e9 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
01ea e005       |    |		Load	0x0,0x5
01eb 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01ec 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01ed 0000 0000  |    |		.XXX[0x3]
01ef 0000       |    |
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 e5fe       |    |		Load	0x2,-0x2
01f4 e012       |    |		Load	0x0,0x12
01f5 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01f6 e5ff       |    |		Load	0x2,-0x1
01f7 8286       |    |		Call	0x1,0x86
01f8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f9 0000 0000  |    |		.BLANK	0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 e5fe       |    |		Load	0x2,-0x2
0204 e012       |    |		Load	0x0,0x12
0205 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0206 e5ff       |    |		Load	0x2,-0x1
0207 8286       |    |		Call	0x1,0x86
0208 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0209 0000 0000  |    |		.BLANK	0000[0x7]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 e5fe       |    |		Load	0x2,-0x2
0214 e012       |    |		Load	0x0,0x12
0215 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0216 e5ff       |    |		Load	0x2,-0x1
0217 8286       |    |		Call	0x1,0x86
0218 e005       |    |		Load	0x0,0x5
0219 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
021a e005       |    |		Load	0x0,0x5
021b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
021c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
021d 0000 0000  |    |		.XXX[0x3]
021f 0000       |    |
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 e5fe       |    |		Load	0x2,-0x2
0224 e012       |    |		Load	0x0,0x12
0225 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0226 e5ff       |    |		Load	0x2,-0x1
0227 8286       |    |		Call	0x1,0x86
0228 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0229 0000 0000  |    |		.BLANK	0000[0x7]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233       | 3  |		.CONST	0x0233								; Address of begin
0231 023d       | =  |		.CONST	0x023d								; Address of exception handler
0232 0001       |    |		.CONST	0x0001								; Number of locals
0233			BODY_0230:
0233			INIT_0230:
0233 00ea       |    |		Load_Encached	Null_String_Cache
0234 e012       |    |		Load	0x0,0x12
0235 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0236 e5ff       |    |		Load	0x2,-0x1
0237 e006       |    |		Load	0x0,0x6
0238 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0239 e012       |    |		Load	0x0,0x12
023a 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
023b 1c02       |    |		Execute_Immediate	Run_Utility,0x2
023c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
023d			TRAP_0230:
023d 0007       |    |		Action	Break_Optional
023e 4803       |H   |		Short_Literal	0x3
023f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 e5fe       |    |		Load	0x2,-0x2
0244 e012       |    |		Load	0x0,0x12
0245 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0246 e5ff       |    |		Load	0x2,-0x1
0247 8285       |    |		Call	0x1,0x85
0248 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0249 0000 0000  |    |		.BLANK	0000[0x7]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 e5fe       |    |		Load	0x2,-0x2
0254 e012       |    |		Load	0x0,0x12
0255 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0256 e5ff       |    |		Load	0x2,-0x1
0257 8285       |    |		Call	0x1,0x85
0258 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0259 0000 0000  |    |		.BLANK	0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263       | c  |		.CONST	0x0263								; Address of begin
0261 0268       | h  |		.CONST	0x0268								; Address of exception handler
0262 0001       |    |		.CONST	0x0001								; Number of locals
0263			BODY_0260:
0263			INIT_0260:
0263 4801       |H   |		Short_Literal	0x1
0264 e5ff       |    |		Load	0x2,-0x1
0265 e001       |    |		Load	0x0,0x1
0266 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0267 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0268			TRAP_0260:
0268 e001       |    |		Load	0x0,0x1
0269 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
026a 010f       |    |		Execute	Exception,Equal
026b 680c       |h   |		Jump_Zero	0x278
026c e5fe       |    |		Load	0x2,-0x2
026d 6807       |h   |		Jump_Zero	0x275
026e e00d       |    |		Load	0x0,0xd
026f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0270 4807       |H   |		Short_Literal	0x7
0271 0092 04ca  |    |		Action	Push_String_Extended,0x4ca					; "Unable to get the Class Name  because gateway is not opened."
0273 e00e       |    |		Load	0x0,0xe
0274 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0275 e00d       |    |		Load	0x0,0xd
0276 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0277 0257       | W  |		Execute	Discrete,Raise
0278 0100       |    |		Execute	Exception,Raise
0279 0000 0000  |    |		.BLANK	0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 e5fe       |    |		Load	0x2,-0x2
0284 e012       |    |		Load	0x0,0x12
0285 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0286 e5ff       |    |		Load	0x2,-0x1
0287 8285       |    |		Call	0x1,0x85
0288 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0289 0000 0000  |    |		.BLANK	0000[0x7]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 e5fe       |    |		Load	0x2,-0x2
0294 e012       |    |		Load	0x0,0x12
0295 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0296 e5ff       |    |		Load	0x2,-0x1
0297 8286       |    |		Call	0x1,0x86
0298 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0299 0000 0000  |    |		.BLANK	0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 e5fe       |    |		Load	0x2,-0x2
02a4 e012       |    |		Load	0x0,0x12
02a5 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
02a6 e5ff       |    |		Load	0x2,-0x1
02a7 8286       |    |		Call	0x1,0x86
02a8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02a9 0000 0000  |    |		.BLANK	0000[0x7]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 e5fe       |    |		Load	0x2,-0x2
02b4 e012       |    |		Load	0x0,0x12
02b5 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
02b6 e5ff       |    |		Load	0x2,-0x1
02b7 8286       |    |		Call	0x1,0x86
02b8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02b9 0000 0000  |    |		.BLANK	0000[0x7]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 02ca       |    |		.CONST	0x02ca								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00ea       |    |		Load_Encached	Null_String_Cache
02c4 e5fd       |    |		Load	0x2,-0x3
02c5 e5fe       |    |		Load	0x2,-0x2
02c6 e5ff       |    |		Load	0x2,-0x1
02c7 e001       |    |		Load	0x0,0x1
02c8 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02c9 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
02ca			TRAP_02c0:
02ca e001       |    |		Load	0x0,0x1
02cb 1b24       | $  |		Execute	Package,Field_Read,Field_Number 0x24
02cc 010f       |    |		Execute	Exception,Equal
02cd 6815       |h   |		Jump_Zero	0x2e3
02ce e5fc       |    |		Load	0x2,-0x4
02cf 6810       |h   |		Jump_Zero	0x2e0
02d0 e00d       |    |		Load	0x0,0xd
02d1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02d2 4807       |H   |		Short_Literal	0x7
02d3 0092 04cb  |    |		Action	Push_String_Extended,0x4cb					; "The property "
02d5 e5fe       |    |		Load	0x2,-0x2
02d6 01cc       |    |		Execute	Vector,Catenate
02d7 0092 04cc  |    |		Action	Push_String_Extended,0x4cc					; " is not defined for the gateway "
02d9 01cc       |    |		Execute	Vector,Catenate
02da 4801       |H   |		Short_Literal	0x1
02db e5ff       |    |		Load	0x2,-0x1
02dc 8267       | g  |		Call	0x1,0x67
02dd 01cc       |    |		Execute	Vector,Catenate
02de e00e       |    |		Load	0x0,0xe
02df 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02e0 e00d       |    |		Load	0x0,0xd
02e1 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
02e2 0257       | W  |		Execute	Discrete,Raise
02e3 e001       |    |		Load	0x0,0x1
02e4 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
02e5 010f       |    |		Execute	Exception,Equal
02e6 6811       |h   |		Jump_Zero	0x2f8
02e7 e5fc       |    |		Load	0x2,-0x4
02e8 680c       |h   |		Jump_Zero	0x2f5
02e9 e00d       |    |		Load	0x0,0xd
02ea 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02eb 4807       |H   |		Short_Literal	0x7
02ec 0092 04cd  |    |		Action	Push_String_Extended,0x4cd					; "Unable to find the value for property "
02ee e5fe       |    |		Load	0x2,-0x2
02ef 01cc       |    |		Execute	Vector,Catenate
02f0 0092 04ce  |    |		Action	Push_String_Extended,0x4ce					; " because gateway is not opened."
02f2 01cc       |    |		Execute	Vector,Catenate
02f3 e00e       |    |		Load	0x0,0xe
02f4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f5 e00d       |    |		Load	0x0,0xd
02f6 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
02f7 0257       | W  |		Execute	Discrete,Raise
02f8 0100       |    |		Execute	Exception,Raise
02f9 0000 0000  |    |		.BLANK	0000[0x7]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 00e1       |    |		Load_Encached	Boolean_Cache
0304 00ea       |    |		Load_Encached	Null_String_Cache
0305 e5fd       |    |		Load	0x2,-0x3
0306 e5fe       |    |		Load	0x2,-0x2
0307 e5ff       |    |		Load	0x2,-0x1
0308 e006       |    |		Load	0x0,0x6
0309 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
030a c5fb       |    |		Store	0x2,-0x5
030b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
030c 0000 0000  |    |		.BLANK	0000[0x4]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 00ea       |    |		Load_Encached	Null_String_Cache
0314 e5fd       |    |		Load	0x2,-0x3
0315 e5fe       |    |		Load	0x2,-0x2
0316 e5ff       |    |		Load	0x2,-0x1
0317 e006       |    |		Load	0x0,0x6
0318 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0319 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
031a 0000 0000  |    |		.BLANK	0000[0x6]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0330       | 0  |		.CONST	0x0330								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0004       |    |		.CONST	0x0004								; Number of locals
0323			INIT_0320:
0323 e003       |    |		Load	0x0,0x3
0324 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0325 02c7       |    |		Declare_Variable	Any
0326 00d8       |    |		Load_Top	At_Offset_0
0327 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0328 e003       |    |		Load	0x0,0x3
0329 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
032a e003       |    |		Load	0x0,0x3
032b 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
032c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
032d 02c7       |    |		Declare_Variable	Any
032e 00d8       |    |		Load_Top	At_Offset_0
032f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0330			BODY_0320:
0330 e003       |    |		Load	0x0,0x3
0331 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0332 e402       |    |		Load	0x2,0x2
0333 0120       |    |		Execute	Any,Is_Value
0334 6803       |h   |		Jump_Zero	0x338
0335 e003       |    |		Load	0x0,0x3
0336 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0337 7801       |x   |		Jump	0x339
0338 e402       |    |		Load	0x2,0x2
0339 e243       | C  |		Load	0x1,0x43
033a 4801       |H   |		Short_Literal	0x1
033b e5ff       |    |		Load	0x2,-0x1
033c e001       |    |		Load	0x0,0x1
033d 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
033e e003       |    |		Load	0x0,0x3
033f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0340 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0341 e003       |    |		Load	0x0,0x3
0342 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0343 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0344 c402       |    |		Store	0x2,0x2
0345 c403       |    |		Store	0x2,0x3
0346 e403       |    |		Load	0x2,0x3
0347 6803       |h   |		Jump_Zero	0x34b
0348 e005       |    |		Load	0x0,0x5
0349 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
034a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
034b e003       |    |		Load	0x0,0x3
034c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
034d e404       |    |		Load	0x2,0x4
034e 0120       |    |		Execute	Any,Is_Value
034f 6804       |h   |		Jump_Zero	0x354
0350 e003       |    |		Load	0x0,0x3
0351 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
0352 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0353 7801       |x   |		Jump	0x355
0354 e404       |    |		Load	0x2,0x4
0355 601a       |`   |		Indirect_Literal	Discrete,0x370,{0x00000000, 0x00004000}
0356 e5ff       |    |		Load	0x2,-0x1
0357 e001       |    |		Load	0x0,0x1
0358 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0359 4800       |H   |		Short_Literal	0x0
035a e402       |    |		Load	0x2,0x2
035b e003       |    |		Load	0x0,0x3
035c 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
035d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
035e c404       |    |		Store	0x2,0x4
035f c403       |    |		Store	0x2,0x3
0360 e403       |    |		Load	0x2,0x3
0361 6803       |h   |		Jump_Zero	0x365
0362 e005       |    |		Load	0x0,0x5
0363 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0364 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0365 00d8       |    |		Load_Top	At_Offset_0
0366 e003       |    |		Load	0x0,0x3
0367 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
0368 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0369 e005       |    |		Load	0x0,0x5
036a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
036b e005       |    |		Load	0x0,0x5
036c 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
036d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
036e 0000 0000  |    |		.XXX[0x2]
0370 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0374 0000 0000  |    |		.BLANK	0000[0x4]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b 4800       |H   |		Short_Literal	0x0
037c 4801       |H   |		Short_Literal	0x1
037d 4801       |H   |		Short_Literal	0x1
037e e5fe       |    |		Load	0x2,-0x2
037f e5ff       |    |		Load	0x2,-0x1
0380 825d       | ]  |		Call	0x1,0x5d
0381 e005       |    |		Load	0x0,0x5
0382 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0383 8268       | h  |		Call	0x1,0x68
0384 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0385 0000 0000  |    |		.XXX[0x3]
0387 0000       |    |
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038c       |    |		.CONST	0x038c								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0002       |    |		.CONST	0x0002								; Number of locals
038b			INIT_0388:
038b 00e1       |    |		Load_Encached	Boolean_Cache
038c			BODY_0388:
038c 00e1       |    |		Load_Encached	Boolean_Cache
038d 00ea       |    |		Load_Encached	Null_String_Cache
038e 4800       |H   |		Short_Literal	0x0
038f 4801       |H   |		Short_Literal	0x1
0390 4801       |H   |		Short_Literal	0x1
0391 e5fe       |    |		Load	0x2,-0x2
0392 e005       |    |		Load	0x0,0x5
0393 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0394 8268       | h  |		Call	0x1,0x68
0395 e5fd       |    |		Load	0x2,-0x3
0396 e5ff       |    |		Load	0x2,-0x1
0397 e006       |    |		Load	0x0,0x6
0398 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0399 c402       |    |		Store	0x2,0x2
039a 00d8       |    |		Load_Top	At_Offset_0
039b 6805       |h   |		Jump_Zero	0x3a1
039c e5fb       |    |		Load	0x2,-0x5
039d e007       |    |		Load	0x0,0x7
039e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
039f c5fb       |    |		Store	0x2,-0x5
03a0 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03a1 e5fb       |    |		Load	0x2,-0x5
03a2 00ea       |    |		Load_Encached	Null_String_Cache
03a3 4800       |H   |		Short_Literal	0x0
03a4 4801       |H   |		Short_Literal	0x1
03a5 4801       |H   |		Short_Literal	0x1
03a6 e5fe       |    |		Load	0x2,-0x2
03a7 e005       |    |		Load	0x0,0x5
03a8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03a9 8268       | h  |		Call	0x1,0x68
03aa e5fd       |    |		Load	0x2,-0x3
03ab e5ff       |    |		Load	0x2,-0x1
03ac e006       |    |		Load	0x0,0x6
03ad 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03ae e26b       | k  |		Load	0x1,0x6b
03af e007       |    |		Load	0x0,0x7
03b0 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03b1 c5fb       |    |		Store	0x2,-0x5
03b2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03b3 0000 0000  |    |		.BLANK	0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb e5ff       |    |		Load	0x2,-0x1
03bc e005       |    |		Load	0x0,0x5
03bd 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
03be 6803       |h   |		Jump_Zero	0x3c2
03bf 0092 04cf  |    |		Action	Push_String_Extended,0x4cf					; "<NON_EXISTENT>"
03c1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03c2 4800       |H   |		Short_Literal	0x0
03c3 4801       |H   |		Short_Literal	0x1
03c4 4801       |H   |		Short_Literal	0x1
03c5 e5ff       |    |		Load	0x2,-0x1
03c6 e005       |    |		Load	0x0,0x5
03c7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03c8 8268       | h  |		Call	0x1,0x68
03c9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03ca 0000 0000  |    |		.BLANK	0000[0x6]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 4801       |H   |		Short_Literal	0x1
03d4 e5ff       |    |		Load	0x2,-0x1
03d5 e001       |    |		Load	0x0,0x1
03d6 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
03d7 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "."
03d9 01cc       |    |		Execute	Vector,Catenate
03da e243       | C  |		Load	0x1,0x43
03db 01cc       |    |		Execute	Vector,Catenate
03dc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03dd 0000 0000  |    |		.XXX[0x3]
03df 0000       |    |
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 e5fc       |    |		Load	0x2,-0x4
03e4 e5fd       |    |		Load	0x2,-0x3
03e5 e010       |    |		Load	0x0,0x10
03e6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03e7 e013       |    |		Load	0x0,0x13
03e8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03e9 e5fe       |    |		Load	0x2,-0x2
03ea e012       |    |		Load	0x0,0x12
03eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ec 00ea       |    |		Load_Encached	Null_String_Cache
03ed 0092 04d1  |    |		Action	Push_String_Extended,0x4d1					; "File"
03ef e5ff       |    |		Load	0x2,-0x1
03f0 e001       |    |		Load	0x0,0x1
03f1 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
03f2 c5fd       |    |		Store	0x2,-0x3
03f3 c5fc       |    |		Store	0x2,-0x4
03f4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f5 0000 0000  |    |		.XXX[0x3]
03f7 0000       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb       |    |		.CONST	0x03fb								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0001       |    |		.CONST	0x0001								; Number of locals
03fb			BODY_03f8:
03fb			INIT_03f8:
03fb e5fb       |    |		Load	0x2,-0x5
03fc e5fc       |    |		Load	0x2,-0x4
03fd e010       |    |		Load	0x0,0x10
03fe 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03ff e013       |    |		Load	0x0,0x13
0400 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0401 e5fd       |    |		Load	0x2,-0x3
0402 e5fe       |    |		Load	0x2,-0x2
0403 e5ff       |    |		Load	0x2,-0x1
0404 e001       |    |		Load	0x0,0x1
0405 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0406 c5fc       |    |		Store	0x2,-0x4
0407 c5fb       |    |		Store	0x2,-0x5
0408 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0409 0000 0000  |    |		.BLANK	0000[0x7]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 e5fb       |    |		Load	0x2,-0x5
0414 e5fc       |    |		Load	0x2,-0x4
0415 e010       |    |		Load	0x0,0x10
0416 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0417 e013       |    |		Load	0x0,0x13
0418 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0419 e5fd       |    |		Load	0x2,-0x3
041a e5fe       |    |		Load	0x2,-0x2
041b e5ff       |    |		Load	0x2,-0x1
041c e001       |    |		Load	0x0,0x1
041d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
041e c5fc       |    |		Store	0x2,-0x4
041f c5fb       |    |		Store	0x2,-0x5
0420 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0421 0000 0000  |    |		.BLANK	0000[0x7]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b       | +  |		.CONST	0x042b								; Address of begin
0429 0004       |    |		.CONST	0x0004								; Address of exception handler
042a 0001       |    |		.CONST	0x0001								; Number of locals
042b			BODY_0428:
042b			INIT_0428:
042b e5fb       |    |		Load	0x2,-0x5
042c e5fc       |    |		Load	0x2,-0x4
042d e5fe       |    |		Load	0x2,-0x2
042e e5fd       |    |		Load	0x2,-0x3
042f e5ff       |    |		Load	0x2,-0x1
0430 e001       |    |		Load	0x0,0x1
0431 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0432 c5fb       |    |		Store	0x2,-0x5
0433 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0434 0000 0000  |    |		.BLANK	0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b       | ;  |		.CONST	0x043b								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0001       |    |		.CONST	0x0001								; Number of locals
043b			BODY_0438:
043b			INIT_0438:
043b e5ff       |    |		Load	0x2,-0x1
043c e001       |    |		Load	0x0,0x1
043d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
043e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
043f 0000       |    |		.XXX[0x1]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443       | C  |		.CONST	0x0443								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0001       |    |		.CONST	0x0001								; Number of locals
0443			BODY_0440:
0443			INIT_0440:
0443 e5ff       |    |		Load	0x2,-0x1
0444 e001       |    |		Load	0x0,0x1
0445 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0446 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0447 0000       |    |		.XXX[0x1]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b       | K  |		.CONST	0x044b								; Address of begin
0449 0004       |    |		.CONST	0x0004								; Address of exception handler
044a 0001       |    |		.CONST	0x0001								; Number of locals
044b			BODY_0448:
044b			INIT_0448:
044b 4801       |H   |		Short_Literal	0x1
044c e5ff       |    |		Load	0x2,-0x1
044d e001       |    |		Load	0x0,0x1
044e 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
044f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453       | S  |		.CONST	0x0453								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0001       |    |		.CONST	0x0001								; Number of locals
0453			BODY_0450:
0453			INIT_0450:
0453 4801       |H   |		Short_Literal	0x1
0454 e5ff       |    |		Load	0x2,-0x1
0455 e001       |    |		Load	0x0,0x1
0456 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0457 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b       | [  |		.CONST	0x045b								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0001       |    |		.CONST	0x0001								; Number of locals
045b			BODY_0458:
045b			INIT_0458:
045b e5ff       |    |		Load	0x2,-0x1
045c e001       |    |		Load	0x0,0x1
045d 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
045e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
045f 0000       |    |		.XXX[0x1]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463       | c  |		.CONST	0x0463								; Address of begin
0461 0004       |    |		.CONST	0x0004								; Address of exception handler
0462 0001       |    |		.CONST	0x0001								; Number of locals
0463			BODY_0460:
0463			INIT_0460:
0463 4801       |H   |		Short_Literal	0x1
0464 e5ff       |    |		Load	0x2,-0x1
0465 e001       |    |		Load	0x0,0x1
0466 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0467 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b       | k  |		.CONST	0x046b								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0001       |    |		.CONST	0x0001								; Number of locals
046b			BODY_0468:
046b			INIT_0468:
046b e5ff       |    |		Load	0x2,-0x1
046c 00e1       |    |		Load_Encached	Boolean_Cache
046d 1c02       |    |		Execute_Immediate	Run_Utility,0x2
046e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
046f 0000       |    |		.XXX[0x1]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473       | s  |		.CONST	0x0473								; Address of begin
0471 0004       |    |		.CONST	0x0004								; Address of exception handler
0472 0001       |    |		.CONST	0x0001								; Number of locals
0473			BODY_0470:
0473			INIT_0470:
0473 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0474 0000 0000  |    |		.BLANK	0000[0x4]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b       | {  |		.CONST	0x047b								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0001       |    |		.CONST	0x0001								; Number of locals
047b			BODY_0478:
047b			INIT_0478:
047b e5ff       |    |		Load	0x2,-0x1
047c 00e1       |    |		Load_Encached	Boolean_Cache
047d 1c02       |    |		Execute_Immediate	Run_Utility,0x2
047e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
047f 0000       |    |		.XXX[0x1]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483       |    |		.CONST	0x0483								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0001       |    |		.CONST	0x0001								; Number of locals
0483			BODY_0480:
0483			INIT_0480:
0483 e5fd       |    |		Load	0x2,-0x3
0484 6811       |h   |		Jump_Zero	0x496
0485 e272       | r  |		Load	0x1,0x72
0486 4800       |H   |		Short_Literal	0x0
0487 00ea       |    |		Load_Encached	Null_String_Cache
0488 e5fe       |    |		Load	0x2,-0x2
0489 e5ff       |    |		Load	0x2,-0x1
048a e26d       | m  |		Load	0x1,0x6d
048b e26e       | n  |		Load	0x1,0x6e
048c 1d6f       | o  |		Execute_Immediate	Reference_Lex_1,0x6f
048d e270       | p  |		Load	0x1,0x70
048e e271       | q  |		Load	0x1,0x71
048f e272       | r  |		Load	0x1,0x72
0490 1d73       | s  |		Execute_Immediate	Reference_Lex_1,0x73
0491 e274       | t  |		Load	0x1,0x74
0492 1d75       | u  |		Execute_Immediate	Reference_Lex_1,0x75
0493 e006       |    |		Load	0x0,0x6
0494 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0495 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0496 e27f       |    |		Load	0x1,0x7f
0497 4800       |H   |		Short_Literal	0x0
0498 00ea       |    |		Load_Encached	Null_String_Cache
0499 e5fe       |    |		Load	0x2,-0x2
049a e5ff       |    |		Load	0x2,-0x1
049b e27a       | z  |		Load	0x1,0x7a
049c e27b       | {  |		Load	0x1,0x7b
049d 1d7c       | |  |		Execute_Immediate	Reference_Lex_1,0x7c
049e e27d       | }  |		Load	0x1,0x7d
049f e27e       | ~  |		Load	0x1,0x7e
04a0 e27f       |    |		Load	0x1,0x7f
04a1 1d80       |    |		Execute_Immediate	Reference_Lex_1,0x80
04a2 e281       |    |		Load	0x1,0x81
04a3 1d82       |    |		Execute_Immediate	Reference_Lex_1,0x82
04a4 e006       |    |		Load	0x0,0x6
04a5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04a6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04a7 0000       |    |		.XXX[0x1]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 04b1       |    |		.CONST	0x04b1								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab 00ea       |    |		Load_Encached	Null_String_Cache
04ac e5fe       |    |		Load	0x2,-0x2
04ad e5ff       |    |		Load	0x2,-0x1
04ae e006       |    |		Load	0x0,0x6
04af 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04b0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04b1			TRAP_04a8:
04b1 e006       |    |		Load	0x0,0x6
04b2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04b3 010f       |    |		Execute	Exception,Equal
04b4 680f       |h   |		Jump_Zero	0x4c4
04b5 e5fd       |    |		Load	0x2,-0x3
04b6 680a       |h   |		Jump_Zero	0x4c1
04b7 e00d       |    |		Load	0x0,0xd
04b8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04b9 4807       |H   |		Short_Literal	0x7
04ba 00ea       |    |		Load_Encached	Null_String_Cache
04bb e5fe       |    |		Load	0x2,-0x2
04bc e5ff       |    |		Load	0x2,-0x1
04bd e006       |    |		Load	0x0,0x6
04be 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04bf e00e       |    |		Load	0x0,0xe
04c0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04c1 e00d       |    |		Load	0x0,0xd
04c2 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
04c3 0257       | W  |		Execute	Discrete,Raise
04c4 0100       |    |		Execute	Exception,Raise
04c5 ; --------------------------------------------------------------------------------------
04c5 ; STRING TABLE
04c5 ; --------------------------------------------------------------------------------------
04c5 001c       |    |		.STRTAB	0x001c->0x04d3							; "DATA"
04c6 001e       |    |		.STRTAB	0x001e->0x04d5							; "TPS_Interface"
04c7 0029       | )  |		.STRTAB	0x0029->0x04db							; "SET_PROPERTY_ERROR"
04c8 0039       | 9  |		.STRTAB	0x0039->0x04e4							; "TPS_Interface is not authorized on this machine"
04c9 0066       | f  |		.STRTAB	0x0066->0x04fc							; "No tokens are available for using TPS_Interface"
04ca 0093       |    |		.STRTAB	0x0093->0x0513							; "Unable to get the Class Name  because gateway is not opened."
04cb 00cd       |    |		.STRTAB	0x00cd->0x0531							; "The property "
04cc 00d8       |    |		.STRTAB	0x00d8->0x0538							; " is not defined for the gateway "
04cd 00f6       |    |		.STRTAB	0x00f6->0x0548							; "Unable to find the value for property "
04ce 011a       |    |		.STRTAB	0x011a->0x055b							; " because gateway is not opened."
04cf 0137       | 7  |		.STRTAB	0x0137->0x056a							; "<NON_EXISTENT>"
04d0 0143       | C  |		.STRTAB	0x0143->0x0571							; "."
04d1 0142       | B  |		.STRTAB	0x0142->0x0572							; "File"
04d2 0144       | D  |		.STREND 0x0144->0x0574
04d3 4441 5441  |DATA|		.STRTAB_STRINGS
0574 0000 0000  |    |		.BLANK	0000[0x4]
0578 ; --------------------------------------------------------------------------------------
0578 ; Debug Table
0578 ; --------------------------------------------------------------------------------------
0578 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xce7f,0x0000,0x0001,0x0000
057e e2be 6868  |  hh|		.XXX[0x82]
0580 4002 a008  |@   |
0582 3011 5000  |0 P |
0584 4dc2 05d9  |M   |
0586 d0b8 0180  |    |
0588 53f5 560f  |S V |
058a 016e a8a8  | n  |
058c 0051 0003  | Q  |
058e 8333 f6ad  | 3  |
0590 3b37 856d  |;7 m|
0592 ff54 c200  | T  |
0594 d7e0 5e70  |  ^p|
0596 1840 00c0  | @  |
0598 c2d3 9f93  |    |
059a 82fd a889  |    |
059c 0077 f02d  | w -|
059e 3bf1 1b0f  |;   |
05a0 faaa 6401  |  d |
05a2 e1c0 5500  |  U |
05a4 2f70 39f8  |/p9 |
05a6 0d9e 0e3d  |   =|
05a8 4008 01e7  |@   |
05aa 697e d7d4  |i~  |
05ac 6cb3 eeaf  |l   |
05ae 39f9 5c5c  |9 \\|
05b0 19d2 23c0  |  # |
05b2 bce0 8080  |    |
05b4 01c3 17f5  |    |
05b6 548c 0808  |T   |
05b8 035c 1449  | \ I|
05ba 7401 83e9  |t   |
05bc ae88 2c01  |  , |
05be 905d 5003  | ]P |
05c0 a200 0003  |    |
05c2 57e1 5c34  |W \4|
05c4 3c20 01b0  |<   |
05c6 5d50 03d0  |]P  |
05c8 0147 e05c  | G \|
05ca 707d 8028  |p} (|
05cc bff5 3b03  |  ; |
05ce a771 6ae8  | qj |
05d0 893b a65c  | ; \|
05d2 3bf8 1ca3  |;   |
05d4 f40b 0884  |    |
05d6 31ea e801  |1   |
05d8 014e ee73  | N s|
05da 0c1c 2000  |    |
05dc 2009 2afe  |  * |
05de 4fc1 0503  |O   |
05e0 a75d 7527  | ]u'|
05e2 a194 1010  |    |
05e4 0028 0695  | (  |
05e6 7d51 0002  |}Q  |
05e8 833d 7738  | =w8|
05ea 8418 1000  |    |
05ec 3806 977e  |8  ~|
05ee 0352 85ec  | R  |
05f0 1500 3820  |  8 |
05f2 02c0 8328  |   (|
05f4 e4ee f5a5  |    |
05f6 e0a7 f06a  |   j|
05f8 b8bc 20bc  |    |
05fa 63ac 0802  |c   |
05fc 1db8 5a00  |  Z |
05fe 1770 6f38  | po8|