|
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_6148f2
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0238 | 8 | .CONST 0x0238 ; 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 0024 | $ | .CONST 0x0024 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0012 | | .CONST 0x0012 ; Number of locals
000b INIT_0008:
000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
000f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
0011 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
0013 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
0015 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
0017 00bf | | Action Accept_Activation
0018 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0019 00c7 | | Action Elaborate_Subprogram
001a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
001b 00c7 | | Action Elaborate_Subprogram
001c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
001d 00c7 | | Action Elaborate_Subprogram
001e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
001f 00c7 | | Action Elaborate_Subprogram
0020 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0021 00c7 | | Action Elaborate_Subprogram
0022 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0023 00c7 | | Action Elaborate_Subprogram
0024 BODY_0008:
0024 00bc | | Action Signal_Activated
0025 00bb | | Action Signal_Completion
0026 0000 0000 | | .XXX[0x2]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002f | / | .CONST 0x002f ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0002 | | .CONST 0x0002 ; Number of locals
002b INIT_0028:
002b e002 | | Load 0x0,0x2
002c 0322 | " | Declare_Variable Record
002d 00d8 | | Load_Top At_Offset_0
002e 1c00 | | Execute_Immediate Run_Utility,0x0
002f BODY_0028:
002f 4801 |H | Short_Literal 0x1
0030 00d9 | | Load_Top At_Offset_1
0031 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0032 00d8 | | Load_Top At_Offset_0
0033 e003 | | Load 0x0,0x3
0034 0337 | 7 | Declare_Variable Array
0035 4801 |H | Short_Literal 0x1
0036 4818 |H | Short_Literal 0x18
0037 00da | | Load_Top At_Offset_2
0038 01d6 | | Execute Vector,Field_Write
0039 4817 |H | Short_Literal 0x17
003a 4800 |H | Short_Literal 0x0
003b 4800 |H | Short_Literal 0x0
003c 00d9 | | Load_Top At_Offset_1
003d e404 | | Load 0x2,0x4
003e 01d6 | | Execute Vector,Field_Write
003f 3ffb |? | Loop_Increasing 0x3b
0040 481f |H | Short_Literal 0x1f
0041 4819 |H | Short_Literal 0x19
0042 4800 |H | Short_Literal 0x0
0043 00d9 | | Load_Top At_Offset_1
0044 e404 | | Load 0x2,0x4
0045 01d6 | | Execute Vector,Field_Write
0046 3ffb |? | Loop_Increasing 0x42
0047 e003 | | Load 0x0,0x3
0048 01c3 | | Execute Vector,Check_In_Type
0049 e5ff | | Load 0x2,-0x1
004a 8210 | | Call 0x1,0x10
004b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
004c 0000 0000 | | .BLANK 0000[0x4]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0057 | W | .CONST 0x0057 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0002 | | .CONST 0x0002 ; Number of locals
0053 INIT_0050:
0053 e002 | | Load 0x0,0x2
0054 0322 | " | Declare_Variable Record
0055 00d8 | | Load_Top At_Offset_0
0056 1c00 | | Execute_Immediate Run_Utility,0x0
0057 BODY_0050:
0057 4800 |H | Short_Literal 0x0
0058 00d9 | | Load_Top At_Offset_1
0059 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
005a 00d8 | | Load_Top At_Offset_0
005b e003 | | Load 0x0,0x3
005c 0337 | 7 | Declare_Variable Array
005d 4801 |H | Short_Literal 0x1
005e 4818 |H | Short_Literal 0x18
005f 00da | | Load_Top At_Offset_2
0060 01d6 | | Execute Vector,Field_Write
0061 4817 |H | Short_Literal 0x17
0062 4800 |H | Short_Literal 0x0
0063 4800 |H | Short_Literal 0x0
0064 00d9 | | Load_Top At_Offset_1
0065 e404 | | Load 0x2,0x4
0066 01d6 | | Execute Vector,Field_Write
0067 3ffb |? | Loop_Increasing 0x63
0068 481f |H | Short_Literal 0x1f
0069 4819 |H | Short_Literal 0x19
006a 4800 |H | Short_Literal 0x0
006b 00d9 | | Load_Top At_Offset_1
006c e404 | | Load 0x2,0x4
006d 01d6 | | Execute Vector,Field_Write
006e 3ffb |? | Loop_Increasing 0x6a
006f e003 | | Load 0x0,0x3
0070 01c3 | | Execute Vector,Check_In_Type
0071 e5ff | | Load 0x2,-0x1
0072 8210 | | Call 0x1,0x10
0073 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0074 0000 0000 | | .BLANK 0000[0x4]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007d | } | .CONST 0x007d ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0002 | | .CONST 0x0002 ; Number of locals
007b INIT_0078:
007b 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call
007d BODY_0078:
007d 00db | | Load_Top At_Offset_3
007e 8004 | | Call 0x0,0x4
007f 8402 | | Call 0x2,0x2
0080 00db | | Load_Top At_Offset_3
0081 8005 | | Call 0x0,0x5
0082 00db | | Load_Top At_Offset_3
0083 8006 | | Call 0x0,0x6
0084 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0085 0000 0000 | | .XXX[0x3]
0087 0000 | |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008e | | .CONST 0x008e ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0003 | | .CONST 0x0003 ; Number of locals
008b INIT_0088:
008b e007 | | Load 0x0,0x7
008c 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call
008e BODY_0088:
008e e5ff | | Load 0x2,-0x1
008f 8004 | | Call 0x0,0x4
0090 8403 | | Call 0x2,0x3
0091 e5ff | | Load 0x2,-0x1
0092 8005 | | Call 0x0,0x5
0093 e5ff | | Load 0x2,-0x1
0094 8006 | | Call 0x0,0x6
0095 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0096 0000 0000 | | .XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a2 | | .CONST 0x00a2 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0004 | | .CONST 0x0004 ; Number of locals
009b INIT_0098:
009b e008 | | Load 0x0,0x8
009c 02ff | | Declare_Variable Variant_Record
009d 00d8 | | Load_Top At_Offset_0
009e 1c00 | | Execute_Immediate Run_Utility,0x0
009f e009 | | Load 0x0,0x9
00a0 029f 01a3 | | Declare_Subprogram INIT_01a0,For_Call
00a2 BODY_0098:
00a2 e5ff | | Load 0x2,-0x1
00a3 8004 | | Call 0x0,0x4
00a4 8404 | | Call 0x2,0x4
00a5 e5ff | | Load 0x2,-0x1
00a6 8005 | | Call 0x0,0x5
00a7 e5ff | | Load 0x2,-0x1
00a8 8006 | | Call 0x0,0x6
00a9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00aa 0000 0000 | | .BLANK 0000[0x6]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00ba | | .CONST 0x00ba ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0004 | | .CONST 0x0004 ; Number of locals
00b3 INIT_00b0:
00b3 e008 | | Load 0x0,0x8
00b4 02ff | | Declare_Variable Variant_Record
00b5 00d8 | | Load_Top At_Offset_0
00b6 1c00 | | Execute_Immediate Run_Utility,0x0
00b7 e009 | | Load 0x0,0x9
00b8 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call
00ba BODY_00b0:
00ba e5ff | | Load 0x2,-0x1
00bb 8004 | | Call 0x0,0x4
00bc 8404 | | Call 0x2,0x4
00bd e5ff | | Load 0x2,-0x1
00be 8005 | | Call 0x0,0x5
00bf e5ff | | Load 0x2,-0x1
00c0 8006 | | Call 0x0,0x6
00c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00c2 0000 0000 | | .BLANK 0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 00e0 | | .CONST 0x00e0 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb e00a | | Load 0x0,0xa
00cc 0322 | " | Declare_Variable Record
00cd 4868 |Hh | Short_Literal 0x68
00ce 00d9 | | Load_Top At_Offset_1
00cf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00d0 e00a | | Load 0x0,0xa
00d1 012c | , | Execute Any,Size
00d2 09fb | | Execute_Immediate Binary_Scale,-0x5
00d3 00d9 | | Load_Top At_Offset_1
00d4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00d5 e5fe | | Load 0x2,-0x2
00d6 00d9 | | Load_Top At_Offset_1
00d7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00d8 e5ff | | Load 0x2,-0x1
00d9 e00b | | Load 0x0,0xb
00da a00c | | Store_Unchecked 0x0,0xc
00db e00d | | Load 0x0,0xd
00dc e00e | | Load 0x0,0xe
00dd a00f | | Store_Unchecked 0x0,0xf
00de 8010 | | Call 0x0,0x10
00df 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00e0 TRAP_00c8:
00e0 0007 | | Action Break_Optional
00e1 e5ff | | Load 0x2,-0x1
00e2 8005 | | Call 0x0,0x5
00e3 00d8 | | Load_Top At_Offset_0
00e4 0101 | | Execute Exception,Reraise
00e5 0000 0000 | | .XXX[0x3]
00e7 0000 | |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0196 | | .CONST 0x0196 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 4800 |H | Short_Literal 0x0
00ec a402 | | Store_Unchecked 0x2,0x2
00ed 00cf | | Action Mark_Auxiliary
00ee e5fe | | Load 0x2,-0x2
00ef 01d9 | | Execute Vector,Reverse_Bounds
00f0 0007 | | Action Break_Optional
00f1 00d8 | | Load_Top At_Offset_0
00f2 e5fe | | Load 0x2,-0x2
00f3 01d7 | | Execute Vector,Field_Read
00f4 6803 |h | Jump_Zero 0xf8
00f5 e402 | | Load 0x2,0x2
00f6 0a01 | | Execute_Immediate Plus,0x1
00f7 c402 | | Store 0x2,0x2
00f8 00c8 | | Action Pop_Auxiliary_Range
00f9 3ff7 |? | Loop_Increasing 0xf1
00fa 00ce | | Action Pop_Auxiliary
00fb e402 | | Load 0x2,0x2
00fc 0902 | | Execute_Immediate Binary_Scale,0x2
00fd 00d8 | | Load_Top At_Offset_0
00fe e007 | | Load 0x0,0x7
00ff 0260 | ` | Execute Discrete,In_Type
0100 7001 |p | Jump_Nonzero 0x102
0101 0801 | | Execute_Immediate Raise,0x1
0102 e011 | | Load 0x0,0x11
0103 0322 | " | Declare_Variable Record
0104 4866 |Hf | Short_Literal 0x66
0105 00d9 | | Load_Top At_Offset_1
0106 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0107 e011 | | Load 0x0,0x11
0108 012c | , | Execute Any,Size
0109 09fb | | Execute_Immediate Binary_Scale,-0x5
010a e402 | | Load 0x2,0x2
010b 00d8 | | Load_Top At_Offset_0
010c e012 | | Load 0x0,0x12
010d 0260 | ` | Execute Discrete,In_Type
010e 7001 |p | Jump_Nonzero 0x110
010f 0801 | | Execute_Immediate Raise,0x1
0110 0273 | s | Execute Discrete,Plus
0111 00d9 | | Load_Top At_Offset_1
0112 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0113 4800 |H | Short_Literal 0x0
0114 00d9 | | Load_Top At_Offset_1
0115 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0116 e5fe | | Load 0x2,-0x2
0117 e011 | | Load 0x0,0x11
0118 3003 |0 | Execute Record,Field_Type,Field_Number 0x3
0119 0119 | | Execute Any,Check_In_Formal_Type
011a 00d9 | | Load_Top At_Offset_1
011b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
011c e5ff | | Load 0x2,-0x1
011d e013 | | Load 0x0,0x13
011e a014 | | Store_Unchecked 0x0,0x14
011f e015 | | Load 0x0,0x15
0120 e016 | | Load 0x0,0x16
0121 a017 | | Store_Unchecked 0x0,0x17
0122 8018 | | Call 0x0,0x18
0123 481f |H | Short_Literal 0x1f
0124 e5fe | | Load 0x2,-0x2
0125 01d7 | | Execute Vector,Field_Read
0126 6809 |h | Jump_Zero 0x130
0127 e5fd | | Load 0x2,-0x3
0128 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0129 e5ff | | Load 0x2,-0x1
012a e019 | | Load 0x0,0x19
012b a01a | | Store_Unchecked 0x0,0x1a
012c e01b | | Load 0x0,0x1b
012d e01c | | Load 0x0,0x1c
012e a01d | | Store_Unchecked 0x0,0x1d
012f 801e | | Call 0x0,0x1e
0130 481e |H | Short_Literal 0x1e
0131 e5fe | | Load 0x2,-0x2
0132 01d7 | | Execute Vector,Field_Read
0133 6809 |h | Jump_Zero 0x13d
0134 e5fd | | Load 0x2,-0x3
0135 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0136 e5ff | | Load 0x2,-0x1
0137 e019 | | Load 0x0,0x19
0138 a01a | | Store_Unchecked 0x0,0x1a
0139 e01b | | Load 0x0,0x1b
013a e01c | | Load 0x0,0x1c
013b a01d | | Store_Unchecked 0x0,0x1d
013c 801e | | Call 0x0,0x1e
013d 481d |H | Short_Literal 0x1d
013e e5fe | | Load 0x2,-0x2
013f 01d7 | | Execute Vector,Field_Read
0140 6809 |h | Jump_Zero 0x14a
0141 e5fd | | Load 0x2,-0x3
0142 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0143 e5ff | | Load 0x2,-0x1
0144 e019 | | Load 0x0,0x19
0145 a01a | | Store_Unchecked 0x0,0x1a
0146 e01b | | Load 0x0,0x1b
0147 e01c | | Load 0x0,0x1c
0148 a01d | | Store_Unchecked 0x0,0x1d
0149 801e | | Call 0x0,0x1e
014a 481c |H | Short_Literal 0x1c
014b e5fe | | Load 0x2,-0x2
014c 01d7 | | Execute Vector,Field_Read
014d 6809 |h | Jump_Zero 0x157
014e e5fd | | Load 0x2,-0x3
014f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0150 e5ff | | Load 0x2,-0x1
0151 e019 | | Load 0x0,0x19
0152 a01a | | Store_Unchecked 0x0,0x1a
0153 e01b | | Load 0x0,0x1b
0154 e01c | | Load 0x0,0x1c
0155 a01d | | Store_Unchecked 0x0,0x1d
0156 801e | | Call 0x0,0x1e
0157 481b |H | Short_Literal 0x1b
0158 e5fe | | Load 0x2,-0x2
0159 01d7 | | Execute Vector,Field_Read
015a 6809 |h | Jump_Zero 0x164
015b e5fd | | Load 0x2,-0x3
015c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
015d e5ff | | Load 0x2,-0x1
015e e01f | | Load 0x0,0x1f
015f a020 | | Store_Unchecked 0x0,0x20
0160 e021 | ! | Load 0x0,0x21
0161 e022 | " | Load 0x0,0x22
0162 a023 | # | Store_Unchecked 0x0,0x23
0163 801e | | Call 0x0,0x1e
0164 481a |H | Short_Literal 0x1a
0165 e5fe | | Load 0x2,-0x2
0166 01d7 | | Execute Vector,Field_Read
0167 680e |h | Jump_Zero 0x176
0168 e5fd | | Load 0x2,-0x3
0169 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
016a 00d8 | | Load_Top At_Offset_0
016b e024 | $ | Load 0x0,0x24
016c 0260 | ` | Execute Discrete,In_Type
016d 7001 |p | Jump_Nonzero 0x16f
016e 0801 | | Execute_Immediate Raise,0x1
016f e5ff | | Load 0x2,-0x1
0170 e019 | | Load 0x0,0x19
0171 a01a | | Store_Unchecked 0x0,0x1a
0172 e01b | | Load 0x0,0x1b
0173 e01c | | Load 0x0,0x1c
0174 a01d | | Store_Unchecked 0x0,0x1d
0175 801e | | Call 0x0,0x1e
0176 4819 |H | Short_Literal 0x19
0177 e5fe | | Load 0x2,-0x2
0178 01d7 | | Execute Vector,Field_Read
0179 6809 |h | Jump_Zero 0x183
017a e5fd | | Load 0x2,-0x3
017b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
017c e5ff | | Load 0x2,-0x1
017d e019 | | Load 0x0,0x19
017e a01a | | Store_Unchecked 0x0,0x1a
017f e01b | | Load 0x0,0x1b
0180 e01c | | Load 0x0,0x1c
0181 a01d | | Store_Unchecked 0x0,0x1d
0182 801e | | Call 0x0,0x1e
0183 4818 |H | Short_Literal 0x18
0184 e5fe | | Load 0x2,-0x2
0185 01d7 | | Execute Vector,Field_Read
0186 680e |h | Jump_Zero 0x195
0187 e5fd | | Load 0x2,-0x3
0188 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0189 00d8 | | Load_Top At_Offset_0
018a e024 | $ | Load 0x0,0x24
018b 0260 | ` | Execute Discrete,In_Type
018c 7001 |p | Jump_Nonzero 0x18e
018d 0801 | | Execute_Immediate Raise,0x1
018e e5ff | | Load 0x2,-0x1
018f e019 | | Load 0x0,0x19
0190 a01a | | Store_Unchecked 0x0,0x1a
0191 e01b | | Load 0x0,0x1b
0192 e01c | | Load 0x0,0x1c
0193 a01d | | Store_Unchecked 0x0,0x1d
0194 801e | | Call 0x0,0x1e
0195 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0196 TRAP_00e8:
0196 0007 | | Action Break_Optional
0197 e5ff | | Load 0x2,-0x1
0198 8005 | | Call 0x0,0x5
0199 00d8 | | Load_Top At_Offset_0
019a 0101 | | Execute Exception,Reraise
019b 0000 0000 | | .BLANK 0000[0x5]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 01ee | | .CONST 0x01ee ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 e025 | % | Load 0x0,0x25
01a4 0322 | " | Declare_Variable Record
01a5 4867 |Hg | Short_Literal 0x67
01a6 00d9 | | Load_Top At_Offset_1
01a7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01a8 e025 | % | Load 0x0,0x25
01a9 012c | , | Execute Any,Size
01aa 09fb | | Execute_Immediate Binary_Scale,-0x5
01ab 00d9 | | Load_Top At_Offset_1
01ac 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01ad 4800 |H | Short_Literal 0x0
01ae 00d9 | | Load_Top At_Offset_1
01af 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01b0 e5ff | | Load 0x2,-0x1
01b1 e026 | & | Load 0x0,0x26
01b2 a027 | ' | Store_Unchecked 0x0,0x27
01b3 e028 | ( | Load 0x0,0x28
01b4 e029 | ) | Load 0x0,0x29
01b5 a02a | * | Store_Unchecked 0x0,0x2a
01b6 8010 | | Call 0x0,0x10
01b7 e009 | | Load 0x0,0x9
01b8 e402 | | Load 0x2,0x2
01b9 4801 |H | Short_Literal 0x1
01ba 4800 |H | Short_Literal 0x0
01bb 4867 |Hg | Short_Literal 0x67
01bc e5ff | | Load 0x2,-0x1
01bd e02b | + | Load 0x0,0x2b
01be a02c | , | Store_Unchecked 0x0,0x2c
01bf a02d | - | Store_Unchecked 0x0,0x2d
01c0 802e | . | Call 0x0,0x2e
01c1 00d1 | | Pop_Control Pop_Count_1
01c2 c403 | | Store 0x2,0x3
01c3 e403 | | Load 0x2,0x3
01c4 6825 |h% | Jump_Zero 0x1ea
01c5 e402 | | Load 0x2,0x2
01c6 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01c7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
01c8 e5fe | | Load 0x2,-0x2
01c9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01ca e402 | | Load 0x2,0x2
01cb 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01cc 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
01cd e5fe | | Load 0x2,-0x2
01ce 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01cf e402 | | Load 0x2,0x2
01d0 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01d1 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
01d2 e5fe | | Load 0x2,-0x2
01d3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01d4 e402 | | Load 0x2,0x2
01d5 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01d6 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
01d7 e5fe | | Load 0x2,-0x2
01d8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01d9 e402 | | Load 0x2,0x2
01da 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01db 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
01dc e5fe | | Load 0x2,-0x2
01dd 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01de e402 | | Load 0x2,0x2
01df 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01e0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01e1 802f | / | Call 0x0,0x2f
01e2 e5fe | | Load 0x2,-0x2
01e3 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01e4 e402 | | Load 0x2,0x2
01e5 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
01e6 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
01e7 e5fe | | Load 0x2,-0x2
01e8 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ea e030 | 0 | Load 0x0,0x30
01eb e5fe | | Load 0x2,-0x2
01ec 017d | } | Execute Record,Structure_Write
01ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ee TRAP_01a0:
01ee 0007 | | Action Break_Optional
01ef e5ff | | Load 0x2,-0x1
01f0 8005 | | Call 0x0,0x5
01f1 00d8 | | Load_Top At_Offset_0
01f2 0101 | | Execute Exception,Reraise
01f3 0000 0000 | | .BLANK 0000[0x5]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0232 | 2 | .CONST 0x0232 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb e031 | 1 | Load 0x0,0x31
01fc 0322 | " | Declare_Variable Record
01fd 482c |H, | Short_Literal 0x2c
01fe 00d9 | | Load_Top At_Offset_1
01ff 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0200 e031 | 1 | Load 0x0,0x31
0201 012c | , | Execute Any,Size
0202 09fb | | Execute_Immediate Binary_Scale,-0x5
0203 00d9 | | Load_Top At_Offset_1
0204 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0205 4800 |H | Short_Literal 0x0
0206 00d9 | | Load_Top At_Offset_1
0207 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0208 e5ff | | Load 0x2,-0x1
0209 e032 | 2 | Load 0x0,0x32
020a a033 | 3 | Store_Unchecked 0x0,0x33
020b e034 | 4 | Load 0x0,0x34
020c e035 | 5 | Load 0x0,0x35
020d a036 | 6 | Store_Unchecked 0x0,0x36
020e 8010 | | Call 0x0,0x10
020f e009 | | Load 0x0,0x9
0210 e402 | | Load 0x2,0x2
0211 4801 |H | Short_Literal 0x1
0212 4800 |H | Short_Literal 0x0
0213 482c |H, | Short_Literal 0x2c
0214 e5ff | | Load 0x2,-0x1
0215 e02b | + | Load 0x0,0x2b
0216 a02c | , | Store_Unchecked 0x0,0x2c
0217 a02d | - | Store_Unchecked 0x0,0x2d
0218 802e | . | Call 0x0,0x2e
0219 00d1 | | Pop_Control Pop_Count_1
021a c403 | | Store 0x2,0x3
021b e403 | | Load 0x2,0x3
021c 6806 |h | Jump_Zero 0x223
021d e402 | | Load 0x2,0x2
021e 2624 |&$ | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x24
021f 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0220 e5fe | | Load 0x2,-0x2
0221 01d4 | | Execute Vector,Structure_Write
0222 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0223 e5fe | | Load 0x2,-0x2
0224 00d8 | | Load_Top At_Offset_0
0225 0335 | 5 | Declare_Variable Array,Duplicate
0226 00cd | | Action Spare6_Action
0227 48ff |H | Short_Literal 0xff
0228 4800 |H | Short_Literal 0x0
0229 4800 |H | Short_Literal 0x0
022a 00d9 | | Load_Top At_Offset_1
022b e603 | | Load 0x3,0x3
022c 01d6 | | Execute Vector,Field_Write
022d 3ffb |? | Loop_Increasing 0x229
022e 00cd | | Action Spare6_Action
022f e5fe | | Load 0x2,-0x2
0230 01d4 | | Execute Vector,Structure_Write
0231 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0232 TRAP_01f8:
0232 0007 | | Action Break_Optional
0233 e5ff | | Load 0x2,-0x1
0234 8005 | | Call 0x0,0x5
0235 00d8 | | Load_Top At_Offset_0
0236 0101 | | Execute Exception,Reraise
0237 0000 | | .XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; Debug Table
0238 ; --------------------------------------------------------------------------------------
0238 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68fc,0x0000,0x0001,0x000c
023e 000b 026e | n| .DBG4T 0x000b,0x026e,0x8000,0x0000
0242 0018 0276 | v| .DBG4T 0x0018,0x0276,0x8000,0x0000
0246 002b 027e | + ~| .DBG4T 0x002b,0x027e,0x0001,0x0000
024a 0053 0283 | S | .DBG4T 0x0053,0x0283,0x0001,0x0000
024e 007b 0288 | { | .DBG4T 0x007b,0x0288,0x0001,0x0000
0252 008b 028e | | .DBG4T 0x008b,0x028e,0x0001,0x0000
0256 009b 0295 | | .DBG4T 0x009b,0x0295,0x0001,0x0000
025a 00b3 029d | | .DBG4T 0x00b3,0x029d,0x0001,0x0000
025e 00cb 02a5 | | .DBG4T 0x00cb,0x02a5,0x0004,0x0000
0262 00eb 02aa | | .DBG4T 0x00eb,0x02aa,0x0004,0x0000
0266 01a3 02c3 | | .DBG4T 0x01a3,0x02c3,0x0004,0x0000
026a 01fb 02d2 | | .DBG4T 0x01fb,0x02d2,0x0004,0x0000
026e ; --------------------------------------------------------------------------------------
026e ; Debug chain
026e ; --------------------------------------------------------------------------------------
026e 0006 0000 | | .DBGLEN 0x0006,0x0000
0270 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug chain
0276 ; --------------------------------------------------------------------------------------
0276 0006 0000 | | .DBGLEN 0x0006,0x0000
0278 0018 001a | | .DBGLNO 0x0018,0x001a,0x001c,0x001e,0x0020,0x0022
027e ; --------------------------------------------------------------------------------------
027e ; Debug chain
027e ; --------------------------------------------------------------------------------------
027e 0001 0002 | | .DBGLEN 0x0001,0x0002
0280 002b 002f | + /| .DBGLNO 0x002b,0x002f,0x0032
0283 ; --------------------------------------------------------------------------------------
0283 ; Debug chain
0283 ; --------------------------------------------------------------------------------------
0283 0001 0002 | | .DBGLEN 0x0001,0x0002
0285 0053 0057 | S W| .DBGLNO 0x0053,0x0057,0x005a
0288 ; --------------------------------------------------------------------------------------
0288 ; Debug chain
0288 ; --------------------------------------------------------------------------------------
0288 0000 0004 | | .DBGLEN 0x0000,0x0004
028a 007d 007f | } | .DBGLNO 0x007d,0x007f,0x0080,0x0082
028e ; --------------------------------------------------------------------------------------
028e ; Debug chain
028e ; --------------------------------------------------------------------------------------
028e 0001 0004 | | .DBGLEN 0x0001,0x0004
0290 008b 008e | | .DBGLNO 0x008b,0x008e,0x0090,0x0091,0x0093
0295 ; --------------------------------------------------------------------------------------
0295 ; Debug chain
0295 ; --------------------------------------------------------------------------------------
0295 0002 0004 | | .DBGLEN 0x0002,0x0004
0297 009b 009f | | .DBGLNO 0x009b,0x009f,0x00a2,0x00a4,0x00a5,0x00a7
029d ; --------------------------------------------------------------------------------------
029d ; Debug chain
029d ; --------------------------------------------------------------------------------------
029d 0002 0004 | | .DBGLEN 0x0002,0x0004
029f 00b3 00b7 | | .DBGLNO 0x00b3,0x00b7,0x00ba,0x00bc,0x00bd,0x00bf
02a5 ; --------------------------------------------------------------------------------------
02a5 ; Debug chain
02a5 ; --------------------------------------------------------------------------------------
02a5 0000 0003 | | .DBGLEN 0x0000,0x0003
02a7 00cb 00e1 | | .DBGLNO 0x00cb,0x00e1,0x00e3
02aa ; --------------------------------------------------------------------------------------
02aa ; Debug chain
02aa ; --------------------------------------------------------------------------------------
02aa 0000 0017 | | .DBGLEN 0x0000,0x0017
02ac 00eb 00ee | | .DBGLNO 0x00eb,0x00ee,0x00f1,0x00f5,0x00fb,0x0123,0x0127,0x0130,0x0134,0x013d,0x0141,0x014a,0x014e,0x0157,0x015b,0x0164,0x0168,0x0176,0x017a,0x0183,0x0187,0x0197,0x0199
02c3 ; --------------------------------------------------------------------------------------
02c3 ; Debug chain
02c3 ; --------------------------------------------------------------------------------------
02c3 0000 000d | | .DBGLEN 0x0000,0x000d
02c5 01a3 01b7 | | .DBGLNO 0x01a3,0x01b7,0x01c3,0x01c5,0x01ca,0x01cf,0x01d4,0x01d9,0x01de,0x01e4,0x01ea,0x01ef,0x01f1
02d2 ; --------------------------------------------------------------------------------------
02d2 ; Debug chain
02d2 ; --------------------------------------------------------------------------------------
02d2 0000 0007 | | .DBGLEN 0x0000,0x0007
02d4 01fb 020f | | .DBGLNO 0x01fb,0x020f,0x021b,0x021d,0x0223,0x0233,0x0235
02db 0000 0000 | | .BLANK 0000[0x125]