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

⟦76a25c795⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5811_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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0148       | H  |		.CONST	0x0148								; 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 001b       |    |		.CONST	0x001b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000e       |    |		.CONST	0x000e								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x019a,0x8000,0x0000,0x0036,0xd7b4,0x0000,0x0007
													; 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 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
000f 0321       | !  |		Declare_Variable	Record,Visible
0010 4801       |H   |		Short_Literal	0x1
0011 00d9       |    |		Load_Top	At_Offset_1
0012 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0013 4801       |H   |		Short_Literal	0x1
0014 00d9       |    |		Load_Top	At_Offset_1
0015 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0016 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x16,0xfffc
0018 00bf       |    |		Action	Accept_Activation
0019 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1 = .DEBUG	0x0019,0x01a4,0x8000,0x0000,0x0036,0xd7c4,0x0000,0x0011
													; Debug Table 0x1.0x0 = 0x19,0xffff
001a 00c7       |    |		Action	Elaborate_Subprogram
001b			BODY_0008:
001b 00bc       |    |		Action	Signal_Activated
001c 00bb       |    |		Action	Signal_Completion
001d 0000 0000  |    |		.XXX[0x3]
001f 0000       |    |
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 002f       | /  |		.CONST	0x002f								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0007       |    |		.CONST	0x0007								; Number of locals
0023			INIT_0020:
0023 029f 005b  |   [|		Declare_Subprogram	INIT_0058,For_Call				; Debug Table 0x2 = .DEBUG	0x0023,0x01a8,0x0001,0x0000,0x0036,0xd7b4,0x0000,0x001e
0025 029f 0073  |   s|		Declare_Subprogram	INIT_0070,For_Call
0027 029f 0093  |    |		Declare_Subprogram	INIT_0090,For_Call
0029 029f 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Call
002b 029f 00db  |    |		Declare_Subprogram	INIT_00d8,For_Call
002d 029f 010b  |    |		Declare_Subprogram	INIT_0108,For_Call
002f			BODY_0020:
002f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x0 = 0x2f,0x1
0030 e20d       |    |		Load	0x1,0xd
0031 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0032 e20d       |    |		Load	0x1,0xd
0033 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0034 0262       | b  |		Execute	Discrete,In_Range
0035 7003       |p   |		Jump_Nonzero	0x39
0036 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x1 = 0x36,0x2
0037 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0038 0257       | W  |		Execute	Discrete,Raise
0039 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0x2 = 0x39,0x3
003a 0b00       |    |		Execute_Immediate	Case_Compare,0x0
003b 700d       |p   |		Jump_Nonzero	0x49
003c 0b01       |    |		Execute_Immediate	Case_Compare,0x1
003d 700d       |p   |		Jump_Nonzero	0x4b
003e 0b02       |    |		Execute_Immediate	Case_Compare,0x2
003f 700d       |p   |		Jump_Nonzero	0x4d
0040 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0041 700d       |p   |		Jump_Nonzero	0x4f
0042 0b04       |    |		Execute_Immediate	Case_Compare,0x4
0043 700d       |p   |		Jump_Nonzero	0x51
0044 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0045 700d       |p   |		Jump_Nonzero	0x53
0046 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x3 = 0x46,0xa
0047 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0048 0257       | W  |		Execute	Discrete,Raise
0049 8402       |    |		Call	0x2,0x2								; Debug Table 0x2.0x4 = 0x49,0x4
004a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
004b 8403       |    |		Call	0x2,0x3								; Debug Table 0x2.0x5 = 0x4b,0x5
004c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
004d 8404       |    |		Call	0x2,0x4								; Debug Table 0x2.0x6 = 0x4d,0x6
004e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
004f 8405       |    |		Call	0x2,0x5								; Debug Table 0x2.0x7 = 0x4f,0x7
0050 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0051 8406       |    |		Call	0x2,0x6								; Debug Table 0x2.0x8 = 0x51,0x8
0052 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0053 8407       |    |		Call	0x2,0x7								; Debug Table 0x2.0x9 = 0x53,0x9
0054 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0055 0000 0000  |    |		.XXX[0x3]
0057 0000       |    |
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0063       | c  |		.CONST	0x0063								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0003       |    |		.CONST	0x0003								; Number of locals
005b			INIT_0058:
005b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3 = .DEBUG	0x005b,0x01be,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x0073
													; Debug Table 0x3.0x0 = 0x5b,0xffff
005c e002       |    |		Load	0x0,0x2
005d 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
005e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x1 = 0x5e,0xfffe
005f e003       |    |		Load	0x0,0x3
0060 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0061 00e1       |    |		Load_Encached	Boolean_Cache
0062 03f1       |    |		Declare_Variable	Discrete,With_Value
0063			BODY_0058:
0063 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x2 = 0x63,0x1
0064 e5ff       |    |		Load	0x2,-0x1
0065 e004       |    |		Load	0x0,0x4
0066 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0067 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x3 = 0x67,0x2
0068 e5ff       |    |		Load	0x2,-0x1
0069 e002       |    |		Load	0x0,0x2
006a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
006b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
006c 0000 0000  |    |		.BLANK	0000[0x4]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 007e       | ~  |		.CONST	0x007e								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0005       |    |		.CONST	0x0005								; Number of locals
0073			INIT_0070:
0073 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4 = .DEBUG	0x0073,0x01c8,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x00cf
													; Debug Table 0x4.0x0 = 0x73,0xffff
0074 e002       |    |		Load	0x0,0x2
0075 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0076 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x1 = 0x76,0xfffe
0077 e005       |    |		Load	0x0,0x5
0078 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0079 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x2 = 0x79,0xfffd
007a e005       |    |		Load	0x0,0x5
007b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
007c 029f 0123  |   #|		Declare_Subprogram	INIT_0120,For_Call
007e			BODY_0070:
007e e005       |    |		Load	0x0,0x5								; Debug Table 0x4.0x3 = 0x7e,0x1
007f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0080 8605       |    |		Call	0x3,0x5								; Debug Table 0x4.0x4 = 0x80,0x2
0081 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x5 = 0x81,0x3
0082 e5ff       |    |		Load	0x2,-0x1
0083 e004       |    |		Load	0x0,0x4
0084 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0085 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x6 = 0x85,0x4
0086 e005       |    |		Load	0x0,0x5
0087 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0088 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0089 0000 0000  |    |		.BLANK	0000[0x7]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0096       |    |		.CONST	0x0096								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0002       |    |		.CONST	0x0002								; Number of locals
0093			INIT_0090:
0093 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5 = .DEBUG	0x0093,0x01d8,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x010f
													; Debug Table 0x5.0x0 = 0x93,0xffff
0094 e002       |    |		Load	0x0,0x2
0095 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0096			BODY_0090:
0096 e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0x1 = 0x96,0x1
0097 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0098 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0x98,0x2
0099 01db       |    |		Execute	Vector,Length
009a 7005       |p   |		Jump_Nonzero	0xa0
009b 0092 0132  |   2|		Action	Push_String_Extended,0x132					; "all"
													; Debug Table 0x5.0x3 = 0x9b,0x3
009d e003       |    |		Load	0x0,0x3
009e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
009f 7803       |x   |		Jump	0xa3
00a0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x4 = 0xa0,0x4
00a1 e003       |    |		Load	0x0,0x3
00a2 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00a3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x5 = 0xa3,0x5
00a4 e5ff       |    |		Load	0x2,-0x1
00a5 e004       |    |		Load	0x0,0x4
00a6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00a7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x6 = 0xa7,0x6
00a8 e005       |    |		Load	0x0,0x5
00a9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00aa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00ab 0000 0000  |    |		.BLANK	0000[0x5]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b7       |    |		.CONST	0x00b7								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0003       |    |		.CONST	0x0003								; Number of locals
00b3			INIT_00b0:
00b3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6 = .DEBUG	0x00b3,0x01e8,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x015f
													; Debug Table 0x6.0x0 = 0xb3,0xffff
00b4 e002       |    |		Load	0x0,0x2
00b5 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
00b6 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6.0x1 = 0xb6,0xfffe
00b7			BODY_00b0:
00b7 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6.0x2 = 0xb7,0x1
00b8 e5ff       |    |		Load	0x2,-0x1
00b9 e002       |    |		Load	0x0,0x2
00ba 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
00bb 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00bc e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x3 = 0xbc,0x2
00bd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00be 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x4 = 0xbe,0x3
00bf 01db       |    |		Execute	Vector,Length
00c0 7006       |p   |		Jump_Nonzero	0xc7
00c1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x5 = 0xc1,0x4
00c2 0092 0132  |   2|		Action	Push_String_Extended,0x132					; "all"
00c4 e003       |    |		Load	0x0,0x3
00c5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00c6 7804       |x   |		Jump	0xcb
00c7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x6 = 0xc7,0x5
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 e003       |    |		Load	0x0,0x3
00ca 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00cb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x7 = 0xcb,0x6
00cc e5ff       |    |		Load	0x2,-0x1
00cd e004       |    |		Load	0x0,0x4
00ce 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00cf e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x8 = 0xcf,0x7
00d0 e005       |    |		Load	0x0,0x5
00d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00d3 0000 0000  |    |		.BLANK	0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e0       |    |		.CONST	0x00e0								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0004       |    |		.CONST	0x0004								; Number of locals
00db			INIT_00d8:
00db e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7 = .DEBUG	0x00db,0x01fc,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x01bd
													; Debug Table 0x7.0x0 = 0xdb,0xffff
00dc e002       |    |		Load	0x0,0x2
00dd 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
00de 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x1 = 0xde,0xfffe
00df 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x2 = 0xdf,0xfffd
00e0			BODY_00d8:
00e0 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x3 = 0xe0,0x1
00e1 e5ff       |    |		Load	0x2,-0x1
00e2 e002       |    |		Load	0x0,0x2
00e3 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
00e4 005a       | Z  |		Store_Top	Discrete,At_Offset_2
00e5 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x4 = 0xe5,0x2
00e6 e5ff       |    |		Load	0x2,-0x1
00e7 e002       |    |		Load	0x0,0x2
00e8 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
00e9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00ea e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0x5 = 0xea,0x3
00eb 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ec 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x6 = 0xec,0x4
00ed 01db       |    |		Execute	Vector,Length
00ee 7007       |p   |		Jump_Nonzero	0xf6
00ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x7 = 0xef,0x5
00f0 00da       |    |		Load_Top	At_Offset_2
00f1 0092 0132  |   2|		Action	Push_String_Extended,0x132					; "all"
00f3 e003       |    |		Load	0x0,0x3
00f4 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f5 7805       |x   |		Jump	0xfb
00f6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x8 = 0xf6,0x6
00f7 00da       |    |		Load_Top	At_Offset_2
00f8 e602       |    |		Load	0x3,0x2
00f9 e003       |    |		Load	0x0,0x3
00fa 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00fb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x9 = 0xfb,0x7
00fc e5ff       |    |		Load	0x2,-0x1
00fd e004       |    |		Load	0x0,0x4
00fe 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00ff e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0xa = 0xff,0x8
0100 e005       |    |		Load	0x0,0x5
0101 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0102 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0103 0000 0000  |    |		.BLANK	0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0111       |    |		.CONST	0x0111								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0003       |    |		.CONST	0x0003								; Number of locals
010b			INIT_0108:
010b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8 = .DEBUG	0x010b,0x0214,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x01ed
													; Debug Table 0x8.0x0 = 0x10b,0xffff
010c e002       |    |		Load	0x0,0x2
010d 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
010e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x1 = 0x10e,0xfffe
010f e002       |    |		Load	0x0,0x2
0110 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0111			BODY_0108:
0111 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x2 = 0x111,0x1
0112 00da       |    |		Load_Top	At_Offset_2
0113 e006       |    |		Load	0x0,0x6
0114 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0115 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x3 = 0x115,0x2
0116 e5ff       |    |		Load	0x2,-0x1
0117 e004       |    |		Load	0x0,0x4
0118 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0119 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
011a 0000 0000  |    |		.BLANK	0000[0x6]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0129       | )  |		.CONST	0x0129								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 e604       |    |		Load	0x3,0x4								; Debug Table 0x9 = .DEBUG	0x0123,0x021e,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x00bf
													; Debug Table 0x9.0x0 = 0x123,0x1
