|
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_0a7cf5
└─⟦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 0248 | H | .CONST 0x0248 ; 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 001f | | .CONST 0x001f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000a | | .CONST 0x000a ; Number of locals
000b INIT_0008:
000b e009 | | Load 0x0,0x9
000c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
000d e23f | ? | Load 0x1,0x3f
000e 0a01 | | Execute_Immediate Plus,0x1
000f 00e3 | | Load_Encached Natural_Cache
0010 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0011 e254 | T | Load 0x1,0x54
0012 0a01 | | Execute_Immediate Plus,0x1
0013 00e3 | | Load_Encached Natural_Cache
0014 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0015 e23c | < | Load 0x1,0x3c
0016 0007 | | Action Break_Optional
0017 e251 | Q | Load 0x1,0x51
0018 0007 | | Action Break_Optional
0019 00e3 | | Load_Encached Natural_Cache
001a 00e3 | | Load_Encached Natural_Cache
001b e009 | | Load 0x0,0x9
001c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
001d e2db | | Load 0x1,0xdb
001e 0007 | | Action Break_Optional
001f BODY_0008:
001f e2a8 | | Load 0x1,0xa8
0020 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0021 6829 |h) | Jump_Zero 0x4b
0022 e2a8 | | Load 0x1,0xa8
0023 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0024 0f02 | | Execute_Immediate Equal,0x2
0025 e2a8 | | Load 0x1,0xa8
0026 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0027 0f04 | | Execute_Immediate Equal,0x4
0028 0278 | x | Execute Discrete,Or
0029 6821 |h! | Jump_Zero 0x4b
002a e065 | e | Load 0x0,0x65
002b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
002c e019 | | Load 0x0,0x19
002d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002e e2a8 | | Load 0x1,0xa8
002f 3c18 |< | Execute Record,Field_Read,Field_Number 0x18
0030 e066 | f | Load 0x0,0x66
0031 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0032 e067 | g | Load 0x0,0x67
0033 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0034 00d8 | | Load_Top At_Offset_0
0035 e067 | g | Load 0x0,0x67
0036 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0037 7003 |p | Jump_Nonzero 0x3b
0038 e068 | h | Load 0x0,0x68
0039 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
003a 0257 | W | Execute Discrete,Raise
003b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
003c 0273 | s | Execute Discrete,Plus
003d e009 | | Load 0x0,0x9
003e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
003f 00d9 | | Load_Top At_Offset_1
0040 00d0 | | Action Swap_Control
0041 0260 | ` | Execute Discrete,In_Type
0042 7001 |p | Jump_Nonzero 0x44
0043 0801 | | Execute_Immediate Raise,0x1
0044 e019 | | Load 0x0,0x19
0045 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0046 4800 |H | Short_Literal 0x0
0047 e2a8 | | Load 0x1,0xa8
0048 3c17 |< | Execute Record,Field_Read,Field_Number 0x17
0049 e019 | | Load 0x0,0x19
004a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
004b e220 | | Load 0x1,0x20
004c 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
004d 6803 |h | Jump_Zero 0x51
004e 4943 |IC | Short_Literal 0x143
004f e065 | e | Load 0x0,0x65
0050 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0051 4801 |H | Short_Literal 0x1
0052 e065 | e | Load 0x0,0x65
0053 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0054 e2a0 | | Load 0x1,0xa0
0055 3c17 |< | Execute Record,Field_Read,Field_Number 0x17
0056 e2a0 | | Load 0x1,0xa0
0057 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
0058 0272 | r | Execute Discrete,Minus
0059 09ff | | Execute_Immediate Binary_Scale,-0x1
005a 4801 |H | Short_Literal 0x1
005b e2a0 | | Load 0x1,0xa0
005c 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
005d 01d6 | | Execute Vector,Field_Write
005e 4802 |H | Short_Literal 0x2
005f 4801 |H | Short_Literal 0x1
0060 e2a0 | | Load 0x1,0xa0
0061 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
0062 01d6 | | Execute Vector,Field_Write
0063 e2a0 | | Load 0x1,0xa0
0064 3c17 |< | Execute Record,Field_Read,Field_Number 0x17
0065 4802 |H | Short_Literal 0x2
0066 e2a0 | | Load 0x1,0xa0
0067 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
0068 01d6 | | Execute Vector,Field_Write
0069 4804 |H | Short_Literal 0x4
006a 4802 |H | Short_Literal 0x2
006b e2a0 | | Load 0x1,0xa0
006c 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
006d 01d6 | | Execute Vector,Field_Write
006e 00cf | | Action Mark_Auxiliary
006f e23f | ? | Load 0x1,0x3f
0070 e240 | @ | Load 0x1,0x40
0071 0263 | c | Execute Discrete,Above_Bound
0072 7033 |p3 | Jump_Nonzero 0xa6
0073 00d8 | | Load_Top At_Offset_0
0074 00d8 | | Load_Top At_Offset_0
0075 00e4 | | Load_Encached Positive_Cache
0076 0260 | ` | Execute Discrete,In_Type
0077 7001 |p | Jump_Nonzero 0x79
0078 0801 | | Execute_Immediate Raise,0x1
0079 823e | > | Call 0x1,0x3e
007a a405 | | Store_Unchecked 0x2,0x5
007b e405 | | Load 0x2,0x5
007c 0217 | | Execute Heap_Access,All_Reference
007d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
007e e5ff | | Load 0x2,-0x1
007f 027d | } | Execute Discrete,Greater
0080 6823 |h# | Jump_Zero 0xa4
0081 00d8 | | Load_Top At_Offset_0
0082 a403 | | Store_Unchecked 0x2,0x3
0083 00cf | | Action Mark_Auxiliary
0084 e23f | ? | Load 0x1,0x3f
0085 e40d | | Load 0x2,0xd
0086 0263 | c | Execute Discrete,Above_Bound
0087 7019 |p | Jump_Nonzero 0xa1
0088 00d8 | | Load_Top At_Offset_0
0089 00d8 | | Load_Top At_Offset_0
008a 00e4 | | Load_Encached Positive_Cache
008b 0260 | ` | Execute Discrete,In_Type
008c 7001 |p | Jump_Nonzero 0x8e
008d 0801 | | Execute_Immediate Raise,0x1
008e 823e | > | Call 0x1,0x3e
008f a405 | | Store_Unchecked 0x2,0x5
0090 e405 | | Load 0x2,0x5
0091 0217 | | Execute Heap_Access,All_Reference
0092 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0093 0a01 | | Execute_Immediate Plus,0x1
0094 e405 | | Load 0x2,0x5
0095 0217 | | Execute Heap_Access,All_Reference
0096 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0097 e405 | | Load 0x2,0x5
0098 0217 | | Execute Heap_Access,All_Reference
0099 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
009a e5ff | | Load 0x2,-0x1
009b 0272 | r | Execute Discrete,Minus
009c e405 | | Load 0x2,0x5
009d 0217 | | Execute Heap_Access,All_Reference
009e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
009f 00c8 | | Action Pop_Auxiliary_Range
00a0 3fe7 |? | Loop_Increasing 0x88
00a1 00ce | | Action Pop_Auxiliary
00a2 00d2 | | Pop_Control Pop_Count_2
00a3 7802 |x | Jump 0xa6
00a4 00c8 | | Action Pop_Auxiliary_Range
00a5 3fcd |? | Loop_Increasing 0x73
00a6 00ce | | Action Pop_Auxiliary
00a7 e403 | | Load 0x2,0x3
00a8 a240 | @ | Store_Unchecked 0x1,0x40
00a9 00cf | | Action Mark_Auxiliary
00aa e254 | T | Load 0x1,0x54
00ab e255 | U | Load 0x1,0x55
00ac 0263 | c | Execute Discrete,Above_Bound
00ad 7033 |p3 | Jump_Nonzero 0xe1
00ae 00d8 | | Load_Top At_Offset_0
00af 00d8 | | Load_Top At_Offset_0
00b0 00e4 | | Load_Encached Positive_Cache
00b1 0260 | ` | Execute Discrete,In_Type
00b2 7001 |p | Jump_Nonzero 0xb4
00b3 0801 | | Execute_Immediate Raise,0x1
00b4 8253 | S | Call 0x1,0x53
00b5 a406 | | Store_Unchecked 0x2,0x6
00b6 e406 | | Load 0x2,0x6
00b7 0217 | | Execute Heap_Access,All_Reference
00b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00b9 e5ff | | Load 0x2,-0x1
00ba 027d | } | Execute Discrete,Greater
00bb 6823 |h# | Jump_Zero 0xdf
00bc 00d8 | | Load_Top At_Offset_0
00bd a404 | | Store_Unchecked 0x2,0x4
00be 00cf | | Action Mark_Auxiliary
00bf e254 | T | Load 0x1,0x54
00c0 e40d | | Load 0x2,0xd
00c1 0263 | c | Execute Discrete,Above_Bound
00c2 7019 |p | Jump_Nonzero 0xdc
00c3 00d8 | | Load_Top At_Offset_0
00c4 00d8 | | Load_Top At_Offset_0
00c5 00e4 | | Load_Encached Positive_Cache
00c6 0260 | ` | Execute Discrete,In_Type
00c7 7001 |p | Jump_Nonzero 0xc9
00c8 0801 | | Execute_Immediate Raise,0x1
00c9 8253 | S | Call 0x1,0x53
00ca a406 | | Store_Unchecked 0x2,0x6
00cb e406 | | Load 0x2,0x6
00cc 0217 | | Execute Heap_Access,All_Reference
00cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
00ce 0a01 | | Execute_Immediate Plus,0x1
00cf e406 | | Load 0x2,0x6
00d0 0217 | | Execute Heap_Access,All_Reference
00d1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00d2 e406 | | Load 0x2,0x6
00d3 0217 | | Execute Heap_Access,All_Reference
00d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d5 e5ff | | Load 0x2,-0x1
00d6 0272 | r | Execute Discrete,Minus
00d7 e406 | | Load 0x2,0x6
00d8 0217 | | Execute Heap_Access,All_Reference
00d9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00da 00c8 | | Action Pop_Auxiliary_Range
00db 3fe7 |? | Loop_Increasing 0xc3
00dc 00ce | | Action Pop_Auxiliary
00dd 00d2 | | Pop_Control Pop_Count_2
00de 7802 |x | Jump 0xe1
00df 00c8 | | Action Pop_Auxiliary_Range
00e0 3fcd |? | Loop_Increasing 0xae
00e1 00ce | | Action Pop_Auxiliary
00e2 e404 | | Load 0x2,0x4
00e3 a255 | U | Store_Unchecked 0x1,0x55
00e4 483a |H: | Short_Literal 0x3a
00e5 e2a0 | | Load 0x1,0xa0
00e6 8225 | % | Call 0x1,0x25
00e7 4801 |H | Short_Literal 0x1
00e8 a407 | | Store_Unchecked 0x2,0x7
00e9 4800 |H | Short_Literal 0x0
00ea a408 | | Store_Unchecked 0x2,0x8
00eb 4800 |H | Short_Literal 0x0
00ec a409 | | Store_Unchecked 0x2,0x9
00ed 00cf | | Action Mark_Auxiliary
00ee e28c | | Load 0x1,0x8c
00ef 4801 |H | Short_Literal 0x1
00f0 0263 | c | Execute Discrete,Above_Bound
00f1 703d |p= | Jump_Nonzero 0x12f
00f2 00d8 | | Load_Top At_Offset_0
00f3 e28b | | Load 0x1,0x8b
00f4 01d5 | | Execute Vector,Field_Reference
00f5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
00f6 7033 |p3 | Jump_Nonzero 0x12a
00f7 00d8 | | Load_Top At_Offset_0
00f8 e28b | | Load 0x1,0x8b
00f9 01d5 | | Execute Vector,Field_Reference
00fa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00fb e5ff | | Load 0x2,-0x1
00fc 027d | } | Execute Discrete,Greater
00fd 6814 |h | Jump_Zero 0x112
00fe 00cf | | Action Mark_Auxiliary
00ff e28c | | Load 0x1,0x8c
0100 e40d | | Load 0x2,0xd
0101 0263 | c | Execute Discrete,Above_Bound
0102 700c |p | Jump_Nonzero 0x10f
0103 00d8 | | Load_Top At_Offset_0
0104 e28b | | Load 0x1,0x8b
0105 01d5 | | Execute Vector,Field_Reference
0106 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0107 e5ff | | Load 0x2,-0x1
0108 0272 | r | Execute Discrete,Minus
0109 e410 | | Load 0x2,0x10
010a e28b | | Load 0x1,0x8b
010b 01d5 | | Execute Vector,Field_Reference
010c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
010d 00c8 | | Action Pop_Auxiliary_Range
010e 3ff4 |? | Loop_Increasing 0x103
010f 00ce | | Action Pop_Auxiliary
0110 00d2 | | Pop_Control Pop_Count_2
0111 781d |x | Jump 0x12f
0112 00d8 | | Load_Top At_Offset_0
0113 a408 | | Store_Unchecked 0x2,0x8
0114 e409 | | Load 0x2,0x9
0115 7007 |p | Jump_Nonzero 0x11d
0116 e22c | , | Load 0x1,0x2c
0117 3c19 |< | Execute Record,Field_Read,Field_Number 0x19
0118 e22c | , | Load 0x1,0x2c
0119 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
011a 0273 | s | Execute Discrete,Plus
011b c409 | | Store 0x2,0x9
011c 7805 |x | Jump 0x122
011d e409 | | Load 0x2,0x9
011e e22c | , | Load 0x1,0x2c
011f 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a
0120 0273 | s | Execute Discrete,Plus
0121 c409 | | Store 0x2,0x9
0122 e409 | | Load 0x2,0x9
0123 e40d | | Load 0x2,0xd
0124 e28b | | Load 0x1,0x8b
0125 01d5 | | Execute Vector,Field_Reference
0126 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0127 0273 | s | Execute Discrete,Plus
0128 c409 | | Store 0x2,0x9
0129 7803 |x | Jump 0x12d
012a e407 | | Load 0x2,0x7
012b 0a01 | | Execute_Immediate Plus,0x1
012c c407 | | Store 0x2,0x7
012d 00c8 | | Action Pop_Auxiliary_Range
012e 3fc3 |? | Loop_Increasing 0xf2
012f 00ce | | Action Pop_Auxiliary
0130 e408 | | Load 0x2,0x8
0131 0e00 | | Execute_Immediate Not_Equal,0x0
0132 e5ff | | Load 0x2,-0x1
0133 e22c | , | Load 0x1,0x2c
0134 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0135 610a |a | Indirect_Literal Discrete,0x240,{0xffffffff, 0xffffa240}
0136 0273 | s | Execute Discrete,Plus
0137 027c | | | Execute Discrete,Less
0138 0279 | y | Execute Discrete,And
0139 6876 |hv | Jump_Zero 0x1b0
013a e22c | , | Load 0x1,0x2c
013b 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
013c e409 | | Load 0x2,0x9
013d 0272 | r | Execute Discrete,Minus
013e e2a1 | | Load 0x1,0xa1
013f 027d | } | Execute Discrete,Greater
0140 680f |h | Jump_Zero 0x150
0141 e22c | , | Load 0x1,0x2c
0142 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0143 e409 | | Load 0x2,0x9
0144 0272 | r | Execute Discrete,Minus
0145 e009 | | Load 0x0,0x9
0146 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0147 00d9 | | Load_Top At_Offset_1
0148 00d0 | | Action Swap_Control
0149 0260 | ` | Execute Discrete,In_Type
014a 7001 |p | Jump_Nonzero 0x14c
014b 0801 | | Execute_Immediate Raise,0x1
014c 4800 |H | Short_Literal 0x0
014d e019 | | Load 0x0,0x19
014e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
014f 7804 |x | Jump 0x154
0150 e2a1 | | Load 0x1,0xa1
0151 4800 |H | Short_Literal 0x0
0152 e019 | | Load 0x0,0x19
0153 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0154 e22c | , | Load 0x1,0x2c
0155 3c19 |< | Execute Record,Field_Read,Field_Number 0x19
0156 4800 |H | Short_Literal 0x0
0157 e019 | | Load 0x0,0x19
0158 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0159 00cf | | Action Mark_Auxiliary
015a 7805 |x | Jump 0x160
015b e22c | , | Load 0x1,0x2c
015c 3c17 |< | Execute Record,Field_Read,Field_Number 0x17
015d e065 | e | Load 0x0,0x65
015e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
015f 00c9 | | Action Pop_Auxiliary_Loop
0160 e019 | | Load 0x0,0x19
0161 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0162 e22c | , | Load 0x1,0x2c
0163 3c18 |< | Execute Record,Field_Read,Field_Number 0x18
0164 027c | | | Execute Discrete,Less
0165 77f5 |w | Jump_Nonzero 0x15b
0166 00ce | | Action Pop_Auxiliary
0167 4801 |H | Short_Literal 0x1
0168 4800 |H | Short_Literal 0x0
0169 e22c | , | Load 0x1,0x2c
016a 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
016b 8218 | | Call 0x1,0x18
016c 00cf | | Action Mark_Auxiliary
016d e408 | | Load 0x2,0x8
016e e407 | | Load 0x2,0x7
016f 0263 | c | Execute Discrete,Above_Bound
0170 703e |p> | Jump_Nonzero 0x1af
0171 e019 | | Load 0x0,0x19
0172 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0173 a409 | | Store_Unchecked 0x2,0x9
0174 00cf | | Action Mark_Auxiliary
0175 7821 |x! | Jump 0x197
0176 e019 | | Load 0x0,0x19
0177 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0178 e22c | , | Load 0x1,0x2c
0179 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
017a 027d | } | Execute Discrete,Greater
017b 6810 |h | Jump_Zero 0x18c
017c e40d | | Load 0x2,0xd
017d e28b | | Load 0x1,0x8b
017e 01d5 | | Execute Vector,Field_Reference
017f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0180 e019 | | Load 0x0,0x19
0181 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0182 e409 | | Load 0x2,0x9
0183 0272 | r | Execute Discrete,Minus
0184 0272 | r | Execute Discrete,Minus
0185 e40d | | Load 0x2,0xd
0186 e28b | | Load 0x1,0x8b
0187 01d5 | | Execute Vector,Field_Reference
0188 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0189 00ce | | Action Pop_Auxiliary
018a 00d2 | | Pop_Control Pop_Count_2
018b 7823 |x# | Jump 0x1af
018c e40d | | Load 0x2,0xd
018d e28b | | Load 0x1,0x8b
018e 01d5 | | Execute Vector,Field_Reference
018f 00d8 | | Load_Top At_Offset_0
0190 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0191 e019 | | Load 0x0,0x19
0192 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0193 e40f | | Load 0x2,0xf
0194 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0195 00d1 | | Pop_Control Pop_Count_1
0196 00c9 | | Action Pop_Auxiliary_Loop
0197 e40d | | Load 0x2,0xd
0198 e28b | | Load 0x1,0x8b
0199 01d5 | | Execute Vector,Field_Reference
019a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
019b 77da |w | Jump_Nonzero 0x176
019c 00ce | | Action Pop_Auxiliary
019d 4801 |H | Short_Literal 0x1
019e e40d | | Load 0x2,0xd
019f e28b | | Load 0x1,0x8b
01a0 01d5 | | Execute Vector,Field_Reference
01a1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01a2 e019 | | Load 0x0,0x19
01a3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01a4 e22c | , | Load 0x1,0x2c
01a5 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
01a6 027c | | | Execute Discrete,Less
01a7 6805 |h | Jump_Zero 0x1ad
01a8 4801 |H | Short_Literal 0x1
01a9 4801 |H | Short_Literal 0x1
01aa e22c | , | Load 0x1,0x2c
01ab 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a
01ac 8218 | | Call 0x1,0x18
01ad 00c8 | | Action Pop_Auxiliary_Range
01ae 3fc2 |? | Loop_Increasing 0x171
01af 00ce | | Action Pop_Auxiliary
01b0 e28c | | Load 0x1,0x8c
01b1 6805 |h | Jump_Zero 0x1b7
01b2 e28c | | Load 0x1,0x8c
01b3 e28b | | Load 0x1,0x8b
01b4 01d5 | | Execute Vector,Field_Reference
01b5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
01b6 6808 |h | Jump_Zero 0x1bf
01b7 4800 |H | Short_Literal 0x0
01b8 a28c | | Store_Unchecked 0x1,0x8c
01b9 4800 |H | Short_Literal 0x0
01ba a288 | | Store_Unchecked 0x1,0x88
01bb e22c | , | Load 0x1,0x2c
01bc 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
01bd a2a1 | | Store_Unchecked 0x1,0xa1
01be 7837 |x7 | Jump 0x1f6
01bf e22c | , | Load 0x1,0x2c
01c0 3c19 |< | Execute Record,Field_Read,Field_Number 0x19
01c1 e22c | , | Load 0x1,0x2c
01c2 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
01c3 0273 | s | Execute Discrete,Plus
01c4 c409 | | Store 0x2,0x9
01c5 00cf | | Action Mark_Auxiliary
01c6 e28c | | Load 0x1,0x8c
01c7 4801 |H | Short_Literal 0x1
01c8 0263 | c | Execute Discrete,Above_Bound
01c9 700e |p | Jump_Nonzero 0x1d8
01ca 00d8 | | Load_Top At_Offset_0
01cb e28b | | Load 0x1,0x8b
01cc 01d5 | | Execute Vector,Field_Reference
01cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
01ce 7007 |p | Jump_Nonzero 0x1d6
01cf e409 | | Load 0x2,0x9
01d0 e40d | | Load 0x2,0xd
01d1 e28b | | Load 0x1,0x8b
01d2 01d5 | | Execute Vector,Field_Reference
01d3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01d4 0273 | s | Execute Discrete,Plus
01d5 c409 | | Store 0x2,0x9
01d6 00c8 | | Action Pop_Auxiliary_Range
01d7 3ff2 |? | Loop_Increasing 0x1ca
01d8 00ce | | Action Pop_Auxiliary
01d9 e22c | , | Load 0x1,0x2c
01da 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
01db e409 | | Load 0x2,0x9
01dc 0272 | r | Execute Discrete,Minus
01dd e22c | , | Load 0x1,0x2c
01de 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f
01df e22c | , | Load 0x1,0x2c
01e0 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e
01e1 0273 | s | Execute Discrete,Plus
01e2 6059 |`Y | Indirect_Literal Discrete,0x23c,{0x00000000, 0x00008ca0}
01e3 0273 | s | Execute Discrete,Plus
01e4 027c | | | Execute Discrete,Less
01e5 6809 |h | Jump_Zero 0x1ef
01e6 e22c | , | Load 0x1,0x2c
01e7 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f
01e8 e22c | , | Load 0x1,0x2c
01e9 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e
01ea 0273 | s | Execute Discrete,Plus
01eb 6050 |`P | Indirect_Literal Discrete,0x23c,{0x00000000, 0x00008ca0}
01ec 0273 | s | Execute Discrete,Plus
01ed c2a1 | | Store 0x1,0xa1
01ee 7805 |x | Jump 0x1f4
01ef e22c | , | Load 0x1,0x2c
01f0 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
01f1 e409 | | Load 0x2,0x9
01f2 0272 | r | Execute Discrete,Minus
01f3 c2a1 | | Store 0x1,0xa1
01f4 4801 |H | Short_Literal 0x1
01f5 a288 | | Store_Unchecked 0x1,0x88
01f6 e22c | , | Load 0x1,0x2c
01f7 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
01f8 e22c | , | Load 0x1,0x2c
01f9 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
01fa 0273 | s | Execute Discrete,Plus
01fb e009 | | Load 0x0,0x9
01fc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01fd 00d9 | | Load_Top At_Offset_1
01fe 00d0 | | Action Swap_Control
01ff 0260 | ` | Execute Discrete,In_Type
0200 7001 |p | Jump_Nonzero 0x202
0201 0801 | | Execute_Immediate Raise,0x1
0202 4800 |H | Short_Literal 0x0
0203 e019 | | Load 0x0,0x19
0204 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0205 e2a2 | | Load 0x1,0xa2
0206 6815 |h | Jump_Zero 0x21c
0207 e286 | | Load 0x1,0x86
0208 4801 |H | Short_Literal 0x1
0209 0279 | y | Execute Discrete,And
020a 0f01 | | Execute_Immediate Equal,0x1
020b 6808 |h | Jump_Zero 0x214
020c e29f | | Load 0x1,0x9f
020d 6803 |h | Jump_Zero 0x211
020e e299 | | Load 0x1,0x99
020f a402 | | Store_Unchecked 0x2,0x2
0210 7817 |x | Jump 0x228
0211 e295 | | Load 0x1,0x95
0212 a402 | | Store_Unchecked 0x2,0x2
0213 7814 |x | Jump 0x228
0214 e29e | | Load 0x1,0x9e
0215 6803 |h | Jump_Zero 0x219
0216 e298 | | Load 0x1,0x98
0217 a402 | | Store_Unchecked 0x2,0x2
0218 780f |x | Jump 0x228
0219 e295 | | Load 0x1,0x95
021a a402 | | Store_Unchecked 0x2,0x2
021b 780c |x | Jump 0x228
021c e29b | | Load 0x1,0x9b
021d 6803 |h | Jump_Zero 0x221
021e e295 | | Load 0x1,0x95
021f a402 | | Store_Unchecked 0x2,0x2
0220 7807 |x | Jump 0x228
0221 e29f | | Load 0x1,0x9f
0222 6803 |h | Jump_Zero 0x226
0223 e299 | | Load 0x1,0x99
0224 a402 | | Store_Unchecked 0x2,0x2
0225 7802 |x | Jump 0x228
0226 e298 | | Load 0x1,0x98
0227 a402 | | Store_Unchecked 0x2,0x2
0228 e402 | | Load 0x2,0x2
0229 e009 | | Load 0x0,0x9
022a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
022c 0c01 | | Execute_Immediate Greater_Equal,0x1
022d 6803 |h | Jump_Zero 0x231
022e e402 | | Load 0x2,0x2
022f e065 | e | Load 0x0,0x65
0230 180f | | Execute Package,Field_Execute,Field_Number 0xf
0231 4801 |H | Short_Literal 0x1
0232 4800 |H | Short_Literal 0x0
0233 4800 |H | Short_Literal 0x0
0234 8218 | | Call 0x1,0x18
0235 483a |H: | Short_Literal 0x3a
0236 8226 | & | Call 0x1,0x26
0237 00d8 | | Load_Top At_Offset_0
0238 a2db | | Store_Unchecked 0x1,0xdb
0239 4502 |E | Exit_Suprogram New_Top_Offset 0x2
023a 0000 0000 | | .XXX[0x2]
023c 0000 0000 | | .LITERAL {0x00000000, 0x00008ca0}
0240 ffff ffff | | .LITERAL {0xffffffff, 0xffffa240}
0244 0000 0000 | | .BLANK 0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug Table
0248 ; --------------------------------------------------------------------------------------
0248 0004 000f | | .DEBUG4 0x0004,0x000f,0x47f5,0x0000,0x0001,0x0000
024e a034 0000 | 4 | .XXX[0x4]
0250 2013 a040 | @|
0252 0000 0000 | | .BLANK 0000[0x1ae]