|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
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 0388 | | .CONST 0x0388 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0042 | B | .CONST 0x0042 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0010 | | .CONST 0x0010 ; Number of locals
000b INIT_0008:
000b 00da | | Load_Top At_Offset_2
000c 8251 | Q | Call 0x1,0x51
000d 4801 |H | Short_Literal 0x1
000e 00d9 | | Load_Top At_Offset_1
000f e00b | | Load 0x0,0xb
0010 02a0 | | Declare_Subprogram Null_Subprogram
0011 4801 |H | Short_Literal 0x1
0012 035d | ] | Declare_Type Array,Defined
0013 00d8 | | Load_Top At_Offset_0
0014 0337 | 7 | Declare_Variable Array
0015 4801 |H | Short_Literal 0x1
0016 00db | | Load_Top At_Offset_3
0017 e00e | | Load 0x0,0xe
0018 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
001a 4801 |H | Short_Literal 0x1
001b 035d | ] | Declare_Type Array,Defined
001c 00d8 | | Load_Top At_Offset_0
001d 0337 | 7 | Declare_Variable Array
001e 00d8 | | Load_Top At_Offset_0
001f 1c00 | | Execute_Immediate Run_Utility,0x0
0020 e00e | | Load 0x0,0xe
0021 0322 | " | Declare_Variable Record
0022 00d8 | | Load_Top At_Offset_0
0023 1c00 | | Execute_Immediate Run_Utility,0x0
0024 e014 | | Load 0x0,0x14
0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0026 02c7 | | Declare_Variable Any
0027 e014 | | Load 0x0,0x14
0028 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0029 a408 | | Store_Unchecked 0x2,0x8
002a 4801 |H | Short_Literal 0x1
002b 601c |` | Indirect_Literal Discrete,0x48,{0x00000000, 0x00000400}
002c e015 | | Load 0x0,0x15
002d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
002e 035b | [ | Declare_Type Array,Constrained
002f 0337 | 7 | Declare_Variable Array
0030 00e3 | | Load_Encached Natural_Cache
0031 00e7 | | Load_Encached Duration_Cache
0032 e00d | | Load 0x0,0xd
0033 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0035 00e4 | | Load_Encached Positive_Cache
0036 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0037 4801 |H | Short_Literal 0x1
0038 e016 | | Load 0x0,0x16
0039 180e | | Execute Package,Field_Execute,Field_Number 0xe
003a e016 | | Load 0x0,0x16
003b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
003c 01d7 | | Execute Vector,Field_Read
003d 0007 | | Action Break_Optional
003e 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
0040 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call
0042 BODY_0008:
0042 8410 | | Call 0x2,0x10
0043 e21a | | Load 0x1,0x1a
0044 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0045 4804 |H | Short_Literal 0x4
0046 840f | | Call 0x2,0xf
0047 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0048 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
004c 0000 0000 | | .BLANK 0000[0x4]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 00d1 | | Pop_Control Pop_Count_1
0054 00da | | Load_Top At_Offset_2
0055 01d8 | | Execute Vector,Element_Type
0056 0322 | " | Declare_Variable Record
0057 00d8 | | Load_Top At_Offset_0
0058 1c00 | | Execute_Immediate Run_Utility,0x0
0059 00db | | Load_Top At_Offset_3
005a 01dc | | Execute Vector,Last
005b e7ff | | Load 0x3,-0x1
005c 01dd | | Execute Vector,First
005d 0263 | c | Execute Discrete,Above_Bound
005e 7006 |p | Jump_Nonzero 0x65
005f 00da | | Load_Top At_Offset_2
0060 00d9 | | Load_Top At_Offset_1
0061 e7ff | | Load 0x3,-0x1
0062 01d6 | | Execute Vector,Field_Write
0063 0a01 | | Execute_Immediate Plus,0x1
0064 7ff8 | | Jump 0x5d
0065 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0066 0000 0000 | | .XXX[0x2]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0078 | x | .CONST 0x0078 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0006 | | .CONST 0x0006 ; Number of locals
006b INIT_0068:
006b 00da | | Load_Top At_Offset_2
006c e219 | | Load 0x1,0x19
006d 1c08 | | Execute_Immediate Run_Utility,0x8
006e 00d8 | | Load_Top At_Offset_0
006f 1c00 | | Execute_Immediate Run_Utility,0x0
0070 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call
0072 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call
0074 029f 021b | | Declare_Subprogram INIT_0218,For_Call
0076 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call
0078 BODY_0068:
0078 e40d | | Load 0x2,0xd
0079 0c02 | | Execute_Immediate Greater_Equal,0x2
007a 680b |h | Jump_Zero 0x86
007b 4801 |H | Short_Literal 0x1
007c e40d | | Load 0x2,0xd
007d 0aff | | Execute_Immediate Plus,-0x1
007e e7fe | | Load 0x3,-0x2
007f 01cf | | Execute Vector,Slice_Read
0080 4801 |H | Short_Literal 0x1
0081 e40d | | Load 0x2,0xd
0082 0aff | | Execute_Immediate Plus,-0x1
0083 e602 | | Load 0x3,0x2
0084 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0085 01ce | | Execute Vector,Slice_Write
0086 00cf | | Action Mark_Auxiliary
0087 8604 | | Call 0x3,0x4
0088 8605 | | Call 0x3,0x5
0089 8606 | | Call 0x3,0x6
008a e40c | | Load 0x2,0xc
008b 00d8 | | Load_Top At_Offset_0
008c 4800 |H | Short_Literal 0x0
008d 4809 |H | Short_Literal 0x9
008e 0262 | b | Execute Discrete,In_Range
008f 680d |h | Jump_Zero 0x9d
0090 4609 |F | Jump_Case 0xa
0091 782b |x+ | Jump 0xbd ; case 0x0
0092 781a |x | Jump 0xad ; case 0x1
0093 780b |x | Jump 0x9f ; case 0x2
0094 7826 |x& | Jump 0xbb ; case 0x3
0095 7839 |x9 | Jump 0xcf ; case 0x4
0096 7838 |x8 | Jump 0xcf ; case 0x5
0097 7837 |x7 | Jump 0xcf ; case 0x6
0098 7836 |x6 | Jump 0xcf ; case 0x7
0099 7835 |x5 | Jump 0xcf ; case 0x8
009a 7800 |x | Jump 0x9b ; case 0x9
009b 4900 |I | Short_Literal 0x100
009c 0257 | W | Execute Discrete,Raise
009d 00d1 | | Pop_Control Pop_Count_1
009e 7830 |x0 | Jump 0xcf
009f 4803 |H | Short_Literal 0x3
00a0 e247 | G | Load 0x1,0x47
00a1 1c08 | | Execute_Immediate Run_Utility,0x8
00a2 4800 |H | Short_Literal 0x0
00a3 00d9 | | Load_Top At_Offset_1
00a4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00a5 e40d | | Load 0x2,0xd
00a6 e602 | | Load 0x3,0x2
00a7 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00a8 01d6 | | Execute Vector,Field_Write
00a9 e40d | | Load 0x2,0xd
00aa 0a01 | | Execute_Immediate Plus,0x1
00ab c40d | | Store 0x2,0xd
00ac 7822 |x" | Jump 0xcf
00ad 4802 |H | Short_Literal 0x2
00ae e247 | G | Load 0x1,0x47
00af 1c08 | | Execute_Immediate Run_Utility,0x8
00b0 4800 |H | Short_Literal 0x0
00b1 00d9 | | Load_Top At_Offset_1
00b2 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00b3 e40d | | Load 0x2,0xd
00b4 e602 | | Load 0x3,0x2
00b5 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00b6 01d6 | | Execute Vector,Field_Write
00b7 e40d | | Load 0x2,0xd
00b8 0a01 | | Execute_Immediate Plus,0x1
00b9 c40d | | Store 0x2,0xd
00ba 7814 |x | Jump 0xcf
00bb 4900 |I | Short_Literal 0x100
00bc 0257 | W | Execute Discrete,Raise
00bd e40a | | Load 0x2,0xa
00be 0c01 | | Execute_Immediate Greater_Equal,0x1
00bf 680f |h | Jump_Zero 0xcf
00c0 e5fe | | Load 0x2,-0x2
00c1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00c2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00c3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00c4 e5fe | | Load 0x2,-0x2
00c5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00c6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00c7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00c8 4801 |H | Short_Literal 0x1
00c9 e40a | | Load 0x2,0xa
00ca e409 | | Load 0x2,0x9
00cb 01cf | | Execute Vector,Slice_Read
00cc e001 | | Load 0x0,0x1
00cd 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00ce 8603 | | Call 0x3,0x3
00cf e40d | | Load 0x2,0xd
00d0 e602 | | Load 0x3,0x2
00d1 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00d2 01dc | | Execute Vector,Last
00d3 027b | { | Execute Discrete,Greater_Equal
00d4 680b |h | Jump_Zero 0xe0
00d5 e602 | | Load 0x3,0x2
00d6 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00d7 e7ff | | Load 0x3,-0x1
00d8 0901 | | Execute_Immediate Binary_Scale,0x1
00d9 00d8 | | Load_Top At_Offset_0
00da 00e4 | | Load_Encached Positive_Cache
00db 0260 | ` | Execute Discrete,In_Type
00dc 7001 |p | Jump_Nonzero 0xde
00dd 0801 | | Execute_Immediate Raise,0x1
00de 840f | | Call 0x2,0xf
00df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00e0 00c9 | | Action Pop_Auxiliary_Loop
00e1 7fa5 | | Jump 0x87
00e2 0000 0000 | | .BLANK 0000[0x6]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00ed | | .CONST 0x00ed ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0002 | | .CONST 0x0002 ; Number of locals
00eb INIT_00e8:
00eb 00e4 | | Load_Encached Positive_Cache
00ec 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00ed BODY_00e8:
00ed 4801 |H | Short_Literal 0x1
00ee 00d9 | | Load_Top At_Offset_1
00ef e404 | | Load 0x2,0x4
00f0 01d5 | | Execute Vector,Field_Reference
00f1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00f2 00cf | | Action Mark_Auxiliary
00f3 e5ff | | Load 0x2,-0x1
00f4 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00f5 01d9 | | Execute Vector,Reverse_Bounds
00f6 0263 | c | Execute Discrete,Above_Bound
00f7 7018 |p | Jump_Nonzero 0x110
00f8 00d8 | | Load_Top At_Offset_0
00f9 e5ff | | Load 0x2,-0x1
00fa 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00fb 01d5 | | Execute Vector,Field_Reference
00fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00fd 0f04 | | Execute_Immediate Equal,0x4
00fe 680f |h | Jump_Zero 0x10e
00ff 00d8 | | Load_Top At_Offset_0
0100 0aff | | Execute_Immediate Plus,-0x1
0101 e602 | | Load 0x3,0x2
0102 e404 | | Load 0x2,0x4
0103 01d5 | | Execute Vector,Field_Reference
0104 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0105 00db | | Load_Top At_Offset_3
0106 0a01 | | Execute_Immediate Plus,0x1
0107 c602 | | Store 0x3,0x2
0108 00d8 | | Load_Top At_Offset_0
0109 0a01 | | Execute_Immediate Plus,0x1
010a e602 | | Load 0x3,0x2
010b e404 | | Load 0x2,0x4
010c 01d5 | | Execute Vector,Field_Reference
010d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
010e 00c8 | | Action Pop_Auxiliary_Range
010f 3fe8 |? | Loop_Increasing 0xf8
0110 00ce | | Action Pop_Auxiliary
0111 e5ff | | Load 0x2,-0x1
0112 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0113 01dc | | Execute Vector,Last
0114 00d9 | | Load_Top At_Offset_1
0115 e404 | | Load 0x2,0x4
0116 01d5 | | Execute Vector,Field_Reference
0117 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0118 00d8 | | Load_Top At_Offset_0
0119 e404 | | Load 0x2,0x4
011a 01dc | | Execute Vector,Last
011b 027f | | Execute Discrete,Equal
011c 7001 |p | Jump_Nonzero 0x11e
011d 0887 | | Execute_Immediate Raise,0x87
011e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011f 0000 | | .XXX[0x1]
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 4800 |H | Short_Literal 0x0
0124 e247 | G | Load 0x1,0x47
0125 1c08 | | Execute_Immediate Run_Utility,0x8
0126 4800 |H | Short_Literal 0x0
0127 00d9 | | Load_Top At_Offset_1
0128 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0129 00db | | Load_Top At_Offset_3
012a e245 | E | Load 0x1,0x45
012b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
012c 00d9 | | Load_Top At_Offset_1
012d 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
012e 4800 |H | Short_Literal 0x0
012f 00d9 | | Load_Top At_Offset_1
0130 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0131 e40d | | Load 0x2,0xd
0132 e602 | | Load 0x3,0x2
0133 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0134 01d6 | | Execute Vector,Field_Write
0135 e40d | | Load 0x2,0xd
0136 0a01 | | Execute_Immediate Plus,0x1
0137 c40d | | Store 0x2,0xd
0138 4801 |H | Short_Literal 0x1
0139 e5fe | | Load 0x2,-0x2
013a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
013b e9ff | | Load 0x4,-0x1
013c 8214 | | Call 0x1,0x14
013d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
013e 0000 0000 | | .XXX[0x2]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 016e | n | .CONST 0x016e ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0005 | | .CONST 0x0005 ; Number of locals
0143 INIT_0140:
0143 e40d | | Load 0x2,0xd
0144 0aff | | Execute_Immediate Plus,-0x1
0145 e219 | | Load 0x1,0x19
0146 1c08 | | Execute_Immediate Run_Utility,0x8
0147 e40d | | Load 0x2,0xd
0148 0aff | | Execute_Immediate Plus,-0x1
0149 e219 | | Load 0x1,0x19
014a 1c08 | | Execute_Immediate Run_Utility,0x8
014b 4801 |H | Short_Literal 0x1
014c e40d | | Load 0x2,0xd
014d 0aff | | Execute_Immediate Plus,-0x1
014e e602 | | Load 0x3,0x2
014f 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0150 01cf | | Execute Vector,Slice_Read
0151 00d9 | | Load_Top At_Offset_1
0152 00d8 | | Load_Top At_Offset_0
0153 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0154 00da | | Load_Top At_Offset_2
0155 01da | | Execute Vector,Bounds
0156 00da | | Load_Top At_Offset_2
0157 01da | | Execute Vector,Bounds
0158 00da | | Load_Top At_Offset_2
0159 027f | | Execute Discrete,Equal
015a 7001 |p | Jump_Nonzero 0x15c
015b 08e0 | | Execute_Immediate Raise,0xe0
015c 00cd | | Action Spare6_Action
015d 027f | | Execute Discrete,Equal
015e 7001 |p | Jump_Nonzero 0x160
015f 08e0 | | Execute_Immediate Raise,0xe0
0160 00d2 | | Pop_Control Pop_Count_2
0161 00d9 | | Load_Top At_Offset_1
0162 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2
0163 00d9 | | Load_Top At_Offset_1
0164 016d | m | Execute Variant_Record,Structure_Write
0165 00d8 | | Load_Top At_Offset_0
0166 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0167 01dc | | Execute Vector,Last
0168 00e3 | | Load_Encached Natural_Cache
0169 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
016a 00e1 | | Load_Encached Boolean_Cache
016b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
016c 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
016e BODY_0140:
016e e40e | | Load 0x2,0xe
016f 6813 |h | Jump_Zero 0x183
0170 4801 |H | Short_Literal 0x1
0171 e5fe | | Load 0x2,-0x2
0172 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0173 e241 | A | Load 0x1,0x41
0174 e242 | B | Load 0x1,0x42
0175 01cc | | Execute Vector,Catenate
0176 0092 035c | \| Action Push_String_Extended,0x35c ; "??? Received "
0178 01cc | | Execute Vector,Catenate
0179 e802 | | Load 0x4,0x2
017a 8244 | D | Call 0x1,0x44
017b 01cc | | Execute Vector,Catenate
017c e241 | A | Load 0x1,0x41
017d 01cc | | Execute Vector,Catenate
017e e242 | B | Load 0x1,0x42
017f 01cc | | Execute Vector,Catenate
0180 e001 | | Load 0x0,0x1
0181 180f | | Execute Package,Field_Execute,Field_Number 0xf
0182 8214 | | Call 0x1,0x14
0183 608c |` | Indirect_Literal Discrete,0x210,{0x00007fff, 0xffffffff}
0184 a40b | | Store_Unchecked 0x2,0xb
0185 00cf | | Action Mark_Auxiliary
0186 e404 | | Load 0x2,0x4
0187 01d9 | | Execute Vector,Reverse_Bounds
0188 0263 | c | Execute Discrete,Above_Bound
0189 7003 |p | Jump_Nonzero 0x18d
018a 8805 | | Call 0x4,0x5
018b 00c8 | | Action Pop_Auxiliary_Range
018c 3ffd |? | Loop_Increasing 0x18a
018d 00ce | | Action Pop_Auxiliary
018e 00d9 | | Load_Top At_Offset_1
018f 6829 |h) | Jump_Zero 0x1b9
0190 e5fe | | Load 0x2,-0x2
0191 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0192 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0193 607c |`| | Indirect_Literal Discrete,0x210,{0x00007fff, 0xffffffff}
0194 027e | ~ | Execute Discrete,Not_Equal
0195 681a |h | Jump_Zero 0x1b0
0196 00db | | Load_Top At_Offset_3
0197 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0198 0c01 | | Execute_Immediate Greater_Equal,0x1
0199 6816 |h | Jump_Zero 0x1b0
019a 00db | | Load_Top At_Offset_3
019b 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
019c 01dc | | Execute Vector,Last
019d e802 | | Load 0x4,0x2
019e 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
019f 01d5 | | Execute Vector,Field_Reference
01a0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01a1 0f01 | | Execute_Immediate Equal,0x1
01a2 680d |h | Jump_Zero 0x1b0
01a3 e5fe | | Load 0x2,-0x2
01a4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01a5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01a6 e802 | | Load 0x4,0x2
01a7 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01a8 01dc | | Execute Vector,Last
01a9 e802 | | Load 0x4,0x2
01aa 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01ab 01d5 | | Execute Vector,Field_Reference
01ac 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
01ad 0272 | r | Execute Discrete,Minus
01ae c40b | | Store 0x2,0xb
01af 7804 |x | Jump 0x1b4
01b0 e5fe | | Load 0x2,-0x2
01b1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01b2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01b3 a40b | | Store_Unchecked 0x2,0xb
01b4 e40b | | Load 0x2,0xb
01b5 0d01 | | Execute_Immediate Less,0x1
01b6 6802 |h | Jump_Zero 0x1b9
01b7 e226 | & | Load 0x1,0x26
01b8 0257 | W | Execute Discrete,Raise
01b9 00da | | Load_Top At_Offset_2
01ba 0c02 | | Execute_Immediate Greater_Equal,0x2
01bb 6853 |hS | Jump_Zero 0x20f
01bc 00cf | | Action Mark_Auxiliary
01bd 00db | | Load_Top At_Offset_3
01be 0aff | | Execute_Immediate Plus,-0x1
01bf 4801 |H | Short_Literal 0x1
01c0 0263 | c | Execute Discrete,Above_Bound
01c1 7013 |p | Jump_Nonzero 0x1d5
01c2 00d8 | | Load_Top At_Offset_0
01c3 e602 | | Load 0x3,0x2
01c4 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01c5 01d5 | | Execute Vector,Field_Reference
01c6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01c7 700b |p | Jump_Nonzero 0x1d3
01c8 00d8 | | Load_Top At_Offset_0
01c9 e602 | | Load 0x3,0x2
01ca 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01cb 01d5 | | Execute Vector,Field_Reference
01cc 00d8 | | Load_Top At_Offset_0
01cd 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
01ce e245 | E | Load 0x1,0x45
01cf 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d0 00d9 | | Load_Top At_Offset_1
01d1 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
01d2 00d1 | | Pop_Control Pop_Count_1
01d3 00c8 | | Action Pop_Auxiliary_Range
01d4 3fed |? | Loop_Increasing 0x1c2
01d5 00ce | | Action Pop_Auxiliary
01d6 00da | | Load_Top At_Offset_2
01d7 e40d | | Load 0x2,0xd
01d8 0aff | | Execute_Immediate Plus,-0x1
01d9 e602 | | Load 0x3,0x2
01da 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01db 01cf | | Execute Vector,Slice_Read
01dc 4801 |H | Short_Literal 0x1
01dd e40d | | Load 0x2,0xd
01de e803 | | Load 0x4,0x3
01df 0272 | r | Execute Discrete,Minus
01e0 00d8 | | Load_Top At_Offset_0
01e1 00e2 | | Load_Encached Integer_Cache
01e2 0260 | ` | Execute Discrete,In_Type
01e3 7001 |p | Jump_Nonzero 0x1e5
01e4 0801 | | Execute_Immediate Raise,0x1
01e5 e602 | | Load 0x3,0x2
01e6 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01e7 01ce | | Execute Vector,Slice_Write
01e8 e40d | | Load 0x2,0xd
01e9 00db | | Load_Top At_Offset_3
01ea 0aff | | Execute_Immediate Plus,-0x1
01eb 0272 | r | Execute Discrete,Minus
01ec c40d | | Store 0x2,0xd
01ed 00cf | | Action Mark_Auxiliary
01ee e406 | | Load 0x2,0x6
01ef 01d9 | | Execute Vector,Reverse_Bounds
01f0 0263 | c | Execute Discrete,Above_Bound
01f1 701c |p | Jump_Nonzero 0x20e
01f2 00d8 | | Load_Top At_Offset_0
01f3 e406 | | Load 0x2,0x6
01f4 01d5 | | Execute Vector,Field_Reference
01f5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01f7 e803 | | Load 0x4,0x3
01f8 0aff | | Execute_Immediate Plus,-0x1
01f9 0272 | r | Execute Discrete,Minus
01fa 00d9 | | Load_Top At_Offset_1
01fb e406 | | Load 0x2,0x6
01fc 01d5 | | Execute Vector,Field_Reference
01fd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01fe 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01ff 00d8 | | Load_Top At_Offset_0
0200 e406 | | Load 0x2,0x6
0201 01d5 | | Execute Vector,Field_Reference
0202 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0203 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0204 e803 | | Load 0x4,0x3
0205 0aff | | Execute_Immediate Plus,-0x1
0206 0272 | r | Execute Discrete,Minus
0207 00d9 | | Load_Top At_Offset_1
0208 e406 | | Load 0x2,0x6
0209 01d5 | | Execute Vector,Field_Reference
020a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
020b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
020c 00c8 | | Action Pop_Auxiliary_Range
020d 3fe4 |? | Loop_Increasing 0x1f2
020e 00ce | | Action Pop_Auxiliary
020f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0210 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 022a | * | .CONST 0x022a ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b e00d | | Load 0x0,0xd
021c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021e 00e3 | | Load_Encached Natural_Cache
021f e409 | | Load 0x2,0x9
0220 e40b | | Load 0x2,0xb
0221 e5fe | | Load 0x2,-0x2
0222 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0223 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0224 e00d | | Load 0x0,0xd
0225 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0226 00d1 | | Pop_Control Pop_Count_1
0227 c40a | | Store 0x2,0xa
0228 c40c | | Store 0x2,0xc
0229 4501 |E | Exit_Suprogram New_Top_Offset 0x1
022a TRAP_0218:
022a 00d8 | | Load_Top At_Offset_0
022b 0107 | | Execute Exception,Get_Name
022c 4950 |IP | Short_Literal 0x150
022d 495f |I_ | Short_Literal 0x15f
022e 0262 | b | Execute Discrete,In_Range
022f 6805 |h | Jump_Zero 0x235
0230 4800 |H | Short_Literal 0x0
0231 a40a | | Store_Unchecked 0x2,0xa
0232 4802 |H | Short_Literal 0x2
0233 a40c | | Store_Unchecked 0x2,0xc
0234 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0235 0100 | | Execute Exception,Raise
0236 0000 0000 | | .XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0244 | D | .CONST 0x0244 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0003 | | .CONST 0x0003 ; Number of locals
023b INIT_0238:
023b e014 | | Load 0x0,0x14
023c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
023d e014 | | Load 0x0,0x14
023e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023f 011e | | Execute Any,Convert
0240 e408 | | Load 0x2,0x8
0241 00d9 | | Load_Top At_Offset_1
0242 e014 | | Load 0x0,0x14
0243 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0244 BODY_0238:
0244 00d9 | | Load_Top At_Offset_1
0245 c408 | | Store 0x2,0x8
0246 e40d | | Load 0x2,0xd
0247 0c02 | | Execute_Immediate Greater_Equal,0x2
0248 6817 |h | Jump_Zero 0x260
0249 e40d | | Load 0x2,0xd
024a 0aff | | Execute_Immediate Plus,-0x1
024b e602 | | Load 0x3,0x2
024c 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
024d 01d5 | | Execute Vector,Field_Reference
024e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
024f 0f01 | | Execute_Immediate Equal,0x1
0250 680f |h | Jump_Zero 0x260
0251 e40d | | Load 0x2,0xd
0252 0aff | | Execute_Immediate Plus,-0x1
0253 e602 | | Load 0x3,0x2
0254 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0255 01d5 | | Execute Vector,Field_Reference
0256 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0257 00d9 | | Load_Top At_Offset_1
0258 0273 | s | Execute Discrete,Plus
0259 e40d | | Load 0x2,0xd
025a 0aff | | Execute_Immediate Plus,-0x1
025b e602 | | Load 0x3,0x2
025c 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
025d 01d5 | | Execute Vector,Field_Reference
025e 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
025f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0260 4801 |H | Short_Literal 0x1
0261 e247 | G | Load 0x1,0x47
0262 1c08 | | Execute_Immediate Run_Utility,0x8
0263 00d9 | | Load_Top At_Offset_1
0264 00d9 | | Load_Top At_Offset_1
0265 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0266 4800 |H | Short_Literal 0x0
0267 00d9 | | Load_Top At_Offset_1
0268 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0269 e40d | | Load 0x2,0xd
026a e602 | | Load 0x3,0x2
026b 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
026c 01d6 | | Execute Vector,Field_Write
026d e40d | | Load 0x2,0xd
026e 0a01 | | Execute_Immediate Plus,0x1
026f c40d | | Store 0x2,0xd
0270 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0271 0000 0000 | | .BLANK 0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 028b | | .CONST 0x028b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0006 | | .CONST 0x0006 ; Number of locals
027b INIT_0278:
027b e808 | | Load 0x4,0x8
027c e404 | | Load 0x2,0x4
027d 01d5 | | Execute Vector,Field_Reference
027e e5ff | | Load 0x2,-0x1
027f 824d | M | Call 0x1,0x4d
0280 e808 | | Load 0x4,0x8
0281 e406 | | Load 0x2,0x6
0282 01d5 | | Execute Vector,Field_Reference
0283 0007 | | Action Break_Optional
0284 00d8 | | Load_Top At_Offset_0
0285 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0286 0007 | | Action Break_Optional
0287 00d9 | | Load_Top At_Offset_1
0288 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0289 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call
028b BODY_0278:
028b 00db | | Load_Top At_Offset_3
028c ea02 | | Load 0x5,0x2
028d e802 | | Load 0x4,0x2
028e 824c | L | Call 0x1,0x4c
028f 00d1 | | Pop_Control Pop_Count_1
0290 e40e | | Load 0x2,0xe
0291 6815 |h | Jump_Zero 0x2a7
0292 4801 |H | Short_Literal 0x1
0293 e5fe | | Load 0x2,-0x2
0294 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0295 0092 035d | ]| Action Push_String_Extended,0x35d ; "??? Finger "
0297 ea03 | | Load 0x5,0x3
0298 8017 | | Call 0x0,0x17
0299 01cc | | Execute Vector,Catenate
029a 0092 035e | ^| Action Push_String_Extended,0x35e ; ", Cue "
029c 01cc | | Execute Vector,Catenate
029d ea02 | | Load 0x5,0x2
029e 8244 | D | Call 0x1,0x44
029f 01cc | | Execute Vector,Catenate
02a0 e241 | A | Load 0x1,0x41
02a1 01cc | | Execute Vector,Catenate
02a2 e242 | B | Load 0x1,0x42
02a3 01cc | | Execute Vector,Catenate
02a4 e001 | | Load 0x0,0x1
02a5 180f | | Execute Package,Field_Execute,Field_Number 0xf
02a6 8214 | | Call 0x1,0x14
02a7 00da | | Load_Top At_Offset_2
02a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02a9 ea02 | | Load 0x5,0x2
02aa 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
02ab 01dc | | Execute Vector,Last
02ac 027d | } | Execute Discrete,Greater
02ad 684e |hN | Jump_Zero 0x2fc
02ae e5ff | | Load 0x2,-0x1
02af e802 | | Load 0x4,0x2
02b0 8229 | ) | Call 0x1,0x29
02b1 701e |p | Jump_Nonzero 0x2d0
02b2 4801 |H | Short_Literal 0x1
02b3 e5fe | | Load 0x2,-0x2
02b4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
02b5 e241 | A | Load 0x1,0x41
02b6 e242 | B | Load 0x1,0x42
02b7 01cc | | Execute Vector,Catenate
02b8 0092 035f | _| Action Push_String_Extended,0x35f ; "%%% Received "
02ba 01cc | | Execute Vector,Catenate
02bb e802 | | Load 0x4,0x2
02bc 8244 | D | Call 0x1,0x44
02bd 01cc | | Execute Vector,Catenate
02be e241 | A | Load 0x1,0x41
02bf 01cc | | Execute Vector,Catenate
02c0 e242 | B | Load 0x1,0x42
02c1 01cc | | Execute Vector,Catenate
02c2 0092 0360 | `| Action Push_String_Extended,0x360 ; "%%% doesn't match "
02c4 01cc | | Execute Vector,Catenate
02c5 e5ff | | Load 0x2,-0x1
02c6 8244 | D | Call 0x1,0x44
02c7 01cc | | Execute Vector,Catenate
02c8 e241 | A | Load 0x1,0x41
02c9 01cc | | Execute Vector,Catenate
02ca e242 | B | Load 0x1,0x42
02cb 01cc | | Execute Vector,Catenate
02cc e001 | | Load 0x0,0x1
02cd 180f | | Execute Package,Field_Execute,Field_Number 0xf
02ce 8214 | | Call 0x1,0x14
02cf 0887 | | Execute_Immediate Raise,0x87
02d0 e40e | | Load 0x2,0xe
02d1 680c |h | Jump_Zero 0x2de
02d2 4801 |H | Short_Literal 0x1
02d3 e5fe | | Load 0x2,-0x2
02d4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
02d5 0092 0361 | a| Action Push_String_Extended,0x361 ; "??? Match"
02d7 e241 | A | Load 0x1,0x41
02d8 01cc | | Execute Vector,Catenate
02d9 e242 | B | Load 0x1,0x42
02da 01cc | | Execute Vector,Catenate
02db e001 | | Load 0x0,0x1
02dc 180f | | Execute Package,Field_Execute,Field_Number 0xf
02dd 8214 | | Call 0x1,0x14
02de 00cf | | Action Mark_Auxiliary
02df e802 | | Load 0x4,0x2
02e0 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
02e1 01d9 | | Execute Vector,Reverse_Bounds
02e2 0263 | c | Execute Discrete,Above_Bound
02e3 7013 |p | Jump_Nonzero 0x2f7
02e4 00d8 | | Load_Top At_Offset_0
02e5 e802 | | Load 0x4,0x2
02e6 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
02e7 01d5 | | Execute Vector,Field_Reference
02e8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02e9 700b |p | Jump_Nonzero 0x2f5
02ea 00d8 | | Load_Top At_Offset_0
02eb e802 | | Load 0x4,0x2
02ec 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
02ed 01d5 | | Execute Vector,Field_Reference
02ee 00d8 | | Load_Top At_Offset_0
02ef 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
02f0 e245 | E | Load 0x1,0x45
02f1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02f2 00d9 | | Load_Top At_Offset_1
02f3 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
02f4 00d1 | | Pop_Control Pop_Count_1
02f5 00c8 | | Action Pop_Auxiliary_Range
02f6 3fed |? | Loop_Increasing 0x2e4
02f7 00ce | | Action Pop_Auxiliary
02f8 e802 | | Load 0x4,0x2
02f9 00cb | | Action Pop_Block_With_Result
02fa 00cb | | Action Pop_Block_With_Result
02fb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02fc 00da | | Load_Top At_Offset_2
02fd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02fe ea02 | | Load 0x5,0x2
02ff 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0300 01d5 | | Execute Vector,Field_Reference
0301 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0302 0f01 | | Execute_Immediate Equal,0x1
0303 6803 |h | Jump_Zero 0x307
0304 4800 |H | Short_Literal 0x0
0305 a804 | | Store_Unchecked 0x4,0x4
0306 8a06 | | Call 0x5,0x6
0307 00da | | Load_Top At_Offset_2
0308 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0309 0c02 | | Execute_Immediate Greater_Equal,0x2
030a 6803 |h | Jump_Zero 0x30e
030b 4801 |H | Short_Literal 0x1
030c a803 | | Store_Unchecked 0x4,0x3
030d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
030e e803 | | Load 0x4,0x3
030f 00db | | Load_Top At_Offset_3
0310 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0311 027d | } | Execute Discrete,Greater
0312 6803 |h | Jump_Zero 0x316
0313 00da | | Load_Top At_Offset_2
0314 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0315 a803 | | Store_Unchecked 0x4,0x3
0316 e803 | | Load 0x4,0x3
0317 00da | | Load_Top At_Offset_2
0318 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0319 027d | } | Execute Discrete,Greater
031a 6803 |h | Jump_Zero 0x31e
031b 00d9 | | Load_Top At_Offset_1
031c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
031d a803 | | Store_Unchecked 0x4,0x3
031e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
031f 0000 | | .XXX[0x1]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 032a | * | .CONST 0x032a ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0002 | | .CONST 0x0002 ; Number of locals
0323 INIT_0320:
0323 ea04 | | Load 0x5,0x4
0324 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0325 ea02 | | Load 0x5,0x2
0326 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0327 01d5 | | Execute Vector,Field_Reference
0328 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0329 0007 | | Action Break_Optional
032a BODY_0320:
032a 00d8 | | Load_Top At_Offset_0
032b 602c |`, | Indirect_Literal Discrete,0x358,{0x00007fff, 0xffffffff}
032c 027b | { | Execute Discrete,Greater_Equal
032d 6801 |h | Jump_Zero 0x32f
032e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
032f ea04 | | Load 0x5,0x4
0330 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0331 e802 | | Load 0x4,0x2
0332 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0333 01dc | | Execute Vector,Last
0334 027a | z | Execute Discrete,Less_Equal
0335 681c |h | Jump_Zero 0x352
0336 ea04 | | Load 0x5,0x4
0337 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0338 e802 | | Load 0x4,0x2
0339 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
033a 01d5 | | Execute Vector,Field_Reference
033b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
033c 0f01 | | Execute_Immediate Equal,0x1
033d 6814 |h | Jump_Zero 0x352
033e 00d8 | | Load_Top At_Offset_0
033f ea04 | | Load 0x5,0x4
0340 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0341 e802 | | Load 0x4,0x2
0342 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0343 01d5 | | Execute Vector,Field_Reference
0344 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0345 ea04 | | Load 0x5,0x4
0346 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0347 0272 | r | Execute Discrete,Minus
0348 0272 | r | Execute Discrete,Minus
0349 00d8 | | Load_Top At_Offset_0
034a 00e7 | | Load_Encached Duration_Cache
034b 0260 | ` | Execute Discrete,In_Type
034c 7001 |p | Jump_Nonzero 0x34e
034d 0801 | | Execute_Immediate Raise,0x1
034e e40b | | Load 0x2,0xb
034f 8018 | | Call 0x0,0x18
0350 a40b | | Store_Unchecked 0x2,0xb
0351 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0352 00d8 | | Load_Top At_Offset_0
0353 e40b | | Load 0x2,0xb
0354 8018 | | Call 0x0,0x18
0355 a40b | | Store_Unchecked 0x2,0xb
0356 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0357 0000 | | .XXX[0x1]
0358 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
035c ; --------------------------------------------------------------------------------------
035c ; STRING TABLE
035c ; --------------------------------------------------------------------------------------
035c 000e | | .STRTAB 0x000e->0x0363 ; "??? Received "
035d 0019 | | .STRTAB 0x0019->0x0369 ; "??? Finger "
035e 0022 | " | .STRTAB 0x0022->0x036f ; ", Cue "
035f 0026 | & | .STRTAB 0x0026->0x0372 ; "%%% Received "
0360 0031 | 1 | .STRTAB 0x0031->0x0378 ; "%%% doesn't match "
0361 0041 | A | .STRTAB 0x0041->0x0381 ; "??? Match"
0362 0048 | H | .STREND 0x0048->0x0386
0363 3f3f 3f20 |??? | .STRTAB_STRINGS
0386 0000 0000 | | .XXX[0x2]
0388 ; --------------------------------------------------------------------------------------
0388 ; Debug Table
0388 ; --------------------------------------------------------------------------------------
0388 0004 000a | | .DEBUG4 0x0004,0x000a,0x7e44,0x0000,0x0001,0x0000
038e 0000 0000 | | .BLANK 0000[0x4]
0392 ee7a e850 | z P| .XXX[0x8]
0394 0009 66d8 | f |
0396 0000 0000 | |
0398 0020 c4e8 | |
039a 0000 0000 | | .BLANK 0000[0x4]
039e 767f 5428 |v T(| .XXX[0x4]
03a0 0003 ff90 | |
03a2 0000 0000 | | .BLANK 0000[0x4]
03a6 773d 7428 |w=t(| .XXX[0x8]
03a8 0004 b0dc | |
03aa 0000 0000 | |
03ac 0010 6778 | gx|
03ae 0000 0000 | | .BLANK 0000[0x4]
03b2 3b3f aa14 |;? | .XXX[0x4]
03b4 0001 ffc8 | |
03b6 0000 0000 | | .BLANK 0000[0x4]
03ba 3b8e a214 |; | .XXX[0x4]
03bc 0001 aec6 | |
03be 0000 0000 | | .BLANK 0000[0x4]
03c2 3b9e ba14 |; | .XXX[0x8]
03c4 0002 5e58 | ^X|
03c6 0000 0000 | |
03c8 0008 373e | 7>|
03ca 0000 0000 | | .BLANK 0000[0x4]
03ce 1dc7 510a | Q | .XXX[0x4]
03d0 0000 d763 | c|
03d2 0000 0000 | | .BLANK 0000[0x4]
03d6 1dcf 5d0a | ] | .XXX[0x10]
03d8 0001 2f2c | /,|
03da 0000 0000 | |
03dc 0004 1ce0 | |
03de 0000 0000 | |
03e0 0005 58bc | X |
03e2 8ee3 a885 | |
03e4 0000 98fb | |
03e6 0000 0000 | | .BLANK 0000[0x6]
03ec 09a6 b004 | | .XXX[0x14]
03ee 0000 0001 | |
03f0 0001 0404 | |
03f2 0000 0700 | |
03f4 09a6 b004 | |
03f6 0000 0670 | p|
03f8 fec7 0028 | (|
03fa 4000 0001 |@ |
03fc 0000 0000 | |
03fe 0000 0008 | |