|
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: 4096 (0x1000)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0314bd
└─⟦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 05a0 | | .CONST 0x05a0 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00df | | .CONST 0x00df ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002c | , | .CONST 0x002c ; Number of locals
000b INIT_0008:
000b 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
000d 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
000f 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
0011 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
0013 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0015 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated
0017 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
0019 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
001b 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
001d 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
001f 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated
0021 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated
0023 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated
0025 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
0027 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated
0029 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
002b 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated
002d 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated
002f 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated
0031 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated
0033 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated
0035 00bf | | Action Accept_Activation
0036 00e8 | | Load_Encached Character_Cache
0037 0266 | f | Execute Discrete,Bounds
0038 00e8 | | Load_Encached Character_Cache
0039 02a0 | | Declare_Subprogram Null_Subprogram
003a 4801 |H | Short_Literal 0x1
003b 035d | ] | Declare_Type Array,Defined
003c 00e8 | | Load_Encached Character_Cache
003d 0266 | f | Execute Discrete,Bounds
003e 00e8 | | Load_Encached Character_Cache
003f 0266 | f | Execute Discrete,Bounds
0040 00e1 | | Load_Encached Boolean_Cache
0041 02a0 | | Declare_Subprogram Null_Subprogram
0042 4802 |H | Short_Literal 0x2
0043 035d | ] | Declare_Type Array,Defined
0044 00d9 | | Load_Top At_Offset_1
0045 0337 | 7 | Declare_Variable Array
0046 00da | | Load_Top At_Offset_2
0047 0337 | 7 | Declare_Variable Array
0048 00da | | Load_Top At_Offset_2
0049 0337 | 7 | Declare_Variable Array
004a 00d8 | | Load_Top At_Offset_0
004b 0335 | 5 | Declare_Variable Array,Duplicate
004c 00cd | | Action Spare6_Action
004d 487f |H | Short_Literal 0x7f
004e 4800 |H | Short_Literal 0x0
004f 487f |H | Short_Literal 0x7f
0050 4800 |H | Short_Literal 0x0
0051 4800 |H | Short_Literal 0x0
0052 00d9 | | Load_Top At_Offset_1
0053 e229 | ) | Load 0x1,0x29
0054 e227 | ' | Load 0x1,0x27
0055 01a6 | | Execute Matrix,Field_Write
0056 3ffa |? | Loop_Increasing 0x51
0057 3ff7 |? | Loop_Increasing 0x4f
0058 00d9 | | Load_Top At_Offset_1
0059 01a4 | | Execute Matrix,Structure_Write
005a 4800 |H | Short_Literal 0x0
005b 48ff |H | Short_Literal 0xff
005c 00e2 | | Load_Encached Integer_Cache
005d 03f8 | | Declare_Type Discrete,Constrained
005e 4800 |H | Short_Literal 0x0
005f 48ff |H | Short_Literal 0xff
0060 00da | | Load_Top At_Offset_2
0061 02a0 | | Declare_Subprogram Null_Subprogram
0062 4801 |H | Short_Literal 0x1
0063 035d | ] | Declare_Type Array,Defined
0064 00d8 | | Load_Top At_Offset_0
0065 0337 | 7 | Declare_Variable Array
0066 4800 |H | Short_Literal 0x0
0067 480f |H | Short_Literal 0xf
0068 00e8 | | Load_Encached Character_Cache
0069 02a0 | | Declare_Subprogram Null_Subprogram
006a 4801 |H | Short_Literal 0x1
006b 035d | ] | Declare_Type Array,Defined
006c 00d8 | | Load_Top At_Offset_0
006d 0337 | 7 | Declare_Variable Array
006e 00d8 | | Load_Top At_Offset_0
006f 0335 | 5 | Declare_Variable Array,Duplicate
0070 00cd | | Action Spare6_Action
0071 4830 |H0 | Short_Literal 0x30
0072 4800 |H | Short_Literal 0x0
0073 00da | | Load_Top At_Offset_2
0074 01d6 | | Execute Vector,Field_Write
0075 4831 |H1 | Short_Literal 0x31
0076 4801 |H | Short_Literal 0x1
0077 00da | | Load_Top At_Offset_2
0078 01d6 | | Execute Vector,Field_Write
0079 4832 |H2 | Short_Literal 0x32
007a 4802 |H | Short_Literal 0x2
007b 00da | | Load_Top At_Offset_2
007c 01d6 | | Execute Vector,Field_Write
007d 4833 |H3 | Short_Literal 0x33
007e 4803 |H | Short_Literal 0x3
007f 00da | | Load_Top At_Offset_2
0080 01d6 | | Execute Vector,Field_Write
0081 4834 |H4 | Short_Literal 0x34
0082 4804 |H | Short_Literal 0x4
0083 00da | | Load_Top At_Offset_2
0084 01d6 | | Execute Vector,Field_Write
0085 4835 |H5 | Short_Literal 0x35
0086 4805 |H | Short_Literal 0x5
0087 00da | | Load_Top At_Offset_2
0088 01d6 | | Execute Vector,Field_Write
0089 4836 |H6 | Short_Literal 0x36
008a 4806 |H | Short_Literal 0x6
008b 00da | | Load_Top At_Offset_2
008c 01d6 | | Execute Vector,Field_Write
008d 4837 |H7 | Short_Literal 0x37
008e 4807 |H | Short_Literal 0x7
008f 00da | | Load_Top At_Offset_2
0090 01d6 | | Execute Vector,Field_Write
0091 4838 |H8 | Short_Literal 0x38
0092 4808 |H | Short_Literal 0x8
0093 00da | | Load_Top At_Offset_2
0094 01d6 | | Execute Vector,Field_Write
0095 4839 |H9 | Short_Literal 0x39
0096 4809 |H | Short_Literal 0x9
0097 00da | | Load_Top At_Offset_2
0098 01d6 | | Execute Vector,Field_Write
0099 4841 |HA | Short_Literal 0x41
009a 480a |H | Short_Literal 0xa
009b 00da | | Load_Top At_Offset_2
009c 01d6 | | Execute Vector,Field_Write
009d 4842 |HB | Short_Literal 0x42
009e 480b |H | Short_Literal 0xb
009f 00da | | Load_Top At_Offset_2
00a0 01d6 | | Execute Vector,Field_Write
00a1 4843 |HC | Short_Literal 0x43
00a2 480c |H | Short_Literal 0xc
00a3 00da | | Load_Top At_Offset_2
00a4 01d6 | | Execute Vector,Field_Write
00a5 4844 |HD | Short_Literal 0x44
00a6 480d |H | Short_Literal 0xd
00a7 00da | | Load_Top At_Offset_2
00a8 01d6 | | Execute Vector,Field_Write
00a9 4845 |HE | Short_Literal 0x45
00aa 480e |H | Short_Literal 0xe
00ab 00da | | Load_Top At_Offset_2
00ac 01d6 | | Execute Vector,Field_Write
00ad 4846 |HF | Short_Literal 0x46
00ae 480f |H | Short_Literal 0xf
00af 00da | | Load_Top At_Offset_2
00b0 01d6 | | Execute Vector,Field_Write
00b1 00d9 | | Load_Top At_Offset_1
00b2 01d4 | | Execute Vector,Structure_Write
00b3 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00b4 00c7 | | Action Elaborate_Subprogram
00b5 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00b6 00c7 | | Action Elaborate_Subprogram
00b7 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00b8 00c7 | | Action Elaborate_Subprogram
00b9 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00ba 00c7 | | Action Elaborate_Subprogram
00bb 1d0e | | Execute_Immediate Reference_Lex_1,0xe
00bc 00c7 | | Action Elaborate_Subprogram
00bd 1d0f | | Execute_Immediate Reference_Lex_1,0xf
00be 00c7 | | Action Elaborate_Subprogram
00bf 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00c0 00c7 | | Action Elaborate_Subprogram
00c1 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00c2 00c7 | | Action Elaborate_Subprogram
00c3 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00c4 00c7 | | Action Elaborate_Subprogram
00c5 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00c6 00c7 | | Action Elaborate_Subprogram
00c7 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00c8 00c7 | | Action Elaborate_Subprogram
00c9 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00ca 00c7 | | Action Elaborate_Subprogram
00cb 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00cc 00c7 | | Action Elaborate_Subprogram
00cd 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00ce 00c7 | | Action Elaborate_Subprogram
00cf 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00d0 00c7 | | Action Elaborate_Subprogram
00d1 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00d2 00c7 | | Action Elaborate_Subprogram
00d3 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00d4 00c7 | | Action Elaborate_Subprogram
00d5 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00d6 00c7 | | Action Elaborate_Subprogram
00d7 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00d8 00c7 | | Action Elaborate_Subprogram
00d9 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00da 00c7 | | Action Elaborate_Subprogram
00db 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00dc 00c7 | | Action Elaborate_Subprogram
00dd 029f 04db | | Declare_Subprogram INIT_04d8,For_Call
00df BODY_0008:
00df 00cf | | Action Mark_Auxiliary
00e0 00e8 | | Load_Encached Character_Cache
00e1 0265 | e | Execute Discrete,Reverse_Bounds
00e2 0007 | | Action Break_Optional
00e3 00d8 | | Load_Top At_Offset_0
00e4 00d9 | | Load_Top At_Offset_1
00e5 e224 | $ | Load 0x1,0x24
00e6 01d6 | | Execute Vector,Field_Write
00e7 4801 |H | Short_Literal 0x1
00e8 00d9 | | Load_Top At_Offset_1
00e9 00da | | Load_Top At_Offset_2
00ea e226 | & | Load 0x1,0x26
00eb 01a6 | | Execute Matrix,Field_Write
00ec 00c8 | | Action Pop_Auxiliary_Range
00ed 3ff5 |? | Loop_Increasing 0xe3
00ee 00ce | | Action Pop_Auxiliary
00ef e224 | $ | Load 0x1,0x24
00f0 e225 | % | Load 0x1,0x25
00f1 01d4 | | Execute Vector,Structure_Write
00f2 00cf | | Action Mark_Auxiliary
00f3 485a |HZ | Short_Literal 0x5a
00f4 4841 |HA | Short_Literal 0x41
00f5 0007 | | Action Break_Optional
00f6 00d8 | | Load_Top At_Offset_0
00f7 0a20 | | Execute_Immediate Plus,0x20
00f8 00d8 | | Load_Top At_Offset_0
00f9 00e8 | | Load_Encached Character_Cache
00fa 0260 | ` | Execute Discrete,In_Type
00fb 7001 |p | Jump_Nonzero 0xfd
00fc 0801 | | Execute_Immediate Raise,0x1
00fd 00d9 | | Load_Top At_Offset_1
00fe e225 | % | Load 0x1,0x25
00ff 01d6 | | Execute Vector,Field_Write
0100 4801 |H | Short_Literal 0x1
0101 00d9 | | Load_Top At_Offset_1
0102 e225 | % | Load 0x1,0x25
0103 01d7 | | Execute Vector,Field_Read
0104 00da | | Load_Top At_Offset_2
0105 e226 | & | Load 0x1,0x26
0106 01a6 | | Execute Matrix,Field_Write
0107 00c8 | | Action Pop_Auxiliary_Range
0108 3fed |? | Loop_Increasing 0xf6
0109 00c9 | | Action Pop_Auxiliary_Loop
010a 487a |Hz | Short_Literal 0x7a
010b 4861 |Ha | Short_Literal 0x61
010c 0007 | | Action Break_Optional
010d 00d8 | | Load_Top At_Offset_0
010e 0ae0 | | Execute_Immediate Plus,-0x20
010f 00d8 | | Load_Top At_Offset_0
0110 00e8 | | Load_Encached Character_Cache
0111 0260 | ` | Execute Discrete,In_Type
0112 7001 |p | Jump_Nonzero 0x114
0113 0801 | | Execute_Immediate Raise,0x1
0114 00d9 | | Load_Top At_Offset_1
0115 e224 | $ | Load 0x1,0x24
0116 01d6 | | Execute Vector,Field_Write
0117 4801 |H | Short_Literal 0x1
0118 00d9 | | Load_Top At_Offset_1
0119 e224 | $ | Load 0x1,0x24
011a 01d7 | | Execute Vector,Field_Read
011b 00da | | Load_Top At_Offset_2
011c e226 | & | Load 0x1,0x26
011d 01a6 | | Execute Matrix,Field_Write
011e 00c8 | | Action Pop_Auxiliary_Range
011f 3fed |? | Loop_Increasing 0x10d
0120 00ce | | Action Pop_Auxiliary
0121 822c | , | Call 0x1,0x2c
0122 00bc | | Action Signal_Activated
0123 00bb | | Action Signal_Completion
0124 0000 0000 | | .BLANK 0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0132 | 2 | .CONST 0x0132 ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0003 | | .CONST 0x0003 ; Number of locals
012b INIT_0128:
012b 00da | | Load_Top At_Offset_2
012c 01db | | Execute Vector,Length
012d 00e2 | | Load_Encached Integer_Cache
012e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
012f 00d8 | | Load_Top At_Offset_0
0130 00e2 | | Load_Encached Integer_Cache
0131 03f1 | | Declare_Variable Discrete,With_Value
0132 BODY_0128:
0132 00d9 | | Load_Top At_Offset_1
0133 0c01 | | Execute_Immediate Greater_Equal,0x1
0134 6821 |h! | Jump_Zero 0x156
0135 00d8 | | Load_Top At_Offset_0
0136 e5ff | | Load 0x2,-0x1
0137 01dd | | Execute Vector,First
0138 e5ff | | Load 0x2,-0x1
0139 01d7 | | Execute Vector,Field_Read
013a e224 | $ | Load 0x1,0x24
013b 01d7 | | Execute Vector,Field_Read
013c 0905 | | Execute_Immediate Binary_Scale,0x5
013d 0273 | s | Execute Discrete,Plus
013e e5ff | | Load 0x2,-0x1
013f 01dd | | Execute Vector,First
0140 e5ff | | Load 0x2,-0x1
0141 01dc | | Execute Vector,Last
0142 0a01 | | Execute_Immediate Plus,0x1
0143 e5ff | | Load 0x2,-0x1
0144 01dd | | Execute Vector,First
0145 0272 | r | Execute Discrete,Minus
0146 09ff | | Execute_Immediate Binary_Scale,-0x1
0147 0273 | s | Execute Discrete,Plus
0148 e5ff | | Load 0x2,-0x1
0149 01d7 | | Execute Vector,Field_Read
014a e224 | $ | Load 0x1,0x24
014b 01d7 | | Execute Vector,Field_Read
014c 0273 | s | Execute Discrete,Plus
014d e5ff | | Load 0x2,-0x1
014e 01dc | | Execute Vector,Last
014f e5ff | | Load 0x2,-0x1
0150 01d7 | | Execute Vector,Field_Read
0151 e224 | $ | Load 0x1,0x24
0152 01d7 | | Execute Vector,Field_Read
0153 0903 | | Execute_Immediate Binary_Scale,0x3
0154 0273 | s | Execute Discrete,Plus
0155 0059 | Y | Store_Top Discrete,At_Offset_1
0156 00d8 | | Load_Top At_Offset_0
0157 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 00da | | Load_Top At_Offset_2
015c e224 | $ | Load 0x1,0x24
015d 01d7 | | Execute Vector,Field_Read
015e 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
015f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00da | | Load_Top At_Offset_2
0164 e225 | % | Load 0x1,0x25
0165 01d7 | | Execute Vector,Field_Read
0166 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0167 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00da | | Load_Top At_Offset_2
016c e224 | $ | Load 0x1,0x24
016d 01d7 | | Execute Vector,Field_Read
016e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
016f 0000 | | .XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 00da | | Load_Top At_Offset_2
0174 e225 | % | Load 0x1,0x25
0175 01d7 | | Execute Vector,Field_Read
0176 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0177 0000 | | .XXX[0x1]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b 00cf | | Action Mark_Auxiliary
017c 00db | | Load_Top At_Offset_3
017d 01d9 | | Execute Vector,Reverse_Bounds
017e 0263 | c | Execute Discrete,Above_Bound
017f 700a |p | Jump_Nonzero 0x18a
0180 00d8 | | Load_Top At_Offset_0
0181 e5ff | | Load 0x2,-0x1
0182 01d7 | | Execute Vector,Field_Read
0183 e224 | $ | Load 0x1,0x24
0184 01d7 | | Execute Vector,Field_Read
0185 00d9 | | Load_Top At_Offset_1
0186 e5ff | | Load 0x2,-0x1
0187 01d6 | | Execute Vector,Field_Write
0188 00c8 | | Action Pop_Auxiliary_Range
0189 3ff6 |? | Loop_Increasing 0x180
018a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 00cf | | Action Mark_Auxiliary
0194 00db | | Load_Top At_Offset_3
0195 01d9 | | Execute Vector,Reverse_Bounds
0196 0263 | c | Execute Discrete,Above_Bound
0197 700a |p | Jump_Nonzero 0x1a2
0198 00d8 | | Load_Top At_Offset_0
0199 e5ff | | Load 0x2,-0x1
019a 01d7 | | Execute Vector,Field_Read
019b e225 | % | Load 0x1,0x25
019c 01d7 | | Execute Vector,Field_Read
019d 00d9 | | Load_Top At_Offset_1
019e e5ff | | Load 0x2,-0x1
019f 01d6 | | Execute Vector,Field_Write
01a0 00c8 | | Action Pop_Auxiliary_Range
01a1 3ff6 |? | Loop_Increasing 0x198
01a2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01a3 0000 0000 | | .BLANK 0000[0x5]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b2 | | .CONST 0x01b2 ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0002 | | .CONST 0x0002 ; Number of locals
01ab INIT_01a8:
01ab 00da | | Load_Top At_Offset_2
01ac 01dd | | Execute Vector,First
01ad 00db | | Load_Top At_Offset_3
01ae 01dc | | Execute Vector,Last
01af 00e9 | | Load_Encached String_Cache
01b0 035b | [ | Declare_Type Array,Constrained
01b1 0337 | 7 | Declare_Variable Array
01b2 BODY_01a8:
01b2 00cf | | Action Mark_Auxiliary
01b3 e5ff | | Load 0x2,-0x1
01b4 01d9 | | Execute Vector,Reverse_Bounds
01b5 0263 | c | Execute Discrete,Above_Bound
01b6 700a |p | Jump_Nonzero 0x1c1
01b7 00d8 | | Load_Top At_Offset_0
01b8 e5ff | | Load 0x2,-0x1
01b9 01d7 | | Execute Vector,Field_Read
01ba e224 | $ | Load 0x1,0x24
01bb 01d7 | | Execute Vector,Field_Read
01bc 00d9 | | Load_Top At_Offset_1
01bd e402 | | Load 0x2,0x2
01be 01d6 | | Execute Vector,Field_Write
01bf 00c8 | | Action Pop_Auxiliary_Range
01c0 3ff6 |? | Loop_Increasing 0x1b7
01c1 00ce | | Action Pop_Auxiliary
01c2 00d8 | | Load_Top At_Offset_0
01c3 00e9 | | Load_Encached String_Cache
01c4 01c6 | | Execute Vector,Convert_To_Formal
01c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c6 0000 0000 | | .XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d2 | | .CONST 0x01d2 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb 00da | | Load_Top At_Offset_2
01cc 01dd | | Execute Vector,First
01cd 00db | | Load_Top At_Offset_3
01ce 01dc | | Execute Vector,Last
01cf 00e9 | | Load_Encached String_Cache
01d0 035b | [ | Declare_Type Array,Constrained
01d1 0337 | 7 | Declare_Variable Array
01d2 BODY_01c8:
01d2 00cf | | Action Mark_Auxiliary
01d3 e5ff | | Load 0x2,-0x1
01d4 01d9 | | Execute Vector,Reverse_Bounds
01d5 0263 | c | Execute Discrete,Above_Bound
01d6 700a |p | Jump_Nonzero 0x1e1
01d7 00d8 | | Load_Top At_Offset_0
01d8 e5ff | | Load 0x2,-0x1
01d9 01d7 | | Execute Vector,Field_Read
01da e225 | % | Load 0x1,0x25
01db 01d7 | | Execute Vector,Field_Read
01dc 00d9 | | Load_Top At_Offset_1
01dd e402 | | Load 0x2,0x2
01de 01d6 | | Execute Vector,Field_Write
01df 00c8 | | Action Pop_Auxiliary_Range
01e0 3ff6 |? | Loop_Increasing 0x1d7
01e1 00ce | | Action Pop_Auxiliary
01e2 00d8 | | Load_Top At_Offset_0
01e3 00e9 | | Load_Encached String_Cache
01e4 01c6 | | Execute Vector,Convert_To_Formal
01e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e6 0000 0000 | | .XXX[0x2]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f5 | | .CONST 0x01f5 ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0005 | | .CONST 0x0005 ; Number of locals
01eb INIT_01e8:
01eb 00e1 | | Load_Encached Boolean_Cache
01ec 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ed 4850 |HP | Short_Literal 0x50
01ee e002 | | Load 0x0,0x2
01ef 1c08 | | Execute_Immediate Run_Utility,0x8
01f0 00d8 | | Load_Top At_Offset_0
01f1 1c00 | | Execute_Immediate Run_Utility,0x0
01f2 00e2 | | Load_Encached Integer_Cache
01f3 029f 050b | | Declare_Subprogram INIT_0508,For_Call
01f5 BODY_01e8:
01f5 00da | | Load_Top At_Offset_2
01f6 4820 |H | Short_Literal 0x20
01f7 4800 |H | Short_Literal 0x0
01f8 8003 | | Call 0x0,0x3
01f9 00d1 | | Pop_Control Pop_Count_1
01fa e5ff | | Load 0x2,-0x1
01fb 0d00 | | Execute_Immediate Less,0x0
01fc 6807 |h | Jump_Zero 0x204
01fd 4801 |H | Short_Literal 0x1
01fe a402 | | Store_Unchecked 0x2,0x2
01ff e5fd | | Load 0x2,-0x3
0200 0aff | | Execute_Immediate Plus,-0x1
0201 e5ff | | Load 0x2,-0x1
0202 8405 | | Call 0x2,0x5
0203 7803 |x | Jump 0x207
0204 e5fd | | Load 0x2,-0x3
0205 e5ff | | Load 0x2,-0x1
0206 8405 | | Call 0x2,0x5
0207 00da | | Load_Top At_Offset_2
0208 8004 | | Call 0x0,0x4
0209 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
020a 0000 0000 | | .BLANK 0000[0x6]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0219 | | .CONST 0x0219 ; Address of begin
0211 0270 | p | .CONST 0x0270 ; Address of exception handler
0212 0006 | | .CONST 0x0006 ; Number of locals
0213 INIT_0210:
0213 00e2 | | Load_Encached Integer_Cache
0214 00e2 | | Load_Encached Integer_Cache
0215 00e8 | | Load_Encached Character_Cache
0216 00e2 | | Load_Encached Integer_Cache
0217 00e1 | | Load_Encached Boolean_Cache
0218 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0219 BODY_0210:
0219 4800 |H | Short_Literal 0x0
021a a5fc | | Store_Unchecked 0x2,-0x4
021b 4800 |H | Short_Literal 0x0
021c a5fd | | Store_Unchecked 0x2,-0x3
021d 4800 |H | Short_Literal 0x0
021e a403 | | Store_Unchecked 0x2,0x3
021f 4801 |H | Short_Literal 0x1
0220 a402 | | Store_Unchecked 0x2,0x2
0221 00cf | | Action Mark_Auxiliary
0222 e5ff | | Load 0x2,-0x1
0223 01d9 | | Execute Vector,Reverse_Bounds
0224 0263 | c | Execute Discrete,Above_Bound
0225 7038 |p8 | Jump_Nonzero 0x25e
0226 00d8 | | Load_Top At_Offset_0
0227 e5ff | | Load 0x2,-0x1
0228 01d7 | | Execute Vector,Field_Read
0229 a404 | | Store_Unchecked 0x2,0x4
022a e404 | | Load 0x2,0x4
022b 0f20 | | Execute_Immediate Equal,0x20
022c 6803 |h | Jump_Zero 0x230
022d 00db | | Load_Top At_Offset_3
022e 702d |p- | Jump_Nonzero 0x25c
022f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0230 00db | | Load_Top At_Offset_3
0231 e404 | | Load 0x2,0x4
0232 0f2d | - | Execute_Immediate Equal,0x2d
0233 0279 | y | Execute Discrete,And
0234 6803 |h | Jump_Zero 0x238
0235 4fff |O | Short_Literal -0x1
0236 a402 | | Store_Unchecked 0x2,0x2
0237 7822 |x" | Jump 0x25a
0238 e404 | | Load 0x2,0x4
0239 4830 |H0 | Short_Literal 0x30
023a 4839 |H9 | Short_Literal 0x39
023b 0262 | b | Execute Discrete,In_Range
023c 6804 |h | Jump_Zero 0x241
023d e404 | | Load 0x2,0x4
023e 0ad0 | | Execute_Immediate Plus,-0x30
023f c405 | | Store 0x2,0x5
0240 780e |x | Jump 0x24f
0241 e404 | | Load 0x2,0x4
0242 820e | | Call 0x1,0xe
0243 c404 | | Store 0x2,0x4
0244 e404 | | Load 0x2,0x4
0245 4841 |HA | Short_Literal 0x41
0246 4846 |HF | Short_Literal 0x46
0247 0262 | b | Execute Discrete,In_Range
0248 6804 |h | Jump_Zero 0x24d
0249 e404 | | Load 0x2,0x4
024a 0ac9 | | Execute_Immediate Plus,-0x37
024b c405 | | Store 0x2,0x5
024c 7802 |x | Jump 0x24f
024d 49f4 |I | Short_Literal 0x1f4
024e a405 | | Store_Unchecked 0x2,0x5
024f e405 | | Load 0x2,0x5
0250 e5fe | | Load 0x2,-0x2
0251 027b | { | Execute Discrete,Greater_Equal
0252 6801 |h | Jump_Zero 0x254
0253 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0254 e403 | | Load 0x2,0x3
0255 e5fe | | Load 0x2,-0x2
0256 0271 | q | Execute Discrete,Times
0257 e405 | | Load 0x2,0x5
0258 0273 | s | Execute Discrete,Plus
0259 c403 | | Store 0x2,0x3
025a 4800 |H | Short_Literal 0x0
025b a406 | | Store_Unchecked 0x2,0x6
025c 00c8 | | Action Pop_Auxiliary_Range
025d 3fc8 |? | Loop_Increasing 0x226
025e 00ce | | Action Pop_Auxiliary
025f e5ff | | Load 0x2,-0x1
0260 01db | | Execute Vector,Length
0261 680d |h | Jump_Zero 0x26f
0262 e5ff | | Load 0x2,-0x1
0263 01db | | Execute Vector,Length
0264 0c02 | | Execute_Immediate Greater_Equal,0x2
0265 7003 |p | Jump_Nonzero 0x269
0266 e402 | | Load 0x2,0x2
0267 0f01 | | Execute_Immediate Equal,0x1
0268 6806 |h | Jump_Zero 0x26f
0269 00db | | Load_Top At_Offset_3
026a e402 | | Load 0x2,0x2
026b 0271 | q | Execute Discrete,Times
026c c5fd | | Store 0x2,-0x3
026d 4801 |H | Short_Literal 0x1
026e a5fc | | Store_Unchecked 0x2,-0x4
026f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0270 TRAP_0210:
0270 0007 | | Action Break_Optional
0271 4800 |H | Short_Literal 0x0
0272 a5fc | | Store_Unchecked 0x2,-0x4
0273 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0274 0000 0000 | | .BLANK 0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 00cf | | Action Mark_Auxiliary
027c 00db | | Load_Top At_Offset_3
027d 01dc | | Execute Vector,Last
027e e5ff | | Load 0x2,-0x1
027f 01dd | | Execute Vector,First
0280 0263 | c | Execute Discrete,Above_Bound
0281 7010 |p | Jump_Nonzero 0x292
0282 00d8 | | Load_Top At_Offset_0
0283 e5ff | | Load 0x2,-0x1
0284 01d7 | | Execute Vector,Field_Read
0285 e5fe | | Load 0x2,-0x2
0286 027e | ~ | Execute Discrete,Not_Equal
0287 6808 |h | Jump_Zero 0x290
0288 00d8 | | Load_Top At_Offset_0
0289 e5ff | | Load 0x2,-0x1
028a 01dc | | Execute Vector,Last
028b e5ff | | Load 0x2,-0x1
028c 01cf | | Execute Vector,Slice_Read
028d 0335 | 5 | Declare_Variable Array,Duplicate
028e 00cd | | Action Spare6_Action
028f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0290 00c8 | | Action Pop_Auxiliary_Range
0291 3ff0 |? | Loop_Increasing 0x282
0292 00ce | | Action Pop_Auxiliary
0293 00ea | | Load_Encached Null_String_Cache
0294 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0295 0000 0000 | | .XXX[0x3]
0297 0000 | |
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b 00cf | | Action Mark_Auxiliary
029c 00db | | Load_Top At_Offset_3
029d 01dd | | Execute Vector,First
029e e5ff | | Load 0x2,-0x1
029f 01dc | | Execute Vector,Last
02a0 0264 | d | Execute Discrete,Below_Bound
02a1 7010 |p | Jump_Nonzero 0x2b2
02a2 00d8 | | Load_Top At_Offset_0
02a3 e5ff | | Load 0x2,-0x1
02a4 01d7 | | Execute Vector,Field_Read
02a5 e5fe | | Load 0x2,-0x2
02a6 027e | ~ | Execute Discrete,Not_Equal
02a7 6808 |h | Jump_Zero 0x2b0
02a8 e5ff | | Load 0x2,-0x1
02a9 01dd | | Execute Vector,First
02aa 00d9 | | Load_Top At_Offset_1
02ab e5ff | | Load 0x2,-0x1
02ac 01cf | | Execute Vector,Slice_Read
02ad 0335 | 5 | Declare_Variable Array,Duplicate
02ae 00cd | | Action Spare6_Action
02af 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02b0 00c8 | | Action Pop_Auxiliary_Range
02b1 37f0 |7 | Loop_Decreasing 0x2a2
02b2 00ce | | Action Pop_Auxiliary
02b3 00ea | | Load_Encached Null_String_Cache
02b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02b5 0000 0000 | | .XXX[0x3]
02b7 0000 | |
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00db | | Load_Top At_Offset_3
02bc e5fe | | Load 0x2,-0x2
02bd e5ff | | Load 0x2,-0x1
02be 8219 | | Call 0x1,0x19
02bf 8218 | | Call 0x1,0x18
02c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02c1 0000 0000 | | .BLANK 0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02d5 | | .CONST 0x02d5 ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0004 | | .CONST 0x0004 ; Number of locals
02cb INIT_02c8:
02cb 00da | | Load_Top At_Offset_2
02cc 01db | | Execute Vector,Length
02cd 0aff | | Execute_Immediate Plus,-0x1
02ce 00e2 | | Load_Encached Integer_Cache
02cf 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
02d0 00db | | Load_Top At_Offset_3
02d1 01dd | | Execute Vector,First
02d2 00e4 | | Load_Encached Positive_Cache
02d3 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
02d4 00e8 | | Load_Encached Character_Cache
02d5 BODY_02c8:
02d5 00da | | Load_Top At_Offset_2
02d6 0c01 | | Execute_Immediate Greater_Equal,0x1
02d7 6879 |hy | Jump_Zero 0x351
02d8 00d9 | | Load_Top At_Offset_1
02d9 e5ff | | Load 0x2,-0x1
02da 01d7 | | Execute Vector,Field_Read
02db 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02dc e5fd | | Load 0x2,-0x3
02dd 683a |h: | Jump_Zero 0x318
02de 00cf | | Action Mark_Auxiliary
02df e5fe | | Load 0x2,-0x2
02e0 01dc | | Execute Vector,Last
02e1 e402 | | Load 0x2,0x2
02e2 0272 | r | Execute Discrete,Minus
02e3 00d8 | | Load_Top At_Offset_0
02e4 00e2 | | Load_Encached Integer_Cache
02e5 0260 | ` | Execute Discrete,In_Type
02e6 7001 |p | Jump_Nonzero 0x2e8
02e7 0801 | | Execute_Immediate Raise,0x1
02e8 e5fe | | Load 0x2,-0x2
02e9 01dd | | Execute Vector,First
02ea 0263 | c | Execute Discrete,Above_Bound
02eb 702a |p* | Jump_Nonzero 0x316
02ec 00db | | Load_Top At_Offset_3
02ed 00d9 | | Load_Top At_Offset_1
02ee e5fe | | Load 0x2,-0x2
02ef 01d7 | | Execute Vector,Field_Read
02f0 e226 | & | Load 0x1,0x26
02f1 01a7 | | Execute Matrix,Field_Read
02f2 6821 |h! | Jump_Zero 0x314
02f3 00cf | | Action Mark_Auxiliary
02f4 4801 |H | Short_Literal 0x1
02f5 e402 | | Load 0x2,0x2
02f6 0264 | d | Execute Discrete,Below_Bound
02f7 701b |p | Jump_Nonzero 0x313
02f8 00db | | Load_Top At_Offset_3
02f9 00d9 | | Load_Top At_Offset_1
02fa 0273 | s | Execute Discrete,Plus
02fb e5fe | | Load 0x2,-0x2
02fc 01d7 | | Execute Vector,Field_Read
02fd e403 | | Load 0x2,0x3
02fe 00da | | Load_Top At_Offset_2
02ff 0273 | s | Execute Discrete,Plus
0300 e5ff | | Load 0x2,-0x1
0301 01d7 | | Execute Vector,Field_Read
0302 e226 | & | Load 0x1,0x26
0303 01a7 | | Execute Matrix,Field_Read
0304 7002 |p | Jump_Nonzero 0x307
0305 00d2 | | Pop_Control Pop_Count_2
0306 780c |x | Jump 0x313
0307 00d8 | | Load_Top At_Offset_0
0308 0f01 | | Execute_Immediate Equal,0x1
0309 6807 |h | Jump_Zero 0x311
030a 00db | | Load_Top At_Offset_3
030b 00d8 | | Load_Top At_Offset_0
030c 00e3 | | Load_Encached Natural_Cache
030d 0260 | ` | Execute Discrete,In_Type
030e 7001 |p | Jump_Nonzero 0x310
030f 0801 | | Execute_Immediate Raise,0x1
0310 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0311 00c8 | | Action Pop_Auxiliary_Range
0312 37e5 |7 | Loop_Decreasing 0x2f8
0313 00ce | | Action Pop_Auxiliary
0314 00c8 | | Action Pop_Auxiliary_Range
0315 3fd6 |? | Loop_Increasing 0x2ec
0316 00ce | | Action Pop_Auxiliary
0317 7837 |x7 | Jump 0x34f
0318 00cf | | Action Mark_Auxiliary
0319 e5fe | | Load 0x2,-0x2
031a 01dc | | Execute Vector,Last
031b e402 | | Load 0x2,0x2
031c 0272 | r | Execute Discrete,Minus
031d 00d8 | | Load_Top At_Offset_0
031e 00e2 | | Load_Encached Integer_Cache
031f 0260 | ` | Execute Discrete,In_Type
0320 7001 |p | Jump_Nonzero 0x322
0321 0801 | | Execute_Immediate Raise,0x1
0322 e5fe | | Load 0x2,-0x2
0323 01dd | | Execute Vector,First
0324 0263 | c | Execute Discrete,Above_Bound
0325 7028 |p( | Jump_Nonzero 0x34e
0326 00d8 | | Load_Top At_Offset_0
0327 e5fe | | Load 0x2,-0x2
0328 01d7 | | Execute Vector,Field_Read
0329 e404 | | Load 0x2,0x4
032a 027f | | Execute Discrete,Equal
032b 6820 |h | Jump_Zero 0x34c
032c 00cf | | Action Mark_Auxiliary
032d 4801 |H | Short_Literal 0x1
032e e402 | | Load 0x2,0x2
032f 0264 | d | Execute Discrete,Below_Bound
0330 701a |p | Jump_Nonzero 0x34b
0331 e403 | | Load 0x2,0x3
0332 00d9 | | Load_Top At_Offset_1
0333 0273 | s | Execute Discrete,Plus
0334 e5ff | | Load 0x2,-0x1
0335 01d7 | | Execute Vector,Field_Read
0336 e407 | | Load 0x2,0x7
0337 00da | | Load_Top At_Offset_2
0338 0273 | s | Execute Discrete,Plus
0339 e5fe | | Load 0x2,-0x2
033a 01d7 | | Execute Vector,Field_Read
033b 027e | ~ | Execute Discrete,Not_Equal
033c 6802 |h | Jump_Zero 0x33f
033d 00d2 | | Pop_Control Pop_Count_2
033e 780c |x | Jump 0x34b
033f 00d8 | | Load_Top At_Offset_0
0340 0f01 | | Execute_Immediate Equal,0x1
0341 6807 |h | Jump_Zero 0x349
0342 00db | | Load_Top At_Offset_3
0343 00d8 | | Load_Top At_Offset_0
0344 00e3 | | Load_Encached Natural_Cache
0345 0260 | ` | Execute Discrete,In_Type
0346 7001 |p | Jump_Nonzero 0x348
0347 0801 | | Execute_Immediate Raise,0x1
0348 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0349 00c8 | | Action Pop_Auxiliary_Range
034a 37e6 |7 | Loop_Decreasing 0x331
034b 00ce | | Action Pop_Auxiliary
034c 00c8 | | Action Pop_Auxiliary_Range
034d 3fd8 |? | Loop_Increasing 0x326
034e 00ce | | Action Pop_Auxiliary
034f 4800 |H | Short_Literal 0x0
0350 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0351 00da | | Load_Top At_Offset_2
0352 7007 |p | Jump_Nonzero 0x35a
0353 e5fd | | Load 0x2,-0x3
0354 e5fe | | Load 0x2,-0x2
0355 00db | | Load_Top At_Offset_3
0356 e5ff | | Load 0x2,-0x1
0357 01d7 | | Execute Vector,Field_Read
0358 821c | | Call 0x1,0x1c
0359 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
035a e5fe | | Load 0x2,-0x2
035b 01dd | | Execute Vector,First
035c 00d8 | | Load_Top At_Offset_0
035d 00e3 | | Load_Encached Natural_Cache
035e 0260 | ` | Execute Discrete,In_Type
035f 7001 |p | Jump_Nonzero 0x361
0360 0801 | | Execute_Immediate Raise,0x1
0361 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0362 0000 0000 | | .BLANK 0000[0x6]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b e5fd | | Load 0x2,-0x3
036c 6812 |h | Jump_Zero 0x37f
036d 00cf | | Action Mark_Auxiliary
036e e5fe | | Load 0x2,-0x2
036f 01d9 | | Execute Vector,Reverse_Bounds
0370 0263 | c | Execute Discrete,Above_Bound
0371 700b |p | Jump_Nonzero 0x37d
0372 00d8 | | Load_Top At_Offset_0
0373 e5fe | | Load 0x2,-0x2
0374 01d7 | | Execute Vector,Field_Read
0375 e5ff | | Load 0x2,-0x1
0376 e226 | & | Load 0x1,0x26
0377 01a7 | | Execute Matrix,Field_Read
0378 6802 |h | Jump_Zero 0x37b
0379 00d8 | | Load_Top At_Offset_0
037a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
037b 00c8 | | Action Pop_Auxiliary_Range
037c 3ff5 |? | Loop_Increasing 0x372
037d 00ce | | Action Pop_Auxiliary
037e 7810 |x | Jump 0x38f
037f 00cf | | Action Mark_Auxiliary
0380 e5fe | | Load 0x2,-0x2
0381 01d9 | | Execute Vector,Reverse_Bounds
0382 0263 | c | Execute Discrete,Above_Bound
0383 700a |p | Jump_Nonzero 0x38e
0384 e5ff | | Load 0x2,-0x1
0385 00d9 | | Load_Top At_Offset_1
0386 e5fe | | Load 0x2,-0x2
0387 01d7 | | Execute Vector,Field_Read
0388 027f | | Execute Discrete,Equal
0389 6802 |h | Jump_Zero 0x38c
038a 00d8 | | Load_Top At_Offset_0
038b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
038c 00c8 | | Action Pop_Auxiliary_Range
038d 3ff6 |? | Loop_Increasing 0x384
038e 00ce | | Action Pop_Auxiliary
038f 4800 |H | Short_Literal 0x0
0390 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0391 0000 0000 | | .BLANK 0000[0x7]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03a5 | | .CONST 0x03a5 ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0004 | | .CONST 0x0004 ; Number of locals
039b INIT_0398:
039b 00da | | Load_Top At_Offset_2
039c 01db | | Execute Vector,Length
039d 0aff | | Execute_Immediate Plus,-0x1
039e 00e2 | | Load_Encached Integer_Cache
039f 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03a0 00db | | Load_Top At_Offset_3
03a1 01dd | | Execute Vector,First
03a2 00e4 | | Load_Encached Positive_Cache
03a3 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03a4 00e8 | | Load_Encached Character_Cache
03a5 BODY_0398:
03a5 00da | | Load_Top At_Offset_2
03a6 0c01 | | Execute_Immediate Greater_Equal,0x1
03a7 687d |h} | Jump_Zero 0x425
03a8 00d9 | | Load_Top At_Offset_1
03a9 e5ff | | Load 0x2,-0x1
03aa 01d7 | | Execute Vector,Field_Read
03ab 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
03ac e5fd | | Load 0x2,-0x3
03ad 683c |h< | Jump_Zero 0x3ea
03ae 00cf | | Action Mark_Auxiliary
03af e5fe | | Load 0x2,-0x2
03b0 01dd | | Execute Vector,First
03b1 e5fe | | Load 0x2,-0x2
03b2 01dc | | Execute Vector,Last
03b3 e402 | | Load 0x2,0x2
03b4 0272 | r | Execute Discrete,Minus
03b5 00d8 | | Load_Top At_Offset_0
03b6 00e2 | | Load_Encached Integer_Cache
03b7 0260 | ` | Execute Discrete,In_Type
03b8 7001 |p | Jump_Nonzero 0x3ba
03b9 0801 | | Execute_Immediate Raise,0x1
03ba 0264 | d | Execute Discrete,Below_Bound
03bb 702c |p, | Jump_Nonzero 0x3e8
03bc 00db | | Load_Top At_Offset_3
03bd 00d9 | | Load_Top At_Offset_1
03be e5fe | | Load 0x2,-0x2
03bf 01d7 | | Execute Vector,Field_Read
03c0 e226 | & | Load 0x1,0x26
03c1 01a7 | | Execute Matrix,Field_Read
03c2 6823 |h# | Jump_Zero 0x3e6
03c3 00cf | | Action Mark_Auxiliary
03c4 4801 |H | Short_Literal 0x1
03c5 e402 | | Load 0x2,0x2
03c6 0264 | d | Execute Discrete,Below_Bound
03c7 701d |p | Jump_Nonzero 0x3e5
03c8 00db | | Load_Top At_Offset_3
03c9 00d9 | | Load_Top At_Offset_1
03ca 0273 | s | Execute Discrete,Plus
03cb e5fe | | Load 0x2,-0x2
03cc 01d7 | | Execute Vector,Field_Read
03cd e403 | | Load 0x2,0x3
03ce 00da | | Load_Top At_Offset_2
03cf 0273 | s | Execute Discrete,Plus
03d0 e5ff | | Load 0x2,-0x1
03d1 01d7 | | Execute Vector,Field_Read
03d2 e226 | & | Load 0x1,0x26
03d3 01a7 | | Execute Matrix,Field_Read
03d4 7002 |p | Jump_Nonzero 0x3d7
03d5 00d2 | | Pop_Control Pop_Count_2
03d6 780e |x | Jump 0x3e5
03d7 00d8 | | Load_Top At_Offset_0
03d8 0f01 | | Execute_Immediate Equal,0x1
03d9 6809 |h | Jump_Zero 0x3e3
03da 00db | | Load_Top At_Offset_3
03db e402 | | Load 0x2,0x2
03dc 0273 | s | Execute Discrete,Plus
03dd 00d8 | | Load_Top At_Offset_0
03de 00e3 | | Load_Encached Natural_Cache
03df 0260 | ` | Execute Discrete,In_Type
03e0 7001 |p | Jump_Nonzero 0x3e2
03e1 0801 | | Execute_Immediate Raise,0x1
03e2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03e3 00c8 | | Action Pop_Auxiliary_Range
03e4 37e3 |7 | Loop_Decreasing 0x3c8
03e5 00ce | | Action Pop_Auxiliary
03e6 00c8 | | Action Pop_Auxiliary_Range
03e7 37d4 |7 | Loop_Decreasing 0x3bc
03e8 00ce | | Action Pop_Auxiliary
03e9 7839 |x9 | Jump 0x423
03ea 00cf | | Action Mark_Auxiliary
03eb e5fe | | Load 0x2,-0x2
03ec 01dd | | Execute Vector,First
03ed e5fe | | Load 0x2,-0x2
03ee 01dc | | Execute Vector,Last
03ef e402 | | Load 0x2,0x2
03f0 0272 | r | Execute Discrete,Minus
03f1 00d8 | | Load_Top At_Offset_0
03f2 00e2 | | Load_Encached Integer_Cache
03f3 0260 | ` | Execute Discrete,In_Type
03f4 7001 |p | Jump_Nonzero 0x3f6
03f5 0801 | | Execute_Immediate Raise,0x1
03f6 0264 | d | Execute Discrete,Below_Bound
03f7 702a |p* | Jump_Nonzero 0x422
03f8 00d8 | | Load_Top At_Offset_0
03f9 e5fe | | Load 0x2,-0x2
03fa 01d7 | | Execute Vector,Field_Read
03fb e404 | | Load 0x2,0x4
03fc 027f | | Execute Discrete,Equal
03fd 6822 |h" | Jump_Zero 0x420
03fe 00cf | | Action Mark_Auxiliary
03ff 4801 |H | Short_Literal 0x1
0400 e402 | | Load 0x2,0x2
0401 0264 | d | Execute Discrete,Below_Bound
0402 701c |p | Jump_Nonzero 0x41f
0403 e403 | | Load 0x2,0x3
0404 00d9 | | Load_Top At_Offset_1
0405 0273 | s | Execute Discrete,Plus
0406 e5ff | | Load 0x2,-0x1
0407 01d7 | | Execute Vector,Field_Read
0408 e407 | | Load 0x2,0x7
0409 00da | | Load_Top At_Offset_2
040a 0273 | s | Execute Discrete,Plus
040b e5fe | | Load 0x2,-0x2
040c 01d7 | | Execute Vector,Field_Read
040d 027e | ~ | Execute Discrete,Not_Equal
040e 6802 |h | Jump_Zero 0x411
040f 00d2 | | Pop_Control Pop_Count_2
0410 780e |x | Jump 0x41f
0411 00d8 | | Load_Top At_Offset_0
0412 0f01 | | Execute_Immediate Equal,0x1
0413 6809 |h | Jump_Zero 0x41d
0414 00db | | Load_Top At_Offset_3
0415 e402 | | Load 0x2,0x2
0416 0273 | s | Execute Discrete,Plus
0417 00d8 | | Load_Top At_Offset_0
0418 00e3 | | Load_Encached Natural_Cache
0419 0260 | ` | Execute Discrete,In_Type
041a 7001 |p | Jump_Nonzero 0x41c
041b 0801 | | Execute_Immediate Raise,0x1
041c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
041d 00c8 | | Action Pop_Auxiliary_Range
041e 37e4 |7 | Loop_Decreasing 0x403
041f 00ce | | Action Pop_Auxiliary
0420 00c8 | | Action Pop_Auxiliary_Range
0421 37d6 |7 | Loop_Decreasing 0x3f8
0422 00ce | | Action Pop_Auxiliary
0423 4800 |H | Short_Literal 0x0
0424 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0425 00da | | Load_Top At_Offset_2
0426 7007 |p | Jump_Nonzero 0x42e
0427 e5fd | | Load 0x2,-0x3
0428 e5fe | | Load 0x2,-0x2
0429 00db | | Load_Top At_Offset_3
042a e5ff | | Load 0x2,-0x1
042b 01d7 | | Execute Vector,Field_Read
042c 821e | | Call 0x1,0x1e
042d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
042e e5fe | | Load 0x2,-0x2
042f 01dc | | Execute Vector,Last
0430 00d8 | | Load_Top At_Offset_0
0431 00e3 | | Load_Encached Natural_Cache
0432 0260 | ` | Execute Discrete,In_Type
0433 7001 |p | Jump_Nonzero 0x435
0434 0801 | | Execute_Immediate Raise,0x1
0435 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0436 0000 0000 | | .XXX[0x2]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b e5fd | | Load 0x2,-0x3
043c 6812 |h | Jump_Zero 0x44f
043d 00cf | | Action Mark_Auxiliary
043e e5fe | | Load 0x2,-0x2
043f 01da | | Execute Vector,Bounds
0440 0264 | d | Execute Discrete,Below_Bound
0441 700b |p | Jump_Nonzero 0x44d
0442 00d8 | | Load_Top At_Offset_0
0443 e5fe | | Load 0x2,-0x2
0444 01d7 | | Execute Vector,Field_Read
0445 e5ff | | Load 0x2,-0x1
0446 e226 | & | Load 0x1,0x26
0447 01a7 | | Execute Matrix,Field_Read
0448 6802 |h | Jump_Zero 0x44b
0449 00d8 | | Load_Top At_Offset_0
044a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
044b 00c8 | | Action Pop_Auxiliary_Range
044c 37f5 |7 | Loop_Decreasing 0x442
044d 00ce | | Action Pop_Auxiliary
044e 7810 |x | Jump 0x45f
044f 00cf | | Action Mark_Auxiliary
0450 e5fe | | Load 0x2,-0x2
0451 01da | | Execute Vector,Bounds
0452 0264 | d | Execute Discrete,Below_Bound
0453 700a |p | Jump_Nonzero 0x45e
0454 e5ff | | Load 0x2,-0x1
0455 00d9 | | Load_Top At_Offset_1
0456 e5fe | | Load 0x2,-0x2
0457 01d7 | | Execute Vector,Field_Read
0458 027f | | Execute Discrete,Equal
0459 6802 |h | Jump_Zero 0x45c
045a 00d8 | | Load_Top At_Offset_0
045b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
045c 00c8 | | Action Pop_Auxiliary_Range
045d 37f6 |7 | Loop_Decreasing 0x454
045e 00ce | | Action Pop_Auxiliary
045f 4800 |H | Short_Literal 0x0
0460 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0461 0000 0000 | | .BLANK 0000[0x7]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 0477 | w | .CONST 0x0477 ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0004 | | .CONST 0x0004 ; Number of locals
046b INIT_0468:
046b 00da | | Load_Top At_Offset_2
046c 01db | | Execute Vector,Length
046d 00e2 | | Load_Encached Integer_Cache
046e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
046f 00db | | Load_Top At_Offset_3
0470 01dd | | Execute Vector,First
0471 00e4 | | Load_Encached Positive_Cache
0472 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0473 e5fe | | Load 0x2,-0x2
0474 01dd | | Execute Vector,First
0475 00e4 | | Load_Encached Positive_Cache
0476 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0477 BODY_0468:
0477 00da | | Load_Top At_Offset_2
0478 e5fe | | Load 0x2,-0x2
0479 01db | | Execute Vector,Length
047a 027f | | Execute Discrete,Equal
047b 6825 |h% | Jump_Zero 0x4a1
047c e5fd | | Load 0x2,-0x3
047d 681f |h | Jump_Zero 0x49d
047e 00cf | | Action Mark_Auxiliary
047f 00db | | Load_Top At_Offset_3
0480 0aff | | Execute_Immediate Plus,-0x1
0481 00d8 | | Load_Top At_Offset_0
0482 00e2 | | Load_Encached Integer_Cache
0483 0260 | ` | Execute Discrete,In_Type
0484 7001 |p | Jump_Nonzero 0x486
0485 0801 | | Execute_Immediate Raise,0x1
0486 4800 |H | Short_Literal 0x0
0487 0263 | c | Execute Discrete,Above_Bound
0488 7011 |p | Jump_Nonzero 0x49a
0489 00db | | Load_Top At_Offset_3
048a 00d9 | | Load_Top At_Offset_1
048b 0273 | s | Execute Discrete,Plus
048c e5fe | | Load 0x2,-0x2
048d 01d7 | | Execute Vector,Field_Read
048e e403 | | Load 0x2,0x3
048f 00da | | Load_Top At_Offset_2
0490 0273 | s | Execute Discrete,Plus
0491 e5ff | | Load 0x2,-0x1
0492 01d7 | | Execute Vector,Field_Read
0493 e226 | & | Load 0x1,0x26
0494 01a7 | | Execute Matrix,Field_Read
0495 7002 |p | Jump_Nonzero 0x498
0496 4800 |H | Short_Literal 0x0
0497 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0498 00c8 | | Action Pop_Auxiliary_Range
0499 3fef |? | Loop_Increasing 0x489
049a 00ce | | Action Pop_Auxiliary
049b 4801 |H | Short_Literal 0x1
049c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
049d e5ff | | Load 0x2,-0x1
049e e5fe | | Load 0x2,-0x2
049f 01df | | Execute Vector,Equal
04a0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
04a1 4800 |H | Short_Literal 0x0
04a2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
04a3 0000 0000 | | .BLANK 0000[0x5]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04af | | .CONST 0x04af ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0003 | | .CONST 0x0003 ; Number of locals
04ab INIT_04a8:
04ab e227 | ' | Load 0x1,0x27
04ac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04ad 029f 0563 | c| Declare_Subprogram INIT_0560,For_Call
04af BODY_04a8:
04af 00cf | | Action Mark_Auxiliary
04b0 e5ff | | Load 0x2,-0x1
04b1 01d9 | | Execute Vector,Reverse_Bounds
04b2 0263 | c | Execute Discrete,Above_Bound
04b3 7003 |p | Jump_Nonzero 0x4b7
04b4 8403 | | Call 0x2,0x3
04b5 00c8 | | Action Pop_Auxiliary_Range
04b6 3ffd |? | Loop_Increasing 0x4b4
04b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c7 | | .CONST 0x04c7 ; Address of begin
04b9 0004 | | .CONST 0x0004 ; Address of exception handler
04ba 0004 | | .CONST 0x0004 ; Number of locals
04bb INIT_04b8:
04bb e227 | ' | Load 0x1,0x27
04bc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04bd 00db | | Load_Top At_Offset_3
04be 01da | | Execute Vector,Bounds
04bf 00e9 | | Load_Encached String_Cache
04c0 035b | [ | Declare_Type Array,Constrained
04c1 0337 | 7 | Declare_Variable Array
04c2 e5ff | | Load 0x2,-0x1
04c3 00d9 | | Load_Top At_Offset_1
04c4 01d4 | | Execute Vector,Structure_Write
04c5 029f 0583 | | Declare_Subprogram INIT_0580,For_Call
04c7 BODY_04b8:
04c7 00cf | | Action Mark_Auxiliary
04c8 00da | | Load_Top At_Offset_2
04c9 01d9 | | Execute Vector,Reverse_Bounds
04ca 0263 | c | Execute Discrete,Above_Bound
04cb 7003 |p | Jump_Nonzero 0x4cf
04cc 8404 | | Call 0x2,0x4
04cd 00c8 | | Action Pop_Auxiliary_Range
04ce 3ffd |? | Loop_Increasing 0x4cc
04cf 00ce | | Action Pop_Auxiliary
04d0 00d9 | | Load_Top At_Offset_1
04d1 00e9 | | Load_Encached String_Cache
04d2 01c6 | | Execute Vector,Convert_To_Formal
04d3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04d4 0000 0000 | | .BLANK 0000[0x4]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04de | | .CONST 0x04de ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0004 | | .CONST 0x0004 ; Number of locals
04db INIT_04d8:
04db 00e2 | | Load_Encached Integer_Cache
04dc 00e8 | | Load_Encached Character_Cache
04dd 00e8 | | Load_Encached Character_Cache
04de BODY_04d8:
04de 00cf | | Action Mark_Auxiliary
04df 00e8 | | Load_Encached Character_Cache
04e0 0265 | e | Execute Discrete,Reverse_Bounds
04e1 0007 | | Action Break_Optional
04e2 00d8 | | Load_Top At_Offset_0
04e3 e224 | $ | Load 0x1,0x24
04e4 01d7 | | Execute Vector,Field_Read
04e5 a403 | | Store_Unchecked 0x2,0x3
04e6 00d8 | | Load_Top At_Offset_0
04e7 e225 | % | Load 0x1,0x25
04e8 01d7 | | Execute Vector,Field_Read
04e9 a404 | | Store_Unchecked 0x2,0x4
04ea e403 | | Load 0x2,0x3
04eb e404 | | Load 0x2,0x4
04ec 027e | ~ | Execute Discrete,Not_Equal
04ed 7005 |p | Jump_Nonzero 0x4f3
04ee 00d8 | | Load_Top At_Offset_0
04ef 4830 |H0 | Short_Literal 0x30
04f0 4839 |H9 | Short_Literal 0x39
04f1 0262 | b | Execute Discrete,In_Range
04f2 7801 |x | Jump 0x4f4
04f3 4801 |H | Short_Literal 0x1
04f4 0907 | | Execute_Immediate Binary_Scale,0x7
04f5 c402 | | Store 0x2,0x2
04f6 e402 | | Load 0x2,0x2
04f7 e403 | | Load 0x2,0x3
04f8 0273 | s | Execute Discrete,Plus
04f9 00d9 | | Load_Top At_Offset_1
04fa e229 | ) | Load 0x1,0x29
04fb 01d6 | | Execute Vector,Field_Write
04fc e402 | | Load 0x2,0x2
04fd e404 | | Load 0x2,0x4
04fe 0273 | s | Execute Discrete,Plus
04ff 00d9 | | Load_Top At_Offset_1
0500 4880 |H | Short_Literal 0x80
0501 0273 | s | Execute Discrete,Plus
0502 e229 | ) | Load 0x1,0x29
0503 01d6 | | Execute Vector,Field_Write
0504 00c8 | | Action Pop_Auxiliary_Range
0505 3fdc |? | Loop_Increasing 0x4e2
0506 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0507 0000 | | .XXX[0x1]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b 00da | | Load_Top At_Offset_2
050c 7028 |p( | Jump_Nonzero 0x535
050d 00cf | | Action Mark_Auxiliary
050e e7fe | | Load 0x3,-0x2
050f 4801 |H | Short_Literal 0x1
0510 0263 | c | Execute Discrete,Above_Bound
0511 7006 |p | Jump_Nonzero 0x518
0512 e403 | | Load 0x2,0x3
0513 e5fc | | Load 0x2,-0x4
0514 8005 | | Call 0x0,0x5
0515 00d1 | | Pop_Control Pop_Count_1
0516 00c8 | | Action Pop_Auxiliary_Range
0517 3ffa |? | Loop_Increasing 0x512
0518 00ce | | Action Pop_Auxiliary
0519 e402 | | Load 0x2,0x2
051a 6804 |h | Jump_Zero 0x51f
051b e403 | | Load 0x2,0x3
051c 482d |H- | Short_Literal 0x2d
051d 8005 | | Call 0x0,0x5
051e 00d1 | | Pop_Control Pop_Count_1
051f e5ff | | Load 0x2,-0x1
0520 7013 |p | Jump_Nonzero 0x534
0521 00db | | Load_Top At_Offset_3
0522 0c01 | | Execute_Immediate Greater_Equal,0x1
0523 680c |h | Jump_Zero 0x530
0524 e403 | | Load 0x2,0x3
0525 4830 |H0 | Short_Literal 0x30
0526 e403 | | Load 0x2,0x3
0527 8006 | | Call 0x0,0x6
0528 00d8 | | Load_Top At_Offset_0
0529 00e4 | | Load_Encached Positive_Cache
052a 0260 | ` | Execute Discrete,In_Type
052b 7001 |p | Jump_Nonzero 0x52d
052c 0801 | | Execute_Immediate Raise,0x1
052d 8007 | | Call 0x0,0x7
052e 00d1 | | Pop_Control Pop_Count_1
052f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0530 e403 | | Load 0x2,0x3
0531 4830 |H0 | Short_Literal 0x30
0532 8005 | | Call 0x0,0x5
0533 00d1 | | Pop_Control Pop_Count_1
0534 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0535 00db | | Load_Top At_Offset_3
0536 0aff | | Execute_Immediate Plus,-0x1
0537 00d8 | | Load_Top At_Offset_0
0538 00e2 | | Load_Encached Integer_Cache
0539 0260 | ` | Execute Discrete,In_Type
053a 7001 |p | Jump_Nonzero 0x53c
053b 0801 | | Execute_Immediate Raise,0x1
053c 00db | | Load_Top At_Offset_3
053d e5fe | | Load 0x2,-0x2
053e 0270 | p | Execute Discrete,Divide
053f 8405 | | Call 0x2,0x5
0540 e402 | | Load 0x2,0x2
0541 7005 |p | Jump_Nonzero 0x547
0542 00da | | Load_Top At_Offset_2
0543 e5fe | | Load 0x2,-0x2
0544 026e | n | Execute Discrete,Modulo
0545 a404 | | Store_Unchecked 0x2,0x4
0546 780c |x | Jump 0x553
0547 e5fe | | Load 0x2,-0x2
0548 00db | | Load_Top At_Offset_3
0549 e5fe | | Load 0x2,-0x2
054a 026e | n | Execute Discrete,Modulo
054b 0272 | r | Execute Discrete,Minus
054c c404 | | Store 0x2,0x4
054d e404 | | Load 0x2,0x4
054e e5fe | | Load 0x2,-0x2
054f 027f | | Execute Discrete,Equal
0550 6802 |h | Jump_Zero 0x553
0551 4800 |H | Short_Literal 0x0
0552 a404 | | Store_Unchecked 0x2,0x4
0553 e403 | | Load 0x2,0x3
0554 e404 | | Load 0x2,0x4
0555 e22b | + | Load 0x1,0x2b
0556 01d7 | | Execute Vector,Field_Read
0557 8005 | | Call 0x0,0x5
0558 00d1 | | Pop_Control Pop_Count_1
0559 4503 |E | Exit_Suprogram New_Top_Offset 0x3
055a 0000 0000 | | .BLANK 0000[0x6]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 056d | m | .CONST 0x056d ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0003 | | .CONST 0x0003 ; Number of locals
0563 INIT_0560:
0563 e406 | | Load 0x2,0x6
0564 e5ff | | Load 0x2,-0x1
0565 01d5 | | Execute Vector,Field_Reference
0566 0007 | | Action Break_Optional
0567 00d8 | | Load_Top At_Offset_0
0568 e402 | | Load 0x2,0x2
0569 0273 | s | Execute Discrete,Plus
056a e229 | ) | Load 0x1,0x29
056b 01d5 | | Execute Vector,Field_Reference
056c 0007 | | Action Break_Optional
056d BODY_0560:
056d 00d8 | | Load_Top At_Offset_0
056e 487f |H | Short_Literal 0x7f
056f 0279 | y | Execute Discrete,And
0570 00d8 | | Load_Top At_Offset_0
0571 00e8 | | Load_Encached Character_Cache
0572 0260 | ` | Execute Discrete,In_Type
0573 7001 |p | Jump_Nonzero 0x575
0574 0801 | | Execute_Immediate Raise,0x1
0575 a602 | | Store_Unchecked 0x3,0x2
0576 00d8 | | Load_Top At_Offset_0
0577 00da | | Load_Top At_Offset_2
0578 0272 | r | Execute Discrete,Minus
0579 c402 | | Store 0x2,0x2
057a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
057b 0000 0000 | | .BLANK 0000[0x5]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 058d | | .CONST 0x058d ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0003 | | .CONST 0x0003 ; Number of locals
0583 INIT_0580:
0583 e407 | | Load 0x2,0x7
0584 e403 | | Load 0x2,0x3
0585 01d5 | | Execute Vector,Field_Reference
0586 0007 | | Action Break_Optional
0587 00d8 | | Load_Top At_Offset_0
0588 e402 | | Load 0x2,0x2
0589 0273 | s | Execute Discrete,Plus
058a e229 | ) | Load 0x1,0x29
058b 01d5 | | Execute Vector,Field_Reference
058c 0007 | | Action Break_Optional
058d BODY_0580:
058d 00d8 | | Load_Top At_Offset_0
058e 487f |H | Short_Literal 0x7f
058f 0279 | y | Execute Discrete,And
0590 00d8 | | Load_Top At_Offset_0
0591 00e8 | | Load_Encached Character_Cache
0592 0260 | ` | Execute Discrete,In_Type
0593 7001 |p | Jump_Nonzero 0x595
0594 0801 | | Execute_Immediate Raise,0x1
0595 a602 | | Store_Unchecked 0x3,0x2
0596 00d8 | | Load_Top At_Offset_0
0597 00da | | Load_Top At_Offset_2
0598 0272 | r | Execute Discrete,Minus
0599 c402 | | Store 0x2,0x2
059a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
059b 0000 0000 | | .BLANK 0000[0x5]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; Debug Table
05a0 ; --------------------------------------------------------------------------------------
05a0 0004 0008 | | .DEBUG4 0x0004,0x0008,0xde9c,0x0000,0x0001,0x001b
05a6 000b 0612 | | .DBG4T 0x000b,0x0612,0x8000,0x0000
05aa 0036 0629 | 6 )| .DBG4T 0x0036,0x0629,0x8000,0x8000
05ae 012b 0672 | + r| .DBG4T 0x012b,0x0672,0x0002,0x0000
05b2 015b 0679 | [ y| .DBG4T 0x015b,0x0679,0x0001,0x0000
05b6 0163 067c | c || .DBG4T 0x0163,0x067c,0x0001,0x0000
05ba 016b 067f | k | .DBG4T 0x016b,0x067f,0x0002,0x0000
05be 0173 0682 | s | .DBG4T 0x0173,0x0682,0x0002,0x0000
05c2 017b 0685 | { | .DBG4T 0x017b,0x0685,0x0001,0x0000
05c6 0193 0689 | | .DBG4T 0x0193,0x0689,0x0001,0x0000
05ca 01ab 068d | | .DBG4T 0x01ab,0x068d,0x0002,0x0000
05ce 01cb 0693 | | .DBG4T 0x01cb,0x0693,0x0002,0x0000
05d2 01eb 0699 | | .DBG4T 0x01eb,0x0699,0x0002,0x0000
05d6 0213 06a5 | | .DBG4T 0x0213,0x06a5,0x0001,0x0000
05da 027b 06c5 | { | .DBG4T 0x027b,0x06c5,0x0002,0x0000
05de 029b 06cb | | .DBG4T 0x029b,0x06cb,0x0002,0x0000
05e2 02bb 06d1 | | .DBG4T 0x02bb,0x06d1,0x0002,0x0000
05e6 02cb 06d4 | | .DBG4T 0x02cb,0x06d4,0x0002,0x0000
05ea 036b 06ee | k | .DBG4T 0x036b,0x06ee,0x0002,0x0000
05ee 039b 06f8 | | .DBG4T 0x039b,0x06f8,0x0002,0x0000
05f2 043b 0712 | ; | .DBG4T 0x043b,0x0712,0x0002,0x0000
05f6 046b 071c | k | .DBG4T 0x046b,0x071c,0x0002,0x0000
05fa 04ab 0729 | )| .DBG4T 0x04ab,0x0729,0x0001,0x0000
05fe 04bb 072e | .| .DBG4T 0x04bb,0x072e,0x0002,0x0000
0602 04db 0735 | 5| .DBG4T 0x04db,0x0735,0x0004,0x0000
0606 050b 0740 | @| .DBG4T 0x050b,0x0740,0x0001,0x0000
060a 0563 0752 | c R| .DBG4T 0x0563,0x0752,0x0004,0x0000
060e 0583 0758 | X| .DBG4T 0x0583,0x0758,0x0004,0x0000
0612 ; --------------------------------------------------------------------------------------
0612 ; Debug chain
0612 ; --------------------------------------------------------------------------------------
0612 0015 0000 | | .DBGLEN 0x0015,0x0000
0614 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033
0629 ; --------------------------------------------------------------------------------------
0629 ; Debug chain
0629 ; --------------------------------------------------------------------------------------
0629 001e 000b | | .DBGLEN 0x001e,0x000b
062b 0036 003c | 6 <| .DBGLNO 0x0036,0x003c,0x0044,0x0046,0x0048,0x005a,0x005e,0x0064,0x0066,0x00b3,0x00b5,0x00b7,0x00b9,0x00bb,0x00bd,0x00bf,0x00c1,0x00c3,0x00c5,0x00c7,0x00c9,0x00cb,0x00cd,0x00cf,0x00d1,0x00d3,0x00d5,0x00d7,0x00d9,0x00db,0x00e0,0x00e3,0x00e7,0x00ef,0x00f3,0x00f6,0x0100,0x010a,0x010d,0x0117,0x0121
0654 0001 0002 | | .XXX[0x1e]
0656 0004 0005 | |
0658 0006 0007 | |
065a 0008 0009 | |
065c 000b 000c | |
065e 000d 000e | |
0660 000f 0010 | |
0662 0011 0012 | |
0664 0013 0014 | |
0666 0015 0016 | |
0668 0017 0018 | |
066a 0019 001a | |
066c 001b 001c | |
066e 001d 001e | |
0670 001f 0020 | |
0672 ; --------------------------------------------------------------------------------------
0672 ; Debug chain
0672 ; --------------------------------------------------------------------------------------
0672 0002 0003 | | .DBGLEN 0x0002,0x0003
0674 012b 012f | + /| .DBGLNO 0x012b,0x012f,0x0132,0x0135,0x0156
0679 ; --------------------------------------------------------------------------------------
0679 ; Debug chain
0679 ; --------------------------------------------------------------------------------------
0679 0000 0001 | | .DBGLEN 0x0000,0x0001
067b 015b | [ | .DBGLNO 0x015b
067c ; --------------------------------------------------------------------------------------
067c ; Debug chain
067c ; --------------------------------------------------------------------------------------
067c 0000 0001 | | .DBGLEN 0x0000,0x0001
067e 0163 | c | .DBGLNO 0x0163
067f ; --------------------------------------------------------------------------------------
067f ; Debug chain
067f ; --------------------------------------------------------------------------------------
067f 0000 0001 | | .DBGLEN 0x0000,0x0001
0681 016b | k | .DBGLNO 0x016b
0682 ; --------------------------------------------------------------------------------------
0682 ; Debug chain
0682 ; --------------------------------------------------------------------------------------
0682 0000 0001 | | .DBGLEN 0x0000,0x0001
0684 0173 | s | .DBGLNO 0x0173
0685 ; --------------------------------------------------------------------------------------
0685 ; Debug chain
0685 ; --------------------------------------------------------------------------------------
0685 0000 0002 | | .DBGLEN 0x0000,0x0002
0687 017c 0180 | | | .DBGLNO 0x017c,0x0180
0689 ; --------------------------------------------------------------------------------------
0689 ; Debug chain
0689 ; --------------------------------------------------------------------------------------
0689 0000 0002 | | .DBGLEN 0x0000,0x0002
068b 0194 0198 | | .DBGLNO 0x0194,0x0198
068d ; --------------------------------------------------------------------------------------
068d ; Debug chain
068d ; --------------------------------------------------------------------------------------
068d 0001 0003 | | .DBGLEN 0x0001,0x0003
068f 01ab 01b3 | | .DBGLNO 0x01ab,0x01b3,0x01b7,0x01c2
0693 ; --------------------------------------------------------------------------------------
0693 ; Debug chain
0693 ; --------------------------------------------------------------------------------------
0693 0001 0003 | | .DBGLEN 0x0001,0x0003
0695 01cb 01d3 | | .DBGLNO 0x01cb,0x01d3,0x01d7,0x01e2
0699 ; --------------------------------------------------------------------------------------
0699 ; Debug chain
0699 ; --------------------------------------------------------------------------------------
0699 0004 0006 | | .DBGLEN 0x0004,0x0006
069b 01eb 01ed | | .DBGLNO 0x01eb,0x01ed,0x01f2,0x01f3,0x01f5,0x01fa,0x01fd,0x01ff,0x0204,0x0207
06a5 ; --------------------------------------------------------------------------------------
06a5 ; Debug chain
06a5 ; --------------------------------------------------------------------------------------
06a5 0005 0019 | | .DBGLEN 0x0005,0x0019
06a7 0213 0214 | | .DBGLNO 0x0213,0x0214,0x0215,0x0216,0x0217,0x0219,0x021b,0x021d,0x021f,0x0222,0x0226,0x022a,0x022d,0x022f,0x0230,0x0235,0x0238,0x023d,0x0241,0x0244,0x0249,0x024d,0x024f,0x0253,0x0254,0x025a,0x025f,0x0269,0x026d,0x0271
06c5 ; --------------------------------------------------------------------------------------
06c5 ; Debug chain
06c5 ; --------------------------------------------------------------------------------------
06c5 0000 0004 | | .DBGLEN 0x0000,0x0004
06c7 027c 0282 | | | .DBGLNO 0x027c,0x0282,0x0288,0x0293
06cb ; --------------------------------------------------------------------------------------
06cb ; Debug chain
06cb ; --------------------------------------------------------------------------------------
06cb 0000 0004 | | .DBGLEN 0x0000,0x0004
06cd 029c 02a2 | | .DBGLNO 0x029c,0x02a2,0x02a8,0x02b3
06d1 ; --------------------------------------------------------------------------------------
06d1 ; Debug chain
06d1 ; --------------------------------------------------------------------------------------
06d1 0000 0001 | | .DBGLEN 0x0000,0x0001
06d3 02bb | | .DBGLNO 0x02bb
06d4 ; --------------------------------------------------------------------------------------
06d4 ; Debug chain
06d4 ; --------------------------------------------------------------------------------------
06d4 0003 0015 | | .DBGLEN 0x0003,0x0015
06d6 02cb 02d0 | | .DBGLNO 0x02cb,0x02d0,0x02d4,0x02d5,0x02d8,0x02dc,0x02df,0x02ec,0x02f4,0x02f8,0x0305,0x0307,0x030a,0x0319,0x0326,0x032d,0x0331,0x033d,0x033f,0x0342,0x034f,0x0351,0x0353,0x035a
06ee ; --------------------------------------------------------------------------------------
06ee ; Debug chain
06ee ; --------------------------------------------------------------------------------------
06ee 0000 0008 | | .DBGLEN 0x0000,0x0008
06f0 036b 036e | k n| .DBGLNO 0x036b,0x036e,0x0372,0x0379,0x0380,0x0384,0x038a,0x038f
06f8 ; --------------------------------------------------------------------------------------
06f8 ; Debug chain
06f8 ; --------------------------------------------------------------------------------------
06f8 0003 0015 | | .DBGLEN 0x0003,0x0015
06fa 039b 03a0 | | .DBGLNO 0x039b,0x03a0,0x03a4,0x03a5,0x03a8,0x03ac,0x03af,0x03bc,0x03c4,0x03c8,0x03d5,0x03d7,0x03da,0x03eb,0x03f8,0x03ff,0x0403,0x040f,0x0411,0x0414,0x0423,0x0425,0x0427,0x042e
0712 ; --------------------------------------------------------------------------------------
0712 ; Debug chain
0712 ; --------------------------------------------------------------------------------------
0712 0000 0008 | | .DBGLEN 0x0000,0x0008
0714 043b 043e | ; >| .DBGLNO 0x043b,0x043e,0x0442,0x0449,0x0450,0x0454,0x045a,0x045f
071c ; --------------------------------------------------------------------------------------
071c ; Debug chain
071c ; --------------------------------------------------------------------------------------
071c 0003 0008 | | .DBGLEN 0x0003,0x0008
071e 046b 046f | k o| .DBGLNO 0x046b,0x046f,0x0473,0x0477,0x047c,0x047f,0x0489,0x0496,0x049b,0x049d,0x04a1
0729 ; --------------------------------------------------------------------------------------
0729 ; Debug chain
0729 ; --------------------------------------------------------------------------------------
0729 0001 0002 | | .DBGLEN 0x0001,0x0002
072b 04ab 04b0 | | .DBGLNO 0x04ab,0x04b0,0x04b4
072e ; --------------------------------------------------------------------------------------
072e ; Debug chain
072e ; --------------------------------------------------------------------------------------
072e 0002 0003 | | .DBGLEN 0x0002,0x0003
0730 04bb 04bd | | .DBGLNO 0x04bb,0x04bd,0x04c8,0x04cc,0x04d0
0735 ; --------------------------------------------------------------------------------------
0735 ; Debug chain
0735 ; --------------------------------------------------------------------------------------
0735 0003 0006 | | .DBGLEN 0x0003,0x0006
0737 04db 04dc | | .DBGLNO 0x04db,0x04dc,0x04dd,0x04df,0x04e2,0x04e6,0x04ea,0x04f6,0x04fc
0740 ; --------------------------------------------------------------------------------------
0740 ; Debug chain
0740 ; --------------------------------------------------------------------------------------
0740 0000 0010 | | .DBGLEN 0x0000,0x0010
0742 050b 050e | | .DBGLNO 0x050b,0x050e,0x0512,0x0519,0x051b,0x051f,0x0521,0x0524,0x0530,0x0535,0x0540,0x0542,0x0547,0x054d,0x0551,0x0553
0752 ; --------------------------------------------------------------------------------------
0752 ; Debug chain
0752 ; --------------------------------------------------------------------------------------
0752 0002 0002 | | .DBGLEN 0x0002,0x0002
0754 0563 0567 | c g| .DBGLNO 0x0563,0x0567,0x056d,0x0576
0758 ; --------------------------------------------------------------------------------------
0758 ; Debug chain
0758 ; --------------------------------------------------------------------------------------
0758 0002 0002 | | .DBGLEN 0x0002,0x0002
075a 0583 0587 | | .DBGLNO 0x0583,0x0587,0x058d,0x0596
075e 0000 0000 | | .BLANK 0000[0xa2]