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

⟦e0f96c529⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0158       | X  |		.CONST	0x0158								; 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 004a       | J  |		.CONST	0x004a								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001a       |    |		.CONST	0x001a								; Number of locals
000b			INIT_0008:
000b 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x01aa,0xc000,0x0000,0x0052,0x44a5,0x0000,0x0003
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 6104       |a   |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x5244a501}		; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 0129       | )  |		Execute	Any,Make_Visible
0011 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3 = 0x11,0xfffc
0012 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4 = 0x12,0xfffb
0013 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x5 = 0x13,0xfffa
0014 4803       |H   |		Short_Literal	0x3							; Debug Table 0x1 = .DEBUG	0x0014,0x01b8,0xc000,0x0000,0x0057,0x2895,0x0000,0x000b
													; Debug Table 0x1.0x0 = 0x14,0xffff
0015 032a       | *  |		Declare_Type	Record,Incomplete
0016 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1 = 0x16,0xfffe
0017 02a0       |    |		Declare_Subprogram	Null_Subprogram
0018 4818       |H   |		Short_Literal	0x18
0019 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
001a e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x2 = 0x1a,0xfffd
001b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
001c e20f       |    |		Load	0x1,0xf
001d 00da       |    |		Load_Top	At_Offset_2
001e 029f 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Call
0020 e214       |    |		Load	0x1,0x14
0021 0326       | &  |		Complete_Type	Record,By_Defining
0022 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x3 = 0x22,0xfffc
0023 0007       |    |		Action	Break_Optional
0024 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x4 = 0x24,0xfffb
0025 48ff       |H   |		Short_Literal	0xff
0026 00db       |    |		Load_Top	At_Offset_3
0027 02a0       |    |		Declare_Subprogram	Null_Subprogram
0028 4801       |H   |		Short_Literal	0x1
0029 035d       | ]  |		Declare_Type	Array,Defined
002a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x5 = 0x2a,0xfffa
002b 0337       | 7  |		Declare_Variable	Array
002c 00d9       |    |		Load_Top	At_Offset_1
002d 0337       | 7  |		Declare_Variable	Array
002e 48ff       |H   |		Short_Literal	0xff
002f 4800       |H   |		Short_Literal	0x0
0030 e215       |    |		Load	0x1,0x15
0031 00d9       |    |		Load_Top	At_Offset_1
0032 e219       |    |		Load	0x1,0x19
0033 01d6       |    |		Execute	Vector,Field_Write
0034 3ffb       |?   |		Loop_Increasing	0x30
0035 00da       |    |		Load_Top	At_Offset_2
0036 01c3       |    |		Execute	Vector,Check_In_Type
0037 00d9       |    |		Load_Top	At_Offset_1
0038 01d4       |    |		Execute	Vector,Structure_Write
0039 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x6 = 0x39,0xfff9
003a 60d5       |`   |		Indirect_Literal	Discrete,0x110,{0x004ac40e, 0x000011b0}
003b 02a0       |    |		Declare_Subprogram	Null_Subprogram
003c 037d       | }  |		Declare_Type	Task,Defined
003d 036f       | o  |		Declare_Variable	Task
003e 029d 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call			; Debug Table 0x1.0x7 = 0x3e,0xfff8
0040 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x8 = 0x40,0xfff7
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x9 = 0x42,0xfff6
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 00b6       |    |		Action	Make_Scope							; Debug Table 0x1.0xa = 0x44,0xfff5
0045 e002       |    |		Load	0x0,0x2
0046 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0047 4803       |H   |		Short_Literal	0x3
0048 e219       |    |		Load	0x1,0x19
0049 020e       |    |		Execute	Module,Augment_Imports
004a			BODY_0008:
004a 00be       |    |		Action	Activate_Tasks
004b 00bc       |    |		Action	Signal_Activated
004c 00bb       |    |		Action	Signal_Completion
004d 0000 0000  |    |		.XXX[0x3]
004f 0000       |    |
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0053,0x01d0,0x1001,0x0000,0x0052,0x44a5,0x0000,0x0013
													; Debug Table 0x2.0x0 = 0x53,0x1
0054 e20f       |    |		Load	0x1,0xf
0055 0119       |    |		Execute	Any,Check_In_Formal_Type
0056 e001       |    |		Load	0x0,0x1
0057 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0058 e003       |    |		Load	0x0,0x3
0059 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
005a 4803       |H   |		Short_Literal	0x3
005b e219       |    |		Load	0x1,0x19
005c 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
005d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
005e 0000 0000  |    |		.XXX[0x2]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 006b       | k  |		.CONST	0x006b								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0003       |    |		.CONST	0x0003								; Number of locals
0063			INIT_0060:
0063 e001       |    |		Load	0x0,0x1								; Debug Table 0x3 = .DEBUG	0x0063,0x01d4,0x1002,0x0000,0x0052,0x44a5,0x0000,0x001b
													; Debug Table 0x3.0x0 = 0x63,0xffff
0064 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0065 e001       |    |		Load	0x0,0x1
0066 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0067 03f1       |    |		Declare_Variable	Discrete,With_Value
0068 e215       |    |		Load	0x1,0x15							; Debug Table 0x3.0x1 = 0x68,0xfffe
0069 e216       |    |		Load	0x1,0x16
006a 0039       | 9  |		Store_Top	Access,At_Offset_1
006b			BODY_0060:
006b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x6b,0x1
006c 6811       |h   |		Jump_Zero	0x7e
006d 00d8       |    |		Load_Top	At_Offset_0
006e 0227       | '  |		Execute	Access,All_Reference
006f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0070 00da       |    |		Load_Top	At_Offset_2
0071 027f       |    |		Execute	Discrete,Equal
0072 680b       |h   |		Jump_Zero	0x7e
0073 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x3 = 0x73,0x2
0074 0227       | '  |		Execute	Access,All_Reference
0075 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0076 00d8       |    |		Load_Top	At_Offset_0
0077 0120       |    |		Execute	Any,Is_Value
0078 7002       |p   |		Jump_Nonzero	0x7b
0079 00d8       |    |		Load_Top	At_Offset_0
007a 011e       |    |		Execute	Any,Convert
007b e20f       |    |		Load	0x1,0xf
007c 0119       |    |		Execute	Any,Check_In_Formal_Type
007d 00ca       |    |		Action	Exit_Nullary_Function
007e e003       |    |		Load	0x0,0x3								; Debug Table 0x3.0x4 = 0x7e,0x3
007f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0080 e218       |    |		Load	0x1,0x18
0081 01d7       |    |		Execute	Vector,Field_Read
0082 0039       | 9  |		Store_Top	Access,At_Offset_1
0083 00cf       |    |		Action	Mark_Auxiliary
0084 7818       |x   |		Jump	0x9d
0085 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x5 = 0x85,0x5
0086 0227       | '  |		Execute	Access,All_Reference
0087 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0088 00db       |    |		Load_Top	At_Offset_3
0089 027f       |    |		Execute	Discrete,Equal
008a 680d       |h   |		Jump_Zero	0x98
008b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x6 = 0x8b,0x6
008c a216       |    |		Store_Unchecked	0x1,0x16
008d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x7 = 0x8d,0x7
008e 0227       | '  |		Execute	Access,All_Reference
008f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0090 00d8       |    |		Load_Top	At_Offset_0
0091 0120       |    |		Execute	Any,Is_Value
0092 7002       |p   |		Jump_Nonzero	0x95
0093 00d8       |    |		Load_Top	At_Offset_0
0094 011e       |    |		Execute	Any,Convert
0095 e20f       |    |		Load	0x1,0xf
0096 0119       |    |		Execute	Any,Check_In_Formal_Type
0097 00ca       |    |		Action	Exit_Nullary_Function
0098 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x8 = 0x98,0x8
0099 0227       | '  |		Execute	Access,All_Reference
009a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
009b 003a       | :  |		Store_Top	Access,At_Offset_2
009c 00c9       |    |		Action	Pop_Auxiliary_Loop
009d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x9 = 0x9d,0x4
009e 77e6       |w   |		Jump_Nonzero	0x85
009f 00ce       |    |		Action	Pop_Auxiliary
00a0 e213       |    |		Load	0x1,0x13							; Debug Table 0x3.0xa = 0xa0,0x9
00a1 0257       | W  |		Execute	Discrete,Raise
00a2 0000 0000  |    |		.BLANK	0000[0x6]
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 4608       |F   |		Jump_Case	0x9							; Debug Table 0x4 = .DEBUG	0x00ab,0x01ec,0x1005,0x0000,0x0057,0x2895,0x0000,0x0015
00ac 7808       |x   |		Jump	0xb5								; case 0x0
00ad 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00ae 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
00af 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
00b0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
00b1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
00b2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
00b3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
00b4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
00b5 00da       |    |		Load_Top	At_Offset_2
00b6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00b7 0125       | %  |		Execute	Any,Set_Constraint
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00ba 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00bb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
00bc 0000 0000  |    |		.BLANK	0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c7       |    |		.CONST	0x00c7								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0003       |    |		.CONST	0x0003								; Number of locals
00c3			INIT_00c0:
00c3 e215       |    |		Load	0x1,0x15							; Debug Table 0x5 = .DEBUG	0x00c3,0x01ee,0x1001,0x0000,0x0057,0x2895,0x0000,0x005e
													; Debug Table 0x5.0x0 = 0xc3,0xffff
00c4 0007       |    |		Action	Break_Optional
00c5 e215       |    |		Load	0x1,0x15							; Debug Table 0x5.0x1 = 0xc5,0xfffe
00c6 0007       |    |		Action	Break_Optional
00c7			BODY_00c0:
00c7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x2 = 0xc7,0x1
00c8 e218       |    |		Load	0x1,0x18
00c9 01d7       |    |		Execute	Vector,Field_Read
00ca 682e       |h.  |		Jump_Zero	0xf9
00cb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x3 = 0xcb,0x2
00cc e218       |    |		Load	0x1,0x18
00cd 01d7       |    |		Execute	Vector,Field_Read
00ce 003a       | :  |		Store_Top	Access,At_Offset_2
00cf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x4 = 0xcf,0x3
00d0 0039       | 9  |		Store_Top	Access,At_Offset_1
00d1 00cf       |    |		Action	Mark_Auxiliary
00d2 7823       |x#  |		Jump	0xf6
00d3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x5 = 0xd3,0x5
00d4 0227       | '  |		Execute	Access,All_Reference
00d5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00d6 e5fe       |    |		Load	0x2,-0x2
00d7 027f       |    |		Execute	Discrete,Equal
00d8 6807       |h   |		Jump_Zero	0xe0
00d9 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x6 = 0xd9,0x6
00da 00da       |    |		Load_Top	At_Offset_2
00db 0227       | '  |		Execute	Access,All_Reference
00dc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00dd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x7 = 0xdd,0x7
00de a216       |    |		Store_Unchecked	0x1,0x16
00df 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x5.0x8 = 0xdf,0x8
00e0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x9 = 0xe0,0x9
00e1 0227       | '  |		Execute	Access,All_Reference
00e2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e3 e001       |    |		Load	0x0,0x1
00e4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00e5 700b       |p   |		Jump_Nonzero	0xf1
00e6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xa = 0xe6,0xa
00e7 00da       |    |		Load_Top	At_Offset_2
00e8 0227       | '  |		Execute	Access,All_Reference
00e9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00ea e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0xb = 0xea,0xb
00eb 00da       |    |		Load_Top	At_Offset_2
00ec 0227       | '  |		Execute	Access,All_Reference
00ed 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ee 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xc = 0xee,0xc
00ef a216       |    |		Store_Unchecked	0x1,0x16
00f0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x5.0xd = 0xf0,0xd
00f1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xe = 0xf1,0xe
00f2 0227       | '  |		Execute	Access,All_Reference
00f3 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00f4 003a       | :  |		Store_Top	Access,At_Offset_2
00f5 00c9       |    |		Action	Pop_Auxiliary_Loop
00f6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xf = 0xf6,0x4
00f7 77db       |w   |		Jump_Nonzero	0xd3
00f8 00ce       |    |		Action	Pop_Auxiliary
00f9 e214       |    |		Load	0x1,0x14							; Debug Table 0x5.0x10 = 0xf9,0xf
00fa 0322       | "  |		Declare_Variable	Record
00fb e5fe       |    |		Load	0x2,-0x2
00fc 00d9       |    |		Load_Top	At_Offset_1
00fd 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00fe e5fd       |    |		Load	0x2,-0x3
00ff e20f       |    |		Load	0x1,0xf
0100 0119       |    |		Execute	Any,Check_In_Formal_Type
0101 00d9       |    |		Load_Top	At_Offset_1
0102 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0103 00da       |    |		Load_Top	At_Offset_2
0104 00d9       |    |		Load_Top	At_Offset_1
0105 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0106 e215       |    |		Load	0x1,0x15
0107 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0108 0039       | 9  |		Store_Top	Access,At_Offset_1
0109 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x11 = 0x109,0x10
010a a216       |    |		Store_Unchecked	0x1,0x16
010b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x12 = 0x10b,0x11
010c e5ff       |    |		Load	0x2,-0x1
010d e218       |    |		Load	0x1,0x18
010e 01d6       |    |		Execute	Vector,Field_Write
010f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0110 004a c40e  | J  |		.LITERAL	{0x004ac40e, 0x000011b0}
0114 0000 0000  |    |		.LITERAL	{0x00000000, 0x5244a501}
0118 0121 0004  | !  |		.XXX[0x3]
011a 000e       |    |
011b 4803       |H   |		Short_Literal	0x3							; Debug Table 0x6 = .DEBUG	0x011b,0x0216,0x0000,0x0000,0x0057,0x2895,0x0000,0x0046
011c 02cb       |    |		Declare_Variable	Entry
011d 00bf       |    |		Action	Accept_Activation
011e 029f 0133  |   3|		Declare_Subprogram	INIT_0130,For_Call				; Debug Table 0x7 = .DEBUG	0x011e,0x0218,0x0000,0x0000,0x0057,0x2895,0x0000,0x0159
0120 00bc       |    |		Action	Signal_Activated
0121 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x0 = 0x121,0x1
0122 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0123 0092 014b  |   K|		Action	Push_String_Extended,0x14b					; "_serializer"
0125 01cc       |    |		Execute	Vector,Catenate
0126 e002       |    |		Load	0x0,0x2
0127 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0128 00cf       |    |		Action	Mark_Auxiliary
0129 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x1 = 0x129,0x2
012a 820e       |    |		Call	0x1,0xe								; Debug Table 0x7.0x2 = 0x12a,0x3
012b 00c9       |    |		Action	Pop_Auxiliary_Loop
012c 7ffd       |    |		Jump	0x12a
012d 0000 0000  |    |		.XXX[0x3]
012f 0000       |    |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 013a       | :  |		.CONST	0x013a								; Address of begin
0131 013d       | =  |		.CONST	0x013d								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 480d 4828  |H H(|		Declare_Variable	Select	0x000, 0x001,				; Debug Table 0x8 = .DEBUG	0x0133,0x0220,0x0004,0x0000,0x0057,0x2895,0x0000,0x018c
0135 4800 4800  |H H |				[0x000]: 0x000 = 0x0000,
0137 4800 4801  |H H |				[0x00d]: 0x028 = 0x0140
0139 02cf       |    |
013a			BODY_0130:
013a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x0 = 0x13a,0x1
013b 013f       | ?  |		Execute	Select,Rendezvous
013c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
013d			TRAP_0130:
013d 0007       |    |		Action	Break_Optional
013e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x8.0x1 = 0x13e,0x3
013f 0000       |    |		.XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; See instruction 0x02cf at 0x133, index=0xd
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x9 = .DEBUG	0x0143,0x0226,0x0003,0x0000,0x0057,0x2895,0x0000,0x017f
													; Debug Table 0x9.0x0 = 0x143,0x1
0144 e001       |    |		Load	0x0,0x1
0145 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0146 0119       |    |		Execute	Any,Check_In_Formal_Type
0147 e7fd       |    |		Load	0x3,-0x3
0148 e7fe       |    |		Load	0x3,-0x2
0149 8003       |    |		Call	0x0,0x3
014a 4100       |A   |		End_Rendezvous	0x0
014b ; --------------------------------------------------------------------------------------
014b ; STRING TABLE
014b ; --------------------------------------------------------------------------------------
014b 0004       |    |		.STRTAB	0x0004->0x014d							; "_serializer"
014c 000d       |    |		.STREND 0x000d->0x0152
014d 5f73 6572  |_ser|		.STRTAB_STRINGS
0153 0000 0000  |    |		.BLANK	0000[0x5]
0158 ; --------------------------------------------------------------------------------------
0158 ; Debug Table
0158 ; --------------------------------------------------------------------------------------
0158 0003 000a  |    |		.CONST	0x0003,0x000a
015a 000b 01aa  |    |		.DEBUG	0x000b,0x01aa,0xc000,0x0000,0x0052,0x44a5,0x0000,0x0003
0162 0014 01b8  |    |		.DEBUG	0x0014,0x01b8,0xc000,0x0000,0x0057,0x2895,0x0000,0x000b
016a 0053 01d0  | S  |		.DEBUG	0x0053,0x01d0,0x1001,0x0000,0x0052,0x44a5,0x0000,0x0013
0172 0063 01d4  | c  |		.DEBUG	0x0063,0x01d4,0x1002,0x0000,0x0052,0x44a5,0x0000,0x001b
017a 00ab 01ec  |    |		.DEBUG	0x00ab,0x01ec,0x1005,0x0000,0x0057,0x2895,0x0000,0x0015
0182 00c3 01ee  |    |		.DEBUG	0x00c3,0x01ee,0x1001,0x0000,0x0057,0x2895,0x0000,0x005e
018a 011b 0216  |    |		.DEBUG	0x011b,0x0216,0x0000,0x0000,0x0057,0x2895,0x0000,0x0046
0192 011e 0218  |    |		.DEBUG	0x011e,0x0218,0x0000,0x0000,0x0057,0x2895,0x0000,0x0159
019a 0133 0220  | 3  |		.DEBUG	0x0133,0x0220,0x0004,0x0000,0x0057,0x2895,0x0000,0x018c
01a2 0143 0226  | C &|		.DEBUG	0x0143,0x0226,0x0003,0x0000,0x0057,0x2895,0x0000,0x017f
01aa ; --------------------------------------------------------------------------------------
01aa ; Debug3 Subtable 0x0
01aa ; --------------------------------------------------------------------------------------
01aa 0006 0000  |    |		.DBG3TAB	0x0006,0x0000
01ac 000b ffff  |    |		.CONST	0x000b,0xffff
01ae 000d fffe  |    |		.CONST	0x000d,0xfffe
01b0 000f fffd  |    |		.CONST	0x000f,0xfffd
01b2 0011 fffc  |    |		.CONST	0x0011,0xfffc
01b4 0012 fffb  |    |		.CONST	0x0012,0xfffb
01b6 0013 fffa  |    |		.CONST	0x0013,0xfffa
01b8 ; --------------------------------------------------------------------------------------
01b8 ; Debug3 Subtable 0x1
01b8 ; --------------------------------------------------------------------------------------
01b8 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
01ba 0014 ffff  |    |		.CONST	0x0014,0xffff
01bc 0016 fffe  |    |		.CONST	0x0016,0xfffe
01be 001a fffd  |    |		.CONST	0x001a,0xfffd
01c0 0022 fffc  | "  |		.CONST	0x0022,0xfffc
01c2 0024 fffb  | $  |		.CONST	0x0024,0xfffb
01c4 002a fffa  | *  |		.CONST	0x002a,0xfffa
01c6 0039 fff9  | 9  |		.CONST	0x0039,0xfff9
01c8 003e fff8  | >  |		.CONST	0x003e,0xfff8
01ca 0040 fff7  | @  |		.CONST	0x0040,0xfff7
01cc 0042 fff6  | B  |		.CONST	0x0042,0xfff6
01ce 0044 fff5  | D  |		.CONST	0x0044,0xfff5
01d0 ; --------------------------------------------------------------------------------------
01d0 ; Debug3 Subtable 0x2
01d0 ; --------------------------------------------------------------------------------------
01d0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
01d2 0053 0001  | S  |		.CONST	0x0053,0x0001
01d4 ; --------------------------------------------------------------------------------------
01d4 ; Debug3 Subtable 0x3
01d4 ; --------------------------------------------------------------------------------------
01d4 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
01d6 0063 ffff  | c  |		.CONST	0x0063,0xffff
01d8 0068 fffe  | h  |		.CONST	0x0068,0xfffe
01da 006b 0001  | k  |		.CONST	0x006b,0x0001
01dc 0073 0002  | s  |		.CONST	0x0073,0x0002
01de 007e 0003  | ~  |		.CONST	0x007e,0x0003
01e0 0085 0005  |    |		.CONST	0x0085,0x0005
01e2 008b 0006  |    |		.CONST	0x008b,0x0006
01e4 008d 0007  |    |		.CONST	0x008d,0x0007
01e6 0098 0008  |    |		.CONST	0x0098,0x0008
01e8 009d 0004  |    |		.CONST	0x009d,0x0004
01ea 00a0 0009  |    |		.CONST	0x00a0,0x0009
01ec ; --------------------------------------------------------------------------------------
01ec ; Debug3 Subtable 0x4
01ec ; --------------------------------------------------------------------------------------
01ec 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
01ee ; --------------------------------------------------------------------------------------
01ee ; Debug3 Subtable 0x5
01ee ; --------------------------------------------------------------------------------------
01ee 0002 0011  |    |		.DBG3TAB	0x0002,0x0011
01f0 00c3 ffff  |    |		.CONST	0x00c3,0xffff
01f2 00c5 fffe  |    |		.CONST	0x00c5,0xfffe
01f4 00c7 0001  |    |		.CONST	0x00c7,0x0001
01f6 00cb 0002  |    |		.CONST	0x00cb,0x0002
01f8 00cf 0003  |    |		.CONST	0x00cf,0x0003
01fa 00d3 0005  |    |		.CONST	0x00d3,0x0005
01fc 00d9 0006  |    |		.CONST	0x00d9,0x0006
01fe 00dd 0007  |    |		.CONST	0x00dd,0x0007
0200 00df 0008  |    |		.CONST	0x00df,0x0008
0202 00e0 0009  |    |		.CONST	0x00e0,0x0009
0204 00e6 000a  |    |		.CONST	0x00e6,0x000a
0206 00ea 000b  |    |		.CONST	0x00ea,0x000b
0208 00ee 000c  |    |		.CONST	0x00ee,0x000c
020a 00f0 000d  |    |		.CONST	0x00f0,0x000d
020c 00f1 000e  |    |		.CONST	0x00f1,0x000e
020e 00f6 0004  |    |		.CONST	0x00f6,0x0004
0210 00f9 000f  |    |		.CONST	0x00f9,0x000f
0212 0109 0010  |    |		.CONST	0x0109,0x0010
0214 010b 0011  |    |		.CONST	0x010b,0x0011
0216 ; --------------------------------------------------------------------------------------
0216 ; Debug3 Subtable 0x6
0216 ; --------------------------------------------------------------------------------------
0216 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0218 ; --------------------------------------------------------------------------------------
0218 ; Debug3 Subtable 0x7
0218 ; --------------------------------------------------------------------------------------
0218 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
021a 0121 0001  | !  |		.CONST	0x0121,0x0001
021c 0129 0002  | )  |		.CONST	0x0129,0x0002
021e 012a 0003  | *  |		.CONST	0x012a,0x0003
0220 ; --------------------------------------------------------------------------------------
0220 ; Debug3 Subtable 0x8
0220 ; --------------------------------------------------------------------------------------
0220 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0222 013a 0001  | :  |		.CONST	0x013a,0x0001
0224 013e 0003  | >  |		.CONST	0x013e,0x0003
0226 ; --------------------------------------------------------------------------------------
0226 ; Debug3 Subtable 0x9
0226 ; --------------------------------------------------------------------------------------
0226 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0228 0143 0001  | C  |		.CONST	0x0143,0x0001
022a 0000 0000  |    |		.BLANK	0000[0x1d6]