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

⟦69d82a6f3⟧

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

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 0178       | x  |		.CONST	0x0178								; 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 005b       | [  |		.CONST	0x005b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0019       |    |		.CONST	0x0019								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x01e2,0x8000,0x0000,0x005a,0x5175,0x0000,0x000b
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
000f e001       |    |		Load	0x0,0x1
0010 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0011 e001       |    |		Load	0x0,0x1
0012 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0013 e001       |    |		Load	0x0,0x1
0014 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0015 4800       |H   |		Short_Literal	0x0
0016 e001       |    |		Load	0x0,0x1
0017 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0018 0337       | 7  |		Declare_Variable	Array
0019 4803       |H   |		Short_Literal	0x3
001a 4801       |H   |		Short_Literal	0x1
001b 4800       |H   |		Short_Literal	0x0
001c 00d9       |    |		Load_Top	At_Offset_1
001d e210       |    |		Load	0x1,0x10
001e 01d6       |    |		Execute	Vector,Field_Write
001f 3ffb       |?   |		Loop_Increasing	0x1b
0020 e001       |    |		Load	0x0,0x1
0021 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0022 01c3       |    |		Execute	Vector,Check_In_Type
0023 e001       |    |		Load	0x0,0x1
0024 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0025 4802       |H   |		Short_Literal	0x2
0026 e001       |    |		Load	0x0,0x1
0027 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0028 e001       |    |		Load	0x0,0x1
0029 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002a 011e       |    |		Execute	Any,Convert
002b 0129       | )  |		Execute	Any,Make_Visible
002c 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x2c,0xffff
002e 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x2e,0xfffe
0030 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x30,0xfffd
0032 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x32,0xfffc
0034 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x34,0xfffb
0036 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x36,0xfffa
0038 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x38,0xfff9
003a 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x3a,0xfff8
003c 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x3c,0xfff7
003e 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x3e,0xfff6
0040 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x40,0xfff5
0042 00bf       |    |		Action	Accept_Activation
0043 0092 014c  |   L|		Action	Push_String_Extended,0x14c					; "Line_Editor_Utilities.Assert."
													; Debug Table 0x1 = .DEBUG	0x0043,0x0200,0x8000,0x0000,0x005a,0x6305,0x0000,0x000f
													; Debug Table 0x1.0x0 = 0x43,0xffff
0045 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1 = 0x45,0xfffe
0046 00c7       |    |		Action	Elaborate_Subprogram
0047 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x2 = 0x47,0xfffd
0048 00c7       |    |		Action	Elaborate_Subprogram
0049 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x3 = 0x49,0xfffc
004a 00c7       |    |		Action	Elaborate_Subprogram
004b 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x4 = 0x4b,0xfffb
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x5 = 0x4d,0xfffa
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x6 = 0x4f,0xfff9
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x7 = 0x51,0xfff8
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x8 = 0x53,0xfff7
0054 00c7       |    |		Action	Elaborate_Subprogram
0055 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x9 = 0x55,0xfff6
0056 00c7       |    |		Action	Elaborate_Subprogram
0057 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xa = 0x57,0xfff5
0058 00c7       |    |		Action	Elaborate_Subprogram
0059 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xb = 0x59,0xfff4
005a 00c7       |    |		Action	Elaborate_Subprogram
005b			BODY_0008:
005b 00bc       |    |		Action	Signal_Activated
005c 00bb       |    |		Action	Signal_Completion
005d 0000 0000  |    |		.XXX[0x3]
005f 0000       |    |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063       | c  |		.CONST	0x0063								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0001       |    |		.CONST	0x0001								; Number of locals
0063			BODY_0060:
0063			INIT_0060:
0063 e002       |    |		Load	0x0,0x2								; Debug Table 0x2 = .DEBUG	0x0063,0x021a,0x0001,0x0000,0x005a,0x5175,0x0000,0x0031
													; Debug Table 0x2.0x0 = 0x63,0x1
