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

⟦7e65fb370⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 01a8       |    |		.CONST	0x01a8								; 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 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0043       | C  |		.CONST	0x0043								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000d       |    |		.CONST	0x000d								; Number of locals
000b			INIT_0008:
000b 00e1       |    |		Load_Encached	Boolean_Cache
000c 00e1       |    |		Load_Encached	Boolean_Cache
000d 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
000e e003       |    |		Load	0x0,0x3
000f 1b93       |    |		Execute	Package,Field_Read,Field_Number 0x93
0010 02ff       |    |		Declare_Variable	Variant_Record
0011 00d8       |    |		Load_Top	At_Offset_0
0012 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0013 e011       |    |		Load	0x0,0x11
0014 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0015 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0016 e011       |    |		Load	0x0,0x11
0017 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0018 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0019 0322       | "  |		Declare_Variable	Record
001a e9ff       |    |		Load	0x4,-0x1
001b 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
001c e015       |    |		Load	0x0,0x15
001d 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
001e 00d9       |    |		Load_Top	At_Offset_1
001f 017d       | }  |		Execute	Record,Structure_Write
0020 00e2       |    |		Load_Encached	Integer_Cache
0021 e9fe       |    |		Load	0x4,-0x2
0022 e003       |    |		Load	0x0,0x3
0023 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0024 e9fe       |    |		Load	0x4,-0x2
0025 e003       |    |		Load	0x0,0x3
0026 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0027 00e1       |    |		Load_Encached	Boolean_Cache
0028 02a0       |    |		Declare_Subprogram	Null_Subprogram
0029 4801       |H   |		Short_Literal	0x1
002a 035d       | ]  |		Declare_Type	Array,Defined
002b 00d8       |    |		Load_Top	At_Offset_0
002c 0337       | 7  |		Declare_Variable	Array
002d 00d8       |    |		Load_Top	At_Offset_0
002e 0335       | 5  |		Declare_Variable	Array,Duplicate
002f 00cd       |    |		Action	Spare6_Action
0030 00d9       |    |		Load_Top	At_Offset_1
0031 01d9       |    |		Execute	Vector,Reverse_Bounds
0032 0263       | c  |		Execute	Discrete,Above_Bound
0033 7005       |p   |		Jump_Nonzero	0x39
0034 4800       |H   |		Short_Literal	0x0
0035 00d9       |    |		Load_Top	At_Offset_1
0036 e80a       |    |		Load	0x4,0xa
0037 01d6       |    |		Execute	Vector,Field_Write
0038 3ffb       |?   |		Loop_Increasing	0x34
0039 00d9       |    |		Load_Top	At_Offset_1
003a 01d4       |    |		Execute	Vector,Structure_Write
003b 029f 0083  |    |		Declare_Subprogram	INIT_0080,For_Call
003d 029f 009b  |    |		Declare_Subprogram	INIT_0098,For_Call
003f 029f 00db  |    |		Declare_Subprogram	INIT_00d8,For_Call
0041 029f 012b  |   +|		Declare_Subprogram	INIT_0128,For_Call
0043			BODY_0008:
0043 e806       |    |		Load	0x4,0x6
0044 480e       |H   |		Short_Literal	0xe
0045 e016       |    |		Load	0x0,0x16
0046 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0047 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0048 a805       |    |		Store_Unchecked	0x4,0x5
0049 e805       |    |		Load	0x4,0x5
004a e011       |    |		Load	0x0,0x11
004b 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
004c 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
004d 6804       |h   |		Jump_Zero	0x52
004e e9fe       |    |		Load	0x4,-0x2
004f 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
0050 00cd       |    |		Action	Spare6_Action
0051 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0052 880d       |    |		Call	0x4,0xd
0053 00cf       |    |		Action	Mark_Auxiliary
0054 e9fe       |    |		Load	0x4,-0x2
0055 e003       |    |		Load	0x0,0x3
0056 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0057 e9fe       |    |		Load	0x4,-0x2
0058 e003       |    |		Load	0x0,0x3
0059 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
005a 0263       | c  |		Execute	Discrete,Above_Bound
005b 701e       |p   |		Jump_Nonzero	0x7a
005c 00d8       |    |		Load_Top	At_Offset_0
005d e809       |    |		Load	0x4,0x9
005e 01d7       |    |		Execute	Vector,Field_Read
005f 7018       |p   |		Jump_Nonzero	0x78
0060 e803       |    |		Load	0x4,0x3
0061 680b       |h   |		Jump_Zero	0x6d
0062 00d8       |    |		Load_Top	At_Offset_0
0063 e9fe       |    |		Load	0x4,-0x2
0064 e003       |    |		Load	0x0,0x3
0065 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0066 e003       |    |		Load	0x0,0x3
0067 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0068 e804       |    |		Load	0x4,0x4
0069 016d       | m  |		Execute	Variant_Record,Structure_Write
006a 4800       |H   |		Short_Literal	0x0
006b a803       |    |		Store_Unchecked	0x4,0x3
006c 780b       |x   |		Jump	0x78
006d e804       |    |		Load	0x4,0x4
006e 00d9       |    |		Load_Top	At_Offset_1
006f e9fe       |    |		Load	0x4,-0x2
0070 e003       |    |		Load	0x0,0x3
0071 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0072 e003       |    |		Load	0x0,0x3
0073 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0074 e003       |    |		Load	0x0,0x3
0075 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0076 e804       |    |		Load	0x4,0x4
0077 016d       | m  |		Execute	Variant_Record,Structure_Write
0078 00c8       |    |		Action	Pop_Auxiliary_Range
0079 3fe2       |?   |		Loop_Increasing	0x5c
007a 00ce       |    |		Action	Pop_Auxiliary
007b e804       |    |		Load	0x4,0x4
007c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
007d 0000 0000  |    |		.XXX[0x3]
007f 0000       |    |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083       |    |		.CONST	0x0083								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 0001       |    |		.CONST	0x0001								; Number of locals
0083			BODY_0080:
0083			INIT_0080:
0083 00cf       |    |		Action	Mark_Auxiliary
0084 ebfe       |    |		Load	0x5,-0x2
0085 01dc       |    |		Execute	Vector,Last
0086 ebfe       |    |		Load	0x5,-0x2
0087 01dd       |    |		Execute	Vector,First
0088 0263       | c  |		Execute	Discrete,Above_Bound
0089 700a       |p   |		Jump_Nonzero	0x94
008a ebff       |    |		Load	0x5,-0x1
008b 00d9       |    |		Load_Top	At_Offset_1
008c ebfe       |    |		Load	0x5,-0x2
008d 01d7       |    |		Execute	Vector,Field_Read
008e 027f       |    |		Execute	Discrete,Equal
008f 6802       |h   |		Jump_Zero	0x92
0090 4801       |H   |		Short_Literal	0x1
0091 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0092 00c8       |    |		Action	Pop_Auxiliary_Range
0093 3ff6       |?   |		Loop_Increasing	0x8a
0094 00ce       |    |		Action	Pop_Auxiliary
0095 4800       |H   |		Short_Literal	0x0
0096 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0097 0000       |    |		.XXX[0x1]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a1       |    |		.CONST	0x00a1								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0003       |    |		.CONST	0x0003								; Number of locals
009b			INIT_0098:
009b 0092 0196  |    |		Action	Push_String_Extended,0x196					; " _"
009d ebfe       |    |		Load	0x5,-0x2
009e 01dd       |    |		Execute	Vector,First
009f 00e2       |    |		Load_Encached	Integer_Cache
00a0 03f1       |    |		Declare_Variable	Discrete,With_Value
00a1			BODY_0098:
00a1 ebff       |    |		Load	0x5,-0x1
00a2 01dc       |    |		Execute	Vector,Last
00a3 ebff       |    |		Load	0x5,-0x1
00a4 01dd       |    |		Execute	Vector,First
00a5 0272       | r  |		Execute	Discrete,Minus
00a6 ebfe       |    |		Load	0x5,-0x2
00a7 01dc       |    |		Execute	Vector,Last
00a8 ebfe       |    |		Load	0x5,-0x2
00a9 01dd       |    |		Execute	Vector,First
00aa 0272       | r  |		Execute	Discrete,Minus
00ab 027e       | ~  |		Execute	Discrete,Not_Equal
00ac 6802       |h   |		Jump_Zero	0xaf
00ad 4800       |H   |		Short_Literal	0x0
00ae 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00af 00cf       |    |		Action	Mark_Auxiliary
00b0 ebff       |    |		Load	0x5,-0x1
00b1 01dc       |    |		Execute	Vector,Last
00b2 ebff       |    |		Load	0x5,-0x1
00b3 01dd       |    |		Execute	Vector,First
00b4 0263       | c  |		Execute	Discrete,Above_Bound
00b5 701b       |p   |		Jump_Nonzero	0xd1
00b6 00d8       |    |		Load_Top	At_Offset_0
00b7 ebff       |    |		Load	0x5,-0x1
00b8 01d7       |    |		Execute	Vector,Field_Read
00b9 ea03       |    |		Load	0x5,0x3
00ba ebfe       |    |		Load	0x5,-0x2
00bb 01d7       |    |		Execute	Vector,Field_Read
00bc 027e       | ~  |		Execute	Discrete,Not_Equal
00bd 680e       |h   |		Jump_Zero	0xcc
00be ea02       |    |		Load	0x5,0x2
00bf 00d9       |    |		Load_Top	At_Offset_1
00c0 ebff       |    |		Load	0x5,-0x1
00c1 01d7       |    |		Execute	Vector,Field_Read
00c2 880a       |    |		Call	0x4,0xa
00c3 6806       |h   |		Jump_Zero	0xca
00c4 ea02       |    |		Load	0x5,0x2
00c5 ea03       |    |		Load	0x5,0x3
00c6 ebfe       |    |		Load	0x5,-0x2
00c7 01d7       |    |		Execute	Vector,Field_Read
00c8 880a       |    |		Call	0x4,0xa
00c9 7002       |p   |		Jump_Nonzero	0xcc
00ca 4800       |H   |		Short_Literal	0x0
00cb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00cc 00db       |    |		Load_Top	At_Offset_3
00cd 0a01       |    |		Execute_Immediate	Plus,0x1
00ce ca03       |    |		Store	0x5,0x3
00cf 00c8       |    |		Action	Pop_Auxiliary_Range
00d0 3fe5       |?   |		Loop_Increasing	0xb6
00d1 00ce       |    |		Action	Pop_Auxiliary
00d2 4801       |H   |		Short_Literal	0x1
00d3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00d4 0000 0000  |    |		.BLANK	0000[0x4]
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 0092 0197  |    |		Action	Push_String_Extended,0x197					; "(), "
00dd e807       |    |		Load	0x4,0x7
00de 0007       |    |		Action	Break_Optional
00df 00e2       |    |		Load_Encached	Integer_Cache
00e0			BODY_00d8:
00e0 e807       |    |		Load	0x4,0x7
00e1 ebff       |    |		Load	0x5,-0x1
00e2 01dc       |    |		Execute	Vector,Last
00e3 027d       | }  |		Execute	Discrete,Greater
00e4 6803       |h   |		Jump_Zero	0xe8
00e5 0092 0198  |    |		Action	Push_String_Extended,0x198					; " "
00e7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e8 00cf       |    |		Action	Mark_Auxiliary
00e9 7804       |x   |		Jump	0xee
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 0a01       |    |		Execute_Immediate	Plus,0x1
00ec 005b       | [  |		Store_Top	Discrete,At_Offset_3
00ed 00c9       |    |		Action	Pop_Auxiliary_Loop
00ee 00da       |    |		Load_Top	At_Offset_2
00ef ebff       |    |		Load	0x5,-0x1
00f0 01dc       |    |		Execute	Vector,Last
00f1 027a       | z  |		Execute	Discrete,Less_Equal
00f2 6806       |h   |		Jump_Zero	0xf9
00f3 00db       |    |		Load_Top	At_Offset_3
00f4 00db       |    |		Load_Top	At_Offset_3
00f5 ebff       |    |		Load	0x5,-0x1
00f6 01d7       |    |		Execute	Vector,Field_Read
00f7 880a       |    |		Call	0x4,0xa
00f8 77f1       |w   |		Jump_Nonzero	0xea
00f9 00ce       |    |		Action	Pop_Auxiliary
00fa 00d9       |    |		Load_Top	At_Offset_1
00fb ebff       |    |		Load	0x5,-0x1
00fc 01dc       |    |		Execute	Vector,Last
00fd 027d       | }  |		Execute	Discrete,Greater
00fe 6803       |h   |		Jump_Zero	0x102
00ff 0092 0198  |    |		Action	Push_String_Extended,0x198					; " "
0101 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0102 00d9       |    |		Load_Top	At_Offset_1
0103 0a01       |    |		Execute_Immediate	Plus,0x1
0104 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0105 00cf       |    |		Action	Mark_Auxiliary
0106 7804       |x   |		Jump	0x10b
0107 00d9       |    |		Load_Top	At_Offset_1
0108 0a01       |    |		Execute_Immediate	Plus,0x1
0109 005a       | Z  |		Store_Top	Discrete,At_Offset_2
010a 00c9       |    |		Action	Pop_Auxiliary_Loop
010b 00d9       |    |		Load_Top	At_Offset_1
010c ebff       |    |		Load	0x5,-0x1
010d 01dc       |    |		Execute	Vector,Last
010e 027a       | z  |		Execute	Discrete,Less_Equal
010f 6806       |h   |		Jump_Zero	0x116
0110 00db       |    |		Load_Top	At_Offset_3
0111 00da       |    |		Load_Top	At_Offset_2
0112 ebff       |    |		Load	0x5,-0x1
0113 01d7       |    |		Execute	Vector,Field_Read
0114 880a       |    |		Call	0x4,0xa
0115 6ff1       |o   |		Jump_Zero	0x107
0116 00ce       |    |		Action	Pop_Auxiliary
0117 00d8       |    |		Load_Top	At_Offset_0
0118 a807       |    |		Store_Unchecked	0x4,0x7
0119 00d9       |    |		Load_Top	At_Offset_1
011a 00d9       |    |		Load_Top	At_Offset_1
011b 0aff       |    |		Execute_Immediate	Plus,-0x1
011c 00d8       |    |		Load_Top	At_Offset_0
011d 00e2       |    |		Load_Encached	Integer_Cache
011e 0260       | `  |		Execute	Discrete,In_Type
011f 7001       |p   |		Jump_Nonzero	0x121
0120 0801       |    |		Execute_Immediate	Raise,0x1
0121 ebff       |    |		Load	0x5,-0x1
0122 01cf       |    |		Execute	Vector,Slice_Read
0123 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0124 0000 0000  |    |		.BLANK	0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0134       | 4  |		.CONST	0x0134								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0003       |    |		.CONST	0x0003								; Number of locals
012b			INIT_0128:
012b 00ea       |    |		Load_Encached	Null_String_Cache
012c e805       |    |		Load	0x4,0x5
012d e016       |    |		Load	0x0,0x16
012e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
012f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0130 e014       |    |		Load	0x0,0x14
0131 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0132 029f 014b  |   K|		Declare_Subprogram	INIT_0148,For_Call
0134			BODY_0128:
0134 0092 0199  |    |		Action	Push_String_Extended,0x199					; "NONE"
0136 00da       |    |		Load_Top	At_Offset_2
0137 880b       |    |		Call	0x4,0xb
0138 6805       |h   |		Jump_Zero	0x13e
0139 e9fe       |    |		Load	0x4,-0x2
013a 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
013b 00cd       |    |		Action	Spare6_Action
013c 00cb       |    |		Action	Pop_Block_With_Result
013d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
013e 00d9       |    |		Load_Top	At_Offset_1
013f 01dd       |    |		Execute	Vector,First
0140 a807       |    |		Store_Unchecked	0x4,0x7
0141 00cf       |    |		Action	Mark_Auxiliary
0142 8a03       |    |		Call	0x5,0x3
0143 00c9       |    |		Action	Pop_Auxiliary_Loop
0144 7ffd       |    |		Jump	0x142
0145 0000 0000  |    |		.XXX[0x3]
0147 0000       |    |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014f       | O  |		.CONST	0x014f								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0003       |    |		.CONST	0x0003								; Number of locals
014b			INIT_0148:
014b ea02       |    |		Load	0x5,0x2
014c 880c       |    |		Call	0x4,0xc
014d 029f 016b  |   k|		Declare_Subprogram	INIT_0168,For_Call
014f			BODY_0148:
014f 00d9       |    |		Load_Top	At_Offset_1
0150 0092 0198  |    |		Action	Push_String_Extended,0x198					; " "
0152 01df       |    |		Execute	Vector,Equal
0153 6802       |h   |		Jump_Zero	0x156
0154 00cc       |    |		Action	Pop_Block
0155 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0156 00cf       |    |		Action	Mark_Auxiliary
0157 e9fe       |    |		Load	0x4,-0x2
0158 e003       |    |		Load	0x0,0x3
0159 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
015a e9fe       |    |		Load	0x4,-0x2
015b e003       |    |		Load	0x0,0x3
015c 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
015d 0263       | c  |		Execute	Discrete,Above_Bound
015e 7007       |p   |		Jump_Nonzero	0x166
015f 00d8       |    |		Load_Top	At_Offset_0
0160 e809       |    |		Load	0x4,0x9
0161 01d7       |    |		Execute	Vector,Field_Read
0162 7001       |p   |		Jump_Nonzero	0x164
0163 8c03       |    |		Call	0x6,0x3
0164 00c8       |    |		Action	Pop_Auxiliary_Range
0165 3ff9       |?   |		Loop_Increasing	0x15f
0166 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0167 0000       |    |		.XXX[0x1]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0172       | r  |		.CONST	0x0172								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0002       |    |		.CONST	0x0002								; Number of locals
016b			INIT_0168:
016b 4801       |H   |		Short_Literal	0x1
016c ec06       |    |		Load	0x6,0x6
016d e9fe       |    |		Load	0x4,-0x2
016e e003       |    |		Load	0x0,0x3
016f 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0170 e014       |    |		Load	0x0,0x14
0171 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0172			BODY_0168:
0172 ec02       |    |		Load	0x6,0x2
0173 00d9       |    |		Load_Top	At_Offset_1
0174 880b       |    |		Call	0x4,0xb
0175 681f       |h   |		Jump_Zero	0x195
0176 4801       |H   |		Short_Literal	0x1
0177 ec06       |    |		Load	0x6,0x6
0178 e809       |    |		Load	0x4,0x9
0179 01d6       |    |		Execute	Vector,Field_Write
017a e803       |    |		Load	0x4,0x3
017b 680b       |h   |		Jump_Zero	0x187
017c ec06       |    |		Load	0x6,0x6
017d e9fe       |    |		Load	0x4,-0x2
017e e003       |    |		Load	0x0,0x3
017f 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0180 e003       |    |		Load	0x0,0x3
0181 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0182 e804       |    |		Load	0x4,0x4
0183 016d       | m  |		Execute	Variant_Record,Structure_Write
0184 4800       |H   |		Short_Literal	0x0
0185 a803       |    |		Store_Unchecked	0x4,0x3
0186 780b       |x   |		Jump	0x192
0187 e804       |    |		Load	0x4,0x4
0188 ec06       |    |		Load	0x6,0x6
0189 e9fe       |    |		Load	0x4,-0x2
018a e003       |    |		Load	0x0,0x3
018b 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
018c e003       |    |		Load	0x0,0x3
018d 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
018e e003       |    |		Load	0x0,0x3
018f 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0190 e804       |    |		Load	0x4,0x4
0191 016d       | m  |		Execute	Variant_Record,Structure_Write
0192 00cc       |    |		Action	Pop_Block
0193 00d2       |    |		Pop_Control	Pop_Count_2
0194 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0195 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0196 ; --------------------------------------------------------------------------------------
0196 ; STRING TABLE
0196 ; --------------------------------------------------------------------------------------
0196 000a       |    |		.STRTAB	0x000a->0x019b							; " _"
0197 000a       |    |		.STRTAB	0x000a->0x019c							; "(), "
0198 000c       |    |		.STRTAB	0x000c->0x019e							; " "
0199 000b       |    |		.STRTAB	0x000b->0x019e							; "NONE"
019a 000d       |    |		.STREND 0x000d->0x01a0
019b 205f 2829  | _()|		.STRTAB_STRINGS
01a1 0000 0000  |    |		.BLANK	0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; Debug Table
01a8 ; --------------------------------------------------------------------------------------
01a8 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xfcbf,0x0000,0x0001,0x0000
01ae 8000 0000  |    |		.XXX[0xa]
01b0 0000 0020  |    |
01b2 0000 0110  |    |
01b4 0000 0000  |    |
01b6 8000 0005  |    |
01b8 0000 0000  |    |		.BLANK	0000[0x48]