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

⟦21daa471e⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5811_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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 01e0       |    |		.CONST	0x01e0								; 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 011b       |    |		.CONST	0x011b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0024       | $  |		.CONST	0x0024								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x022a,0x8000,0x0000,0x0037,0x7374,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000e 0129       | )  |		Execute	Any,Make_Visible
000f 48fb       |H   |		Short_Literal	0xfb							; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 48fe       |H   |		Short_Literal	0xfe
0011 00da       |    |		Load_Top	At_Offset_2
0012 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0013 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x3 = 0x13,0xfffc
0014 4803       |H   |		Short_Literal	0x3
0015 00db       |    |		Load_Top	At_Offset_3
0016 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0017 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x4 = 0x17,0xfffb
0018 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0019 0266       | f  |		Execute	Discrete,Bounds
001a e002       |    |		Load	0x0,0x2
001b 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
001c 0266       | f  |		Execute	Discrete,Bounds
001d e002       |    |		Load	0x0,0x2
001e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
001f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0020 4802       |H   |		Short_Literal	0x2
0021 035e       | ^  |		Declare_Type	Array,Defined,Visible
0022 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x5 = 0x22,0xfffa
0023 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0024 0266       | f  |		Execute	Discrete,Bounds
0025 e002       |    |		Load	0x0,0x2
0026 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0027 0266       | f  |		Execute	Discrete,Bounds
0028 e002       |    |		Load	0x0,0x2
0029 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
002a 02a0       |    |		Declare_Subprogram	Null_Subprogram
002b 4802       |H   |		Short_Literal	0x2
002c 035e       | ^  |		Declare_Type	Array,Defined,Visible
002d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x6 = 0x2d,0xfff9
002e 0336       | 6  |		Declare_Variable	Array,Visible
002f 00d9       |    |		Load_Top	At_Offset_1
0030 0337       | 7  |		Declare_Variable	Array
0031 4802       |H   |		Short_Literal	0x2
0032 4800       |H   |		Short_Literal	0x0
0033 4801       |H   |		Short_Literal	0x1
0034 4800       |H   |		Short_Literal	0x0
0035 00da       |    |		Load_Top	At_Offset_2
0036 e213       |    |		Load	0x1,0x13
0037 01a6       |    |		Execute	Matrix,Field_Write
0038 4801       |H   |		Short_Literal	0x1
0039 4801       |H   |		Short_Literal	0x1
003a 00da       |    |		Load_Top	At_Offset_2
003b e213       |    |		Load	0x1,0x13
003c 01a6       |    |		Execute	Matrix,Field_Write
003d 3ff5       |?   |		Loop_Increasing	0x33
003e 00d9       |    |		Load_Top	At_Offset_1
003f 01a4       |    |		Execute	Matrix,Structure_Write
0040 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x0.0x7 = 0x40,0xfff8
0041 0336       | 6  |		Declare_Variable	Array,Visible
0042 00db       |    |		Load_Top	At_Offset_3
0043 0337       | 7  |		Declare_Variable	Array
0044 4802       |H   |		Short_Literal	0x2
0045 4800       |H   |		Short_Literal	0x0
0046 4800       |H   |		Short_Literal	0x0
0047 00db       |    |		Load_Top	At_Offset_3
0048 01a6       |    |		Execute	Matrix,Field_Write
0049 4802       |H   |		Short_Literal	0x2
004a 4801       |H   |		Short_Literal	0x1
004b 4800       |H   |		Short_Literal	0x0
004c 00db       |    |		Load_Top	At_Offset_3
004d 01a6       |    |		Execute	Matrix,Field_Write
004e 4802       |H   |		Short_Literal	0x2
004f 4800       |H   |		Short_Literal	0x0
0050 4802       |H   |		Short_Literal	0x2
0051 00db       |    |		Load_Top	At_Offset_3
0052 01a6       |    |		Execute	Matrix,Field_Write
0053 4802       |H   |		Short_Literal	0x2
0054 4801       |H   |		Short_Literal	0x1
0055 4802       |H   |		Short_Literal	0x2
0056 00db       |    |		Load_Top	At_Offset_3
0057 01a6       |    |		Execute	Matrix,Field_Write
0058 4801       |H   |		Short_Literal	0x1
0059 4800       |H   |		Short_Literal	0x0
005a 4801       |H   |		Short_Literal	0x1
005b 00db       |    |		Load_Top	At_Offset_3
005c 01a6       |    |		Execute	Matrix,Field_Write
005d 4802       |H   |		Short_Literal	0x2
005e 4801       |H   |		Short_Literal	0x1
005f 4801       |H   |		Short_Literal	0x1
0060 00db       |    |		Load_Top	At_Offset_3
0061 01a6       |    |		Execute	Matrix,Field_Write
0062 00d9       |    |		Load_Top	At_Offset_1
0063 01a4       |    |		Execute	Matrix,Structure_Write
0064 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x8 = 0x64,0xfff7
0065 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0066 0129       | )  |		Execute	Any,Make_Visible
0067 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x9 = 0x67,0xfff6
0068 e002       |    |		Load	0x0,0x2
0069 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
006a 02a0       |    |		Declare_Subprogram	Null_Subprogram
006b 4802       |H   |		Short_Literal	0x2
006c 032e       | .  |		Declare_Type	Record,Defined,Visible
006d 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x6d,0xfff5
006f 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x6f,0xfff4
0071 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x71,0xfff3
0073 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x73,0xfff2
0075 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x75,0xfff1
0077 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x77,0xfff0
0079 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x79,0xffef
007b 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x11 = 0x7b,0xffee
007c e002       |    |		Load	0x0,0x2								; Debug Table 0x1 = .DEBUG	0x007c,0x0250,0x8000,0x0000,0x0037,0x73d4,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x7c,0xffff
007d 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
007e 0266       | f  |		Execute	Discrete,Bounds
007f e20f       |    |		Load	0x1,0xf
0080 02a0       |    |		Declare_Subprogram	Null_Subprogram
0081 4801       |H   |		Short_Literal	0x1
0082 035d       | ]  |		Declare_Type	Array,Defined
0083 00d8       |    |		Load_Top	At_Offset_0
0084 0337       | 7  |		Declare_Variable	Array
0085 00d8       |    |		Load_Top	At_Offset_0
0086 0337       | 7  |		Declare_Variable	Array
0087 4800       |H   |		Short_Literal	0x0
0088 4800       |H   |		Short_Literal	0x0
0089 00da       |    |		Load_Top	At_Offset_2
008a 01d6       |    |		Execute	Vector,Field_Write
008b 4801       |H   |		Short_Literal	0x1
008c 4801       |H   |		Short_Literal	0x1
008d 00da       |    |		Load_Top	At_Offset_2
008e 01d6       |    |		Execute	Vector,Field_Write
008f 4803       |H   |		Short_Literal	0x3
0090 4802       |H   |		Short_Literal	0x2
0091 00da       |    |		Load_Top	At_Offset_2
0092 01d6       |    |		Execute	Vector,Field_Write
0093 00d9       |    |		Load_Top	At_Offset_1
0094 01d4       |    |		Execute	Vector,Structure_Write
0095 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x1 = 0x95,0xfffe
0096 4801       |H   |		Short_Literal	0x1
0097 e002       |    |		Load	0x0,0x2
0098 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0099 0266       | f  |		Execute	Discrete,Bounds
009a e20e       |    |		Load	0x1,0xe
009b 02a0       |    |		Declare_Subprogram	Null_Subprogram
009c 4802       |H   |		Short_Literal	0x2
009d 035d       | ]  |		Declare_Type	Array,Defined
009e 00d8       |    |		Load_Top	At_Offset_0
009f 0337       | 7  |		Declare_Variable	Array
00a0 00d8       |    |		Load_Top	At_Offset_0
00a1 0337       | 7  |		Declare_Variable	Array
00a2 48fb       |H   |		Short_Literal	0xfb
00a3 4800       |H   |		Short_Literal	0x0
00a4 4800       |H   |		Short_Literal	0x0
00a5 00db       |    |		Load_Top	At_Offset_3
00a6 01a6       |    |		Execute	Matrix,Field_Write
00a7 48fd       |H   |		Short_Literal	0xfd
00a8 4801       |H   |		Short_Literal	0x1
00a9 4800       |H   |		Short_Literal	0x0
00aa 00db       |    |		Load_Top	At_Offset_3
00ab 01a6       |    |		Execute	Matrix,Field_Write
00ac 48fc       |H   |		Short_Literal	0xfc
00ad 4800       |H   |		Short_Literal	0x0
00ae 4801       |H   |		Short_Literal	0x1
00af 00db       |    |		Load_Top	At_Offset_3
00b0 01a6       |    |		Execute	Matrix,Field_Write
00b1 48fe       |H   |		Short_Literal	0xfe
00b2 4801       |H   |		Short_Literal	0x1
00b3 4801       |H   |		Short_Literal	0x1
00b4 00db       |    |		Load_Top	At_Offset_3
00b5 01a6       |    |		Execute	Matrix,Field_Write
00b6 00d9       |    |		Load_Top	At_Offset_1
00b7 01a4       |    |		Execute	Matrix,Structure_Write
00b8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x2 = 0xb8,0xfffd
00b9 4803       |H   |		Short_Literal	0x3
00ba e002       |    |		Load	0x0,0x2
00bb 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
00bc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00bd 4801       |H   |		Short_Literal	0x1
00be 035d       | ]  |		Declare_Type	Array,Defined
00bf 00d8       |    |		Load_Top	At_Offset_0
00c0 0337       | 7  |		Declare_Variable	Array
00c1 00d8       |    |		Load_Top	At_Offset_0
00c2 0337       | 7  |		Declare_Variable	Array
00c3 4800       |H   |		Short_Literal	0x0
00c4 4800       |H   |		Short_Literal	0x0
00c5 00da       |    |		Load_Top	At_Offset_2
00c6 01d6       |    |		Execute	Vector,Field_Write
00c7 4801       |H   |		Short_Literal	0x1
00c8 4801       |H   |		Short_Literal	0x1
00c9 00da       |    |		Load_Top	At_Offset_2
00ca 01d6       |    |		Execute	Vector,Field_Write
00cb 4802       |H   |		Short_Literal	0x2
00cc 4803       |H   |		Short_Literal	0x3
00cd 00da       |    |		Load_Top	At_Offset_2
00ce 01d6       |    |		Execute	Vector,Field_Write
00cf 4802       |H   |		Short_Literal	0x2
00d0 4802       |H   |		Short_Literal	0x2
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 01d6       |    |		Execute	Vector,Field_Write
00d3 00d9       |    |		Load_Top	At_Offset_1
00d4 01d4       |    |		Execute	Vector,Structure_Write
00d5 48fb       |H   |		Short_Literal	0xfb							; Debug Table 0x1.0x3 = 0xd5,0xfffc
00d6 48fe       |H   |		Short_Literal	0xfe
00d7 e215       |    |		Load	0x1,0x15
00d8 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d9 4801       |H   |		Short_Literal	0x1
00da 035d       | ]  |		Declare_Type	Array,Defined
00db 00d8       |    |		Load_Top	At_Offset_0
00dc 0337       | 7  |		Declare_Variable	Array
00dd 00d8       |    |		Load_Top	At_Offset_0
00de 0337       | 7  |		Declare_Variable	Array
00df e215       |    |		Load	0x1,0x15
00e0 0322       | "  |		Declare_Variable	Record
00e1 4800       |H   |		Short_Literal	0x0
00e2 00d9       |    |		Load_Top	At_Offset_1
00e3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00e4 4801       |H   |		Short_Literal	0x1
00e5 00d9       |    |		Load_Top	At_Offset_1
00e6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00e7 48fb       |H   |		Short_Literal	0xfb
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 01d6       |    |		Execute	Vector,Field_Write
00ea e215       |    |		Load	0x1,0x15
00eb 0322       | "  |		Declare_Variable	Record
00ec 4800       |H   |		Short_Literal	0x0
00ed 00d9       |    |		Load_Top	At_Offset_1
00ee 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00ef 4800       |H   |		Short_Literal	0x0
00f0 00d9       |    |		Load_Top	At_Offset_1
00f1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00f2 48fd       |H   |		Short_Literal	0xfd
00f3 00da       |    |		Load_Top	At_Offset_2
00f4 01d6       |    |		Execute	Vector,Field_Write
00f5 e215       |    |		Load	0x1,0x15
00f6 0322       | "  |		Declare_Variable	Record
00f7 4801       |H   |		Short_Literal	0x1
00f8 00d9       |    |		Load_Top	At_Offset_1
00f9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00fa 4801       |H   |		Short_Literal	0x1
00fb 00d9       |    |		Load_Top	At_Offset_1
00fc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fd 48fc       |H   |		Short_Literal	0xfc
00fe 00da       |    |		Load_Top	At_Offset_2
00ff 01d6       |    |		Execute	Vector,Field_Write
0100 e215       |    |		Load	0x1,0x15
0101 0322       | "  |		Declare_Variable	Record
0102 4801       |H   |		Short_Literal	0x1
0103 00d9       |    |		Load_Top	At_Offset_1
0104 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0105 4800       |H   |		Short_Literal	0x0
0106 00d9       |    |		Load_Top	At_Offset_1
0107 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0108 48fe       |H   |		Short_Literal	0xfe
0109 00da       |    |		Load_Top	At_Offset_2
010a 01d6       |    |		Execute	Vector,Field_Write
010b 00d9       |    |		Load_Top	At_Offset_1
010c 01d4       |    |		Execute	Vector,Structure_Write
010d 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x4 = 0x10d,0xfffb
010e 00c7       |    |		Action	Elaborate_Subprogram
010f 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x5 = 0x10f,0xfffa
0110 00c7       |    |		Action	Elaborate_Subprogram
0111 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x6 = 0x111,0xfff9
0112 00c7       |    |		Action	Elaborate_Subprogram
0113 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x7 = 0x113,0xfff8
0114 00c7       |    |		Action	Elaborate_Subprogram
0115 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x8 = 0x115,0xfff7
0116 00c7       |    |		Action	Elaborate_Subprogram
0117 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x9 = 0x117,0xfff6
0118 00c7       |    |		Action	Elaborate_Subprogram
0119 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0xa = 0x119,0xfff5
011a 00c7       |    |		Action	Elaborate_Subprogram
011b			BODY_0008:
011b 00bc       |    |		Action	Signal_Activated
011c 00bb       |    |		Action	Signal_Completion
011d 0000 0000  |    |		.XXX[0x3]
011f 0000       |    |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0123,0x0268,0x0002,0x0000,0x0037,0x7374,0x0000,0x00a2
													; Debug Table 0x2.0x0 = 0x123,0x1