0064 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0065 0092 014d  |   M|		Action	Push_String_Extended,0x14d					; "*** Error reported by "
													; Debug Table 0x2.0x1 = 0x65,0x2
0067 e5fe       |    |		Load	0x2,-0x2
0068 01cc       |    |		Execute	Vector,Catenate
0069 e002       |    |		Load	0x0,0x2
006a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
006b e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x2 = 0x6b,0x3
006c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
006d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x3 = 0x6d,0x4
006e e002       |    |		Load	0x0,0x2
006f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0070 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x4 = 0x70,0x5
0071 00db       |    |		Load_Top	At_Offset_3
0072 e003       |    |		Load	0x0,0x3
0073 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0074 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x5 = 0x74,0x6
0075 6802       |h   |		Jump_Zero	0x78
0076 60d1       |`   |		Indirect_Literal	Discrete,0x148,{0x00000000, 0x5a517501}		; Debug Table 0x2.0x6 = 0x76,0x7
0077 0257       | W  |		Execute	Discrete,Raise
0078 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0079 0000 0000  |    |		.BLANK	0000[0x7]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083       |    |		.CONST	0x0083								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 0001       |    |		.CONST	0x0001								; Number of locals
0083			BODY_0080:
0083			INIT_0080:
0083 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x0083,0x022a,0x0001,0x0000,0x005a,0x5175,0x0000,0x0042
													; Debug Table 0x3.0x0 = 0x83,0x1
0084 e20d       |    |		Load	0x1,0xd
0085 012f       | /  |		Execute	Any,Equal
0086 6808       |h   |		Jump_Zero	0x8f
0087 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x1 = 0x87,0x2
0088 e219       |    |		Load	0x1,0x19
0089 0092 014e  |   N|		Action	Push_String_Extended,0x14e					; "Put_Error"
008b 01cc       |    |		Execute	Vector,Catenate
008c e5ff       |    |		Load	0x2,-0x1
008d 820e       |    |		Call	0x1,0xe
008e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
008f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x2 = 0x8f,0x3
0090 6811       |h   |		Jump_Zero	0xa2
0091 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x3 = 0x91,0x4
0092 4807       |H   |		Short_Literal	0x7
0093 e5ff       |    |		Load	0x2,-0x1
0094 e004       |    |		Load	0x0,0x4
0095 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0096 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x4 = 0x96,0x5
0097 e001       |    |		Load	0x0,0x1
0098 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0099 4603       |F   |		Jump_Case	0x4
009a 7803       |x   |		Jump	0x9e								; case 0x0
009b 7804       |x   |		Jump	0xa0								; case 0x1
009c 7801       |x   |		Jump	0x9e								; case 0x2
009d 7802       |x   |		Jump	0xa0								; case 0x3
009e 60a9       |`   |		Indirect_Literal	Discrete,0x148,{0x00000000, 0x5a517501}		; Debug Table 0x3.0x5 = 0x9e,0x6
009f 0257       | W  |		Execute	Discrete,Raise
00a0 60a3       |`   |		Indirect_Literal	Discrete,0x144,{0x00000000, 0x5a517502}		; Debug Table 0x3.0x6 = 0xa0,0x7
00a1 0257       | W  |		Execute	Discrete,Raise
00a2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x7 = 0xa2,0x8
00a3 4802       |H   |		Short_Literal	0x2
00a4 e5ff       |    |		Load	0x2,-0x1
00a5 e004       |    |		Load	0x0,0x4
00a6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00a7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x00ab,0x023c,0x0002,0x0000,0x005a,0x5175,0x0000,0x0058
													; Debug Table 0x4.0x0 = 0xab,0x1
00ac 0f00       |    |		Execute_Immediate	Equal,0x0
00ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ae 0000 0000  |    |		.XXX[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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00b3,0x0240,0x0001,0x0000,0x005a,0x5175,0x0000,0x0063
													; Debug Table 0x5.0x0 = 0xb3,0x1
00b4 8210       |    |		Call	0x1,0x10
00b5 7010       |p   |		Jump_Nonzero	0xc6
00b6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1 = 0xb6,0x2
00b7 e5fd       |    |		Load	0x2,-0x3
00b8 e5fe       |    |		Load	0x2,-0x2
00b9 0092 014f  |   O|		Action	Push_String_Extended,0x14f					; " ("
00bb 01cc       |    |		Execute	Vector,Catenate
00bc e5ff       |    |		Load	0x2,-0x1
00bd e003       |    |		Load	0x0,0x3
00be 1b2f       | /  |		Execute	Package,Field_Read,Field_Number 0x2f
00bf 025e       | ^  |		Execute	Discrete,Convert
00c0 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00c1 01cc       |    |		Execute	Vector,Catenate
00c2 0092 0150  |   P|		Action	Push_String_Extended,0x150					; ")"
00c4 01cc       |    |		Execute	Vector,Catenate
00c5 820e       |    |		Call	0x1,0xe
00c6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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						; Debug Table 0x6 = .DEBUG	0x00cb,0x0246,0x0002,0x0000,0x005a,0x5175,0x0000,0x0075
													; Debug Table 0x6.0x0 = 0xcb,0x1
00cc 0f00       |    |		Execute_Immediate	Equal,0x0
00cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ce 0000 0000  |    |		.XXX[0x2]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x00d3,0x024a,0x0001,0x0000,0x005a,0x5175,0x0000,0x0080
													; Debug Table 0x7.0x0 = 0xd3,0x1
00d4 8212       |    |		Call	0x1,0x12
00d5 700f       |p   |		Jump_Nonzero	0xe5
00d6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1 = 0xd6,0x2
00d7 e5fd       |    |		Load	0x2,-0x3
00d8 4829       |H)  |		Short_Literal	0x29
00d9 e5fe       |    |		Load	0x2,-0x2
00da 0092 014f  |   O|		Action	Push_String_Extended,0x14f					; " ("
00dc 01cc       |    |		Execute	Vector,Catenate
00dd e5ff       |    |		Load	0x2,-0x1
00de e005       |    |		Load	0x0,0x5
00df 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00e0 025e       | ^  |		Execute	Discrete,Convert
00e1 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00e2 01cc       |    |		Execute	Vector,Catenate
00e3 01cb       |    |		Execute	Vector,Append
00e4 820f       |    |		Call	0x1,0xf
00e5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00e6 0000 0000  |    |		.XXX[0x2]
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						; Debug Table 0x8 = .DEBUG	0x00eb,0x0250,0x0002,0x0000,0x005a,0x5175,0x0000,0x0097
													; Debug Table 0x8.0x0 = 0xeb,0x1
00ec 0f00       |    |		Execute_Immediate	Equal,0x0
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						; Debug Table 0x9 = .DEBUG	0x00f3,0x0254,0x0001,0x0000,0x005a,0x5175,0x0000,0x00a4
													; Debug Table 0x9.0x0 = 0xf3,0x1
00f4 8214       |    |		Call	0x1,0x14
00f5 700f       |p   |		Jump_Nonzero	0x105
00f6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x1 = 0xf6,0x2
00f7 e5fc       |    |		Load	0x2,-0x4
00f8 4829       |H)  |		Short_Literal	0x29
00f9 e5fe       |    |		Load	0x2,-0x2
00fa 0092 014f  |   O|		Action	Push_String_Extended,0x14f					; " ("
00fc 01cc       |    |		Execute	Vector,Catenate
00fd e5fd       |    |		Load	0x2,-0x3
00fe e5ff       |    |		Load	0x2,-0x1
00ff e005       |    |		Load	0x0,0x5
0100 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0101 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0102 01cc       |    |		Execute	Vector,Catenate
0103 01cb       |    |		Execute	Vector,Append
0104 820f       |    |		Call	0x1,0xf
0105 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0106 0000 0000  |    |		.XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x010b,0x025a,0x0002,0x0000,0x005a,0x5175,0x0000,0x00c1
													; Debug Table 0xa.0x0 = 0x10b,0x1
010c 0d02       |    |		Execute_Immediate	Less,0x2
010d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010e 0000 0000  |    |		.XXX[0x2]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x0113,0x025e,0x0001,0x0000,0x005a,0x5175,0x0000,0x00cc
													; Debug Table 0xb.0x0 = 0x113,0x1
0114 8216       |    |		Call	0x1,0x16
0115 7010       |p   |		Jump_Nonzero	0x126
0116 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0x1 = 0x116,0x2
0117 e219       |    |		Load	0x1,0x19
0118 0092 0151  |   Q|		Action	Push_String_Extended,0x151					; "Report"
011a 01cc       |    |		Execute	Vector,Catenate
011b 4829       |H)  |		Short_Literal	0x29
011c e5fe       |    |		Load	0x2,-0x2
011d 0092 014f  |   O|		Action	Push_String_Extended,0x14f					; " ("
011f 01cc       |    |		Execute	Vector,Catenate
0120 e5ff       |    |		Load	0x2,-0x1
0121 e006       |    |		Load	0x0,0x6
0122 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0123 01cc       |    |		Execute	Vector,Catenate
0124 01cb       |    |		Execute	Vector,Append
0125 820e       |    |		Call	0x1,0xe
0126 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0127 0000       |    |		.XXX[0x1]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x012b,0x0264,0x0001,0x0000,0x005a,0x5175,0x0000,0x00df
													; Debug Table 0xc.0x0 = 0x12b,0x1
012c e006       |    |		Load	0x0,0x6
012d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
012e 8216       |    |		Call	0x1,0x16
012f 7010       |p   |		Jump_Nonzero	0x140
0130 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x1 = 0x130,0x2
0131 e219       |    |		Load	0x1,0x19
0132 0092 0151  |   Q|		Action	Push_String_Extended,0x151					; "Report"
0134 01cc       |    |		Execute	Vector,Catenate
0135 4829       |H)  |		Short_Literal	0x29
0136 e5fe       |    |		Load	0x2,-0x2
0137 0092 014f  |   O|		Action	Push_String_Extended,0x14f					; " ("
0139 01cc       |    |		Execute	Vector,Catenate
013a e5ff       |    |		Load	0x2,-0x1
013b e006       |    |		Load	0x0,0x6
013c 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
013d 01cc       |    |		Execute	Vector,Catenate
013e 01cb       |    |		Execute	Vector,Append
013f 820e       |    |		Call	0x1,0xe
0140 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0141 0000 0000  |    |		.XXX[0x3]
0143 0000       |    |
0144 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a517502}
0148 0000 0000  |    |		.LITERAL	{0x00000000, 0x5a517501}
014c ; --------------------------------------------------------------------------------------
014c ; STRING TABLE
014c ; --------------------------------------------------------------------------------------
014c 000e       |    |		.STRTAB	0x000e->0x0153							; "Line_Editor_Utilities.Assert."
014d 0029       | )  |		.STRTAB	0x0029->0x0161							; "*** Error reported by "
014e 003d       | =  |		.STRTAB	0x003d->0x016c							; "Put_Error"
014f 0044       | D  |		.STRTAB	0x0044->0x0171							; " ("
0150 0044       | D  |		.STRTAB	0x0044->0x0172							; ")"
0151 0043       | C  |		.STRTAB	0x0043->0x0172							; "Report"
0152 0047       | G  |		.STREND 0x0047->0x0175
0153 4c69 6e65  |Line|		.STRTAB_STRINGS
0176 0000 0000  |    |		.XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0003 000d  |    |		.CONST	0x0003,0x000d
017a 000b 01e2  |    |		.DEBUG	0x000b,0x01e2,0x8000,0x0000,0x005a,0x5175,0x0000,0x000b
0182 0043 0200  | C  |		.DEBUG	0x0043,0x0200,0x8000,0x0000,0x005a,0x6305,0x0000,0x000f
018a 0063 021a  | c  |		.DEBUG	0x0063,0x021a,0x0001,0x0000,0x005a,0x5175,0x0000,0x0031
0192 0083 022a  |   *|		.DEBUG	0x0083,0x022a,0x0001,0x0000,0x005a,0x5175,0x0000,0x0042
019a 00ab 023c  |   <|		.DEBUG	0x00ab,0x023c,0x0002,0x0000,0x005a,0x5175,0x0000,0x0058
01a2 00b3 0240  |   @|		.DEBUG	0x00b3,0x0240,0x0001,0x0000,0x005a,0x5175,0x0000,0x0063
01aa 00cb 0246  |   F|		.DEBUG	0x00cb,0x0246,0x0002,0x0000,0x005a,0x5175,0x0000,0x0075
01b2 00d3 024a  |   J|		.DEBUG	0x00d3,0x024a,0x0001,0x0000,0x005a,0x5175,0x0000,0x0080
01ba 00eb 0250  |   P|		.DEBUG	0x00eb,0x0250,0x0002,0x0000,0x005a,0x5175,0x0000,0x0097
01c2 00f3 0254  |   T|		.DEBUG	0x00f3,0x0254,0x0001,0x0000,0x005a,0x5175,0x0000,0x00a4
01ca 010b 025a  |   Z|		.DEBUG	0x010b,0x025a,0x0002,0x0000,0x005a,0x5175,0x0000,0x00c1
01d2 0113 025e  |   ^|		.DEBUG	0x0113,0x025e,0x0001,0x0000,0x005a,0x5175,0x0000,0x00cc
01da 012b 0264  | + d|		.DEBUG	0x012b,0x0264,0x0001,0x0000,0x005a,0x5175,0x0000,0x00df
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x0
01e2 ; --------------------------------------------------------------------------------------
01e2 000e 0000  |    |		.DBG3TAB	0x000e,0x0000
01e4 000b ffff  |    |		.CONST	0x000b,0xffff
01e6 000c fffe  |    |		.CONST	0x000c,0xfffe
01e8 000d fffd  |    |		.CONST	0x000d,0xfffd
01ea 002c ffff  | ,  |		.CONST	0x002c,0xffff
01ec 002e fffe  | .  |		.CONST	0x002e,0xfffe
01ee 0030 fffd  | 0  |		.CONST	0x0030,0xfffd
01f0 0032 fffc  | 2  |		.CONST	0x0032,0xfffc
01f2 0034 fffb  | 4  |		.CONST	0x0034,0xfffb
01f4 0036 fffa  | 6  |		.CONST	0x0036,0xfffa
01f6 0038 fff9  | 8  |		.CONST	0x0038,0xfff9
01f8 003a fff8  | :  |		.CONST	0x003a,0xfff8
01fa 003c fff7  | <  |		.CONST	0x003c,0xfff7
01fc 003e fff6  | >  |		.CONST	0x003e,0xfff6
01fe 0040 fff5  | @  |		.CONST	0x0040,0xfff5
0200 ; --------------------------------------------------------------------------------------
0200 ; Debug3 Subtable 0x1
0200 ; --------------------------------------------------------------------------------------
0200 000c 0000  |    |		.DBG3TAB	0x000c,0x0000
0202 0043 ffff  | C  |		.CONST	0x0043,0xffff
0204 0045 fffe  | E  |		.CONST	0x0045,0xfffe
0206 0047 fffd  | G  |		.CONST	0x0047,0xfffd
0208 0049 fffc  | I  |		.CONST	0x0049,0xfffc
020a 004b fffb  | K  |		.CONST	0x004b,0xfffb
020c 004d fffa  | M  |		.CONST	0x004d,0xfffa
020e 004f fff9  | O  |		.CONST	0x004f,0xfff9
0210 0051 fff8  | Q  |		.CONST	0x0051,0xfff8
0212 0053 fff7  | S  |		.CONST	0x0053,0xfff7
0214 0055 fff6  | U  |		.CONST	0x0055,0xfff6
0216 0057 fff5  | W  |		.CONST	0x0057,0xfff5
0218 0059 fff4  | Y  |		.CONST	0x0059,0xfff4
021a ; --------------------------------------------------------------------------------------
021a ; Debug3 Subtable 0x2
021a ; --------------------------------------------------------------------------------------
021a 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
021c 0063 0001  | c  |		.CONST	0x0063,0x0001
021e 0065 0002  | e  |		.CONST	0x0065,0x0002
0220 006b 0003  | k  |		.CONST	0x006b,0x0003
0222 006d 0004  | m  |		.CONST	0x006d,0x0004
0224 0070 0005  | p  |		.CONST	0x0070,0x0005
0226 0074 0006  | t  |		.CONST	0x0074,0x0006
0228 0076 0007  | v  |		.CONST	0x0076,0x0007
022a ; --------------------------------------------------------------------------------------
022a ; Debug3 Subtable 0x3
022a ; --------------------------------------------------------------------------------------
022a 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
022c 0083 0001  |    |		.CONST	0x0083,0x0001
022e 0087 0002  |    |		.CONST	0x0087,0x0002
0230 008f 0003  |    |		.CONST	0x008f,0x0003
0232 0091 0004  |    |		.CONST	0x0091,0x0004
0234 0096 0005  |    |		.CONST	0x0096,0x0005
0236 009e 0006  |    |		.CONST	0x009e,0x0006
0238 00a0 0007  |    |		.CONST	0x00a0,0x0007
023a 00a2 0008  |    |		.CONST	0x00a2,0x0008
023c ; --------------------------------------------------------------------------------------
023c ; Debug3 Subtable 0x4
023c ; --------------------------------------------------------------------------------------
023c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
023e 00ab 0001  |    |		.CONST	0x00ab,0x0001
0240 ; --------------------------------------------------------------------------------------
0240 ; Debug3 Subtable 0x5
0240 ; --------------------------------------------------------------------------------------
0240 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0242 00b3 0001  |    |		.CONST	0x00b3,0x0001
0244 00b6 0002  |    |		.CONST	0x00b6,0x0002
0246 ; --------------------------------------------------------------------------------------
0246 ; Debug3 Subtable 0x6
0246 ; --------------------------------------------------------------------------------------
0246 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0248 00cb 0001  |    |		.CONST	0x00cb,0x0001
024a ; --------------------------------------------------------------------------------------
024a ; Debug3 Subtable 0x7
024a ; --------------------------------------------------------------------------------------
024a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
024c 00d3 0001  |    |		.CONST	0x00d3,0x0001
024e 00d6 0002  |    |		.CONST	0x00d6,0x0002
0250 ; --------------------------------------------------------------------------------------
0250 ; Debug3 Subtable 0x8
0250 ; --------------------------------------------------------------------------------------
0250 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0252 00eb 0001  |    |		.CONST	0x00eb,0x0001
0254 ; --------------------------------------------------------------------------------------
0254 ; Debug3 Subtable 0x9
0254 ; --------------------------------------------------------------------------------------
0254 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0256 00f3 0001  |    |		.CONST	0x00f3,0x0001
0258 00f6 0002  |    |		.CONST	0x00f6,0x0002
025a ; --------------------------------------------------------------------------------------
025a ; Debug3 Subtable 0xa
025a ; --------------------------------------------------------------------------------------
025a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
025c 010b 0001  |    |		.CONST	0x010b,0x0001
025e ; --------------------------------------------------------------------------------------
025e ; Debug3 Subtable 0xb
025e ; --------------------------------------------------------------------------------------
025e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0260 0113 0001  |    |		.CONST	0x0113,0x0001
0262 0116 0002  |    |		.CONST	0x0116,0x0002
0264 ; --------------------------------------------------------------------------------------
0264 ; Debug3 Subtable 0xc
0264 ; --------------------------------------------------------------------------------------
0264 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0266 012b 0001  | +  |		.CONST	0x012b,0x0001
0268 0130 0002  | 0  |		.CONST	0x0130,0x0002
026a 0000 0000  |    |		.BLANK	0000[0x196]