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

⟦7ff90f18c⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 01f0       |    |		.CONST	0x01f0								; 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 003f       | ?  |		.CONST	0x003f								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0019       |    |		.CONST	0x0019								; Number of locals
000b			INIT_0008:
000b 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated
000d 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000f 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated
0011 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated
0013 029a 008b  |    |		Declare_Subprogram	INIT_0088,For_Outer_Call,Visible,Unelaborated
0015 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated
0017 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated
0019 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated
001b 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
001d 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
001f 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated
0021 0093 0000  |    |		push_full_address	0x0
0023 6030       |`0  |		Indirect_Literal	Discrete,0x54,{0x80000000, 0x00010000}
0024 0273       | s  |		Execute	Discrete,Plus
0025 0129       | )  |		Execute	Any,Make_Visible
0026 00bf       |    |		Action	Accept_Activation
0027 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0028 00c7       |    |		Action	Elaborate_Subprogram
0029 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
002a 00c7       |    |		Action	Elaborate_Subprogram
002b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
002c 00c7       |    |		Action	Elaborate_Subprogram
002d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
002e 00c7       |    |		Action	Elaborate_Subprogram
002f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0030 00c7       |    |		Action	Elaborate_Subprogram
0031 029d 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call
0033 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0034 00c7       |    |		Action	Elaborate_Subprogram
0035 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0036 00c7       |    |		Action	Elaborate_Subprogram
0037 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0038 00c7       |    |		Action	Elaborate_Subprogram
0039 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
003a 00c7       |    |		Action	Elaborate_Subprogram
003b 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
003c 00c7       |    |		Action	Elaborate_Subprogram
003d 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
003e 00c7       |    |		Action	Elaborate_Subprogram
003f			BODY_0008:
003f 00bc       |    |		Action	Signal_Activated
0040 00bb       |    |		Action	Signal_Completion
0041 0000 0000  |    |		.BLANK	0000[0x7]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b       | K  |		.CONST	0x004b								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0001       |    |		.CONST	0x0001								; Number of locals
004b			BODY_0048:
004b			INIT_0048:
004b 00da       |    |		Load_Top	At_Offset_2
004c 00d8       |    |		Load_Top	At_Offset_0
004d e002       |    |		Load	0x0,0x2
004e 0260       | `  |		Execute	Discrete,In_Type
004f 7001       |p   |		Jump_Nonzero	0x51
0050 0801       |    |		Execute_Immediate	Raise,0x1
0051 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0052 0000 0000  |    |		.XXX[0x2]
0054 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 00da       |    |		Load_Top	At_Offset_2
005c 00d8       |    |		Load_Top	At_Offset_0
005d 00e8       |    |		Load_Encached	Character_Cache
005e 0260       | `  |		Execute	Discrete,In_Type
005f 7001       |p   |		Jump_Nonzero	0x61
0060 0801       |    |		Execute_Immediate	Raise,0x1
0061 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0062 0000 0000  |    |		.BLANK	0000[0x6]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 00da       |    |		Load_Top	At_Offset_2
006c 48ff       |H   |		Short_Literal	0xff
006d 027d       | }  |		Execute	Discrete,Greater
006e 6802       |h   |		Jump_Zero	0x71
006f e218       |    |		Load	0x1,0x18
0070 0257       | W  |		Execute	Discrete,Raise
0071 00da       |    |		Load_Top	At_Offset_2
0072 00d8       |    |		Load_Top	At_Offset_0
0073 e002       |    |		Load	0x0,0x2
0074 0260       | `  |		Execute	Discrete,In_Type
0075 7001       |p   |		Jump_Nonzero	0x77
0076 0801       |    |		Execute_Immediate	Raise,0x1
0077 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b       | {  |		.CONST	0x007b								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0001       |    |		.CONST	0x0001								; Number of locals
007b			BODY_0078:
007b			INIT_0078:
007b 00da       |    |		Load_Top	At_Offset_2
007c 00d8       |    |		Load_Top	At_Offset_0
007d 00e3       |    |		Load_Encached	Natural_Cache
007e 0260       | `  |		Execute	Discrete,In_Type
007f 7001       |p   |		Jump_Nonzero	0x81
0080 0801       |    |		Execute_Immediate	Raise,0x1
0081 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0082 0000 0000  |    |		.BLANK	0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0092       |    |		.CONST	0x0092								; Address of begin
0089 0004       |    |		.CONST	0x0004								; Address of exception handler
008a 0002       |    |		.CONST	0x0002								; Number of locals
008b			INIT_0088:
008b 00da       |    |		Load_Top	At_Offset_2
008c 01dd       |    |		Execute	Vector,First
008d 00db       |    |		Load_Top	At_Offset_3
008e 01dc       |    |		Execute	Vector,Last
008f 00e9       |    |		Load_Encached	String_Cache
0090 035b       | [  |		Declare_Type	Array,Constrained
0091 0337       | 7  |		Declare_Variable	Array
0092			BODY_0088:
0092 00cf       |    |		Action	Mark_Auxiliary
0093 e5ff       |    |		Load	0x2,-0x1
0094 01d9       |    |		Execute	Vector,Reverse_Bounds
0095 0263       | c  |		Execute	Discrete,Above_Bound
0096 7009       |p   |		Jump_Nonzero	0xa0
0097 00d8       |    |		Load_Top	At_Offset_0
0098 e5ff       |    |		Load	0x2,-0x1
0099 01d7       |    |		Execute	Vector,Field_Read
009a 820e       |    |		Call	0x1,0xe
009b 00d9       |    |		Load_Top	At_Offset_1
009c e402       |    |		Load	0x2,0x2
009d 01d6       |    |		Execute	Vector,Field_Write
009e 00c8       |    |		Action	Pop_Auxiliary_Range
009f 3ff7       |?   |		Loop_Increasing	0x97
00a0 00ce       |    |		Action	Pop_Auxiliary
00a1 00d8       |    |		Load_Top	At_Offset_0
00a2 00e9       |    |		Load_Encached	String_Cache
00a3 01c6       |    |		Execute	Vector,Convert_To_Formal
00a4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a5 0000 0000  |    |		.XXX[0x3]
00a7 0000       |    |
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b2       |    |		.CONST	0x00b2								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0002       |    |		.CONST	0x0002								; Number of locals
00ab			INIT_00a8:
00ab 00da       |    |		Load_Top	At_Offset_2
00ac 01dd       |    |		Execute	Vector,First
00ad 00db       |    |		Load_Top	At_Offset_3
00ae 01dc       |    |		Execute	Vector,Last
00af e003       |    |		Load	0x0,0x3
00b0 035b       | [  |		Declare_Type	Array,Constrained
00b1 0337       | 7  |		Declare_Variable	Array
00b2			BODY_00a8:
00b2 00cf       |    |		Action	Mark_Auxiliary
00b3 e5ff       |    |		Load	0x2,-0x1
00b4 01d9       |    |		Execute	Vector,Reverse_Bounds
00b5 0263       | c  |		Execute	Discrete,Above_Bound
00b6 7009       |p   |		Jump_Nonzero	0xc0
00b7 00d8       |    |		Load_Top	At_Offset_0
00b8 e5ff       |    |		Load	0x2,-0x1
00b9 01d7       |    |		Execute	Vector,Field_Read
00ba 820d       |    |		Call	0x1,0xd
00bb 00d9       |    |		Load_Top	At_Offset_1
00bc e402       |    |		Load	0x2,0x2
00bd 01d6       |    |		Execute	Vector,Field_Write
00be 00c8       |    |		Action	Pop_Auxiliary_Range
00bf 3ff7       |?   |		Loop_Increasing	0xb7
00c0 00ce       |    |		Action	Pop_Auxiliary
00c1 00d8       |    |		Load_Top	At_Offset_0
00c2 e003       |    |		Load	0x0,0x3
00c3 01c6       |    |		Execute	Vector,Convert_To_Formal
00c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00c5 0000 0000  |    |		.XXX[0x3]
00c7 0000       |    |
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2
00cc 01dd       |    |		Execute	Vector,First
00cd 00db       |    |		Load_Top	At_Offset_3
00ce 01dc       |    |		Execute	Vector,Last
00cf 027f       |    |		Execute	Discrete,Equal
00d0 6806       |h   |		Jump_Zero	0xd7
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 01dd       |    |		Execute	Vector,First
00d3 00db       |    |		Load_Top	At_Offset_3
00d4 01d7       |    |		Execute	Vector,Field_Read
00d5 8214       |    |		Call	0x1,0x14
00d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d7 487c       |H|  |		Short_Literal	0x7c
00d8 00db       |    |		Load_Top	At_Offset_3
00d9 01dd       |    |		Execute	Vector,First
00da e5ff       |    |		Load	0x2,-0x1
00db 01d7       |    |		Execute	Vector,Field_Read
00dc 8214       |    |		Call	0x1,0x14
00dd 01cb       |    |		Execute	Vector,Append
00de 00db       |    |		Load_Top	At_Offset_3
00df 01dd       |    |		Execute	Vector,First
00e0 0a01       |    |		Execute_Immediate	Plus,0x1
00e1 00d8       |    |		Load_Top	At_Offset_0
00e2 00e2       |    |		Load_Encached	Integer_Cache
00e3 0260       | `  |		Execute	Discrete,In_Type
00e4 7001       |p   |		Jump_Nonzero	0xe6
00e5 0801       |    |		Execute_Immediate	Raise,0x1
00e6 e5ff       |    |		Load	0x2,-0x1
00e7 01dc       |    |		Execute	Vector,Last
00e8 e5ff       |    |		Load	0x2,-0x1
00e9 01cf       |    |		Execute	Vector,Slice_Read
00ea 8213       |    |		Call	0x1,0x13
00eb 01cc       |    |		Execute	Vector,Catenate
00ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ed 0000 0000  |    |		.XXX[0x3]
00ef 0000       |    |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 00da       |    |		Load_Top	At_Offset_2
00f4 00d8       |    |		Load_Top	At_Offset_0
00f5 00e2       |    |		Load_Encached	Integer_Cache
00f6 0260       | `  |		Execute	Discrete,In_Type
00f7 7001       |p   |		Jump_Nonzero	0xf9
00f8 0801       |    |		Execute_Immediate	Raise,0x1
00f9 00e0       |    |		Load_Encached	Standard_Cache
00fa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00fb 8004       |    |		Call	0x0,0x4
00fc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00fd 0000 0000  |    |		.XXX[0x3]
00ff 0000       |    |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 00da       |    |		Load_Top	At_Offset_2
0104 01dd       |    |		Execute	Vector,First
0105 00db       |    |		Load_Top	At_Offset_3
0106 01dc       |    |		Execute	Vector,Last
0107 027f       |    |		Execute	Discrete,Equal
0108 6806       |h   |		Jump_Zero	0x10f
0109 00da       |    |		Load_Top	At_Offset_2
010a 01dd       |    |		Execute	Vector,First
010b 00db       |    |		Load_Top	At_Offset_3
010c 01d7       |    |		Execute	Vector,Field_Read
010d 8219       |    |		Call	0x1,0x19
010e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010f 487c       |H|  |		Short_Literal	0x7c
0110 00db       |    |		Load_Top	At_Offset_3
0111 01dd       |    |		Execute	Vector,First
0112 e5ff       |    |		Load	0x2,-0x1
0113 01d7       |    |		Execute	Vector,Field_Read
0114 8219       |    |		Call	0x1,0x19
0115 01cb       |    |		Execute	Vector,Append
0116 00db       |    |		Load_Top	At_Offset_3
0117 01dd       |    |		Execute	Vector,First
0118 0a01       |    |		Execute_Immediate	Plus,0x1
0119 00d8       |    |		Load_Top	At_Offset_0
011a 00e2       |    |		Load_Encached	Integer_Cache
011b 0260       | `  |		Execute	Discrete,In_Type
011c 7001       |p   |		Jump_Nonzero	0x11e
011d 0801       |    |		Execute_Immediate	Raise,0x1
011e e5ff       |    |		Load	0x2,-0x1
011f 01dc       |    |		Execute	Vector,Last
0120 e5ff       |    |		Load	0x2,-0x1
0121 01cf       |    |		Execute	Vector,Slice_Read
0122 8215       |    |		Call	0x1,0x15
0123 01cc       |    |		Execute	Vector,Catenate
0124 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0125 0000 0000  |    |		.XXX[0x3]
0127 0000       |    |
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
012c 8219       |    |		Call	0x1,0x19
012d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
012e 0000 0000  |    |		.XXX[0x2]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0141       | A  |		.CONST	0x0141								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 4801       |H   |		Short_Literal	0x1
0134 00db       |    |		Load_Top	At_Offset_3
0135 01db       |    |		Execute	Vector,Length
0136 e5fe       |    |		Load	0x2,-0x2
0137 01db       |    |		Execute	Vector,Length
0138 0273       | s  |		Execute	Discrete,Plus
0139 00d8       |    |		Load_Top	At_Offset_0
013a 00e2       |    |		Load_Encached	Integer_Cache
013b 0260       | `  |		Execute	Discrete,In_Type
013c 7001       |p   |		Jump_Nonzero	0x13e
013d 0801       |    |		Execute_Immediate	Raise,0x1
013e e003       |    |		Load	0x0,0x3
013f 035b       | [  |		Declare_Type	Array,Constrained
0140 0337       | 7  |		Declare_Variable	Array
0141			BODY_0130:
0141 00db       |    |		Load_Top	At_Offset_3
0142 4801       |H   |		Short_Literal	0x1
0143 e5ff       |    |		Load	0x2,-0x1
0144 01db       |    |		Execute	Vector,Length
0145 00d8       |    |		Load_Top	At_Offset_0
0146 00e2       |    |		Load_Encached	Integer_Cache
0147 0260       | `  |		Execute	Discrete,In_Type
0148 7001       |p   |		Jump_Nonzero	0x14a
0149 0801       |    |		Execute_Immediate	Raise,0x1
014a 00db       |    |		Load_Top	At_Offset_3
014b 01ce       |    |		Execute	Vector,Slice_Write
014c e5fe       |    |		Load	0x2,-0x2
014d e5ff       |    |		Load	0x2,-0x1
014e 01db       |    |		Execute	Vector,Length
014f 0a01       |    |		Execute_Immediate	Plus,0x1
0150 00d8       |    |		Load_Top	At_Offset_0
0151 00e2       |    |		Load_Encached	Integer_Cache
0152 0260       | `  |		Execute	Discrete,In_Type
0153 7001       |p   |		Jump_Nonzero	0x155
0154 0801       |    |		Execute_Immediate	Raise,0x1
0155 00da       |    |		Load_Top	At_Offset_2
0156 01dc       |    |		Execute	Vector,Last
0157 00db       |    |		Load_Top	At_Offset_3
0158 01ce       |    |		Execute	Vector,Slice_Write
0159 00d8       |    |		Load_Top	At_Offset_0
015a e003       |    |		Load	0x0,0x3
015b 01c6       |    |		Execute	Vector,Convert_To_Formal
015c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
015d 0000 0000  |    |		.XXX[0x3]
015f 0000       |    |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0169       | i  |		.CONST	0x0169								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0003       |    |		.CONST	0x0003								; Number of locals
0163			INIT_0160:
0163 00e3       |    |		Load_Encached	Natural_Cache
0164 4801       |H   |		Short_Literal	0x1
0165 4802       |H   |		Short_Literal	0x2
0166 00e9       |    |		Load_Encached	String_Cache
0167 035b       | [  |		Declare_Type	Array,Constrained
0168 0337       | 7  |		Declare_Variable	Array
0169			BODY_0160:
0169 e5ff       |    |		Load	0x2,-0x1
016a 480f       |H   |		Short_Literal	0xf
016b 0279       | y  |		Execute	Discrete,And
016c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
016d 00d9       |    |		Load_Top	At_Offset_1
016e 00d8       |    |		Load_Top	At_Offset_0
016f 0c10       |    |		Execute_Immediate	Greater_Equal,0x10
0170 7016       |p   |		Jump_Nonzero	0x187
0171 460f       |F   |		Jump_Case	0x10
0172 782f       |x/  |		Jump	0x1a2								; case 0x0
0173 782e       |x.  |		Jump	0x1a2								; case 0x1
0174 782d       |x-  |		Jump	0x1a2								; case 0x2
0175 782c       |x,  |		Jump	0x1a2								; case 0x3
0176 782b       |x+  |		Jump	0x1a2								; case 0x4
0177 782a       |x*  |		Jump	0x1a2								; case 0x5
0178 7829       |x)  |		Jump	0x1a2								; case 0x6
0179 7828       |x(  |		Jump	0x1a2								; case 0x7
017a 7827       |x'  |		Jump	0x1a2								; case 0x8
017b 7826       |x&  |		Jump	0x1a2								; case 0x9
017c 780c       |x   |		Jump	0x189								; case 0xa
017d 7810       |x   |		Jump	0x18e								; case 0xb
017e 7814       |x   |		Jump	0x193								; case 0xc
017f 7818       |x   |		Jump	0x198								; case 0xd
0180 781c       |x   |		Jump	0x19d								; case 0xe
0181 7800       |x   |		Jump	0x182								; case 0xf
0182 4846       |HF  |		Short_Literal	0x46
0183 4802       |H   |		Short_Literal	0x2
0184 00da       |    |		Load_Top	At_Offset_2
0185 01d6       |    |		Execute	Vector,Field_Write
0186 7823       |x#  |		Jump	0x1aa
0187 00d1       |    |		Pop_Control	Pop_Count_1
0188 7821       |x!  |		Jump	0x1aa
0189 4841       |HA  |		Short_Literal	0x41
018a 4802       |H   |		Short_Literal	0x2
018b 00da       |    |		Load_Top	At_Offset_2
018c 01d6       |    |		Execute	Vector,Field_Write
018d 781c       |x   |		Jump	0x1aa
018e 4842       |HB  |		Short_Literal	0x42
018f 4802       |H   |		Short_Literal	0x2
0190 00da       |    |		Load_Top	At_Offset_2
0191 01d6       |    |		Execute	Vector,Field_Write
0192 7817       |x   |		Jump	0x1aa
0193 4843       |HC  |		Short_Literal	0x43
0194 4802       |H   |		Short_Literal	0x2
0195 00da       |    |		Load_Top	At_Offset_2
0196 01d6       |    |		Execute	Vector,Field_Write
0197 7812       |x   |		Jump	0x1aa
0198 4844       |HD  |		Short_Literal	0x44
0199 4802       |H   |		Short_Literal	0x2
019a 00da       |    |		Load_Top	At_Offset_2
019b 01d6       |    |		Execute	Vector,Field_Write
019c 780d       |x   |		Jump	0x1aa
019d 4845       |HE  |		Short_Literal	0x45
019e 4802       |H   |		Short_Literal	0x2
019f 00da       |    |		Load_Top	At_Offset_2
01a0 01d6       |    |		Execute	Vector,Field_Write
01a1 7808       |x   |		Jump	0x1aa
01a2 00d9       |    |		Load_Top	At_Offset_1
01a3 00e0       |    |		Load_Encached	Standard_Cache
01a4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01a5 8004       |    |		Call	0x0,0x4
01a6 4802       |H   |		Short_Literal	0x2
01a7 4802       |H   |		Short_Literal	0x2
01a8 00db       |    |		Load_Top	At_Offset_3
01a9 01ce       |    |		Execute	Vector,Slice_Write
01aa e5ff       |    |		Load	0x2,-0x1
01ab 09fc       |    |		Execute_Immediate	Binary_Scale,-0x4
01ac 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01ad 00d9       |    |		Load_Top	At_Offset_1
01ae 00d8       |    |		Load_Top	At_Offset_0
01af 0c10       |    |		Execute_Immediate	Greater_Equal,0x10
01b0 7016       |p   |		Jump_Nonzero	0x1c7
01b1 460f       |F   |		Jump_Case	0x10
01b2 782f       |x/  |		Jump	0x1e2								; case 0x0
01b3 782e       |x.  |		Jump	0x1e2								; case 0x1
01b4 782d       |x-  |		Jump	0x1e2								; case 0x2
01b5 782c       |x,  |		Jump	0x1e2								; case 0x3
01b6 782b       |x+  |		Jump	0x1e2								; case 0x4
01b7 782a       |x*  |		Jump	0x1e2								; case 0x5
01b8 7829       |x)  |		Jump	0x1e2								; case 0x6
01b9 7828       |x(  |		Jump	0x1e2								; case 0x7
01ba 7827       |x'  |		Jump	0x1e2								; case 0x8
01bb 7826       |x&  |		Jump	0x1e2								; case 0x9
01bc 780c       |x   |		Jump	0x1c9								; case 0xa
01bd 7810       |x   |		Jump	0x1ce								; case 0xb
01be 7814       |x   |		Jump	0x1d3								; case 0xc
01bf 7818       |x   |		Jump	0x1d8								; case 0xd
01c0 781c       |x   |		Jump	0x1dd								; case 0xe
01c1 7800       |x   |		Jump	0x1c2								; case 0xf
01c2 4846       |HF  |		Short_Literal	0x46
01c3 4801       |H   |		Short_Literal	0x1
01c4 00da       |    |		Load_Top	At_Offset_2
01c5 01d6       |    |		Execute	Vector,Field_Write
01c6 7823       |x#  |		Jump	0x1ea
01c7 00d1       |    |		Pop_Control	Pop_Count_1
01c8 7821       |x!  |		Jump	0x1ea
01c9 4841       |HA  |		Short_Literal	0x41
01ca 4801       |H   |		Short_Literal	0x1
01cb 00da       |    |		Load_Top	At_Offset_2
01cc 01d6       |    |		Execute	Vector,Field_Write
01cd 781c       |x   |		Jump	0x1ea
01ce 4842       |HB  |		Short_Literal	0x42
01cf 4801       |H   |		Short_Literal	0x1
01d0 00da       |    |		Load_Top	At_Offset_2
01d1 01d6       |    |		Execute	Vector,Field_Write
01d2 7817       |x   |		Jump	0x1ea
01d3 4843       |HC  |		Short_Literal	0x43
01d4 4801       |H   |		Short_Literal	0x1
01d5 00da       |    |		Load_Top	At_Offset_2
01d6 01d6       |    |		Execute	Vector,Field_Write
01d7 7812       |x   |		Jump	0x1ea
01d8 4844       |HD  |		Short_Literal	0x44
01d9 4801       |H   |		Short_Literal	0x1
01da 00da       |    |		Load_Top	At_Offset_2
01db 01d6       |    |		Execute	Vector,Field_Write
01dc 780d       |x   |		Jump	0x1ea
01dd 4845       |HE  |		Short_Literal	0x45
01de 4801       |H   |		Short_Literal	0x1
01df 00da       |    |		Load_Top	At_Offset_2
01e0 01d6       |    |		Execute	Vector,Field_Write
01e1 7808       |x   |		Jump	0x1ea
01e2 00d9       |    |		Load_Top	At_Offset_1
01e3 00e0       |    |		Load_Encached	Standard_Cache
01e4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01e5 8004       |    |		Call	0x0,0x4
01e6 4801       |H   |		Short_Literal	0x1
01e7 4801       |H   |		Short_Literal	0x1
01e8 00db       |    |		Load_Top	At_Offset_3
01e9 01ce       |    |		Execute	Vector,Slice_Write
01ea 4848       |HH  |		Short_Literal	0x48
01eb 00d9       |    |		Load_Top	At_Offset_1
01ec 01ca       |    |		Execute	Vector,Prepend
01ed 00e9       |    |		Load_Encached	String_Cache
01ee 01c6       |    |		Execute	Vector,Convert_To_Formal
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 ; --------------------------------------------------------------------------------------
01f0 ; Debug Table
01f0 ; --------------------------------------------------------------------------------------
01f0 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x72fc,0x0000,0x0001,0x000e
01f6 000b 022e  |   .|		.DBG4T	0x000b,0x022e,0x8000,0x8000
01fa 0027 0248  | ' H|		.DBG4T	0x0027,0x0248,0x8000,0x8000
01fe 004b 0262  | K b|		.DBG4T	0x004b,0x0262,0x0002,0x0000
0202 005b 0265  | [ e|		.DBG4T	0x005b,0x0265,0x0002,0x0000
0206 006b 0268  | k h|		.DBG4T	0x006b,0x0268,0x0002,0x0000
020a 007b 026d  | { m|		.DBG4T	0x007b,0x026d,0x0002,0x0000
020e 008b 0270  |   p|		.DBG4T	0x008b,0x0270,0x0002,0x0000
0212 00ab 0276  |   v|		.DBG4T	0x00ab,0x0276,0x0002,0x0000
0216 00cb 027c  |   ||		.DBG4T	0x00cb,0x027c,0x0002,0x0000
021a 00f3 0281  |    |		.DBG4T	0x00f3,0x0281,0x0002,0x0000
021e 0103 0284  |    |		.DBG4T	0x0103,0x0284,0x0002,0x0000
0222 012b 0289  | +  |		.DBG4T	0x012b,0x0289,0x0002,0x0000
0226 0133 028c  | 3  |		.DBG4T	0x0133,0x028c,0x0002,0x0000
022a 0163 0292  | c  |		.DBG4T	0x0163,0x0292,0x0002,0x4000
022e ; --------------------------------------------------------------------------------------
022e ; Debug chain
022e ; --------------------------------------------------------------------------------------
022e 000c 0000  |    |		.DBGLEN	0x000c,0x0000
0230 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021
023c 0002 0003  |    |		.XXX[0xc]
023e 0004 0005  |    |
0240 0006 0007  |    |
0242 0008 0009  |    |
0244 000a 000b  |    |
0246 000c 000d  |    |
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug chain
0248 ; --------------------------------------------------------------------------------------
0248 000c 0000  |    |		.DBGLEN	0x000c,0x0000
024a 0027 0029  | ' )|		.DBGLNO	0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d
0256 0002 0003  |    |		.XXX[0xc]
0258 0004 0005  |    |
025a 0006 0007  |    |
025c 0008 0009  |    |
025e 000a 000b  |    |
0260 000c 000d  |    |
0262 ; --------------------------------------------------------------------------------------
0262 ; Debug chain
0262 ; --------------------------------------------------------------------------------------
0262 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0264 004b       | K  |		.DBGLNO	0x004b
0265 ; --------------------------------------------------------------------------------------
0265 ; Debug chain
0265 ; --------------------------------------------------------------------------------------
0265 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0267 005b       | [  |		.DBGLNO	0x005b
0268 ; --------------------------------------------------------------------------------------
0268 ; Debug chain
0268 ; --------------------------------------------------------------------------------------
0268 0000 0003  |    |		.DBGLEN	0x0000,0x0003
026a 006b 006f  | k o|		.DBGLNO	0x006b,0x006f,0x0071
026d ; --------------------------------------------------------------------------------------
026d ; Debug chain
026d ; --------------------------------------------------------------------------------------
026d 0000 0001  |    |		.DBGLEN	0x0000,0x0001
026f 007b       | {  |		.DBGLNO	0x007b
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug chain
0270 ; --------------------------------------------------------------------------------------
0270 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0272 008b 0093  |    |		.DBGLNO	0x008b,0x0093,0x0097,0x00a1
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug chain
0276 ; --------------------------------------------------------------------------------------
0276 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0278 00ab 00b3  |    |		.DBGLNO	0x00ab,0x00b3,0x00b7,0x00c1
027c ; --------------------------------------------------------------------------------------
027c ; Debug chain
027c ; --------------------------------------------------------------------------------------
027c 0000 0003  |    |		.DBGLEN	0x0000,0x0003
027e 00cb 00d1  |    |		.DBGLNO	0x00cb,0x00d1,0x00d7
0281 ; --------------------------------------------------------------------------------------
0281 ; Debug chain
0281 ; --------------------------------------------------------------------------------------
0281 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0283 00f3       |    |		.DBGLNO	0x00f3
0284 ; --------------------------------------------------------------------------------------
0284 ; Debug chain
0284 ; --------------------------------------------------------------------------------------
0284 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0286 0103 0109  |    |		.DBGLNO	0x0103,0x0109,0x010f
0289 ; --------------------------------------------------------------------------------------
0289 ; Debug chain
0289 ; --------------------------------------------------------------------------------------
0289 0000 0001  |    |		.DBGLEN	0x0000,0x0001
028b 012b       | +  |		.DBGLNO	0x012b
028c ; --------------------------------------------------------------------------------------
028c ; Debug chain
028c ; --------------------------------------------------------------------------------------
028c 0001 0003  |    |		.DBGLEN	0x0001,0x0003
028e 0133 0141  | 3 A|		.DBGLNO	0x0133,0x0141,0x014c,0x0159
0292 ; --------------------------------------------------------------------------------------
0292 ; Debug chain
0292 ; --------------------------------------------------------------------------------------
0292 0002 0013  |    |		.DBGLEN	0x0002,0x0013
0294 0163 0164  | c d|		.DBGLNO	0x0163,0x0164,0x0169,0x016d,0x0182,0x0189,0x018e,0x0193,0x0198,0x019d,0x01a2,0x01aa,0x01ad,0x01c2,0x01c9,0x01ce,0x01d3,0x01d8,0x01dd,0x01e2,0x01ea
02a9 0001 0002  |    |		.XXX[0x13]
02ab 0009 0004  |    |
02ad 0005 0006  |    |
02af 0007 0008  |    |
02b1 0003 000b  |    |
02b3 000c 0013  |    |
02b5 000e 000f  |    |
02b7 0010 0011  |    |
02b9 0012 000d  |    |
02bb 0015       |    |
02bc 0000 0000  |    |		.BLANK	0000[0x144]