|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_238cfa
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
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 0230 | 0 | .CONST 0x0230 ; 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 0014 | | .CONST 0x0014 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000e | | .CONST 0x000e ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0011 00c7 | | Action Elaborate_Subprogram
0012 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0013 00c7 | | Action Elaborate_Subprogram
0014 BODY_0008:
0014 00bc | | Action Signal_Activated
0015 00bb | | Action Signal_Completion
0016 0000 0000 | | .XXX[0x2]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001c | | .CONST 0x001c ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0001 | | .CONST 0x0001 ; Number of locals
001b INIT_0018:
001b 0007 | | Action Break_Optional
001c BODY_0018:
001c 4801 |H | Short_Literal 0x1
001d 480d |H | Short_Literal 0xd
001e e003 | | Load 0x0,0x3
001f 035b | [ | Declare_Type Array,Constrained
0020 0337 | 7 | Declare_Variable Array
0021 e004 | | Load 0x0,0x4
0022 0337 | 7 | Declare_Variable Array
0023 e005 | | Load 0x0,0x5
0024 8006 | | Call 0x0,0x6
0025 4800 |H | Short_Literal 0x0
0026 00da | | Load_Top At_Offset_2
0027 01d6 | | Execute Vector,Field_Write
0028 e004 | | Load 0x0,0x4
0029 01c3 | | Execute Vector,Check_In_Type
002a 8007 | | Call 0x0,0x7
002b 4801 |H | Short_Literal 0x1
002c 00da | | Load_Top At_Offset_2
002d 01d6 | | Execute Vector,Field_Write
002e e008 | | Load 0x0,0x8
002f 0337 | 7 | Declare_Variable Array
0030 e009 | | Load 0x0,0x9
0031 800a | | Call 0x0,0xa
0032 4800 |H | Short_Literal 0x0
0033 00da | | Load_Top At_Offset_2
0034 01d6 | | Execute Vector,Field_Write
0035 e008 | | Load 0x0,0x8
0036 01c3 | | Execute Vector,Check_In_Type
0037 800b | | Call 0x0,0xb
0038 4802 |H | Short_Literal 0x2
0039 00da | | Load_Top At_Offset_2
003a 01d6 | | Execute Vector,Field_Write
003b e00c | | Load 0x0,0xc
003c 0337 | 7 | Declare_Variable Array
003d 480d |H | Short_Literal 0xd
003e 800d | | Call 0x0,0xd
003f 4800 |H | Short_Literal 0x0
0040 00da | | Load_Top At_Offset_2
0041 01d6 | | Execute Vector,Field_Write
0042 e00c | | Load 0x0,0xc
0043 01c3 | | Execute Vector,Check_In_Type
0044 800e | | Call 0x0,0xe
0045 4803 |H | Short_Literal 0x3
0046 00da | | Load_Top At_Offset_2
0047 01d6 | | Execute Vector,Field_Write
0048 e00f | | Load 0x0,0xf
0049 0337 | 7 | Declare_Variable Array
004a 480d |H | Short_Literal 0xd
004b 8010 | | Call 0x0,0x10
004c 4800 |H | Short_Literal 0x0
004d 00da | | Load_Top At_Offset_2
004e 01d6 | | Execute Vector,Field_Write
004f e00f | | Load 0x0,0xf
0050 01c3 | | Execute Vector,Check_In_Type
0051 8011 | | Call 0x0,0x11
0052 4804 |H | Short_Literal 0x4
0053 00da | | Load_Top At_Offset_2
0054 01d6 | | Execute Vector,Field_Write
0055 e012 | | Load 0x0,0x12
0056 0337 | 7 | Declare_Variable Array
0057 8013 | | Call 0x0,0x13
0058 4800 |H | Short_Literal 0x0
0059 00da | | Load_Top At_Offset_2
005a 01d6 | | Execute Vector,Field_Write
005b e012 | | Load 0x0,0x12
005c 01c3 | | Execute Vector,Check_In_Type
005d 8014 | | Call 0x0,0x14
005e 4805 |H | Short_Literal 0x5
005f 00da | | Load_Top At_Offset_2
0060 01d6 | | Execute Vector,Field_Write
0061 e015 | | Load 0x0,0x15
0062 0337 | 7 | Declare_Variable Array
0063 8013 | | Call 0x0,0x13
0064 4800 |H | Short_Literal 0x0
0065 00da | | Load_Top At_Offset_2
0066 01d6 | | Execute Vector,Field_Write
0067 e015 | | Load 0x0,0x15
0068 01c3 | | Execute Vector,Check_In_Type
0069 8016 | | Call 0x0,0x16
006a 4806 |H | Short_Literal 0x6
006b 00da | | Load_Top At_Offset_2
006c 01d6 | | Execute Vector,Field_Write
006d e017 | | Load 0x0,0x17
006e 0337 | 7 | Declare_Variable Array
006f 8013 | | Call 0x0,0x13
0070 4800 |H | Short_Literal 0x0
0071 00da | | Load_Top At_Offset_2
0072 01d6 | | Execute Vector,Field_Write
0073 e017 | | Load 0x0,0x17
0074 01c3 | | Execute Vector,Check_In_Type
0075 8018 | | Call 0x0,0x18
0076 4807 |H | Short_Literal 0x7
0077 00da | | Load_Top At_Offset_2
0078 01d6 | | Execute Vector,Field_Write
0079 e019 | | Load 0x0,0x19
007a 0337 | 7 | Declare_Variable Array
007b 8013 | | Call 0x0,0x13
007c 4800 |H | Short_Literal 0x0
007d 00da | | Load_Top At_Offset_2
007e 01d6 | | Execute Vector,Field_Write
007f e019 | | Load 0x0,0x19
0080 01c3 | | Execute Vector,Check_In_Type
0081 801a | | Call 0x0,0x1a
0082 4808 |H | Short_Literal 0x8
0083 00da | | Load_Top At_Offset_2
0084 01d6 | | Execute Vector,Field_Write
0085 e01b | | Load 0x0,0x1b
0086 0337 | 7 | Declare_Variable Array
0087 8013 | | Call 0x0,0x13
0088 4800 |H | Short_Literal 0x0
0089 00da | | Load_Top At_Offset_2
008a 01d6 | | Execute Vector,Field_Write
008b e01b | | Load 0x0,0x1b
008c 01c3 | | Execute Vector,Check_In_Type
008d 801c | | Call 0x0,0x1c
008e 4809 |H | Short_Literal 0x9
008f 00da | | Load_Top At_Offset_2
0090 01d6 | | Execute Vector,Field_Write
0091 e01d | | Load 0x0,0x1d
0092 0337 | 7 | Declare_Variable Array
0093 8013 | | Call 0x0,0x13
0094 4800 |H | Short_Literal 0x0
0095 00da | | Load_Top At_Offset_2
0096 01d6 | | Execute Vector,Field_Write
0097 e01d | | Load 0x0,0x1d
0098 01c3 | | Execute Vector,Check_In_Type
0099 801e | | Call 0x0,0x1e
009a 480a |H | Short_Literal 0xa
009b 00da | | Load_Top At_Offset_2
009c 01d6 | | Execute Vector,Field_Write
009d e01f | | Load 0x0,0x1f
009e 0337 | 7 | Declare_Variable Array
009f 8013 | | Call 0x0,0x13
00a0 4800 |H | Short_Literal 0x0
00a1 00da | | Load_Top At_Offset_2
00a2 01d6 | | Execute Vector,Field_Write
00a3 e01f | | Load 0x0,0x1f
00a4 01c3 | | Execute Vector,Check_In_Type
00a5 8020 | | Call 0x0,0x20
00a6 480b |H | Short_Literal 0xb
00a7 00da | | Load_Top At_Offset_2
00a8 01d6 | | Execute Vector,Field_Write
00a9 e021 | ! | Load 0x0,0x21
00aa 0337 | 7 | Declare_Variable Array
00ab 8013 | | Call 0x0,0x13
00ac 4800 |H | Short_Literal 0x0
00ad 00da | | Load_Top At_Offset_2
00ae 01d6 | | Execute Vector,Field_Write
00af e021 | ! | Load 0x0,0x21
00b0 01c3 | | Execute Vector,Check_In_Type
00b1 8022 | " | Call 0x0,0x22
00b2 480c |H | Short_Literal 0xc
00b3 00da | | Load_Top At_Offset_2
00b4 01d6 | | Execute Vector,Field_Write
00b5 e023 | # | Load 0x0,0x23
00b6 0337 | 7 | Declare_Variable Array
00b7 8013 | | Call 0x0,0x13
00b8 4800 |H | Short_Literal 0x0
00b9 00da | | Load_Top At_Offset_2
00ba 01d6 | | Execute Vector,Field_Write
00bb e023 | # | Load 0x0,0x23
00bc 01c3 | | Execute Vector,Check_In_Type
00bd 8024 | $ | Call 0x0,0x24
00be 480d |H | Short_Literal 0xd
00bf 00da | | Load_Top At_Offset_2
00c0 01d6 | | Execute Vector,Field_Write
00c1 e003 | | Load 0x0,0x3
00c2 01c6 | | Execute Vector,Convert_To_Formal
00c3 00ca | | Action Exit_Nullary_Function
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 015d | ] | .CONST 0x015d ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 001f | | .CONST 0x001f ; Number of locals
00cb INIT_00c8:
00cb 4801 |H | Short_Literal 0x1
00cc 00db | | Load_Top At_Offset_3
00cd 01d5 | | Execute Vector,Field_Reference
00ce 0007 | | Action Break_Optional
00cf 4802 |H | Short_Literal 0x2
00d0 e5ff | | Load 0x2,-0x1
00d1 01d5 | | Execute Vector,Field_Reference
00d2 0007 | | Action Break_Optional
00d3 4803 |H | Short_Literal 0x3
00d4 e5ff | | Load 0x2,-0x1
00d5 01d5 | | Execute Vector,Field_Reference
00d6 0007 | | Action Break_Optional
00d7 4804 |H | Short_Literal 0x4
00d8 e5ff | | Load 0x2,-0x1
00d9 01d5 | | Execute Vector,Field_Reference
00da 0007 | | Action Break_Optional
00db 4805 |H | Short_Literal 0x5
00dc e5ff | | Load 0x2,-0x1
00dd 01d5 | | Execute Vector,Field_Reference
00de 0007 | | Action Break_Optional
00df 4806 |H | Short_Literal 0x6
00e0 e5ff | | Load 0x2,-0x1
00e1 01d5 | | Execute Vector,Field_Reference
00e2 0007 | | Action Break_Optional
00e3 4807 |H | Short_Literal 0x7
00e4 e5ff | | Load 0x2,-0x1
00e5 01d5 | | Execute Vector,Field_Reference
00e6 0007 | | Action Break_Optional
00e7 4808 |H | Short_Literal 0x8
00e8 e5ff | | Load 0x2,-0x1
00e9 01d5 | | Execute Vector,Field_Reference
00ea 0007 | | Action Break_Optional
00eb 4809 |H | Short_Literal 0x9
00ec e5ff | | Load 0x2,-0x1
00ed 01d5 | | Execute Vector,Field_Reference
00ee 0007 | | Action Break_Optional
00ef 480a |H | Short_Literal 0xa
00f0 e5ff | | Load 0x2,-0x1
00f1 01d5 | | Execute Vector,Field_Reference
00f2 0007 | | Action Break_Optional
00f3 480b |H | Short_Literal 0xb
00f4 e5ff | | Load 0x2,-0x1
00f5 01d5 | | Execute Vector,Field_Reference
00f6 0007 | | Action Break_Optional
00f7 480c |H | Short_Literal 0xc
00f8 e5ff | | Load 0x2,-0x1
00f9 01d5 | | Execute Vector,Field_Reference
00fa 0007 | | Action Break_Optional
00fb 480d |H | Short_Literal 0xd
00fc e5ff | | Load 0x2,-0x1
00fd 01d5 | | Execute Vector,Field_Reference
00fe 0007 | | Action Break_Optional
00ff e025 | % | Load 0x0,0x25
0100 02ff | | Declare_Variable Variant_Record
0101 4800 |H | Short_Literal 0x0
0102 e408 | | Load 0x2,0x8
0103 8026 | & | Call 0x0,0x26
0104 00d9 | | Load_Top At_Offset_1
0105 016d | m | Execute Variant_Record,Structure_Write
0106 e025 | % | Load 0x0,0x25
0107 02ff | | Declare_Variable Variant_Record
0108 4800 |H | Short_Literal 0x0
0109 e405 | | Load 0x2,0x5
010a 8027 | ' | Call 0x0,0x27
010b 00d9 | | Load_Top At_Offset_1
010c 016d | m | Execute Variant_Record,Structure_Write
010d e025 | % | Load 0x0,0x25
010e 02ff | | Declare_Variable Variant_Record
010f 4800 |H | Short_Literal 0x0
0110 e40b | | Load 0x2,0xb
0111 8028 | ( | Call 0x0,0x28
0112 00d9 | | Load_Top At_Offset_1
0113 016d | m | Execute Variant_Record,Structure_Write
0114 e025 | % | Load 0x0,0x25
0115 02ff | | Declare_Variable Variant_Record
0116 4800 |H | Short_Literal 0x0
0117 e403 | | Load 0x2,0x3
0118 8029 | ) | Call 0x0,0x29
0119 00d9 | | Load_Top At_Offset_1
011a 016d | m | Execute Variant_Record,Structure_Write
011b e025 | % | Load 0x0,0x25
011c 02ff | | Declare_Variable Variant_Record
011d 4800 |H | Short_Literal 0x0
011e e406 | | Load 0x2,0x6
011f 802a | * | Call 0x0,0x2a
0120 00d9 | | Load_Top At_Offset_1
0121 016d | m | Execute Variant_Record,Structure_Write
0122 e025 | % | Load 0x0,0x25
0123 02ff | | Declare_Variable Variant_Record
0124 4800 |H | Short_Literal 0x0
0125 e407 | | Load 0x2,0x7
0126 802b | + | Call 0x0,0x2b
0127 00d9 | | Load_Top At_Offset_1
0128 016d | m | Execute Variant_Record,Structure_Write
0129 e025 | % | Load 0x0,0x25
012a 02ff | | Declare_Variable Variant_Record
012b 4800 |H | Short_Literal 0x0
012c e409 | | Load 0x2,0x9
012d 802c | , | Call 0x0,0x2c
012e 00d9 | | Load_Top At_Offset_1
012f 016d | m | Execute Variant_Record,Structure_Write
0130 e025 | % | Load 0x0,0x25
0131 02ff | | Declare_Variable Variant_Record
0132 4800 |H | Short_Literal 0x0
0133 e404 | | Load 0x2,0x4
0134 802d | - | Call 0x0,0x2d
0135 00d9 | | Load_Top At_Offset_1
0136 016d | m | Execute Variant_Record,Structure_Write
0137 e025 | % | Load 0x0,0x25
0138 02ff | | Declare_Variable Variant_Record
0139 4800 |H | Short_Literal 0x0
013a e40c | | Load 0x2,0xc
013b 802e | . | Call 0x0,0x2e
013c 00d9 | | Load_Top At_Offset_1
013d 016d | m | Execute Variant_Record,Structure_Write
013e e025 | % | Load 0x0,0x25
013f 02ff | | Declare_Variable Variant_Record
0140 4800 |H | Short_Literal 0x0
0141 e40d | | Load 0x2,0xd
0142 802f | / | Call 0x0,0x2f
0143 00d9 | | Load_Top At_Offset_1
0144 016d | m | Execute Variant_Record,Structure_Write
0145 e025 | % | Load 0x0,0x25
0146 02ff | | Declare_Variable Variant_Record
0147 00d8 | | Load_Top At_Offset_0
0148 1c00 | | Execute_Immediate Run_Utility,0x0
0149 e025 | % | Load 0x0,0x25
014a 02ff | | Declare_Variable Variant_Record
014b 00d8 | | Load_Top At_Offset_0
014c 1c00 | | Execute_Immediate Run_Utility,0x0
014d e025 | % | Load 0x0,0x25
014e 02ff | | Declare_Variable Variant_Record
014f 00d8 | | Load_Top At_Offset_0
0150 1c00 | | Execute_Immediate Run_Utility,0x0
0151 e025 | % | Load 0x0,0x25
0152 02ff | | Declare_Variable Variant_Record
0153 00d8 | | Load_Top At_Offset_0
0154 1c00 | | Execute_Immediate Run_Utility,0x0
0155 e025 | % | Load 0x0,0x25
0156 02ff | | Declare_Variable Variant_Record
0157 00d8 | | Load_Top At_Offset_0
0158 1c00 | | Execute_Immediate Run_Utility,0x0
0159 00e2 | | Load_Encached Integer_Cache
015a e030 | 0 | Load 0x0,0x30
015b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
015c 0322 | " | Declare_Variable Record
015d BODY_00c8:
015d e031 | 1 | Load 0x0,0x31
015e 4800 |H | Short_Literal 0x0
015f e402 | | Load 0x2,0x2
0160 8032 | 2 | Call 0x0,0x32
0161 e033 | 3 | Load 0x0,0x33
0162 8034 | 4 | Call 0x0,0x34
0163 e419 | | Load 0x2,0x19
0164 016d | m | Execute Variant_Record,Structure_Write
0165 e419 | | Load 0x2,0x19
0166 4800 |H | Short_Literal 0x0
0167 e408 | | Load 0x2,0x8
0168 8035 | 5 | Call 0x0,0x35
0169 e415 | | Load 0x2,0x15
016a e033 | 3 | Load 0x0,0x33
016b 8036 | 6 | Call 0x0,0x36
016c e037 | 7 | Load 0x0,0x37
016d 8034 | 4 | Call 0x0,0x34
016e 00db | | Load_Top At_Offset_3
016f 016d | m | Execute Variant_Record,Structure_Write
0170 00da | | Load_Top At_Offset_2
0171 e419 | | Load 0x2,0x19
0172 8038 | 8 | Call 0x0,0x38
0173 e41a | | Load 0x2,0x1a
0174 016d | m | Execute Variant_Record,Structure_Write
0175 e41a | | Load 0x2,0x1a
0176 4800 |H | Short_Literal 0x0
0177 e405 | | Load 0x2,0x5
0178 8039 | 9 | Call 0x0,0x39
0179 e411 | | Load 0x2,0x11
017a e419 | | Load 0x2,0x19
017b 8038 | 8 | Call 0x0,0x38
017c e41b | | Load 0x2,0x1b
017d 016d | m | Execute Variant_Record,Structure_Write
017e e41b | | Load 0x2,0x1b
017f 4800 |H | Short_Literal 0x0
0180 e403 | | Load 0x2,0x3
0181 803a | : | Call 0x0,0x3a
0182 e412 | | Load 0x2,0x12
0183 e41b | | Load 0x2,0x1b
0184 8038 | 8 | Call 0x0,0x38
0185 e41c | | Load 0x2,0x1c
0186 016d | m | Execute Variant_Record,Structure_Write
0187 00db | | Load_Top At_Offset_3
0188 4800 |H | Short_Literal 0x0
0189 e406 | | Load 0x2,0x6
018a 803b | ; | Call 0x0,0x3b
018b e413 | | Load 0x2,0x13
018c e41c | | Load 0x2,0x1c
018d 8038 | 8 | Call 0x0,0x38
018e 4800 |H | Short_Literal 0x0
018f e407 | | Load 0x2,0x7
0190 803c | < | Call 0x0,0x3c
0191 e03d | = | Load 0x0,0x3d
0192 4800 |H | Short_Literal 0x0
0193 e40a | | Load 0x2,0xa
0194 803e | > | Call 0x0,0x3e
0195 e009 | | Load 0x0,0x9
0196 e418 | | Load 0x2,0x18
0197 803f | ? | Call 0x0,0x3f
0198 6827 |h' | Jump_Zero 0x1c0
0199 e418 | | Load 0x2,0x18
019a 8040 | @ | Call 0x0,0x40
019b e417 | | Load 0x2,0x17
019c 8040 | @ | Call 0x0,0x40
019d 6082 |` | Indirect_Literal Discrete,0x220,{0x00000000, 0x00007333}
019e 0271 | q | Execute Discrete,Times
019f 00d8 | | Load_Top At_Offset_0
01a0 0c00 | | Execute_Immediate Greater_Equal,0x0
01a1 7002 |p | Jump_Nonzero 0x1a4
01a2 6079 |`y | Indirect_Literal Discrete,0x21c,{0xffffffff, 0xffffc000}
01a3 7801 |x | Jump 0x1a5
01a4 6073 |`s | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
01a5 0273 | s | Execute Discrete,Plus
01a6 09f1 | | Execute_Immediate Binary_Scale,-0xf
01a7 00e2 | | Load_Encached Integer_Cache
01a8 025e | ^ | Execute Discrete,Convert
01a9 027c | | | Execute Discrete,Less
01aa 6811 |h | Jump_Zero 0x1bc
01ab e418 | | Load 0x2,0x18
01ac e417 | | Load 0x2,0x17
01ad e416 | | Load 0x2,0x16
01ae 8041 | A | Call 0x0,0x41
01af 8038 | 8 | Call 0x0,0x38
01b0 4800 |H | Short_Literal 0x0
01b1 e404 | | Load 0x2,0x4
01b2 8042 | B | Call 0x0,0x42
01b3 e418 | | Load 0x2,0x18
01b4 e417 | | Load 0x2,0x17
01b5 e416 | | Load 0x2,0x16
01b6 8043 | C | Call 0x0,0x43
01b7 8038 | 8 | Call 0x0,0x38
01b8 8041 | A | Call 0x0,0x41
01b9 4800 |H | Short_Literal 0x0
01ba e40e | | Load 0x2,0xe
01bb 8044 | D | Call 0x0,0x44
01bc e009 | | Load 0x0,0x9
01bd 4800 |H | Short_Literal 0x0
01be e40d | | Load 0x2,0xd
01bf 8045 | E | Call 0x0,0x45
01c0 e046 | F | Load 0x0,0x46
01c1 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01c2 e046 | F | Load 0x0,0x46
01c3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01c4 e030 | 0 | Load 0x0,0x30
01c5 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01c6 00d9 | | Load_Top At_Offset_1
01c7 017d | } | Execute Record,Structure_Write
01c8 00d8 | | Load_Top At_Offset_0
01c9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01ca 6049 |`I | Indirect_Literal Discrete,0x214,{0x00000000, 0x0000ea60}
01cb 0271 | q | Execute Discrete,Times
01cc 005a | Z | Store_Top Discrete,At_Offset_2
01cd 00d9 | | Load_Top At_Offset_1
01ce 00d9 | | Load_Top At_Offset_1
01cf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
01d0 4be8 |K | Short_Literal 0x3e8
01d1 0271 | q | Execute Discrete,Times
01d2 0273 | s | Execute Discrete,Plus
01d3 005a | Z | Store_Top Discrete,At_Offset_2
01d4 00d9 | | Load_Top At_Offset_1
01d5 00d9 | | Load_Top At_Offset_1
01d6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01d7 0273 | s | Execute Discrete,Plus
01d8 005a | Z | Store_Top Discrete,At_Offset_2
01d9 e047 | G | Load 0x0,0x47
01da 00da | | Load_Top At_Offset_2
01db 00e0 | | Load_Encached Standard_Cache
01dc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01dd 0092 0224 | $| Action Push_String_Extended,0x224 ; " "
01df 01cc | | Execute Vector,Catenate
01e0 e419 | | Load 0x2,0x19
01e1 8040 | @ | Call 0x0,0x40
01e2 00e0 | | Load_Encached Standard_Cache
01e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e4 01cc | | Execute Vector,Catenate
01e5 0092 0224 | $| Action Push_String_Extended,0x224 ; " "
01e7 01cc | | Execute Vector,Catenate
01e8 e415 | | Load 0x2,0x15
01e9 8040 | @ | Call 0x0,0x40
01ea 00e0 | | Load_Encached Standard_Cache
01eb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ec 01cc | | Execute Vector,Catenate
01ed 0092 0224 | $| Action Push_String_Extended,0x224 ; " "
01ef 01cc | | Execute Vector,Catenate
01f0 e41a | | Load 0x2,0x1a
01f1 8040 | @ | Call 0x0,0x40
01f2 00e0 | | Load_Encached Standard_Cache
01f3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01f4 01cc | | Execute Vector,Catenate
01f5 e416 | | Load 0x2,0x16
01f6 8040 | @ | Call 0x0,0x40
01f7 00e0 | | Load_Encached Standard_Cache
01f8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01f9 01cc | | Execute Vector,Catenate
01fa 0092 0225 | %| Action Push_String_Extended,0x225 ; " A"
01fc 01cc | | Execute Vector,Catenate
01fd 0092 0224 | $| Action Push_String_Extended,0x224 ; " "
01ff 01cc | | Execute Vector,Catenate
0200 4800 |H | Short_Literal 0x0
0201 e40e | | Load 0x2,0xe
0202 8049 | I | Call 0x0,0x49
0203 00e0 | | Load_Encached Standard_Cache
0204 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0205 01cc | | Execute Vector,Catenate
0206 0092 0224 | $| Action Push_String_Extended,0x224 ; " "
0208 01cc | | Execute Vector,Catenate
0209 4800 |H | Short_Literal 0x0
020a e404 | | Load 0x2,0x4
020b 804a | J | Call 0x0,0x4a
020c 00e0 | | Load_Encached Standard_Cache
020d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
020e 01cc | | Execute Vector,Catenate
020f 8048 | H | Call 0x0,0x48
0210 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0211 0000 0000 | | .XXX[0x3]
0213 0000 | |
0214 0000 0000 | | .LITERAL {0x00000000, 0x0000ea60}
0218 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
021c ffff ffff | | .LITERAL {0xffffffff, 0xffffc000}
0220 0000 0000 | | .LITERAL {0x00000000, 0x00007333}
0224 ; --------------------------------------------------------------------------------------
0224 ; STRING TABLE
0224 ; --------------------------------------------------------------------------------------
0224 0006 | | .STRTAB 0x0006->0x0227 ; " "
0225 0005 | | .STRTAB 0x0005->0x0227 ; " A"
0226 0005 | | .STREND 0x0005->0x0228
0227 2020 4100 | A | .STRTAB_STRINGS
0229 0000 0000 | | .BLANK 0000[0x7]
0230 ; --------------------------------------------------------------------------------------
0230 ; Debug Table
0230 ; --------------------------------------------------------------------------------------
0230 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5175,0x0000,0x0001,0x0004
0236 000b 0246 | F| .DBG4T 0x000b,0x0246,0x0000,0x0000
023a 0010 024a | J| .DBG4T 0x0010,0x024a,0x0000,0x0000
023e 001b 024e | N| .DBG4T 0x001b,0x024e,0x0002,0x0000
0242 00cb 0252 | R| .DBG4T 0x00cb,0x0252,0x0001,0x0000
0246 ; --------------------------------------------------------------------------------------
0246 ; Debug chain
0246 ; --------------------------------------------------------------------------------------
0246 0002 0000 | | .DBGLEN 0x0002,0x0000
0248 000b 000d | | .DBGLNO 0x000b,0x000d
024a ; --------------------------------------------------------------------------------------
024a ; Debug chain
024a ; --------------------------------------------------------------------------------------
024a 0002 0000 | | .DBGLEN 0x0002,0x0000
024c 0010 0012 | | .DBGLNO 0x0010,0x0012
024e ; --------------------------------------------------------------------------------------
024e ; Debug chain
024e ; --------------------------------------------------------------------------------------
024e 0001 0001 | | .DBGLEN 0x0001,0x0001
0250 001b 001c | | .DBGLNO 0x001b,0x001c
0252 ; --------------------------------------------------------------------------------------
0252 ; Debug chain
0252 ; --------------------------------------------------------------------------------------
0252 001e 0017 | | .DBGLEN 0x001e,0x0017
0254 00cb 00cf | | .DBGLNO 0x00cb,0x00cf,0x00d3,0x00d7,0x00db,0x00df,0x00e3,0x00e7,0x00eb,0x00ef,0x00f3,0x00f7,0x00fb,0x00ff,0x0106,0x010d,0x0114,0x011b,0x0122,0x0129,0x0130,0x0137,0x013e,0x0145,0x0149,0x014d,0x0151,0x0155,0x0159,0x015a,0x015d,0x0161,0x0165,0x0169,0x016c,0x0170,0x0175,0x0179,0x017e,0x0182,0x0187,0x018b,0x0191,0x0195,0x0199,0x01ab,0x01b3,0x01bc,0x01c0,0x01c8,0x01cd,0x01d4,0x01d9
0289 0000 0000 | | .BLANK 0000[0x177]