|
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, 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 0560 | ` | .CONST 0x0560 ; 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 0042 | B | .CONST 0x0042 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001d | | .CONST 0x001d ; Number of locals
000b INIT_0008:
000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
000d 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
000f 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated
0011 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated
0013 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
0015 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
0017 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0019 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
001b 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated
001d 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
001f 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
0021 00bf | | Action Accept_Activation
0022 a002 | | Store_Unchecked 0x0,0x2
0023 00c6 | | Action Check_Subprogram_Elaborated
0024 e003 | | Load 0x0,0x3
0025 e004 | | Load 0x0,0x4
0026 e005 | | Load 0x0,0x5
0027 e006 | | Load 0x0,0x6
0028 4800 |H | Short_Literal 0x0
0029 0007 | | Action Break_Optional
002a 1d0d | | Execute_Immediate Reference_Lex_1,0xd
002b 00c7 | | Action Elaborate_Subprogram
002c 1d0e | | Execute_Immediate Reference_Lex_1,0xe
002d 00c7 | | Action Elaborate_Subprogram
002e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
002f 00c7 | | Action Elaborate_Subprogram
0030 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0031 00c7 | | Action Elaborate_Subprogram
0032 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0033 00c7 | | Action Elaborate_Subprogram
0034 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0035 00c7 | | Action Elaborate_Subprogram
0036 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0037 00c7 | | Action Elaborate_Subprogram
0038 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0039 00c7 | | Action Elaborate_Subprogram
003a 1d10 | | Execute_Immediate Reference_Lex_1,0x10
003b 00c7 | | Action Elaborate_Subprogram
003c 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call
003e 1d16 | | Execute_Immediate Reference_Lex_1,0x16
003f 00c7 | | Action Elaborate_Subprogram
0040 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0041 00c7 | | Action Elaborate_Subprogram
0042 BODY_0008:
0042 00bc | | Action Signal_Activated
0043 00bb | | Action Signal_Completion
0044 0000 0000 | | .BLANK 0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 4800 |H | Short_Literal 0x0
004c 00db | | Load_Top At_Offset_3
004d 0227 | ' | Execute Access,All_Reference
004e 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37
004f 0229 | ) | Execute Access,All_Read
0050 e007 | | Load 0x0,0x7
0051 00ad | | QQ_Action Package,Field_Execute_Dynamic
0052 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0053 0000 0000 | | .BLANK 0000[0x5]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 4800 |H | Short_Literal 0x0
005c 00db | | Load_Top At_Offset_3
005d 0227 | ' | Execute Access,All_Reference
005e 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37
005f 0229 | ) | Execute Access,All_Read
0060 e008 | | Load 0x0,0x8
0061 00ad | | QQ_Action Package,Field_Execute_Dynamic
0062 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0063 0000 0000 | | .BLANK 0000[0x5]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006d | m | .CONST 0x006d ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0002 | | .CONST 0x0002 ; Number of locals
006b INIT_0068:
006b e009 | | Load 0x0,0x9
006c 0007 | | Action Break_Optional
006d BODY_0068:
006d e009 | | Load 0x0,0x9
006e e5ff | | Load 0x2,-0x1
006f 4802 |H | Short_Literal 0x2
0070 e00a | | Load 0x0,0xa
0071 e00b | | Load 0x0,0xb
0072 00ad | | QQ_Action Package,Field_Execute_Dynamic
0073 0039 | 9 | Store_Top Access,At_Offset_1
0074 00db | | Load_Top At_Offset_3
0075 0229 | ) | Execute Access,All_Read
0076 3c33 |<3 | Execute Record,Field_Read,Field_Number 0x33
0077 00d8 | | Load_Top At_Offset_0
0078 4800 |H | Short_Literal 0x0
0079 4817 |H | Short_Literal 0x17
007a e00c | | Load 0x0,0xc
007b 0334 | 4 | Declare_Variable Array,With_Constraint
007c 502b |P+ | Indirect_Literal Any,0xa8,{0x5472616e, 0x73706f72}
007d 4800 |H | Short_Literal 0x0
007e 4805 |H | Short_Literal 0x5
007f e00c | | Load 0x0,0xc
0080 0334 | 4 | Declare_Variable Array,With_Constraint
0081 5032 |P2 | Indirect_Literal Any,0xb4,{0x54457272, 0x6f720000}
0082 4800 |H | Short_Literal 0x0
0083 4808 |H | Short_Literal 0x8
0084 e00c | | Load 0x0,0xc
0085 0334 | 4 | Declare_Variable Array,With_Constraint
0086 5031 |P1 | Indirect_Literal Any,0xb8,{0x586c6962, 0x4572726f}
0087 800d | | Call 0x0,0xd
0088 4800 |H | Short_Literal 0x0
0089 4801 |H | Short_Literal 0x1
008a e00c | | Load 0x0,0xc
008b 0334 | 4 | Declare_Variable Array,With_Constraint
008c 5033 |P3 | Indirect_Literal Any,0xc0,{0x20280000, 0x00000000}
008d 01cc | | Execute Vector,Catenate
008e e5fe | | Load 0x2,-0x2
008f 01cc | | Execute Vector,Catenate
0090 4800 |H | Short_Literal 0x0
0091 4802 |H | Short_Literal 0x2
0092 e00c | | Load 0x0,0xc
0093 0334 | 4 | Declare_Variable Array,With_Constraint
0094 502f |P/ | Indirect_Literal Any,0xc4,{0x20292000, 0x00000000}
0095 01cc | | Execute Vector,Catenate
0096 e5ff | | Load 0x2,-0x1
0097 0227 | ' | Execute Access,All_Reference
0098 3438 |48 | Execute Record,Field_Reference,Field_Number 0x38
0099 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
009a 800e | | Call 0x0,0xe
009b 800f | | Call 0x0,0xf
009c 01cc | | Execute Vector,Catenate
009d 8010 | | Call 0x0,0x10
009e 00d2 | | Pop_Control Pop_Count_2
009f 00db | | Load_Top At_Offset_3
00a0 00d9 | | Load_Top At_Offset_1
00a1 8011 | | Call 0x0,0x11
00a2 8012 | | Call 0x0,0x12
00a3 e013 | | Load 0x0,0x13
00a4 0257 | W | Execute Discrete,Raise
00a5 0000 0000 | | .XXX[0x3]
00a7 0000 | |
00a8 5472 616e |Tran| .LITERAL {0x5472616e, 0x73706f72}
00ac 7420 7061 |t pa| .XXX[0x8]
00ae 636b 6167 |ckag|
00b0 6520 6572 |e er|
00b2 726f 723a |ror:|
00b4 5445 7272 |TErr| .LITERAL {0x54457272, 0x6f720000}
00b8 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f}
00bc 7200 0000 |r | .XXX[0x4]
00be 0000 0000 | |
00c0 2028 0000 | ( | .LITERAL {0x20280000, 0x00000000}
00c4 2029 2000 | ) | .LITERAL {0x20292000, 0x00000000}
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 00da | | Load_Top At_Offset_2
00cc 0227 | ' | Execute Access,All_Reference
00cd 3c3a |<: | Execute Record,Field_Read,Field_Number 0x3a
00ce e009 | | Load 0x0,0x9
00cf 022e | . | Execute Access,Not_Equal
00d0 6806 |h | Jump_Zero 0xd7
00d1 00da | | Load_Top At_Offset_2
00d2 00db | | Load_Top At_Offset_3
00d3 0227 | ' | Execute Access,All_Reference
00d4 3c3a |<: | Execute Record,Field_Read,Field_Number 0x3a
00d5 8014 | | Call 0x0,0x14
00d6 8015 | | Call 0x0,0x15
00d7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00dd | | .CONST 0x00dd ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0002 | | .CONST 0x0002 ; Number of locals
00db INIT_00d8:
00db e016 | | Load 0x0,0x16
00dc 0322 | " | Declare_Variable Record
00dd BODY_00d8:
00dd 00db | | Load_Top At_Offset_3
00de 0227 | ' | Execute Access,All_Reference
00df 340e |4 | Execute Record,Field_Reference,Field_Number 0xe
00e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00e1 e5ff | | Load 0x2,-0x1
00e2 0227 | ' | Execute Access,All_Reference
00e3 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
00e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00e5 027c | | | Execute Discrete,Less
00e6 6801 |h | Jump_Zero 0xe8
00e7 08e0 | | Execute_Immediate Raise,0xe0
00e8 00db | | Load_Top At_Offset_3
00e9 0227 | ' | Execute Access,All_Reference
00ea 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
00eb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00ec e5ff | | Load 0x2,-0x1
00ed 0227 | ' | Execute Access,All_Reference
00ee 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
00ef 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00f0 0273 | s | Execute Discrete,Plus
00f1 00d9 | | Load_Top At_Offset_1
00f2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00f3 00db | | Load_Top At_Offset_3
00f4 0227 | ' | Execute Access,All_Reference
00f5 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
00f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00f7 e5ff | | Load 0x2,-0x1
00f8 0227 | ' | Execute Access,All_Reference
00f9 3c10 |< | Execute Record,Field_Read,Field_Number 0x10
00fa 0273 | s | Execute Discrete,Plus
00fb e5ff | | Load 0x2,-0x1
00fc 0227 | ' | Execute Access,All_Reference
00fd 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
00fe 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00ff 00d8 | | Load_Top At_Offset_0
0100 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0101 0000 0000 | | .BLANK 0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010e | | .CONST 0x010e ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0003 | | .CONST 0x0003 ; Number of locals
010b INIT_0108:
010b e017 | | Load 0x0,0x17
010c 029f 0433 | 3| Declare_Subprogram INIT_0430,For_Call
010e BODY_0108:
010e e5ff | | Load 0x2,-0x1
010f 0227 | ' | Execute Access,All_Reference
0110 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
0111 003a | : | Store_Top Access,At_Offset_2
0112 00d9 | | Load_Top At_Offset_1
0113 e017 | | Load 0x0,0x17
0114 022f | / | Execute Access,Equal
0115 6802 |h | Jump_Zero 0x118
0116 8403 | | Call 0x2,0x3
0117 780a |x | Jump 0x122
0118 00d9 | | Load_Top At_Offset_1
0119 0227 | ' | Execute Access,All_Reference
011a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
011b e5ff | | Load 0x2,-0x1
011c 0227 | ' | Execute Access,All_Reference
011d 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
011e e017 | | Load 0x0,0x17
011f 00da | | Load_Top At_Offset_2
0120 0227 | ' | Execute Access,All_Reference
0121 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0122 e5fe | | Load 0x2,-0x2
0123 00da | | Load_Top At_Offset_2
0124 0227 | ' | Execute Access,All_Reference
0125 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0126 e017 | | Load 0x0,0x17
0127 00da | | Load_Top At_Offset_2
0128 0227 | ' | Execute Access,All_Reference
0129 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012a e5ff | | Load 0x2,-0x1
012b 0227 | ' | Execute Access,All_Reference
012c 3c27 |<' | Execute Record,Field_Read,Field_Number 0x27
012d 6807 |h | Jump_Zero 0x135
012e 00d9 | | Load_Top At_Offset_1
012f e5ff | | Load 0x2,-0x1
0130 0227 | ' | Execute Access,All_Reference
0131 3c27 |<' | Execute Record,Field_Read,Field_Number 0x27
0132 0227 | ' | Execute Access,All_Reference
0133 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0134 7804 |x | Jump 0x139
0135 00d9 | | Load_Top At_Offset_1
0136 e5ff | | Load 0x2,-0x1
0137 0227 | ' | Execute Access,All_Reference
0138 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
0139 00d9 | | Load_Top At_Offset_1
013a e5ff | | Load 0x2,-0x1
013b 0227 | ' | Execute Access,All_Reference
013c 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
013d e5ff | | Load 0x2,-0x1
013e 0227 | ' | Execute Access,All_Reference
013f 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
0140 0a01 | | Execute_Immediate Plus,0x1
0141 e5ff | | Load 0x2,-0x1
0142 0227 | ' | Execute Access,All_Reference
0143 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
0144 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0145 0000 0000 | | .XXX[0x3]
0147 0000 | |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014d | M | .CONST 0x014d ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0002 | | .CONST 0x0002 ; Number of locals
014b INIT_0148:
014b 029f 0443 | C| Declare_Subprogram INIT_0440,For_Call
014d BODY_0148:
014d 00db | | Load_Top At_Offset_3
014e 0227 | ' | Execute Access,All_Reference
014f 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0150 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0151 00d8 | | Load_Top At_Offset_0
0152 0d40 | @ | Execute_Immediate Less,0x40
0153 7015 |p | Jump_Nonzero 0x169
0154 00d8 | | Load_Top At_Offset_0
0155 0c44 | D | Execute_Immediate Greater_Equal,0x44
0156 7007 |p | Jump_Nonzero 0x15e
0157 0b40 | @ | Execute_Immediate Case_Compare,0x40
0158 7046 |pF | Jump_Nonzero 0x19f
0159 0b41 | A | Execute_Immediate Case_Compare,0x41
015a 7033 |p3 | Jump_Nonzero 0x18e
015b 0f43 | C | Execute_Immediate Equal,0x43
015c 7053 |pS | Jump_Nonzero 0x1b0
015d 7873 |xs | Jump 0x1d1
015e 0b45 | E | Execute_Immediate Case_Compare,0x45
015f 700c |p | Jump_Nonzero 0x16c
0160 0b46 | F | Execute_Immediate Case_Compare,0x46
0161 705e |p^ | Jump_Nonzero 0x1c0
0162 0b47 | G | Execute_Immediate Case_Compare,0x47
0163 7019 |p | Jump_Nonzero 0x17d
0164 4880 |H | Short_Literal 0x80
0165 48ff |H | Short_Literal 0xff
0166 0262 | b | Execute Discrete,In_Range
0167 7079 |py | Jump_Nonzero 0x1e1
0168 787a |xz | Jump 0x1e3
0169 6801 |h | Jump_Zero 0x16b
016a 7878 |xx | Jump 0x1e3
016b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
016c 00d1 | | Pop_Control Pop_Count_1
016d 00db | | Load_Top At_Offset_3
016e 0227 | ' | Execute Access,All_Reference
016f 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0170 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0171 e5ff | | Load 0x2,-0x1
0172 0227 | ' | Execute Access,All_Reference
0173 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0174 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0175 e5ff | | Load 0x2,-0x1
0176 e018 | | Load 0x0,0x18
0177 a019 | | Store_Unchecked 0x0,0x19
0178 e01a | | Load 0x0,0x1a
0179 e01b | | Load 0x0,0x1b
017a a01c | | Store_Unchecked 0x0,0x1c
017b 801d | | Call 0x0,0x1d
017c 7868 |xh | Jump 0x1e5
017d 00d1 | | Pop_Control Pop_Count_1
017e 00db | | Load_Top At_Offset_3
017f 0227 | ' | Execute Access,All_Reference
0180 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0181 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0182 e5ff | | Load 0x2,-0x1
0183 0227 | ' | Execute Access,All_Reference
0184 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0185 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0186 e5ff | | Load 0x2,-0x1
0187 e01e | | Load 0x0,0x1e
0188 a01f | | Store_Unchecked 0x0,0x1f
0189 e020 | | Load 0x0,0x20
018a e021 | ! | Load 0x0,0x21
018b a022 | " | Store_Unchecked 0x0,0x22
018c 801d | | Call 0x0,0x1d
018d 7857 |xW | Jump 0x1e5
018e 00d1 | | Pop_Control Pop_Count_1
018f 00db | | Load_Top At_Offset_3
0190 0227 | ' | Execute Access,All_Reference
0191 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0192 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0193 e5ff | | Load 0x2,-0x1
0194 0227 | ' | Execute Access,All_Reference
0195 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0196 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0197 e5ff | | Load 0x2,-0x1
0198 e023 | # | Load 0x0,0x23
0199 a024 | $ | Store_Unchecked 0x0,0x24
019a e025 | % | Load 0x0,0x25
019b e026 | & | Load 0x0,0x26
019c a027 | ' | Store_Unchecked 0x0,0x27
019d 801d | | Call 0x0,0x1d
019e 7846 |xF | Jump 0x1e5
019f 00d1 | | Pop_Control Pop_Count_1
01a0 00db | | Load_Top At_Offset_3
01a1 0227 | ' | Execute Access,All_Reference
01a2 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01a3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01a4 e5ff | | Load 0x2,-0x1
01a5 0227 | ' | Execute Access,All_Reference
01a6 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01a7 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
01a8 e5ff | | Load 0x2,-0x1
01a9 e028 | ( | Load 0x0,0x28
01aa a029 | ) | Store_Unchecked 0x0,0x29
01ab e02a | * | Load 0x0,0x2a
01ac e02b | + | Load 0x0,0x2b
01ad a02c | , | Store_Unchecked 0x0,0x2c
01ae 801d | | Call 0x0,0x1d
01af 7835 |x5 | Jump 0x1e5
01b0 00db | | Load_Top At_Offset_3
01b1 0227 | ' | Execute Access,All_Reference
01b2 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01b3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01b4 e5ff | | Load 0x2,-0x1
01b5 0227 | ' | Execute Access,All_Reference
01b6 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01b7 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
01b8 e5ff | | Load 0x2,-0x1
01b9 e02d | - | Load 0x0,0x2d
01ba a02e | . | Store_Unchecked 0x0,0x2e
01bb e02f | / | Load 0x0,0x2f
01bc e030 | 0 | Load 0x0,0x30
01bd a031 | 1 | Store_Unchecked 0x0,0x31
01be 801d | | Call 0x0,0x1d
01bf 7825 |x% | Jump 0x1e5
01c0 00d1 | | Pop_Control Pop_Count_1
01c1 00db | | Load_Top At_Offset_3
01c2 0227 | ' | Execute Access,All_Reference
01c3 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01c4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01c5 e5ff | | Load 0x2,-0x1
01c6 0227 | ' | Execute Access,All_Reference
01c7 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01c8 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
01c9 e5ff | | Load 0x2,-0x1
01ca e032 | 2 | Load 0x0,0x32
01cb a033 | 3 | Store_Unchecked 0x0,0x33
01cc e034 | 4 | Load 0x0,0x34
01cd e035 | 5 | Load 0x0,0x35
01ce a036 | 6 | Store_Unchecked 0x0,0x36
01cf 801d | | Call 0x0,0x1d
01d0 7814 |x | Jump 0x1e5
01d1 00db | | Load_Top At_Offset_3
01d2 0227 | ' | Execute Access,All_Reference
01d3 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01d4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01d5 e5ff | | Load 0x2,-0x1
01d6 0227 | ' | Execute Access,All_Reference
01d7 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01d8 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
01d9 e5ff | | Load 0x2,-0x1
01da e037 | 7 | Load 0x0,0x37
01db a038 | 8 | Store_Unchecked 0x0,0x38
01dc e039 | 9 | Load 0x0,0x39
01dd e03a | : | Load 0x0,0x3a
01de a03b | ; | Store_Unchecked 0x0,0x3b
01df 801d | | Call 0x0,0x1d
01e0 7804 |x | Jump 0x1e5
01e1 8402 | | Call 0x2,0x2
01e2 7802 |x | Jump 0x1e5
01e3 e03c | < | Load 0x0,0x3c
01e4 0257 | W | Execute Discrete,Raise
01e5 4800 |H | Short_Literal 0x0
01e6 e5ff | | Load 0x2,-0x1
01e7 0227 | ' | Execute Access,All_Reference
01e8 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
01e9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01eb 0000 0000 | | .BLANK 0000[0x5]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f8 | | .CONST 0x01f8 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0004 | | .CONST 0x0004 ; Number of locals
01f3 INIT_01f0:
01f3 e03d | = | Load 0x0,0x3d
01f4 029f 045b | [| Declare_Subprogram INIT_0458,For_Call
01f6 029f 0483 | | Declare_Subprogram INIT_0480,For_Call
01f8 BODY_01f0:
01f8 e5ff | | Load 0x2,-0x1
01f9 e004 | | Load 0x0,0x4
01fa 022f | / | Execute Access,Equal
01fb 6801 |h | Jump_Zero 0x1fd
01fc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01fd e5ff | | Load 0x2,-0x1
01fe 0227 | ' | Execute Access,All_Reference
01ff 3c36 |<6 | Execute Record,Field_Read,Field_Number 0x36
0200 680b |h | Jump_Zero 0x20c
0201 e5ff | | Load 0x2,-0x1
0202 0229 | ) | Execute Access,All_Read
0203 00d8 | | Load_Top At_Offset_0
0204 3c36 |<6 | Execute Record,Field_Read,Field_Number 0x36
0205 e03e | > | Load 0x0,0x3e
0206 e03f | ? | Load 0x0,0x3f
0207 a040 | @ | Store_Unchecked 0x0,0x40
0208 8002 | | Call 0x0,0x2
0209 00d9 | | Load_Top At_Offset_1
020a 3836 |86 | Execute Record,Field_Write,Field_Number 0x36
020b 00d1 | | Pop_Control Pop_Count_1
020c e5ff | | Load 0x2,-0x1
020d 0227 | ' | Execute Access,All_Reference
020e 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
020f 680b |h | Jump_Zero 0x21b
0210 e5ff | | Load 0x2,-0x1
0211 0229 | ) | Execute Access,All_Read
0212 00d8 | | Load_Top At_Offset_0
0213 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0214 e03e | > | Load 0x0,0x3e
0215 e03f | ? | Load 0x0,0x3f
0216 a040 | @ | Store_Unchecked 0x0,0x40
0217 8002 | | Call 0x0,0x2
0218 00d9 | | Load_Top At_Offset_1
0219 3814 |8 | Execute Record,Field_Write,Field_Number 0x14
021a 00d1 | | Pop_Control Pop_Count_1
021b e5ff | | Load 0x2,-0x1
021c 0227 | ' | Execute Access,All_Reference
021d 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
021e 684b |hK | Jump_Zero 0x26a
021f 00cf | | Action Mark_Auxiliary
0220 e5ff | | Load 0x2,-0x1
0221 0227 | ' | Execute Access,All_Reference
0222 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0223 0227 | ' | Execute Access,All_Reference
0224 01d9 | | Execute Vector,Reverse_Bounds
0225 0263 | c | Execute Discrete,Above_Bound
0226 7037 |p7 | Jump_Nonzero 0x25e
0227 00d8 | | Load_Top At_Offset_0
0228 e5ff | | Load 0x2,-0x1
0229 0227 | ' | Execute Access,All_Reference
022a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
022b 0227 | ' | Execute Access,All_Reference
022c 01d7 | | Execute Vector,Field_Read
022d a402 | | Store_Unchecked 0x2,0x2
022e e402 | | Load 0x2,0x2
022f 0227 | ' | Execute Access,All_Reference
0230 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0231 681c |h | Jump_Zero 0x24e
0232 00cf | | Action Mark_Auxiliary
0233 00d9 | | Load_Top At_Offset_1
0234 e5ff | | Load 0x2,-0x1
0235 0227 | ' | Execute Access,All_Reference
0236 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0237 0227 | ' | Execute Access,All_Reference
0238 01d7 | | Execute Vector,Field_Read
0239 0227 | ' | Execute Access,All_Reference
023a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
023b 0227 | ' | Execute Access,All_Reference
023c 01d9 | | Execute Vector,Reverse_Bounds
023d 0263 | c | Execute Discrete,Above_Bound
023e 7003 |p | Jump_Nonzero 0x242
023f 8403 | | Call 0x2,0x3
0240 00c8 | | Action Pop_Auxiliary_Range
0241 3ffd |? | Loop_Increasing 0x23f
0242 00ce | | Action Pop_Auxiliary
0243 e402 | | Load 0x2,0x2
0244 0229 | ) | Execute Access,All_Read
0245 00d8 | | Load_Top At_Offset_0
0246 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0247 e041 | A | Load 0x0,0x41
0248 e042 | B | Load 0x0,0x42
0249 a043 | C | Store_Unchecked 0x0,0x43
024a 8002 | | Call 0x0,0x2
024b 00d9 | | Load_Top At_Offset_1
024c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
024d 00d1 | | Pop_Control Pop_Count_1
024e e402 | | Load 0x2,0x2
024f 0229 | ) | Execute Access,All_Read
0250 00d8 | | Load_Top At_Offset_0
0251 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0252 8044 | D | Call 0x0,0x44
0253 00d9 | | Load_Top At_Offset_1
0254 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0255 00d1 | | Pop_Control Pop_Count_1
0256 e402 | | Load 0x2,0x2
0257 e045 | E | Load 0x0,0x45
0258 e046 | F | Load 0x0,0x46
0259 a047 | G | Store_Unchecked 0x0,0x47
025a 8002 | | Call 0x0,0x2
025b c402 | | Store 0x2,0x2
025c 00c8 | | Action Pop_Auxiliary_Range
025d 3fc9 |? | Loop_Increasing 0x227
025e 00ce | | Action Pop_Auxiliary
025f e5ff | | Load 0x2,-0x1
0260 0229 | ) | Execute Access,All_Read
0261 00d8 | | Load_Top At_Offset_0
0262 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0263 e048 | H | Load 0x0,0x48
0264 e049 | I | Load 0x0,0x49
0265 a04a | J | Store_Unchecked 0x0,0x4a
0266 8002 | | Call 0x0,0x2
0267 00d9 | | Load_Top At_Offset_1
0268 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
0269 00d1 | | Pop_Control Pop_Count_1
026a e5ff | | Load 0x2,-0x1
026b 0227 | ' | Execute Access,All_Reference
026c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
026d 6833 |h3 | Jump_Zero 0x2a1
026e 00cf | | Action Mark_Auxiliary
026f e5ff | | Load 0x2,-0x1
0270 0227 | ' | Execute Access,All_Reference
0271 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0272 0227 | ' | Execute Access,All_Reference
0273 01d9 | | Execute Vector,Reverse_Bounds
0274 0263 | c | Execute Discrete,Above_Bound
0275 701f |p | Jump_Nonzero 0x295
0276 00d8 | | Load_Top At_Offset_0
0277 e5ff | | Load 0x2,-0x1
0278 0229 | ) | Execute Access,All_Read
0279 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
027a 0229 | ) | Execute Access,All_Read
027b 01d7 | | Execute Vector,Field_Read
027c 0229 | ) | Execute Access,All_Read
027d 00d8 | | Load_Top At_Offset_0
027e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
027f 8044 | D | Call 0x0,0x44
0280 00d9 | | Load_Top At_Offset_1
0281 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0282 00d1 | | Pop_Control Pop_Count_1
0283 e5ff | | Load 0x2,-0x1
0284 0229 | ) | Execute Access,All_Read
0285 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0286 0229 | ) | Execute Access,All_Read
0287 00d9 | | Load_Top At_Offset_1
0288 00d8 | | Load_Top At_Offset_0
0289 00da | | Load_Top At_Offset_2
028a 01d7 | | Execute Vector,Field_Read
028b e04b | K | Load 0x0,0x4b
028c e04c | L | Load 0x0,0x4c
028d a04d | M | Store_Unchecked 0x0,0x4d
028e 8002 | | Call 0x0,0x2
028f 00d9 | | Load_Top At_Offset_1
0290 00db | | Load_Top At_Offset_3
0291 01d6 | | Execute Vector,Field_Write
0292 00d2 | | Pop_Control Pop_Count_2
0293 00c8 | | Action Pop_Auxiliary_Range
0294 3fe1 |? | Loop_Increasing 0x276
0295 00ce | | Action Pop_Auxiliary
0296 e5ff | | Load 0x2,-0x1
0297 0229 | ) | Execute Access,All_Read
0298 00d8 | | Load_Top At_Offset_0
0299 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
029a e04e | N | Load 0x0,0x4e
029b e04f | O | Load 0x0,0x4f
029c a050 | P | Store_Unchecked 0x0,0x50
029d 8002 | | Call 0x0,0x2
029e 00d9 | | Load_Top At_Offset_1
029f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
02a0 00d1 | | Pop_Control Pop_Count_1
02a1 e5ff | | Load 0x2,-0x1
02a2 0227 | ' | Execute Access,All_Reference
02a3 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
02a4 6801 |h | Jump_Zero 0x2a6
02a5 8404 | | Call 0x2,0x4
02a6 e5ff | | Load 0x2,-0x1
02a7 0227 | ' | Execute Access,All_Reference
02a8 3c21 |<! | Execute Record,Field_Read,Field_Number 0x21
02a9 e051 | Q | Load 0x0,0x51
02aa 022e | . | Execute Access,Not_Equal
02ab 6808 |h | Jump_Zero 0x2b4
02ac e5ff | | Load 0x2,-0x1
02ad 0229 | ) | Execute Access,All_Read
02ae 00d8 | | Load_Top At_Offset_0
02af 3c21 |<! | Execute Record,Field_Read,Field_Number 0x21
02b0 8052 | R | Call 0x0,0x52
02b1 00d9 | | Load_Top At_Offset_1
02b2 3821 |8! | Execute Record,Field_Write,Field_Number 0x21
02b3 00d1 | | Pop_Control Pop_Count_1
02b4 e5ff | | Load 0x2,-0x1
02b5 0227 | ' | Execute Access,All_Reference
02b6 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
02b7 680b |h | Jump_Zero 0x2c3
02b8 e5ff | | Load 0x2,-0x1
02b9 0229 | ) | Execute Access,All_Read
02ba 00d8 | | Load_Top At_Offset_0
02bb 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
02bc e053 | S | Load 0x0,0x53
02bd e054 | T | Load 0x0,0x54
02be a055 | U | Store_Unchecked 0x0,0x55
02bf 8002 | | Call 0x0,0x2
02c0 00d9 | | Load_Top At_Offset_1
02c1 381b |8 | Execute Record,Field_Write,Field_Number 0x1b
02c2 00d1 | | Pop_Control Pop_Count_1
02c3 e5ff | | Load 0x2,-0x1
02c4 0227 | ' | Execute Access,All_Reference
02c5 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
02c6 681b |h | Jump_Zero 0x2e2
02c7 e5ff | | Load 0x2,-0x1
02c8 0227 | ' | Execute Access,All_Reference
02c9 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
02ca 0227 | ' | Execute Access,All_Reference
02cb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02cc 680d |h | Jump_Zero 0x2da
02cd e5ff | | Load 0x2,-0x1
02ce 0229 | ) | Execute Access,All_Read
02cf 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
02d0 0229 | ) | Execute Access,All_Read
02d1 00d8 | | Load_Top At_Offset_0
02d2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02d3 e056 | V | Load 0x0,0x56
02d4 e057 | W | Load 0x0,0x57
02d5 a058 | X | Store_Unchecked 0x0,0x58
02d6 8002 | | Call 0x0,0x2
02d7 00d9 | | Load_Top At_Offset_1
02d8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02d9 00d1 | | Pop_Control Pop_Count_1
02da e5ff | | Load 0x2,-0x1
02db 0229 | ) | Execute Access,All_Read
02dc 00d8 | | Load_Top At_Offset_0
02dd 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
02de 8059 | Y | Call 0x0,0x59
02df 00d9 | | Load_Top At_Offset_1
02e0 3820 |8 | Execute Record,Field_Write,Field_Number 0x20
02e1 00d1 | | Pop_Control Pop_Count_1
02e2 e5ff | | Load 0x2,-0x1
02e3 0227 | ' | Execute Access,All_Reference
02e4 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a
02e5 6808 |h | Jump_Zero 0x2ee
02e6 e5ff | | Load 0x2,-0x1
02e7 0229 | ) | Execute Access,All_Read
02e8 00d8 | | Load_Top At_Offset_0
02e9 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a
02ea 805a | Z | Call 0x0,0x5a
02eb 00d9 | | Load_Top At_Offset_1
02ec 381a |8 | Execute Record,Field_Write,Field_Number 0x1a
02ed 00d1 | | Pop_Control Pop_Count_1
02ee e5ff | | Load 0x2,-0x1
02ef 0227 | ' | Execute Access,All_Reference
02f0 3c22 |<" | Execute Record,Field_Read,Field_Number 0x22
02f1 e05b | [ | Load 0x0,0x5b
02f2 022e | . | Execute Access,Not_Equal
02f3 680b |h | Jump_Zero 0x2ff
02f4 e5ff | | Load 0x2,-0x1
02f5 0229 | ) | Execute Access,All_Read
02f6 00d8 | | Load_Top At_Offset_0
02f7 3c22 |<" | Execute Record,Field_Read,Field_Number 0x22
02f8 e03e | > | Load 0x0,0x3e
02f9 e03f | ? | Load 0x0,0x3f
02fa a040 | @ | Store_Unchecked 0x0,0x40
02fb 8002 | | Call 0x0,0x2
02fc 00d9 | | Load_Top At_Offset_1
02fd 3822 |8" | Execute Record,Field_Write,Field_Number 0x22
02fe 00d1 | | Pop_Control Pop_Count_1
02ff e5ff | | Load 0x2,-0x1
0300 0229 | ) | Execute Access,All_Read
0301 00d8 | | Load_Top At_Offset_0
0302 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23
0303 8044 | D | Call 0x0,0x44
0304 00d9 | | Load_Top At_Offset_1
0305 3823 |8# | Execute Record,Field_Write,Field_Number 0x23
0306 00d1 | | Pop_Control Pop_Count_1
0307 4800 |H | Short_Literal 0x0
0308 e5ff | | Load 0x2,-0x1
0309 0227 | ' | Execute Access,All_Reference
030a 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37
030b 0229 | ) | Execute Access,All_Read
030c e008 | | Load 0x0,0x8
030d 00ad | | QQ_Action Package,Field_Execute_Dynamic
030e e5ff | | Load 0x2,-0x1
030f 0229 | ) | Execute Access,All_Read
0310 00d8 | | Load_Top At_Offset_0
0311 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37
0312 805c | \ | Call 0x0,0x5c
0313 00d9 | | Load_Top At_Offset_1
0314 3837 |87 | Execute Record,Field_Write,Field_Number 0x37
0315 00d1 | | Pop_Control Pop_Count_1
0316 e5ff | | Load 0x2,-0x1
0317 e218 | | Load 0x1,0x18
0318 e219 | | Load 0x1,0x19
0319 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
031a 8002 | | Call 0x0,0x2
031b c5ff | | Store 0x2,-0x1
031c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
031d 0000 0000 | | .XXX[0x3]
031f 0000 | |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0333 | 3 | .CONST 0x0333 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0009 | | .CONST 0x0009 ; Number of locals
0323 INIT_0320:
0323 e05d | ] | Load 0x0,0x5d
0324 0322 | " | Declare_Variable Record
0325 e05e | ^ | Load 0x0,0x5e
0326 0007 | | Action Break_Optional
0327 e05e | ^ | Load 0x0,0x5e
0328 0007 | | Action Break_Optional
0329 e05f | _ | Load 0x0,0x5f
032a 0007 | | Action Break_Optional
032b e05f | _ | Load 0x0,0x5f
032c 0007 | | Action Break_Optional
032d e05f | _ | Load 0x0,0x5f
032e 0007 | | Action Break_Optional
032f e060 | ` | Load 0x0,0x60
0330 0007 | | Action Break_Optional
0331 e061 | a | Load 0x0,0x61
0332 0007 | | Action Break_Optional
0333 BODY_0320:
0333 e061 | a | Load 0x0,0x61
0334 e060 | ` | Load 0x0,0x60
0335 e05f | _ | Load 0x0,0x5f
0336 00d8 | | Load_Top At_Offset_0
0337 e05f | _ | Load 0x0,0x5f
0338 e05e | ^ | Load 0x0,0x5e
0339 00d8 | | Load_Top At_Offset_0
033a e402 | | Load 0x2,0x2
033b e5fe | | Load 0x2,-0x2
033c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
033d e5ff | | Load 0x2,-0x1
033e 8062 | b | Call 0x0,0x62
033f 00d1 | | Pop_Control Pop_Count_1
0340 c403 | | Store 0x2,0x3
0341 c404 | | Store 0x2,0x4
0342 c405 | | Store 0x2,0x5
0343 c406 | | Store 0x2,0x6
0344 c407 | | Store 0x2,0x7
0345 005b | [ | Store_Top Discrete,At_Offset_3
0346 0059 | Y | Store_Top Discrete,At_Offset_1
0347 00d8 | | Load_Top At_Offset_0
0348 7002 |p | Jump_Nonzero 0x34b
0349 e03d | = | Load 0x0,0x3d
034a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
034b 00cf | | Action Mark_Auxiliary
034c e5ff | | Load 0x2,-0x1
034d 0227 | ' | Execute Access,All_Reference
034e 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
034f 0227 | ' | Execute Access,All_Reference
0350 01d9 | | Execute Vector,Reverse_Bounds
0351 0263 | c | Execute Discrete,Above_Bound
0352 700c |p | Jump_Nonzero 0x35f
0353 e402 | | Load 0x2,0x2
0354 00d9 | | Load_Top At_Offset_1
0355 e5ff | | Load 0x2,-0x1
0356 8063 | c | Call 0x0,0x63
0357 017f | | Execute Record,Equal
0358 6804 |h | Jump_Zero 0x35d
0359 00d8 | | Load_Top At_Offset_0
035a e5ff | | Load 0x2,-0x1
035b 8064 | d | Call 0x0,0x64
035c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
035d 00c8 | | Action Pop_Auxiliary_Range
035e 3ff4 |? | Loop_Increasing 0x353
035f 00ce | | Action Pop_Auxiliary
0360 e03d | = | Load 0x0,0x3d
0361 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0362 0000 0000 | | .BLANK 0000[0x6]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036f | o | .CONST 0x036f ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0003 | | .CONST 0x0003 ; Number of locals
036b INIT_0368:
036b e065 | e | Load 0x0,0x65
036c 0007 | | Action Break_Optional
036d e065 | e | Load 0x0,0x65
036e 0007 | | Action Break_Optional
036f BODY_0368:
036f e5fe | | Load 0x2,-0x2
0370 0f0b | | Execute_Immediate Equal,0xb
0371 6804 |h | Jump_Zero 0x376
0372 e5ff | | Load 0x2,-0x1
0373 0227 | ' | Execute Access,All_Reference
0374 3c2c |<, | Execute Record,Field_Read,Field_Number 0x2c
0375 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0376 e5fd | | Load 0x2,-0x3
0377 6060 |`` | Indirect_Literal Discrete,0x3d8,{0x00000000, 0x0000ffff}
0378 8066 | f | Call 0x0,0x66
0379 e5ff | | Load 0x2,-0x1
037a 0227 | ' | Execute Access,All_Reference
037b 3c2c |<, | Execute Record,Field_Read,Field_Number 0x2c
037c 8067 | g | Call 0x0,0x67
037d 8068 | h | Call 0x0,0x68
037e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
037f e5ff | | Load 0x2,-0x1
0380 0227 | ' | Execute Access,All_Reference
0381 3c2c |<, | Execute Record,Field_Read,Field_Number 0x2c
0382 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0383 00cf | | Action Mark_Auxiliary
0384 783e |x> | Jump 0x3c3
0385 00da | | Load_Top At_Offset_2
0386 604d |`M | Indirect_Literal Discrete,0x3d4,{0x00000000, 0x00010000}
0387 0273 | s | Execute Discrete,Plus
0388 005b | [ | Store_Top Discrete,At_Offset_3
0389 00da | | Load_Top At_Offset_2
038a e5ff | | Load 0x2,-0x1
038b 0227 | ' | Execute Access,All_Reference
038c 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
038d 027d | } | Execute Discrete,Greater
038e 6833 |h3 | Jump_Zero 0x3c2
038f 00da | | Load_Top At_Offset_2
0390 603f |`? | Indirect_Literal Discrete,0x3d0,{0xffffffff, 0xffff0000}
0391 0273 | s | Execute Discrete,Plus
0392 005b | [ | Store_Top Discrete,At_Offset_3
0393 4802 |H | Short_Literal 0x2
0394 4800 |H | Short_Literal 0x0
0395 00e5 | | Load_Encached Long_Integer_Cache
0396 00d9 | | Load_Top At_Offset_1
0397 0267 | g | Execute Discrete,Predecessor
0398 e00c | | Load 0x0,0xc
0399 0334 | 4 | Declare_Variable Array,With_Constraint
039a 4800 |H | Short_Literal 0x0
039b 00e5 | | Load_Encached Long_Integer_Cache
039c 00d9 | | Load_Top At_Offset_1
039d 0267 | g | Execute Discrete,Predecessor
039e e00c | | Load 0x0,0xc
039f 0334 | 4 | Declare_Variable Array,With_Constraint
03a0 4800 |H | Short_Literal 0x0
03a1 00e5 | | Load_Encached Long_Integer_Cache
03a2 00d9 | | Load_Top At_Offset_1
03a3 0267 | g | Execute Discrete,Predecessor
03a4 e00c | | Load 0x0,0xc
03a5 0334 | 4 | Declare_Variable Array,With_Constraint
03a6 e5fe | | Load 0x2,-0x2
03a7 e069 | i | Load 0x0,0x69
03a8 011c | | Execute Any,Convert_Unchecked
03a9 1c01 | | Execute_Immediate Run_Utility,0x1
03aa 800f | | Call 0x0,0xf
03ab e5ff | | Load 0x2,-0x1
03ac 0227 | ' | Execute Access,All_Reference
03ad 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
03ae 821d | | Call 0x1,0x1d
03af e402 | | Load 0x2,0x2
03b0 821d | | Call 0x1,0x1d
03b1 4800 |H | Short_Literal 0x0
03b2 4838 |H8 | Short_Literal 0x38
03b3 e00c | | Load 0x0,0xc
03b4 0334 | 4 | Declare_Variable Array,With_Constraint
03b5 5026 |P& | Indirect_Literal Any,0x3dc,{0x586c6962, 0x3b205365}
03b6 4800 |H | Short_Literal 0x0
03b7 480b |H | Short_Literal 0xb
03b8 e00c | | Load 0x0,0xc
03b9 0334 | 4 | Declare_Variable Array,With_Constraint
03ba 5041 |PA | Indirect_Literal Any,0x3fc,{0x53657175, 0x656e6365}
03bb 4800 |H | Short_Literal 0x0
03bc 4808 |H | Short_Literal 0x8
03bd e00c | | Load 0x0,0xc
03be 0334 | 4 | Declare_Variable Array,With_Constraint
03bf 5044 |PD | Indirect_Literal Any,0x404,{0x586c6962, 0x4572726f}
03c0 806a | j | Call 0x0,0x6a
03c1 7805 |x | Jump 0x3c7
03c2 00c9 | | Action Pop_Auxiliary_Loop
03c3 00da | | Load_Top At_Offset_2
03c4 00da | | Load_Top At_Offset_2
03c5 027c | | | Execute Discrete,Less
03c6 77be |w | Jump_Nonzero 0x385
03c7 00ce | | Action Pop_Auxiliary
03c8 00d9 | | Load_Top At_Offset_1
03c9 e5ff | | Load 0x2,-0x1
03ca 0227 | ' | Execute Access,All_Reference
03cb 382c |8, | Execute Record,Field_Write,Field_Number 0x2c
03cc 00d9 | | Load_Top At_Offset_1
03cd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03ce 0000 0000 | | .XXX[0x2]
03d0 ffff ffff | | .LITERAL {0xffffffff, 0xffff0000}
03d4 0000 0000 | | .LITERAL {0x00000000, 0x00010000}
03d8 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
03dc 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x3b205365}
03e0 7175 656e |quen| .XXX[0x1c]
03e2 6365 206c |ce l|
03e4 6f73 7420 |ost |
03e6 286e 6577 |(new|
03e8 2920 2531 |) %1|
03ea 203c 2025 | < %|
03ec 3220 286f |2 (o|
03ee 6c64 2920 |ld) |
03f0 696e 2072 |in r|
03f2 6570 6c79 |eply|
03f4 2074 7970 | typ|
03f6 6520 2532 |e %2|
03f8 2e00 0000 |. |
03fa 0000 0000 | |
03fc 5365 7175 |Sequ| .LITERAL {0x53657175, 0x656e6365}
0400 4c6f 7374 |Lost| .XXX[0x4]
0402 0000 0000 | |
0404 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f}
0408 7200 |r | .XXX[0x1]
0409 0000 0000 | | .BLANK 0000[0x7]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0416 | | .CONST 0x0416 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0003 | | .CONST 0x0003 ; Number of locals
0413 INIT_0410:
0413 e03d | = | Load 0x0,0x3d
0414 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call
0416 BODY_0410:
0416 8403 | | Call 0x2,0x3
0417 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0420 | | .CONST 0x0420 ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0002 | | .CONST 0x0002 ; Number of locals
041b INIT_0418:
041b 4801 |H | Short_Literal 0x1
041c 480d |H | Short_Literal 0xd
041d 00e9 | | Load_Encached String_Cache
041e 035b | [ | Declare_Type Array,Constrained
041f 0337 | 7 | Declare_Variable Array
0420 BODY_0418:
0420 00d8 | | Load_Top At_Offset_0
0421 4810 |H | Short_Literal 0x10
0422 e5ff | | Load 0x2,-0x1
0423 e06b | k | Load 0x0,0x6b
0424 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0425 00d1 | | Pop_Control Pop_Count_1
0426 00d8 | | Load_Top At_Offset_0
0427 800f | | Call 0x0,0xf
0428 e00c | | Load 0x0,0xc
0429 01c6 | | Execute Vector,Convert_To_Formal
042a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
042b 0000 0000 | | .BLANK 0000[0x5]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0435 | 5 | .CONST 0x0435 ; Address of begin
0431 043c | < | .CONST 0x043c ; Address of exception handler
0432 0002 | | .CONST 0x0002 ; Number of locals
0433 INIT_0430:
0433 029f 04cb | | Declare_Subprogram INIT_04c8,For_Call
0435 BODY_0430:
0435 e017 | | Load 0x0,0x17
0436 03bc | | Declare_Variable Access,By_Allocation
0437 00d8 | | Load_Top At_Offset_0
0438 0227 | ' | Execute Access,All_Reference
0439 1c00 | | Execute_Immediate Run_Utility,0x0
043a a402 | | Store_Unchecked 0x2,0x2
043b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
043c TRAP_0430:
043c 0007 | | Action Break_Optional
043d 8602 | | Call 0x3,0x2
043e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
043f 0000 | | .XXX[0x1]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443 | C | .CONST 0x0443 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0001 | | .CONST 0x0001 ; Number of locals
0443 BODY_0440:
0443 INIT_0440:
0443 e5ff | | Load 0x2,-0x1
0444 0227 | ' | Execute Access,All_Reference
0445 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0446 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0447 e009 | | Load 0x0,0x9
0448 022f | / | Execute Access,Equal
0449 6802 |h | Jump_Zero 0x44c
044a e03c | < | Load 0x0,0x3c
044b 0257 | W | Execute Discrete,Raise
044c e5ff | | Load 0x2,-0x1
044d 00d8 | | Load_Top At_Offset_0
044e 0227 | ' | Execute Access,All_Reference
044f 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d
0450 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0451 806c | l | Call 0x0,0x6c
0452 806d | m | Call 0x0,0x6d
0453 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0454 0000 0000 | | .BLANK 0000[0x4]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 0463 | c | .CONST 0x0463 ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0003 | | .CONST 0x0003 ; Number of locals
045b INIT_0458:
045b e40a | | Load 0x2,0xa
045c e402 | | Load 0x2,0x2
045d 0227 | ' | Execute Access,All_Reference
045e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
045f 0227 | ' | Execute Access,All_Reference
0460 01d5 | | Execute Vector,Field_Reference
0461 029f 051b | | Declare_Subprogram INIT_0518,For_Call
0463 BODY_0458:
0463 00d9 | | Load_Top At_Offset_1
0464 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0465 6813 |h | Jump_Zero 0x479
0466 00cf | | Action Mark_Auxiliary
0467 00da | | Load_Top At_Offset_2
0468 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0469 0227 | ' | Execute Access,All_Reference
046a 01d9 | | Execute Vector,Reverse_Bounds
046b 0263 | c | Execute Discrete,Above_Bound
046c 7003 |p | Jump_Nonzero 0x470
046d 8603 | | Call 0x3,0x3
046e 00c8 | | Action Pop_Auxiliary_Range
046f 3ffd |? | Loop_Increasing 0x46d
0470 00ce | | Action Pop_Auxiliary
0471 00d9 | | Load_Top At_Offset_1
0472 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0473 e06e | n | Load 0x0,0x6e
0474 e06f | o | Load 0x0,0x6f
0475 a070 | p | Store_Unchecked 0x0,0x70
0476 8002 | | Call 0x0,0x2
0477 00da | | Load_Top At_Offset_2
0478 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0479 4501 |E | Exit_Suprogram New_Top_Offset 0x1
047a 0000 0000 | | .BLANK 0000[0x6]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0487 | | .CONST 0x0487 ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0003 | | .CONST 0x0003 ; Number of locals
0483 INIT_0480:
0483 e017 | | Load 0x0,0x17
0484 0007 | | Action Break_Optional
0485 e017 | | Load 0x0,0x17
0486 0007 | | Action Break_Optional
0487 BODY_0480:
0487 e5ff | | Load 0x2,-0x1
0488 0227 | ' | Execute Access,All_Reference
0489 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
048a 003a | : | Store_Top Access,At_Offset_2
048b 00cf | | Action Mark_Auxiliary
048c 780d |x | Jump 0x49a
048d 00da | | Load_Top At_Offset_2
048e 0227 | ' | Execute Access,All_Reference
048f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0490 003a | : | Store_Top Access,At_Offset_2
0491 00da | | Load_Top At_Offset_2
0492 e071 | q | Load 0x0,0x71
0493 e072 | r | Load 0x0,0x72
0494 a073 | s | Store_Unchecked 0x0,0x73
0495 8002 | | Call 0x0,0x2
0496 003b | ; | Store_Top Access,At_Offset_3
0497 00d9 | | Load_Top At_Offset_1
0498 003b | ; | Store_Top Access,At_Offset_3
0499 00c9 | | Action Pop_Auxiliary_Loop
049a 00da | | Load_Top At_Offset_2
049b 77f1 |w | Jump_Nonzero 0x48d
049c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
049d 0000 0000 | | .XXX[0x3]
049f 0000 | |
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a5 | | .CONST 0x04a5 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0002 | | .CONST 0x0002 ; Number of locals
04a3 INIT_04a0:
04a3 029f 0533 | 3| Declare_Subprogram INIT_0530,For_Call
04a5 BODY_04a0:
04a5 00cf | | Action Mark_Auxiliary
04a6 e5ff | | Load 0x2,-0x1
04a7 0227 | ' | Execute Access,All_Reference
04a8 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
04a9 0227 | ' | Execute Access,All_Reference
04aa 01d9 | | Execute Vector,Reverse_Bounds
04ab 0263 | c | Execute Discrete,Above_Bound
04ac 7015 |p | Jump_Nonzero 0x4c2
04ad 00d8 | | Load_Top At_Offset_0
04ae e5ff | | Load 0x2,-0x1
04af 0227 | ' | Execute Access,All_Reference
04b0 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
04b1 0227 | ' | Execute Access,All_Reference
04b2 01d7 | | Execute Vector,Field_Read
04b3 a402 | | Store_Unchecked 0x2,0x2
04b4 00cf | | Action Mark_Auxiliary
04b5 e402 | | Load 0x2,0x2
04b6 0227 | ' | Execute Access,All_Reference
04b7 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
04b8 0227 | ' | Execute Access,All_Reference
04b9 01d9 | | Execute Vector,Reverse_Bounds
04ba 0263 | c | Execute Discrete,Above_Bound
04bb 7003 |p | Jump_Nonzero 0x4bf
04bc 8602 | | Call 0x3,0x2
04bd 00c8 | | Action Pop_Auxiliary_Range
04be 3ffd |? | Loop_Increasing 0x4bc
04bf 00ce | | Action Pop_Auxiliary
04c0 00c8 | | Action Pop_Auxiliary_Range
04c1 3feb |? | Loop_Increasing 0x4ad
04c2 00ce | | Action Pop_Auxiliary
04c3 4800 |H | Short_Literal 0x0
04c4 a5fc | | Store_Unchecked 0x2,-0x4
04c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04c6 0000 0000 | | .XXX[0x2]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cd | | .CONST 0x04cd ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0002 | | .CONST 0x0002 ; Number of locals
04cb INIT_04c8:
04cb e009 | | Load 0x0,0x9
04cc 0007 | | Action Break_Optional
04cd BODY_04c8:
04cd e009 | | Load 0x0,0x9
04ce e5ff | | Load 0x2,-0x1
04cf 4802 |H | Short_Literal 0x2
04d0 e00a | | Load 0x0,0xa
04d1 e00b | | Load 0x0,0xb
04d2 00ad | | QQ_Action Package,Field_Execute_Dynamic
04d3 0039 | 9 | Store_Top Access,At_Offset_1
04d4 4803 |H | Short_Literal 0x3
04d5 e5ff | | Load 0x2,-0x1
04d6 0227 | ' | Execute Access,All_Reference
04d7 3438 |48 | Execute Record,Field_Reference,Field_Number 0x38
04d8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04d9 e5ff | | Load 0x2,-0x1
04da 0229 | ) | Execute Access,All_Read
04db 3c33 |<3 | Execute Record,Field_Read,Field_Number 0x33
04dc 00d8 | | Load_Top At_Offset_0
04dd 4800 |H | Short_Literal 0x0
04de 4818 |H | Short_Literal 0x18
04df e00c | | Load 0x0,0xc
04e0 0334 | 4 | Declare_Variable Array,With_Constraint
04e1 5016 |P | Indirect_Literal Any,0x4f8,{0x4e6f2066, 0x72656520}
04e2 4800 |H | Short_Literal 0x0
04e3 4807 |H | Short_Literal 0x7
04e4 e00c | | Load 0x0,0xc
04e5 0334 | 4 | Declare_Variable Array,With_Constraint
04e6 5021 |P! | Indirect_Literal Any,0x508,{0x4e6f4d65, 0x6d6f7279}
04e7 4800 |H | Short_Literal 0x0
04e8 4808 |H | Short_Literal 0x8
04e9 e00c | | Load 0x0,0xc
04ea 0334 | 4 | Declare_Variable Array,With_Constraint
04eb 5020 |P | Indirect_Literal Any,0x50c,{0x586c6962, 0x4572726f}
04ec 800d | | Call 0x0,0xd
04ed 8010 | | Call 0x0,0x10
04ee 00d2 | | Pop_Control Pop_Count_2
04ef e5ff | | Load 0x2,-0x1
04f0 00d9 | | Load_Top At_Offset_1
04f1 8011 | | Call 0x0,0x11
04f2 8012 | | Call 0x0,0x12
04f3 e013 | | Load 0x0,0x13
04f4 0257 | W | Execute Discrete,Raise
04f5 0000 0000 | | .XXX[0x3]
04f7 0000 | |
04f8 4e6f 2066 |No f| .LITERAL {0x4e6f2066, 0x72656520}
04fc 6d65 6d6f |memo| .XXX[0xc]
04fe 7279 2061 |ry a|
0500 7661 696c |vail|
0502 6162 6c65 |able|
0504 2e00 0000 |. |
0506 0000 0000 | |
0508 4e6f 4d65 |NoMe| .LITERAL {0x4e6f4d65, 0x6d6f7279}
050c 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f}
0510 7200 |r | .XXX[0x1]
0511 0000 0000 | | .BLANK 0000[0x7]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 0521 | ! | .CONST 0x0521 ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0002 | | .CONST 0x0002 ; Number of locals
051b INIT_0518:
051b e606 | | Load 0x3,0x6
051c e602 | | Load 0x3,0x2
051d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
051e 0227 | ' | Execute Access,All_Reference
051f 01d5 | | Execute Vector,Field_Reference
0520 0007 | | Action Break_Optional
0521 BODY_0518:
0521 00d8 | | Load_Top At_Offset_0
0522 0229 | ) | Execute Access,All_Read
0523 00d8 | | Load_Top At_Offset_0
0524 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0525 8044 | D | Call 0x0,0x44
0526 00d9 | | Load_Top At_Offset_1
0527 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0528 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0529 0000 0000 | | .BLANK 0000[0x7]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 053b | ; | .CONST 0x053b ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0003 | | .CONST 0x0003 ; Number of locals
0533 INIT_0530:
0533 e608 | | Load 0x3,0x8
0534 e402 | | Load 0x2,0x2
0535 0227 | ' | Execute Access,All_Reference
0536 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0537 0227 | ' | Execute Access,All_Reference
0538 01d5 | | Execute Vector,Field_Reference
0539 029f 054b | K| Declare_Subprogram INIT_0548,For_Call
053b BODY_0530:
053b 00cf | | Action Mark_Auxiliary
053c 00da | | Load_Top At_Offset_2
053d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
053e 0227 | ' | Execute Access,All_Reference
053f 01d9 | | Execute Vector,Reverse_Bounds
0540 0263 | c | Execute Discrete,Above_Bound
0541 7003 |p | Jump_Nonzero 0x545
0542 8803 | | Call 0x4,0x3
0543 00c8 | | Action Pop_Auxiliary_Range
0544 3ffd |? | Loop_Increasing 0x542
0545 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0546 0000 0000 | | .XXX[0x2]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 0551 | Q | .CONST 0x0551 ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0002 | | .CONST 0x0002 ; Number of locals
054b INIT_0548:
054b e806 | | Load 0x4,0x6
054c e802 | | Load 0x4,0x2
054d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
054e 0227 | ' | Execute Access,All_Reference
054f 01d5 | | Execute Vector,Field_Reference
0550 0007 | | Action Break_Optional
0551 BODY_0548:
0551 00d8 | | Load_Top At_Offset_0
0552 0227 | ' | Execute Access,All_Reference
0553 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0554 e5fe | | Load 0x2,-0x2
0555 017f | | Execute Record,Equal
0556 6808 |h | Jump_Zero 0x55f
0557 00d8 | | Load_Top At_Offset_0
0558 a5fd | | Store_Unchecked 0x2,-0x3
0559 4801 |H | Short_Literal 0x1
055a a5fc | | Store_Unchecked 0x2,-0x4
055b 00cc | | Action Pop_Block
055c 00cc | | Action Pop_Block
055d 00cc | | Action Pop_Block
055e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
055f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0560 ; --------------------------------------------------------------------------------------
0560 ; Debug Table
0560 ; --------------------------------------------------------------------------------------
0560 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68f5,0x0000,0x0001,0x0017
0566 000b 05c2 | | .DBG4T 0x000b,0x05c2,0x8000,0x0000
056a 0022 05cf | " | .DBG4T 0x0022,0x05cf,0x8000,0x0000
056e 004b 05de | K | .DBG4T 0x004b,0x05de,0x0001,0x0000
0572 005b 05e1 | [ | .DBG4T 0x005b,0x05e1,0x0001,0x0000
0576 006b 05e4 | k | .DBG4T 0x006b,0x05e4,0x0001,0x0000
057a 00cb 05eb | | .DBG4T 0x00cb,0x05eb,0x0001,0x0000
057e 00db 05ef | | .DBG4T 0x00db,0x05ef,0x0002,0x0000
0582 010b 05f7 | | .DBG4T 0x010b,0x05f7,0x0001,0x0000
0586 014b 0606 | K | .DBG4T 0x014b,0x0606,0x0001,0x0000
058a 01f3 0614 | | .DBG4T 0x01f3,0x0614,0x0001,0x0000
058e 0323 063e | # >| .DBG4T 0x0323,0x063e,0x0002,0x0000
0592 036b 064f | k O| .DBG4T 0x036b,0x064f,0x0002,0x4000
0596 0413 066b | k| .DBG4T 0x0413,0x066b,0x0001,0x0000
059a 041b 066f | o| .DBG4T 0x041b,0x066f,0x0002,0x0000
059e 0433 0674 | 3 t| .DBG4T 0x0433,0x0674,0x0004,0x0000
05a2 0443 0678 | C x| .DBG4T 0x0443,0x0678,0x0004,0x0000
05a6 045b 067d | [ }| .DBG4T 0x045b,0x067d,0x0004,0x0000
05aa 0483 0684 | | .DBG4T 0x0483,0x0684,0x0004,0x4000
05ae 04a3 0692 | | .DBG4T 0x04a3,0x0692,0x0004,0x0000
05b2 04cb 0699 | | .DBG4T 0x04cb,0x0699,0x0004,0x0000
05b6 051b 06a1 | | .DBG4T 0x051b,0x06a1,0x0004,0x0000
05ba 0533 06a5 | 3 | .DBG4T 0x0533,0x06a5,0x0004,0x0000
05be 054b 06aa | K | .DBG4T 0x054b,0x06aa,0x0004,0x0000
05c2 ; --------------------------------------------------------------------------------------
05c2 ; Debug chain
05c2 ; --------------------------------------------------------------------------------------
05c2 000b 0000 | | .DBGLEN 0x000b,0x0000
05c4 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f
05cf ; --------------------------------------------------------------------------------------
05cf ; Debug chain
05cf ; --------------------------------------------------------------------------------------
05cf 000d 0000 | | .DBGLEN 0x000d,0x0000
05d1 0022 002a | " *| .DBGLNO 0x0022,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040
05de ; --------------------------------------------------------------------------------------
05de ; Debug chain
05de ; --------------------------------------------------------------------------------------
05de 0000 0001 | | .DBGLEN 0x0000,0x0001
05e0 004b | K | .DBGLNO 0x004b
05e1 ; --------------------------------------------------------------------------------------
05e1 ; Debug chain
05e1 ; --------------------------------------------------------------------------------------
05e1 0000 0001 | | .DBGLEN 0x0000,0x0001
05e3 005b | [ | .DBGLNO 0x005b
05e4 ; --------------------------------------------------------------------------------------
05e4 ; Debug chain
05e4 ; --------------------------------------------------------------------------------------
05e4 0001 0004 | | .DBGLEN 0x0001,0x0004
05e6 006b 006d | k m| .DBGLNO 0x006b,0x006d,0x0074,0x009f,0x00a3
05eb ; --------------------------------------------------------------------------------------
05eb ; Debug chain
05eb ; --------------------------------------------------------------------------------------
05eb 0000 0002 | | .DBGLEN 0x0000,0x0002
05ed 00cb 00d1 | | .DBGLNO 0x00cb,0x00d1
05ef ; --------------------------------------------------------------------------------------
05ef ; Debug chain
05ef ; --------------------------------------------------------------------------------------
05ef 0001 0005 | | .DBGLEN 0x0001,0x0005
05f1 00db 00dd | | .DBGLNO 0x00db,0x00dd,0x00e7,0x00e8,0x00f3,0x00ff
05f7 ; --------------------------------------------------------------------------------------
05f7 ; Debug chain
05f7 ; --------------------------------------------------------------------------------------
05f7 0001 000c | | .DBGLEN 0x0001,0x000c
05f9 010b 010e | | .DBGLNO 0x010b,0x010e,0x0112,0x0116,0x0118,0x011e,0x0122,0x0126,0x012a,0x012e,0x0135,0x0139,0x013d
0606 ; --------------------------------------------------------------------------------------
0606 ; Debug chain
0606 ; --------------------------------------------------------------------------------------
0606 0000 000c | | .DBGLEN 0x0000,0x000c
0608 014d 016b | M k| .DBGLNO 0x014d,0x016b,0x016d,0x017e,0x018f,0x01a0,0x01b0,0x01c1,0x01d1,0x01e1,0x01e3,0x01e5
0614 ; --------------------------------------------------------------------------------------
0614 ; Debug chain
0614 ; --------------------------------------------------------------------------------------
0614 0001 0027 | '| .DBGLEN 0x0001,0x0027
0616 01f3 01f8 | | .DBGLNO 0x01f3,0x01f8,0x01fc,0x01fd,0x0201,0x020c,0x0210,0x021b,0x0220,0x0227,0x022e,0x0233,0x023f,0x0243,0x024e,0x0256,0x025f,0x026a,0x026f,0x0276,0x0283,0x0296,0x02a1,0x02a5,0x02a6,0x02ac,0x02b4,0x02b8,0x02c3,0x02c7,0x02cd,0x02da,0x02e2,0x02e6,0x02ee,0x02f4,0x02ff,0x0307,0x030e,0x0316
063e ; --------------------------------------------------------------------------------------
063e ; Debug chain
063e ; --------------------------------------------------------------------------------------
063e 0008 0007 | | .DBGLEN 0x0008,0x0007
0640 0323 0325 | # %| .DBGLNO 0x0323,0x0325,0x0327,0x0329,0x032b,0x032d,0x032f,0x0331,0x0333,0x0347,0x0349,0x034c,0x0353,0x0359,0x0360
064f ; --------------------------------------------------------------------------------------
064f ; Debug chain
064f ; --------------------------------------------------------------------------------------
064f 0002 000c | | .DBGLEN 0x0002,0x000c
0651 036b 036d | k m| .DBGLNO 0x036b,0x036d,0x036f,0x0372,0x0376,0x037f,0x0385,0x0389,0x038f,0x0393,0x03c1,0x03c3,0x03c8,0x03cc
065f 0001 0002 | | .XXX[0xc]
0661 0003 0004 | |
0663 0006 0007 | |
0665 0008 0009 | |
0667 000a 0005 | |
0669 000b 000c | |
066b ; --------------------------------------------------------------------------------------
066b ; Debug chain
066b ; --------------------------------------------------------------------------------------
066b 0001 0001 | | .DBGLEN 0x0001,0x0001
066d 0413 0416 | | .DBGLNO 0x0413,0x0416
066f ; --------------------------------------------------------------------------------------
066f ; Debug chain
066f ; --------------------------------------------------------------------------------------
066f 0001 0002 | | .DBGLEN 0x0001,0x0002
0671 041b 0420 | | .DBGLNO 0x041b,0x0420,0x0426
0674 ; --------------------------------------------------------------------------------------
0674 ; Debug chain
0674 ; --------------------------------------------------------------------------------------
0674 0000 0002 | | .DBGLEN 0x0000,0x0002
0676 0435 043d | 5 =| .DBGLNO 0x0435,0x043d
0678 ; --------------------------------------------------------------------------------------
0678 ; Debug chain
0678 ; --------------------------------------------------------------------------------------
0678 0000 0003 | | .DBGLEN 0x0000,0x0003
067a 0443 044a | C J| .DBGLNO 0x0443,0x044a,0x044c
067d ; --------------------------------------------------------------------------------------
067d ; Debug chain
067d ; --------------------------------------------------------------------------------------
067d 0001 0004 | | .DBGLEN 0x0001,0x0004
067f 045b 0463 | [ c| .DBGLNO 0x045b,0x0463,0x0467,0x046d,0x0471
0684 ; --------------------------------------------------------------------------------------
0684 ; Debug chain
0684 ; --------------------------------------------------------------------------------------
0684 0002 0005 | | .DBGLEN 0x0002,0x0005
0686 0483 0485 | | .DBGLNO 0x0483,0x0485,0x0487,0x048d,0x0491,0x0497,0x049a
068d 0001 0003 | | .XXX[0x5]
068f 0004 0005 | |
0691 0002 | |
0692 ; --------------------------------------------------------------------------------------
0692 ; Debug chain
0692 ; --------------------------------------------------------------------------------------
0692 0000 0005 | | .DBGLEN 0x0000,0x0005
0694 04a6 04ad | | .DBGLNO 0x04a6,0x04ad,0x04b5,0x04bc,0x04c3
0699 ; --------------------------------------------------------------------------------------
0699 ; Debug chain
0699 ; --------------------------------------------------------------------------------------
0699 0001 0005 | | .DBGLEN 0x0001,0x0005
069b 04cb 04cd | | .DBGLNO 0x04cb,0x04cd,0x04d4,0x04d9,0x04ef,0x04f3
06a1 ; --------------------------------------------------------------------------------------
06a1 ; Debug chain
06a1 ; --------------------------------------------------------------------------------------
06a1 0001 0001 | | .DBGLEN 0x0001,0x0001
06a3 051b 0521 | !| .DBGLNO 0x051b,0x0521
06a5 ; --------------------------------------------------------------------------------------
06a5 ; Debug chain
06a5 ; --------------------------------------------------------------------------------------
06a5 0001 0002 | | .DBGLEN 0x0001,0x0002
06a7 0533 053c | 3 <| .DBGLNO 0x0533,0x053c,0x0542
06aa ; --------------------------------------------------------------------------------------
06aa ; Debug chain
06aa ; --------------------------------------------------------------------------------------
06aa 0001 0004 | | .DBGLEN 0x0001,0x0004
06ac 054b 0551 | K Q| .DBGLNO 0x054b,0x0551,0x0557,0x0559,0x055b
06b1 0000 0000 | | .BLANK 0000[0x14f]