0124 4601       |F   |		Jump_Case	0x2
0125 7803       |x   |		Jump	0x129								; case 0x0
0126 7800       |x   |		Jump	0x127								; case 0x1
0127 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x1 = 0x127,0x2
0128 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0129 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x2 = 0x129,0x3
012a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
012b 0000 0000  |    |		.BLANK	0000[0x5]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 013c       | <  |		.CONST	0x013c								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x0133,0x0270,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ab
													; Debug Table 0x3.0x0 = 0x133,0x1
0134 0f02       |    |		Execute_Immediate	Equal,0x2
0135 7004       |p   |		Jump_Nonzero	0x13a
0136 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x1 = 0x136,0x2
0137 e222       | "  |		Load	0x1,0x22
0138 01d7       |    |		Execute	Vector,Field_Read
0139 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013a 606d       |`m  |		Indirect_Literal	Discrete,0x1a8,{0x00000000, 0x37737401}		; Debug Table 0x3.0x2 = 0x13a,0x3
013b 0257       | W  |		Execute	Discrete,Raise
013c			TRAP_0130:
013c 010e       |    |		Execute	Exception,Is_Constraint_Error
013d 6802       |h   |		Jump_Zero	0x140
013e 6069       |`i  |		Indirect_Literal	Discrete,0x1a8,{0x00000000, 0x37737401}		; Debug Table 0x3.0x3 = 0x13e,0x4
013f 0257       | W  |		Execute	Discrete,Raise
0140 0100       |    |		Execute	Exception,Raise
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x014b,0x027a,0x0002,0x0000,0x0037,0x7374,0x0000,0x00b6
													; Debug Table 0x4.0x0 = 0x14b,0x1
