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

⟦0005ec9ff⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 01a8       |    |		.CONST	0x01a8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0050       | P  |		.CONST	0x0050								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001d       |    |		.CONST	0x001d								; Number of locals
000b			INIT_0008:
000b 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000d 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated
000f 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated
0011 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated
0013 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated
0015 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
0017 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
0019 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
001b 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated
001d 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated
001f 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated
0021 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
0023 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated
0025 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated
0027 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated
0029 029a 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated
002b 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
002d 00bf       |    |		Action	Accept_Activation
002e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
002f 00c7       |    |		Action	Elaborate_Subprogram
0030 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0035 00c7       |    |		Action	Elaborate_Subprogram
0036 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
004f 00c7       |    |		Action	Elaborate_Subprogram
0050			BODY_0008:
0050 00bc       |    |		Action	Signal_Activated
0051 00bb       |    |		Action	Signal_Completion
0052 0000 0000  |    |		.BLANK	0000[0x6]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005d       | ]  |		.CONST	0x005d								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0002       |    |		.CONST	0x0002								; Number of locals
005b			INIT_0058:
005b e002       |    |		Load	0x0,0x2
005c 0322       | "  |		Declare_Variable	Record
005d			BODY_0058:
005d 00db       |    |		Load_Top	At_Offset_3
005e 8003       |    |		Call	0x0,0x3
005f 00d9       |    |		Load_Top	At_Offset_1
0060 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0061 e5fe       |    |		Load	0x2,-0x2
0062 8003       |    |		Call	0x0,0x3
0063 00d9       |    |		Load_Top	At_Offset_1
0064 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0065 e5fd       |    |		Load	0x2,-0x3
0066 8003       |    |		Call	0x0,0x3
0067 00d9       |    |		Load_Top	At_Offset_1
0068 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0069 e5fc       |    |		Load	0x2,-0x4
006a 8003       |    |		Call	0x0,0x3
006b 00d9       |    |		Load_Top	At_Offset_1
006c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
006d e5fb       |    |		Load	0x2,-0x5
006e 8003       |    |		Call	0x0,0x3
006f 00d9       |    |		Load_Top	At_Offset_1
0070 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0071 e5fa       |    |		Load	0x2,-0x6
0072 8003       |    |		Call	0x0,0x3
0073 00d9       |    |		Load_Top	At_Offset_1
0074 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0075 e5f9       |    |		Load	0x2,-0x7
0076 8003       |    |		Call	0x0,0x3
0077 00d9       |    |		Load_Top	At_Offset_1
0078 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0079 e5f8       |    |		Load	0x2,-0x8
007a 8003       |    |		Call	0x0,0x3
007b 00d9       |    |		Load_Top	At_Offset_1
007c 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
007d e5f7       |    |		Load	0x2,-0x9
007e 8003       |    |		Call	0x0,0x3
007f 00d9       |    |		Load_Top	At_Offset_1
0080 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0081 e5f6       |    |		Load	0x2,-0xa
0082 8003       |    |		Call	0x0,0x3
0083 00d9       |    |		Load_Top	At_Offset_1
0084 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0085 e004       |    |		Load	0x0,0x4
0086 00d9       |    |		Load_Top	At_Offset_1
0087 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0088 00d8       |    |		Load_Top	At_Offset_0
0089 440a       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0xa
008a 0000 0000  |    |		.BLANK	0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 8005       |    |		Call	0x0,0x5
0094 00ca       |    |		Action	Exit_Nullary_Function
0095 0000 0000  |    |		.XXX[0x3]
0097 0000       |    |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b       |    |		.CONST	0x009b								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0001       |    |		.CONST	0x0001								; Number of locals
009b			BODY_0098:
009b			INIT_0098:
009b 00da       |    |		Load_Top	At_Offset_2
009c 8006       |    |		Call	0x0,0x6
009d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009e 0000 0000  |    |		.XXX[0x2]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 00db       |    |		Load_Top	At_Offset_3
00a4 00db       |    |		Load_Top	At_Offset_3
00a5 8007       |    |		Call	0x0,0x7
00a6 c5fe       |    |		Store	0x2,-0x2
00a7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 8008       |    |		Call	0x0,0x8
00ae c5fe       |    |		Store	0x2,-0x2
00af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 00db       |    |		Load_Top	At_Offset_3
00b4 00db       |    |		Load_Top	At_Offset_3
00b5 8009       |    |		Call	0x0,0x9
00b6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00b7 0000       |    |		.XXX[0x1]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 00da       |    |		Load_Top	At_Offset_2
00bc 800a       |    |		Call	0x0,0xa
00bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00be 0000 0000  |    |		.XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 800b       |    |		Call	0x0,0xb
00c5 003b       | ;  |		Store_Top	Access,At_Offset_3
00c6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00c7 0000       |    |		.XXX[0x1]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2
00cc 800c       |    |		Call	0x0,0xc
00cd 003b       | ;  |		Store_Top	Access,At_Offset_3
00ce 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00cf 0000       |    |		.XXX[0x1]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 00db       |    |		Load_Top	At_Offset_3
00d4 00db       |    |		Load_Top	At_Offset_3
00d5 800d       |    |		Call	0x0,0xd
00d6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00d7 0000       |    |		.XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00da       |    |		Load_Top	At_Offset_2
00dc 800e       |    |		Call	0x0,0xe
00dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00de 0000 0000  |    |		.XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 00da       |    |		Load_Top	At_Offset_2
00e4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e5 0000 0000  |    |		.XXX[0x3]
00e7 0000       |    |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00da       |    |		Load_Top	At_Offset_2
00ec 800f       |    |		Call	0x0,0xf
00ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ee 0000 0000  |    |		.XXX[0x2]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 00da       |    |		Load_Top	At_Offset_2
00f4 0227       | '  |		Execute	Access,All_Reference
00f5 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00f6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f7 8010       |    |		Call	0x0,0x10
00f8 e011       |    |		Load	0x0,0x11
00f9 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
00fa 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
00fc 00db       |    |		Load_Top	At_Offset_3
00fd 0227       | '  |		Execute	Access,All_Reference
00fe 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00ff 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0100 8010       |    |		Call	0x0,0x10
0101 01cc       |    |		Execute	Vector,Catenate
0102 e011       |    |		Load	0x0,0x11
0103 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0104 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
0106 00db       |    |		Load_Top	At_Offset_3
0107 0227       | '  |		Execute	Access,All_Reference
0108 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0109 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
010a 8010       |    |		Call	0x0,0x10
010b 01cc       |    |		Execute	Vector,Catenate
010c e011       |    |		Load	0x0,0x11
010d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
010e 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
0110 00db       |    |		Load_Top	At_Offset_3
0111 0227       | '  |		Execute	Access,All_Reference
0112 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0113 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0114 8010       |    |		Call	0x0,0x10
0115 01cc       |    |		Execute	Vector,Catenate
0116 e011       |    |		Load	0x0,0x11
0117 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0118 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
011a 00db       |    |		Load_Top	At_Offset_3
011b 0227       | '  |		Execute	Access,All_Reference
011c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
011d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
011e 8010       |    |		Call	0x0,0x10
011f 01cc       |    |		Execute	Vector,Catenate
0120 e011       |    |		Load	0x0,0x11
0121 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0122 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
0124 00db       |    |		Load_Top	At_Offset_3
0125 0227       | '  |		Execute	Access,All_Reference
0126 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0127 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0128 8010       |    |		Call	0x0,0x10
0129 01cc       |    |		Execute	Vector,Catenate
012a e011       |    |		Load	0x0,0x11
012b 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
012c 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
012e 00db       |    |		Load_Top	At_Offset_3
012f 0227       | '  |		Execute	Access,All_Reference
0130 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0131 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0132 8010       |    |		Call	0x0,0x10
0133 01cc       |    |		Execute	Vector,Catenate
0134 e011       |    |		Load	0x0,0x11
0135 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0136 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
0138 00db       |    |		Load_Top	At_Offset_3
0139 0227       | '  |		Execute	Access,All_Reference
013a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
013b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
013c 8010       |    |		Call	0x0,0x10
013d 01cc       |    |		Execute	Vector,Catenate
013e e011       |    |		Load	0x0,0x11
013f 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0140 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
0142 00db       |    |		Load_Top	At_Offset_3
0143 0227       | '  |		Execute	Access,All_Reference
0144 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0145 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0146 8010       |    |		Call	0x0,0x10
0147 01cc       |    |		Execute	Vector,Catenate
0148 e011       |    |		Load	0x0,0x11
0149 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
014a 0092 019e  |    |		Action	Push_String_Extended,0x19e					; ","
014c 00db       |    |		Load_Top	At_Offset_3
014d 0227       | '  |		Execute	Access,All_Reference
014e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
014f 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0150 8010       |    |		Call	0x0,0x10
0151 01cc       |    |		Execute	Vector,Catenate
0152 e011       |    |		Load	0x0,0x11
0153 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0154 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0155 0000 0000  |    |		.XXX[0x3]
0157 0000       |    |
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015d       | ]  |		.CONST	0x015d								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0002       |    |		.CONST	0x0002								; Number of locals
015b			INIT_0158:
015b e004       |    |		Load	0x0,0x4
015c 0007       |    |		Action	Break_Optional
015d			BODY_0158:
015d 00db       |    |		Load_Top	At_Offset_3
015e 0039       | 9  |		Store_Top	Access,At_Offset_1
015f 00cf       |    |		Action	Mark_Auxiliary
0160 7811       |x   |		Jump	0x172
0161 00d9       |    |		Load_Top	At_Offset_1
0162 821a       |    |		Call	0x1,0x1a
0163 00d9       |    |		Load_Top	At_Offset_1
0164 0227       | '  |		Execute	Access,All_Reference
0165 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0166 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0167 8219       |    |		Call	0x1,0x19
0168 6805       |h   |		Jump_Zero	0x16e
0169 00d9       |    |		Load_Top	At_Offset_1
016a 0227       | '  |		Execute	Access,All_Reference
016b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
016c 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
016d 821b       |    |		Call	0x1,0x1b
016e 00d9       |    |		Load_Top	At_Offset_1
016f 8215       |    |		Call	0x1,0x15
0170 003a       | :  |		Store_Top	Access,At_Offset_2
0171 00c9       |    |		Action	Pop_Auxiliary_Loop
0172 00d9       |    |		Load_Top	At_Offset_1
0173 8219       |    |		Call	0x1,0x19
0174 77ec       |w   |		Jump_Nonzero	0x161
0175 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0176 0000 0000  |    |		.XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d       | }  |		.CONST	0x017d								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0002       |    |		.CONST	0x0002								; Number of locals
017b			INIT_0178:
017b e004       |    |		Load	0x0,0x4
017c 0007       |    |		Action	Break_Optional
017d			BODY_0178:
017d 00db       |    |		Load_Top	At_Offset_3
017e 0039       | 9  |		Store_Top	Access,At_Offset_1
017f 00d8       |    |		Load_Top	At_Offset_0
0180 8219       |    |		Call	0x1,0x19
0181 6811       |h   |		Jump_Zero	0x193
0182 00d8       |    |		Load_Top	At_Offset_0
0183 0227       | '  |		Execute	Access,All_Reference
0184 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0185 8219       |    |		Call	0x1,0x19
0186 680c       |h   |		Jump_Zero	0x193
0187 00cf       |    |		Action	Mark_Auxiliary
0188 7804       |x   |		Jump	0x18d
0189 00d9       |    |		Load_Top	At_Offset_1
018a 821d       |    |		Call	0x1,0x1d
018b 003a       | :  |		Store_Top	Access,At_Offset_2
018c 00c9       |    |		Action	Pop_Auxiliary_Loop
018d 00d9       |    |		Load_Top	At_Offset_1
018e 0227       | '  |		Execute	Access,All_Reference
018f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0190 8219       |    |		Call	0x1,0x19
0191 77f7       |w   |		Jump_Nonzero	0x189
0192 00ce       |    |		Action	Pop_Auxiliary
0193 00d8       |    |		Load_Top	At_Offset_0
0194 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0195 0000 0000  |    |		.XXX[0x3]
0197 0000       |    |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b 00da       |    |		Load_Top	At_Offset_2
019c 8012       |    |		Call	0x0,0x12
019d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019e ; --------------------------------------------------------------------------------------
019e ; STRING TABLE
019e ; --------------------------------------------------------------------------------------
019e 0004       |    |		.STRTAB	0x0004->0x01a0							; ","
019f 0003       |    |		.STREND 0x0003->0x01a0
01a0 2c00       |,   |		.STRTAB_STRINGS
01a1 0000 0000  |    |		.BLANK	0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; Debug Table
01a8 ; --------------------------------------------------------------------------------------
01a8 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0xced6,0x0000,0x0001,0x0013
01ae 000b 01fa  |    |		.DBG4T	0x000b,0x01fa,0x8000,0x8000
01b2 002e 021e  | .  |		.DBG4T	0x002e,0x021e,0x8000,0x0000
01b6 005b 0231  | [ 1|		.DBG4T	0x005b,0x0231,0x0002,0x0000
01ba 0093 0240  |   @|		.DBG4T	0x0093,0x0240,0x0002,0x0000
01be 009b 0243  |   C|		.DBG4T	0x009b,0x0243,0x0002,0x0000
01c2 00a3 0246  |   F|		.DBG4T	0x00a3,0x0246,0x0001,0x0000
01c6 00ab 0249  |   I|		.DBG4T	0x00ab,0x0249,0x0001,0x0000
01ca 00b3 024c  |   L|		.DBG4T	0x00b3,0x024c,0x0002,0x0000
01ce 00bb 024f  |   O|		.DBG4T	0x00bb,0x024f,0x0002,0x0000
01d2 00c3 0252  |   R|		.DBG4T	0x00c3,0x0252,0x0001,0x0000
01d6 00cb 0255  |   U|		.DBG4T	0x00cb,0x0255,0x0001,0x0000
01da 00d3 0258  |   X|		.DBG4T	0x00d3,0x0258,0x0002,0x0000
01de 00db 025b  |   [|		.DBG4T	0x00db,0x025b,0x0002,0x0000
01e2 00e3 025e  |   ^|		.DBG4T	0x00e3,0x025e,0x0002,0x0000
01e6 00eb 0261  |   a|		.DBG4T	0x00eb,0x0261,0x0002,0x0000
01ea 00f3 0264  |   d|		.DBG4T	0x00f3,0x0264,0x0001,0x0000
01ee 015b 0270  | [ p|		.DBG4T	0x015b,0x0270,0x0001,0x4000
01f2 017b 027f  | {  |		.DBG4T	0x017b,0x027f,0x0002,0x4000
01f6 019b 028e  |    |		.DBG4T	0x019b,0x028e,0x0002,0x0000
01fa ; --------------------------------------------------------------------------------------
01fa ; Debug chain
01fa ; --------------------------------------------------------------------------------------
01fa 0011 0000  |    |		.DBGLEN	0x0011,0x0000
01fc 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b
020d 0004 0005  |    |		.XXX[0x11]
020f 0006 0007  |    |
0211 0008 0009  |    |
0213 000a 000b  |    |
0215 000c 000d  |    |
0217 000e 000f  |    |
0219 0010 0011  |    |
021b 0012 0013  |    |
021d 0014       |    |
021e ; --------------------------------------------------------------------------------------
021e ; Debug chain
021e ; --------------------------------------------------------------------------------------
021e 0011 0000  |    |		.DBGLEN	0x0011,0x0000
0220 002e 0030  | . 0|		.DBGLNO	0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c,0x004e
0231 ; --------------------------------------------------------------------------------------
0231 ; Debug chain
0231 ; --------------------------------------------------------------------------------------
0231 0001 000c  |    |		.DBGLEN	0x0001,0x000c
0233 005b 005d  | [ ]|		.DBGLNO	0x005b,0x005d,0x0061,0x0065,0x0069,0x006d,0x0071,0x0075,0x0079,0x007d,0x0081,0x0085,0x0088
0240 ; --------------------------------------------------------------------------------------
0240 ; Debug chain
0240 ; --------------------------------------------------------------------------------------
0240 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0242 0093       |    |		.DBGLNO	0x0093
0243 ; --------------------------------------------------------------------------------------
0243 ; Debug chain
0243 ; --------------------------------------------------------------------------------------
0243 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0245 009b       |    |		.DBGLNO	0x009b
0246 ; --------------------------------------------------------------------------------------
0246 ; Debug chain
0246 ; --------------------------------------------------------------------------------------
0246 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0248 00a3       |    |		.DBGLNO	0x00a3
0249 ; --------------------------------------------------------------------------------------
0249 ; Debug chain
0249 ; --------------------------------------------------------------------------------------
0249 0000 0001  |    |		.DBGLEN	0x0000,0x0001
024b 00ab       |    |		.DBGLNO	0x00ab
024c ; --------------------------------------------------------------------------------------
024c ; Debug chain
024c ; --------------------------------------------------------------------------------------
024c 0000 0001  |    |		.DBGLEN	0x0000,0x0001
024e 00b3       |    |		.DBGLNO	0x00b3
024f ; --------------------------------------------------------------------------------------
024f ; Debug chain
024f ; --------------------------------------------------------------------------------------
024f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0251 00bb       |    |		.DBGLNO	0x00bb
0252 ; --------------------------------------------------------------------------------------
0252 ; Debug chain
0252 ; --------------------------------------------------------------------------------------
0252 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0254 00c3       |    |		.DBGLNO	0x00c3
0255 ; --------------------------------------------------------------------------------------
0255 ; Debug chain
0255 ; --------------------------------------------------------------------------------------
0255 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0257 00cb       |    |		.DBGLNO	0x00cb
0258 ; --------------------------------------------------------------------------------------
0258 ; Debug chain
0258 ; --------------------------------------------------------------------------------------
0258 0000 0001  |    |		.DBGLEN	0x0000,0x0001
025a 00d3       |    |		.DBGLNO	0x00d3
025b ; --------------------------------------------------------------------------------------
025b ; Debug chain
025b ; --------------------------------------------------------------------------------------
025b 0000 0001  |    |		.DBGLEN	0x0000,0x0001
025d 00db       |    |		.DBGLNO	0x00db
025e ; --------------------------------------------------------------------------------------
025e ; Debug chain
025e ; --------------------------------------------------------------------------------------
025e 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0260 00e3       |    |		.DBGLNO	0x00e3
0261 ; --------------------------------------------------------------------------------------
0261 ; Debug chain
0261 ; --------------------------------------------------------------------------------------
0261 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0263 00eb       |    |		.DBGLNO	0x00eb
0264 ; --------------------------------------------------------------------------------------
0264 ; Debug chain
0264 ; --------------------------------------------------------------------------------------
0264 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0266 00f3 00fa  |    |		.DBGLNO	0x00f3,0x00fa,0x0104,0x010e,0x0118,0x0122,0x012c,0x0136,0x0140,0x014a
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug chain
0270 ; --------------------------------------------------------------------------------------
0270 0001 0006  |    |		.DBGLEN	0x0001,0x0006
0272 015b 015d  | [ ]|		.DBGLNO	0x015b,0x015d,0x0161,0x0163,0x0169,0x016e,0x0172
0279 0001 0003  |    |		.XXX[0x6]
027b 0004 0005  |    |
027d 0006 0002  |    |
027f ; --------------------------------------------------------------------------------------
027f ; Debug chain
027f ; --------------------------------------------------------------------------------------
027f 0001 0006  |    |		.DBGLEN	0x0001,0x0006
0281 017b 017d  | { }|		.DBGLNO	0x017b,0x017d,0x017f,0x0182,0x0189,0x018d,0x0193
0288 0001 0002  |    |		.XXX[0x6]
028a 0003 0005  |    |
028c 0004 0006  |    |
028e ; --------------------------------------------------------------------------------------
028e ; Debug chain
028e ; --------------------------------------------------------------------------------------
028e 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0290 019b       |    |		.DBGLNO	0x019b
0291 0000 0000  |    |		.BLANK	0000[0x16f]