0124 e603       |    |		Load	0x3,0x3
0125 e602       |    |		Load	0x3,0x2
0126 e003       |    |		Load	0x0,0x3
0127 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0128 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0129			TRAP_0120:
0129 0007       |    |		Action	Break_Optional
012a e007       |    |		Load	0x0,0x7								; Debug Table 0x9.0x1 = 0x12a,0x2
012b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
012c 4808       |H   |		Short_Literal	0x8
012d 0092 0133  |   3|		Action	Push_String_Extended,0x133					; "Queue.Spool raised an exception"
012f e008       |    |		Load	0x0,0x8
0130 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0131 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0132 ; --------------------------------------------------------------------------------------
0132 ; STRING TABLE
0132 ; --------------------------------------------------------------------------------------
0132 0006       |    |		.STRTAB	0x0006->0x0135							; "all"
0133 0007       |    |		.STRTAB	0x0007->0x0136							; "Queue.Spool raised an exception"
0134 0024       | $  |		.STREND 0x0024->0x0146
0135 616c 6c51  |allQ|		.STRTAB_STRINGS
0146 0000 0000  |    |		.XXX[0x2]
0148 ; --------------------------------------------------------------------------------------
0148 ; Debug Table
0148 ; --------------------------------------------------------------------------------------
0148 0003 000a  |    |		.CONST	0x0003,0x000a
014a 000b 019a  |    |		.DEBUG	0x000b,0x019a,0x8000,0x0000,0x0036,0xd7b4,0x0000,0x0007
0152 0019 01a4  |    |		.DEBUG	0x0019,0x01a4,0x8000,0x0000,0x0036,0xd7c4,0x0000,0x0011
015a 0023 01a8  | #  |		.DEBUG	0x0023,0x01a8,0x0001,0x0000,0x0036,0xd7b4,0x0000,0x001e
0162 005b 01be  | [  |		.DEBUG	0x005b,0x01be,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x0073
016a 0073 01c8  | s  |		.DEBUG	0x0073,0x01c8,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x00cf
0172 0093 01d8  |    |		.DEBUG	0x0093,0x01d8,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x010f
017a 00b3 01e8  |    |		.DEBUG	0x00b3,0x01e8,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x015f
0182 00db 01fc  |    |		.DEBUG	0x00db,0x01fc,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x01bd
018a 010b 0214  |    |		.DEBUG	0x010b,0x0214,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x01ed
0192 0123 021e  | #  |		.DEBUG	0x0123,0x021e,0x0004,0x0000,0x0036,0xd7c4,0x0000,0x00bf
019a ; --------------------------------------------------------------------------------------
019a ; Debug3 Subtable 0x0
019a ; --------------------------------------------------------------------------------------
019a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
019c 000b ffff  |    |		.CONST	0x000b,0xffff
019e 000c fffe  |    |		.CONST	0x000c,0xfffe
01a0 000d fffd  |    |		.CONST	0x000d,0xfffd
01a2 0016 fffc  |    |		.CONST	0x0016,0xfffc
01a4 ; --------------------------------------------------------------------------------------
01a4 ; Debug3 Subtable 0x1
01a4 ; --------------------------------------------------------------------------------------
01a4 0001 0000  |    |		.DBG3TAB	0x0001,0x0000
01a6 0019 ffff  |    |		.CONST	0x0019,0xffff
01a8 ; --------------------------------------------------------------------------------------
01a8 ; Debug3 Subtable 0x2
01a8 ; --------------------------------------------------------------------------------------
01a8 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
01aa 002f 0001  | /  |		.CONST	0x002f,0x0001
01ac 0036 0002  | 6  |		.CONST	0x0036,0x0002
01ae 0039 0003  | 9  |		.CONST	0x0039,0x0003
01b0 0046 000a  | F  |		.CONST	0x0046,0x000a
01b2 0049 0004  | I  |		.CONST	0x0049,0x0004
01b4 004b 0005  | K  |		.CONST	0x004b,0x0005
01b6 004d 0006  | M  |		.CONST	0x004d,0x0006
01b8 004f 0007  | O  |		.CONST	0x004f,0x0007
01ba 0051 0008  | Q  |		.CONST	0x0051,0x0008
01bc 0053 0009  | S  |		.CONST	0x0053,0x0009
01be ; --------------------------------------------------------------------------------------
01be ; Debug3 Subtable 0x3
01be ; --------------------------------------------------------------------------------------
01be 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
01c0 005b ffff  | [  |		.CONST	0x005b,0xffff
01c2 005e fffe  | ^  |		.CONST	0x005e,0xfffe
01c4 0063 0001  | c  |		.CONST	0x0063,0x0001
01c6 0067 0002  | g  |		.CONST	0x0067,0x0002
01c8 ; --------------------------------------------------------------------------------------
01c8 ; Debug3 Subtable 0x4
01c8 ; --------------------------------------------------------------------------------------
01c8 0003 0004  |    |		.DBG3TAB	0x0003,0x0004
01ca 0073 ffff  | s  |		.CONST	0x0073,0xffff
01cc 0076 fffe  | v  |		.CONST	0x0076,0xfffe
01ce 0079 fffd  | y  |		.CONST	0x0079,0xfffd
01d0 007e 0001  | ~  |		.CONST	0x007e,0x0001
01d2 0080 0002  |    |		.CONST	0x0080,0x0002
01d4 0081 0003  |    |		.CONST	0x0081,0x0003
01d6 0085 0004  |    |		.CONST	0x0085,0x0004
01d8 ; --------------------------------------------------------------------------------------
01d8 ; Debug3 Subtable 0x5
01d8 ; --------------------------------------------------------------------------------------
01d8 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
01da 0093 ffff  |    |		.CONST	0x0093,0xffff
01dc 0096 0001  |    |		.CONST	0x0096,0x0001
01de 0098 0002  |    |		.CONST	0x0098,0x0002
01e0 009b 0003  |    |		.CONST	0x009b,0x0003
01e2 00a0 0004  |    |		.CONST	0x00a0,0x0004
01e4 00a3 0005  |    |		.CONST	0x00a3,0x0005
01e6 00a7 0006  |    |		.CONST	0x00a7,0x0006
01e8 ; --------------------------------------------------------------------------------------
01e8 ; Debug3 Subtable 0x6
01e8 ; --------------------------------------------------------------------------------------
01e8 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
01ea 00b3 ffff  |    |		.CONST	0x00b3,0xffff
01ec 00b6 fffe  |    |		.CONST	0x00b6,0xfffe
01ee 00b7 0001  |    |		.CONST	0x00b7,0x0001
01f0 00bc 0002  |    |		.CONST	0x00bc,0x0002
01f2 00be 0003  |    |		.CONST	0x00be,0x0003
01f4 00c1 0004  |    |		.CONST	0x00c1,0x0004
01f6 00c7 0005  |    |		.CONST	0x00c7,0x0005
01f8 00cb 0006  |    |		.CONST	0x00cb,0x0006
01fa 00cf 0007  |    |		.CONST	0x00cf,0x0007
01fc ; --------------------------------------------------------------------------------------
01fc ; Debug3 Subtable 0x7
01fc ; --------------------------------------------------------------------------------------
01fc 0003 0008  |    |		.DBG3TAB	0x0003,0x0008
01fe 00db ffff  |    |		.CONST	0x00db,0xffff
0200 00de fffe  |    |		.CONST	0x00de,0xfffe
0202 00df fffd  |    |		.CONST	0x00df,0xfffd
0204 00e0 0001  |    |		.CONST	0x00e0,0x0001
0206 00e5 0002  |    |		.CONST	0x00e5,0x0002
0208 00ea 0003  |    |		.CONST	0x00ea,0x0003
020a 00ec 0004  |    |		.CONST	0x00ec,0x0004
020c 00ef 0005  |    |		.CONST	0x00ef,0x0005
020e 00f6 0006  |    |		.CONST	0x00f6,0x0006
0210 00fb 0007  |    |		.CONST	0x00fb,0x0007
0212 00ff 0008  |    |		.CONST	0x00ff,0x0008
0214 ; --------------------------------------------------------------------------------------
0214 ; Debug3 Subtable 0x8
0214 ; --------------------------------------------------------------------------------------
0214 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
0216 010b ffff  |    |		.CONST	0x010b,0xffff
0218 010e fffe  |    |		.CONST	0x010e,0xfffe
021a 0111 0001  |    |		.CONST	0x0111,0x0001
021c 0115 0002  |    |		.CONST	0x0115,0x0002
021e ; --------------------------------------------------------------------------------------
021e ; Debug3 Subtable 0x9
021e ; --------------------------------------------------------------------------------------
021e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0220 0123 0001  | #  |		.CONST	0x0123,0x0001
0222 012a 0002  | *  |		.CONST	0x012a,0x0002
0224 0000 0000  |    |		.BLANK	0000[0x1dc]