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

⟦3e4c0879e⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0198       |    |		.CONST	0x0198								; 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 0022       | "  |		.CONST	0x0022								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated
000f 00bf       |    |		Action	Accept_Activation
0010 4800       |H   |		Short_Literal	0x0
0011 4806       |H   |		Short_Literal	0x6
0012 029f 014b  |   K|		Declare_Subprogram	INIT_0148,For_Call
0014 03fd       |    |		Declare_Type	Discrete,Defined
0015 480a       |H   |		Short_Literal	0xa
0016 480d       |H   |		Short_Literal	0xd
0017 00e8       |    |		Load_Encached	Character_Cache
0018 03f8       |    |		Declare_Type	Discrete,Constrained
0019 4880       |H   |		Short_Literal	0x80
001a e003       |    |		Load	0x0,0x3
001b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
001c 00d8       |    |		Load_Top	At_Offset_0
001d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
001e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
001f 00c7       |    |		Action	Elaborate_Subprogram
0020 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0021 00c7       |    |		Action	Elaborate_Subprogram
0022			BODY_0008:
0022 00bc       |    |		Action	Signal_Activated
0023 00bb       |    |		Action	Signal_Completion
0024 0000 0000  |    |		.BLANK	0000[0x4]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002e       | .  |		.CONST	0x002e								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0003       |    |		.CONST	0x0003								; Number of locals
002b			INIT_0028:
002b 00e8       |    |		Load_Encached	Character_Cache
002c e20f       |    |		Load	0x1,0xf
002d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
002e			BODY_0028:
002e e211       |    |		Load	0x1,0x11
002f 8004       |    |		Call	0x0,0x4
0030 00d1       |    |		Pop_Control	Pop_Count_1
0031 8005       |    |		Call	0x0,0x5
0032 710a       |q   |		Jump_Nonzero	0x13d
0033 4800       |H   |		Short_Literal	0x0
0034 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0035 00cf       |    |		Action	Mark_Auxiliary
0036 8005       |    |		Call	0x0,0x5
0037 7005       |p   |		Jump_Nonzero	0x3d
0038 e006       |    |		Load	0x0,0x6
0039 8007       |    |		Call	0x0,0x7
003a 8008       |    |		Call	0x0,0x8
003b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
003c 7802       |x   |		Jump	0x3f
003d 4804       |H   |		Short_Literal	0x4
003e 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
003f 00d9       |    |		Load_Top	At_Offset_1
0040 4606       |F   |		Jump_Case	0x7
0041 7813       |x   |		Jump	0x55								; case 0x0
0042 78dc       |x   |		Jump	0x11f								; case 0x1
0043 78e6       |x   |		Jump	0x12a								; case 0x2
0044 78e7       |x   |		Jump	0x12c								; case 0x3
0045 78ef       |x   |		Jump	0x135								; case 0x4
0046 78b8       |x   |		Jump	0xff								; case 0x5
0047 7800       |x   |		Jump	0x48								; case 0x6
0048 00da       |    |		Load_Top	At_Offset_2
0049 4830       |H0  |		Short_Literal	0x30
004a 4839       |H9  |		Short_Literal	0x39
004b 0262       | b  |		Execute	Discrete,In_Range
004c 7003       |p   |		Jump_Nonzero	0x50
004d 8009       |    |		Call	0x0,0x9
004e 482e       |H.  |		Short_Literal	0x2e
004f 00ca       |    |		Action	Exit_Nullary_Function
0050 e211       |    |		Load	0x1,0x11
0051 00db       |    |		Load_Top	At_Offset_3
0052 800a       |    |		Call	0x0,0xa
0053 00d1       |    |		Pop_Control	Pop_Count_1
0054 78e6       |x   |		Jump	0x13b
0055 00da       |    |		Load_Top	At_Offset_2
0056 467f       |F   |		Jump_Case	0x80
0057 787f       |x   |		Jump	0xd7								; case 0x0
0058 787e       |x~  |		Jump	0xd7								; case 0x1
0059 787d       |x}  |		Jump	0xd7								; case 0x2
005a 787c       |x|  |		Jump	0xd7								; case 0x3
005b 787d       |x}  |		Jump	0xd9								; case 0x4
005c 787a       |xz  |		Jump	0xd7								; case 0x5
005d 7879       |xy  |		Jump	0xd7								; case 0x6
005e 7878       |xx  |		Jump	0xd7								; case 0x7
005f 7877       |xw  |		Jump	0xd7								; case 0x8
0060 7876       |xv  |		Jump	0xd7								; case 0x9
0061 7875       |xu  |		Jump	0xd7								; case 0xa
0062 7874       |xt  |		Jump	0xd7								; case 0xb
0063 7873       |xs  |		Jump	0xd7								; case 0xc
0064 78d6       |x   |		Jump	0x13b								; case 0xd
0065 7871       |xq  |		Jump	0xd7								; case 0xe
0066 7870       |xp  |		Jump	0xd7								; case 0xf
0067 786f       |xo  |		Jump	0xd7								; case 0x10
0068 786e       |xn  |		Jump	0xd7								; case 0x11
0069 786d       |xm  |		Jump	0xd7								; case 0x12
006a 786c       |xl  |		Jump	0xd7								; case 0x13
006b 786b       |xk  |		Jump	0xd7								; case 0x14
006c 786a       |xj  |		Jump	0xd7								; case 0x15
006d 7869       |xi  |		Jump	0xd7								; case 0x16
006e 7868       |xh  |		Jump	0xd7								; case 0x17
006f 7867       |xg  |		Jump	0xd7								; case 0x18
0070 7866       |xf  |		Jump	0xd7								; case 0x19
0071 7865       |xe  |		Jump	0xd7								; case 0x1a
0072 7864       |xd  |		Jump	0xd7								; case 0x1b
0073 7863       |xc  |		Jump	0xd7								; case 0x1c
0074 7862       |xb  |		Jump	0xd7								; case 0x1d
0075 7861       |xa  |		Jump	0xd7								; case 0x1e
0076 7860       |x`  |		Jump	0xd7								; case 0x1f
0077 78c3       |x   |		Jump	0x13b								; case 0x20
0078 785e       |x^  |		Jump	0xd7								; case 0x21
0079 7861       |xa  |		Jump	0xdb								; case 0x22
007a 785c       |x\  |		Jump	0xd7								; case 0x23
007b 785b       |x[  |		Jump	0xd7								; case 0x24
007c 785a       |xZ  |		Jump	0xd7								; case 0x25
007d 7859       |xY  |		Jump	0xd7								; case 0x26
007e 7858       |xX  |		Jump	0xd7								; case 0x27
007f 7866       |xf  |		Jump	0xe6								; case 0x28
0080 7867       |xg  |		Jump	0xe8								; case 0x29
0081 7860       |x`  |		Jump	0xe2								; case 0x2a
0082 785d       |x]  |		Jump	0xe0								; case 0x2b
0083 7869       |xi  |		Jump	0xed								; case 0x2c
0084 7865       |xe  |		Jump	0xea								; case 0x2d
0085 7851       |xQ  |		Jump	0xd7								; case 0x2e
0086 785d       |x]  |		Jump	0xe4								; case 0x2f
0087 7870       |xp  |		Jump	0xf8								; case 0x30
0088 786f       |xo  |		Jump	0xf8								; case 0x31
0089 786e       |xn  |		Jump	0xf8								; case 0x32
008a 786d       |xm  |		Jump	0xf8								; case 0x33
008b 786c       |xl  |		Jump	0xf8								; case 0x34
008c 786b       |xk  |		Jump	0xf8								; case 0x35
008d 786a       |xj  |		Jump	0xf8								; case 0x36
008e 7869       |xi  |		Jump	0xf8								; case 0x37
008f 7868       |xh  |		Jump	0xf8								; case 0x38
0090 7867       |xg  |		Jump	0xf8								; case 0x39
0091 785d       |x]  |		Jump	0xef								; case 0x3a
0092 7844       |xD  |		Jump	0xd7								; case 0x3b
0093 7843       |xC  |		Jump	0xd7								; case 0x3c
0094 7849       |xI  |		Jump	0xde								; case 0x3d
0095 7841       |xA  |		Jump	0xd7								; case 0x3e
0096 7840       |x@  |		Jump	0xd7								; case 0x3f
0097 783f       |x?  |		Jump	0xd7								; case 0x40
0098 7858       |xX  |		Jump	0xf1								; case 0x41
0099 7857       |xW  |		Jump	0xf1								; case 0x42
009a 7856       |xV  |		Jump	0xf1								; case 0x43
009b 7855       |xU  |		Jump	0xf1								; case 0x44
009c 7854       |xT  |		Jump	0xf1								; case 0x45
009d 7853       |xS  |		Jump	0xf1								; case 0x46
009e 7852       |xR  |		Jump	0xf1								; case 0x47
009f 7851       |xQ  |		Jump	0xf1								; case 0x48
00a0 7850       |xP  |		Jump	0xf1								; case 0x49
00a1 784f       |xO  |		Jump	0xf1								; case 0x4a
00a2 784e       |xN  |		Jump	0xf1								; case 0x4b
00a3 784d       |xM  |		Jump	0xf1								; case 0x4c
00a4 784c       |xL  |		Jump	0xf1								; case 0x4d
00a5 784b       |xK  |		Jump	0xf1								; case 0x4e
00a6 784a       |xJ  |		Jump	0xf1								; case 0x4f
00a7 7849       |xI  |		Jump	0xf1								; case 0x50
00a8 7848       |xH  |		Jump	0xf1								; case 0x51
00a9 7847       |xG  |		Jump	0xf1								; case 0x52
00aa 7846       |xF  |		Jump	0xf1								; case 0x53
00ab 7845       |xE  |		Jump	0xf1								; case 0x54
00ac 7844       |xD  |		Jump	0xf1								; case 0x55
00ad 7843       |xC  |		Jump	0xf1								; case 0x56
00ae 7842       |xB  |		Jump	0xf1								; case 0x57
00af 7841       |xA  |		Jump	0xf1								; case 0x58
00b0 7840       |x@  |		Jump	0xf1								; case 0x59
00b1 783f       |x?  |		Jump	0xf1								; case 0x5a
00b2 7824       |x$  |		Jump	0xd7								; case 0x5b
00b3 7823       |x#  |		Jump	0xd7								; case 0x5c
00b4 7822       |x"  |		Jump	0xd7								; case 0x5d
00b5 7821       |x!  |		Jump	0xd7								; case 0x5e
00b6 7820       |x   |		Jump	0xd7								; case 0x5f
00b7 781f       |x   |		Jump	0xd7								; case 0x60
00b8 7838       |x8  |		Jump	0xf1								; case 0x61
00b9 7837       |x7  |		Jump	0xf1								; case 0x62
00ba 7836       |x6  |		Jump	0xf1								; case 0x63
00bb 7835       |x5  |		Jump	0xf1								; case 0x64
00bc 7834       |x4  |		Jump	0xf1								; case 0x65
00bd 7833       |x3  |		Jump	0xf1								; case 0x66
00be 7832       |x2  |		Jump	0xf1								; case 0x67
00bf 7831       |x1  |		Jump	0xf1								; case 0x68
00c0 7830       |x0  |		Jump	0xf1								; case 0x69
00c1 782f       |x/  |		Jump	0xf1								; case 0x6a
00c2 782e       |x.  |		Jump	0xf1								; case 0x6b
00c3 782d       |x-  |		Jump	0xf1								; case 0x6c
00c4 782c       |x,  |		Jump	0xf1								; case 0x6d
00c5 782b       |x+  |		Jump	0xf1								; case 0x6e
00c6 782a       |x*  |		Jump	0xf1								; case 0x6f
00c7 7829       |x)  |		Jump	0xf1								; case 0x70
00c8 7828       |x(  |		Jump	0xf1								; case 0x71
00c9 7827       |x'  |		Jump	0xf1								; case 0x72
00ca 7826       |x&  |		Jump	0xf1								; case 0x73
00cb 7825       |x%  |		Jump	0xf1								; case 0x74
00cc 7824       |x$  |		Jump	0xf1								; case 0x75
00cd 7823       |x#  |		Jump	0xf1								; case 0x76
00ce 7822       |x"  |		Jump	0xf1								; case 0x77
00cf 7821       |x!  |		Jump	0xf1								; case 0x78
00d0 7820       |x   |		Jump	0xf1								; case 0x79
00d1 781f       |x   |		Jump	0xf1								; case 0x7a
00d2 7804       |x   |		Jump	0xd7								; case 0x7b
00d3 7803       |x   |		Jump	0xd7								; case 0x7c
00d4 7802       |x   |		Jump	0xd7								; case 0x7d
00d5 7801       |x   |		Jump	0xd7								; case 0x7e
00d6 7800       |x   |		Jump	0xd7								; case 0x7f
00d7 4831       |H1  |		Short_Literal	0x31
00d8 00ca       |    |		Action	Exit_Nullary_Function
00d9 4830       |H0  |		Short_Literal	0x30
00da 00ca       |    |		Action	Exit_Nullary_Function
00db 4801       |H   |		Short_Literal	0x1
00dc 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00dd 785d       |x]  |		Jump	0x13b
00de 4823       |H#  |		Short_Literal	0x23
00df 00ca       |    |		Action	Exit_Nullary_Function
00e0 4824       |H$  |		Short_Literal	0x24
00e1 00ca       |    |		Action	Exit_Nullary_Function
00e2 4826       |H&  |		Short_Literal	0x26
00e3 00ca       |    |		Action	Exit_Nullary_Function
00e4 4827       |H'  |		Short_Literal	0x27
00e5 00ca       |    |		Action	Exit_Nullary_Function
00e6 482a       |H*  |		Short_Literal	0x2a
00e7 00ca       |    |		Action	Exit_Nullary_Function
00e8 482b       |H+  |		Short_Literal	0x2b
00e9 00ca       |    |		Action	Exit_Nullary_Function
00ea 4803       |H   |		Short_Literal	0x3
00eb 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00ec 784e       |xN  |		Jump	0x13b
00ed 4829       |H)  |		Short_Literal	0x29
00ee 00ca       |    |		Action	Exit_Nullary_Function
00ef 482c       |H,  |		Short_Literal	0x2c
00f0 00ca       |    |		Action	Exit_Nullary_Function
00f1 e211       |    |		Load	0x1,0x11
00f2 00db       |    |		Load_Top	At_Offset_3
00f3 800a       |    |		Call	0x0,0xa
00f4 00d1       |    |		Pop_Control	Pop_Count_1
00f5 4805       |H   |		Short_Literal	0x5
00f6 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00f7 7843       |xC  |		Jump	0x13b
00f8 e211       |    |		Load	0x1,0x11
00f9 00db       |    |		Load_Top	At_Offset_3
00fa 800a       |    |		Call	0x0,0xa
00fb 00d1       |    |		Pop_Control	Pop_Count_1
00fc 4806       |H   |		Short_Literal	0x6
00fd 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00fe 783c       |x<  |		Jump	0x13b
00ff 00da       |    |		Load_Top	At_Offset_2
0100 00d8       |    |		Load_Top	At_Offset_0
0101 0d5b       | [  |		Execute_Immediate	Less,0x5b
0102 7009       |p   |		Jump_Nonzero	0x10c
0103 00d8       |    |		Load_Top	At_Offset_0
0104 0c61       | a  |		Execute_Immediate	Greater_Equal,0x61
0105 7003       |p   |		Jump_Nonzero	0x109
0106 0f5f       | _  |		Execute_Immediate	Equal,0x5f
0107 700f       |p   |		Jump_Nonzero	0x117
0108 7813       |x   |		Jump	0x11c
0109 0c7b       | {  |		Execute_Immediate	Greater_Equal,0x7b
010a 680c       |h   |		Jump_Zero	0x117
010b 7810       |x   |		Jump	0x11c
010c 00d8       |    |		Load_Top	At_Offset_0
010d 4830       |H0  |		Short_Literal	0x30
010e 4839       |H9  |		Short_Literal	0x39
010f 0262       | b  |		Execute	Discrete,In_Range
0110 7005       |p   |		Jump_Nonzero	0x116
0111 4841       |HA  |		Short_Literal	0x41
0112 485a       |HZ  |		Short_Literal	0x5a
0113 0262       | b  |		Execute	Discrete,In_Range
0114 7002       |p   |		Jump_Nonzero	0x117
0115 7806       |x   |		Jump	0x11c
0116 00d1       |    |		Pop_Control	Pop_Count_1
0117 e211       |    |		Load	0x1,0x11
0118 00db       |    |		Load_Top	At_Offset_3
0119 800a       |    |		Call	0x0,0xa
011a 00d1       |    |		Pop_Control	Pop_Count_1
011b 781f       |x   |		Jump	0x13b
011c 8009       |    |		Call	0x0,0x9
011d 482d       |H-  |		Short_Literal	0x2d
011e 00ca       |    |		Action	Exit_Nullary_Function
011f 00da       |    |		Load_Top	At_Offset_2
0120 0f22       | "  |		Execute_Immediate	Equal,0x22
0121 6803       |h   |		Jump_Zero	0x125
0122 4802       |H   |		Short_Literal	0x2
0123 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0124 7816       |x   |		Jump	0x13b
0125 e211       |    |		Load	0x1,0x11
0126 00db       |    |		Load_Top	At_Offset_3
0127 800a       |    |		Call	0x0,0xa
0128 00d1       |    |		Pop_Control	Pop_Count_1
0129 7811       |x   |		Jump	0x13b
012a 482f       |H/  |		Short_Literal	0x2f
012b 00ca       |    |		Action	Exit_Nullary_Function
012c 00da       |    |		Load_Top	At_Offset_2
012d 0f2d       | -  |		Execute_Immediate	Equal,0x2d
012e 6803       |h   |		Jump_Zero	0x132
012f 4804       |H   |		Short_Literal	0x4
0130 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0131 7809       |x   |		Jump	0x13b
0132 8009       |    |		Call	0x0,0x9
0133 4825       |H%  |		Short_Literal	0x25
0134 00ca       |    |		Action	Exit_Nullary_Function
0135 00da       |    |		Load_Top	At_Offset_2
0136 e210       |    |		Load	0x1,0x10
0137 0260       | `  |		Execute	Discrete,In_Type
0138 6802       |h   |		Jump_Zero	0x13b
0139 4800       |H   |		Short_Literal	0x0
013a 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
013b 00c9       |    |		Action	Pop_Auxiliary_Loop
013c 7ef9       |~   |		Jump	0x36
013d 4830       |H0  |		Short_Literal	0x30
013e 00ca       |    |		Action	Exit_Nullary_Function
013f 0000       |    |		.XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 e211       |    |		Load	0x1,0x11
0144 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
0145 00cd       |    |		Action	Spare6_Action
0146 00ca       |    |		Action	Exit_Nullary_Function
0147 0000       |    |		.XXX[0x1]
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 4607       |F   |		Jump_Case	0x8
014c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
014d 7807       |x   |		Jump	0x155								; case 0x1
014e 780a       |x   |		Jump	0x159								; case 0x2
014f 780e       |x   |		Jump	0x15e								; case 0x3
0150 7811       |x   |		Jump	0x162								; case 0x4
0151 7812       |x   |		Jump	0x164								; case 0x5
0152 7813       |x   |		Jump	0x166								; case 0x6
0153 7816       |x   |		Jump	0x16a								; case 0x7
0154 4302       |C   |		.XXX[0x1]
0155 00da       |    |		Load_Top	At_Offset_2
0156 0091 016e  |   n|		Action	Push_String_Extended_Indexed,0x16e				; "ST_NORMAL"
0158 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0159 00db       |    |		Load_Top	At_Offset_3
015a 00db       |    |		Load_Top	At_Offset_3
015b 00e0       |    |		Load_Encached	Standard_Cache
015c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
015d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
015e 00da       |    |		Load_Top	At_Offset_2
015f 00e0       |    |		Load_Encached	Standard_Cache
0160 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0161 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0162 00db       |    |		Load_Top	At_Offset_3
0163 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0164 00db       |    |		Load_Top	At_Offset_3
0165 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0166 e20f       |    |		Load	0x1,0xf
0167 00dc       |    |		Load_Top	At_Offset_4
0168 0267       | g  |		Execute	Discrete,Predecessor
0169 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
016a e20f       |    |		Load	0x1,0xf
016b 00dc       |    |		Load_Top	At_Offset_4
016c 0268       | h  |		Execute	Discrete,Successor
016d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
016e ; --------------------------------------------------------------------------------------
016e ; STRING TABLE
016e ; --------------------------------------------------------------------------------------
016e 0010       |    |		.STRTAB	0x0010->0x0176							; "ST_NORMAL"
016f 0017       |    |		.STRTAB	0x0017->0x017a							; "ST_STR"
0170 001b       |    |		.STRTAB	0x001b->0x017d							; "ST_STR_END"
0171 0023       | #  |		.STRTAB	0x0023->0x0182							; "ST_MINUS"
0172 0029       | )  |		.STRTAB	0x0029->0x0186							; "ST_COMMENT"
0173 0031       | 1  |		.STRTAB	0x0031->0x018b							; "ST_IDENT"
0174 0037       | 7  |		.STRTAB	0x0037->0x018f							; "ST_INTEGER"
0175 003f       | ?  |		.STREND 0x003f->0x0194
0176 5354 5f4e  |ST_N|		.STRTAB_STRINGS
0195 0000 0000  |    |		.XXX[0x3]
0197 0000       |    |
0198 ; --------------------------------------------------------------------------------------
0198 ; Debug Table
0198 ; --------------------------------------------------------------------------------------
0198 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0xdf7d,0x0000,0x0001,0x0005
019e 000b 01b2  |    |		.DBG4T	0x000b,0x01b2,0x0000,0x0000
01a2 0010 01b6  |    |		.DBG4T	0x0010,0x01b6,0x0000,0x0000
01a6 002b 01bd  | +  |		.DBG4T	0x002b,0x01bd,0x0002,0x4000
01aa 0143 0219  | C  |		.DBG4T	0x0143,0x0219,0x0002,0x0000
01ae 014b 0000  | K  |		.DBG4T	0x014b,0x0000,0x0005,0x0000
01b2 ; --------------------------------------------------------------------------------------
01b2 ; Debug chain
01b2 ; --------------------------------------------------------------------------------------
01b2 0002 0000  |    |		.DBGLEN	0x0002,0x0000
01b4 000b 000d  |    |		.DBGLNO	0x000b,0x000d
01b6 ; --------------------------------------------------------------------------------------
01b6 ; Debug chain
01b6 ; --------------------------------------------------------------------------------------
01b6 0005 0000  |    |		.DBGLEN	0x0005,0x0000
01b8 0010 0015  |    |		.DBGLNO	0x0010,0x0015,0x0019,0x001e,0x0020
01bd ; --------------------------------------------------------------------------------------
01bd ; Debug chain
01bd ; --------------------------------------------------------------------------------------
01bd 0002 002c  |   ,|		.DBGLEN	0x0002,0x002c
01bf 002b 002c  | + ,|		.DBGLNO	0x002b,0x002c,0x002e,0x0031,0x0033,0x0036,0x0038,0x003a,0x003d,0x003f,0x0048,0x004d,0x004e,0x0050,0x0055,0x00d7,0x00d9,0x00db,0x00de,0x00e0,0x00e2,0x00e4,0x00e6,0x00e8,0x00ea,0x00ed,0x00ef,0x00f1,0x00f5,0x00f8,0x00fc,0x00ff,0x0117,0x011c,0x011d,0x011f,0x0122,0x0125,0x012a,0x012c,0x012f,0x0132,0x0133,0x0135,0x0139,0x013d
01ed 0001 0002  |    |		.XXX[0x2c]
01ef 0003 0005  |    |
01f1 0006 0007  |    |
01f3 0008 0009  |    |
01f5 0024 0026  | $ &|
01f7 0027 0025  | ' %|
01f9 000a 001b  |    |
01fb 000b 000d  |    |
01fd 000e 000f  |    |
01ff 0010 0011  |    |
0201 0012 0013  |    |
0203 0014 0015  |    |
0205 0016 0017  |    |
0207 0018 0019  |    |
0209 001a 001c  |    |
020b 001d 001e  |    |
020d 001f 0020  |    |
020f 0021 0022  | ! "|
0211 0023 0028  | # (|
0213 0029 002a  | ) *|
0215 002b 002c  | + ,|
0217 002d 002e  | - .|
0219 ; --------------------------------------------------------------------------------------
0219 ; Debug chain
0219 ; --------------------------------------------------------------------------------------
0219 0000 0001  |    |		.DBGLEN	0x0000,0x0001
021b 0143       | C  |		.DBGLNO	0x0143
021c 0000 0000  |    |		.BLANK	0000[0x1e4]