014c e21e       |    |		Load	0x1,0x1e
014d 01d7       |    |		Execute	Vector,Field_Read
014e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
014f 0000       |    |		.XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0157       | W  |		.CONST	0x0157								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x0153,0x027e,0x0002,0x0000,0x0037,0x7374,0x0000,0x00c1
													; Debug Table 0x5.0x0 = 0x153,0x1
0154 e224       | $  |		Load	0x1,0x24
0155 01d5       |    |		Execute	Vector,Field_Reference
0156 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0157			TRAP_0150:
0157 010e       |    |		Execute	Exception,Is_Constraint_Error
0158 6802       |h   |		Jump_Zero	0x15b
0159 604a       |`J  |		Indirect_Literal	Discrete,0x1a4,{0x00000000, 0x37737402}		; Debug Table 0x5.0x1 = 0x159,0x2
015a 0257       | W  |		Execute	Discrete,Raise
015b 0100       |    |		Execute	Exception,Raise
015c 0000 0000  |    |		.BLANK	0000[0x4]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x0163,0x0284,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ca
													; Debug Table 0x6.0x0 = 0x163,0x1
0164 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0165 00db       |    |		Load_Top	At_Offset_3
0166 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0167 e220       |    |		Load	0x1,0x20
0168 01a7       |    |		Execute	Matrix,Field_Read
0169 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016a 0000 0000  |    |		.BLANK	0000[0x6]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x0173,0x0288,0x0002,0x0000,0x0037,0x7374,0x0000,0x00d3
													; Debug Table 0x7.0x0 = 0x173,0x1
0174 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0175 7007       |p   |		Jump_Nonzero	0x17d
0176 0b01       |    |		Execute_Immediate	Case_Compare,0x1
0177 7008       |p   |		Jump_Nonzero	0x180
0178 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0179 7009       |p   |		Jump_Nonzero	0x183
017a 0092 01ac  |    |		Action	Push_String_Extended,0x1ac					; "UNKNOWN"
													; Debug Table 0x7.0x1 = 0x17a,0x5
017c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017d 0092 01ad  |    |		Action	Push_String_Extended,0x1ad					; "TRANSMIT_BINARY"
													; Debug Table 0x7.0x2 = 0x17d,0x2
017f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0180 0092 01ae  |    |		Action	Push_String_Extended,0x1ae					; "ECHO"
													; Debug Table 0x7.0x3 = 0x180,0x3
0182 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0183 0092 01af  |    |		Action	Push_String_Extended,0x1af					; "SUPPRESS_GO_AHEAD"
													; Debug Table 0x7.0x4 = 0x183,0x4
0185 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0186 0000 0000  |    |		.XXX[0x2]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b       |    |		.CONST	0x018b								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0001       |    |		.CONST	0x0001								; Number of locals
018b			BODY_0188:
018b			INIT_0188:
018b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x018b,0x0294,0x0002,0x0000,0x0037,0x7374,0x0000,0x00de
													; Debug Table 0x8.0x0 = 0x18b,0x1
018c 0bfd       |    |		Execute_Immediate	Case_Compare,0xfd
018d 7009       |p   |		Jump_Nonzero	0x197
018e 0bfe       |    |		Execute_Immediate	Case_Compare,0xfe
018f 700a       |p   |		Jump_Nonzero	0x19a
0190 0bfb       |    |		Execute_Immediate	Case_Compare,0xfb
0191 700b       |p   |		Jump_Nonzero	0x19d
0192 0bfc       |    |		Execute_Immediate	Case_Compare,0xfc
0193 700c       |p   |		Jump_Nonzero	0x1a0
0194 0092 01b0  |    |		Action	Push_String_Extended,0x1b0					; "UNKNOWN "
													; Debug Table 0x8.0x1 = 0x194,0x6
0196 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0197 0092 01b1  |    |		Action	Push_String_Extended,0x1b1					; "DO "
													; Debug Table 0x8.0x2 = 0x197,0x2
0199 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019a 0092 01b2  |    |		Action	Push_String_Extended,0x1b2					; "DON'T "
													; Debug Table 0x8.0x3 = 0x19a,0x3
019c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019d 0092 01b3  |    |		Action	Push_String_Extended,0x1b3					; "WILL "
													; Debug Table 0x8.0x4 = 0x19d,0x4
019f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a0 0092 01b4  |    |		Action	Push_String_Extended,0x1b4					; "WON'T "
													; Debug Table 0x8.0x5 = 0x1a0,0x5
01a2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a3 0000       |    |		.XXX[0x1]
01a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x37737402}
01a8 0000 0000  |    |		.LITERAL	{0x00000000, 0x37737401}
01ac ; --------------------------------------------------------------------------------------
01ac ; STRING TABLE
01ac ; --------------------------------------------------------------------------------------
01ac 0014       |    |		.STRTAB	0x0014->0x01b6							; "UNKNOWN"
01ad 0019       |    |		.STRTAB	0x0019->0x01b9							; "TRANSMIT_BINARY"
01ae 0026       | &  |		.STRTAB	0x0026->0x01c1							; "ECHO"
01af 0028       | (  |		.STRTAB	0x0028->0x01c3							; "SUPPRESS_GO_AHEAD"
01b0 0037       | 7  |		.STRTAB	0x0037->0x01cb							; "UNKNOWN "
01b1 003d       | =  |		.STRTAB	0x003d->0x01cf							; "DO "
01b2 003e       | >  |		.STRTAB	0x003e->0x01d1							; "DON'T "
01b3 0042       | B  |		.STRTAB	0x0042->0x01d4							; "WILL "
01b4 0045       | E  |		.STRTAB	0x0045->0x01d6							; "WON'T "
01b5 0049       | I  |		.STREND 0x0049->0x01d9
01b6 554e 4b4e  |UNKN|		.STRTAB_STRINGS
01da 0000 0000  |    |		.BLANK	0000[0x6]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; Debug Table
01e0 ; --------------------------------------------------------------------------------------
01e0 0003 0009  |    |		.CONST	0x0003,0x0009
01e2 000b 022a  |   *|		.DEBUG	0x000b,0x022a,0x8000,0x0000,0x0037,0x7374,0x0000,0x0009
01ea 007c 0250  | | P|		.DEBUG	0x007c,0x0250,0x8000,0x0000,0x0037,0x73d4,0x0000,0x0003
01f2 0123 0268  | # h|		.DEBUG	0x0123,0x0268,0x0002,0x0000,0x0037,0x7374,0x0000,0x00a2
01fa 0133 0270  | 3 p|		.DEBUG	0x0133,0x0270,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ab
0202 014b 027a  | K z|		.DEBUG	0x014b,0x027a,0x0002,0x0000,0x0037,0x7374,0x0000,0x00b6
020a 0153 027e  | S ~|		.DEBUG	0x0153,0x027e,0x0002,0x0000,0x0037,0x7374,0x0000,0x00c1
0212 0163 0284  | c  |		.DEBUG	0x0163,0x0284,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ca
021a 0173 0288  | s  |		.DEBUG	0x0173,0x0288,0x0002,0x0000,0x0037,0x7374,0x0000,0x00d3
0222 018b 0294  |    |		.DEBUG	0x018b,0x0294,0x0002,0x0000,0x0037,0x7374,0x0000,0x00de
022a ; --------------------------------------------------------------------------------------
022a ; Debug3 Subtable 0x0
022a ; --------------------------------------------------------------------------------------
022a 0012 0000  |    |		.DBG3TAB	0x0012,0x0000
022c 000b ffff  |    |		.CONST	0x000b,0xffff
022e 000c fffe  |    |		.CONST	0x000c,0xfffe
0230 000f fffd  |    |		.CONST	0x000f,0xfffd
0232 0013 fffc  |    |		.CONST	0x0013,0xfffc
0234 0017 fffb  |    |		.CONST	0x0017,0xfffb
0236 0022 fffa  | "  |		.CONST	0x0022,0xfffa
0238 002d fff9  | -  |		.CONST	0x002d,0xfff9
023a 0040 fff8  | @  |		.CONST	0x0040,0xfff8
023c 0064 fff7  | d  |		.CONST	0x0064,0xfff7
023e 0067 fff6  | g  |		.CONST	0x0067,0xfff6
0240 006d fff5  | m  |		.CONST	0x006d,0xfff5
0242 006f fff4  | o  |		.CONST	0x006f,0xfff4
0244 0071 fff3  | q  |		.CONST	0x0071,0xfff3
0246 0073 fff2  | s  |		.CONST	0x0073,0xfff2
0248 0075 fff1  | u  |		.CONST	0x0075,0xfff1
024a 0077 fff0  | w  |		.CONST	0x0077,0xfff0
024c 0079 ffef  | y  |		.CONST	0x0079,0xffef
024e 007b ffee  | {  |		.CONST	0x007b,0xffee
0250 ; --------------------------------------------------------------------------------------
0250 ; Debug3 Subtable 0x1
0250 ; --------------------------------------------------------------------------------------
0250 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
0252 007c ffff  | |  |		.CONST	0x007c,0xffff
0254 0095 fffe  |    |		.CONST	0x0095,0xfffe
0256 00b8 fffd  |    |		.CONST	0x00b8,0xfffd
0258 00d5 fffc  |    |		.CONST	0x00d5,0xfffc
025a 010d fffb  |    |		.CONST	0x010d,0xfffb
025c 010f fffa  |    |		.CONST	0x010f,0xfffa
025e 0111 fff9  |    |		.CONST	0x0111,0xfff9
0260 0113 fff8  |    |		.CONST	0x0113,0xfff8
0262 0115 fff7  |    |		.CONST	0x0115,0xfff7
0264 0117 fff6  |    |		.CONST	0x0117,0xfff6
0266 0119 fff5  |    |		.CONST	0x0119,0xfff5
0268 ; --------------------------------------------------------------------------------------
0268 ; Debug3 Subtable 0x2
0268 ; --------------------------------------------------------------------------------------
0268 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
026a 0123 0001  | #  |		.CONST	0x0123,0x0001
026c 0127 0002  | '  |		.CONST	0x0127,0x0002
026e 0129 0003  | )  |		.CONST	0x0129,0x0003
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug3 Subtable 0x3
0270 ; --------------------------------------------------------------------------------------
0270 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0272 0133 0001  | 3  |		.CONST	0x0133,0x0001
0274 0136 0002  | 6  |		.CONST	0x0136,0x0002
0276 013a 0003  | :  |		.CONST	0x013a,0x0003
0278 013e 0004  | >  |		.CONST	0x013e,0x0004
027a ; --------------------------------------------------------------------------------------
027a ; Debug3 Subtable 0x4
027a ; --------------------------------------------------------------------------------------
027a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
027c 014b 0001  | K  |		.CONST	0x014b,0x0001
027e ; --------------------------------------------------------------------------------------
027e ; Debug3 Subtable 0x5
027e ; --------------------------------------------------------------------------------------
027e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0280 0153 0001  | S  |		.CONST	0x0153,0x0001
0282 0159 0002  | Y  |		.CONST	0x0159,0x0002
0284 ; --------------------------------------------------------------------------------------
0284 ; Debug3 Subtable 0x6
0284 ; --------------------------------------------------------------------------------------
0284 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0286 0163 0001  | c  |		.CONST	0x0163,0x0001
0288 ; --------------------------------------------------------------------------------------
0288 ; Debug3 Subtable 0x7
0288 ; --------------------------------------------------------------------------------------
0288 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
028a 0173 0001  | s  |		.CONST	0x0173,0x0001
028c 017a 0005  | z  |		.CONST	0x017a,0x0005
028e 017d 0002  | }  |		.CONST	0x017d,0x0002
0290 0180 0003  |    |		.CONST	0x0180,0x0003
0292 0183 0004  |    |		.CONST	0x0183,0x0004
0294 ; --------------------------------------------------------------------------------------
0294 ; Debug3 Subtable 0x8
0294 ; --------------------------------------------------------------------------------------
0294 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0296 018b 0001  |    |		.CONST	0x018b,0x0001
0298 0194 0006  |    |		.CONST	0x0194,0x0006
029a 0197 0002  |    |		.CONST	0x0197,0x0002
029c 019a 0003  |    |		.CONST	0x019a,0x0003
029e 019d 0004  |    |		.CONST	0x019d,0x0004
02a0 01a0 0005  |    |		.CONST	0x01a0,0x0005
02a2 0000 0000  |    |		.BLANK	0000[0x15e]