|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 0380 | | .CONST 0x0380 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 007c | | | .CONST 0x007c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0028 | ( | .CONST 0x0028 ; Number of locals
000b INIT_0008:
000b 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
000d 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
000f 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated
0011 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
0013 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
0015 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated
0017 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
0019 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
001b 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
001d 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
001f 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated
0021 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
0023 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
0025 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0027 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0029 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated
002b 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
002d 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
002f 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0031 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
0033 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
0035 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0037 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
0039 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
003b 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated
003d 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated
003f 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated
0041 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated
0043 00bf | | Action Accept_Activation
0044 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0045 00c7 | | Action Elaborate_Subprogram
0046 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0047 00c7 | | Action Elaborate_Subprogram
0048 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0049 00c7 | | Action Elaborate_Subprogram
004a 1d10 | | Execute_Immediate Reference_Lex_1,0x10
004b 00c7 | | Action Elaborate_Subprogram
004c 1d11 | | Execute_Immediate Reference_Lex_1,0x11
004d 00c7 | | Action Elaborate_Subprogram
004e 1d12 | | Execute_Immediate Reference_Lex_1,0x12
004f 00c7 | | Action Elaborate_Subprogram
0050 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0051 00c7 | | Action Elaborate_Subprogram
0052 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0053 00c7 | | Action Elaborate_Subprogram
0054 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0055 00c7 | | Action Elaborate_Subprogram
0056 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0057 00c7 | | Action Elaborate_Subprogram
0058 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0059 00c7 | | Action Elaborate_Subprogram
005a 1d18 | | Execute_Immediate Reference_Lex_1,0x18
005b 00c7 | | Action Elaborate_Subprogram
005c 1d19 | | Execute_Immediate Reference_Lex_1,0x19
005d 00c7 | | Action Elaborate_Subprogram
005e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
005f 00c7 | | Action Elaborate_Subprogram
0060 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0061 00c7 | | Action Elaborate_Subprogram
0062 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0063 00c7 | | Action Elaborate_Subprogram
0064 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0065 00c7 | | Action Elaborate_Subprogram
0066 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0067 00c7 | | Action Elaborate_Subprogram
0068 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0069 00c7 | | Action Elaborate_Subprogram
006a 1d20 | | Execute_Immediate Reference_Lex_1,0x20
006b 00c7 | | Action Elaborate_Subprogram
006c 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
006d 00c7 | | Action Elaborate_Subprogram
006e 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
006f 00c7 | | Action Elaborate_Subprogram
0070 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0071 00c7 | | Action Elaborate_Subprogram
0072 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0073 00c7 | | Action Elaborate_Subprogram
0074 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0075 00c7 | | Action Elaborate_Subprogram
0076 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
0077 00c7 | | Action Elaborate_Subprogram
0078 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0079 00c7 | | Action Elaborate_Subprogram
007a 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
007b 00c7 | | Action Elaborate_Subprogram
007c BODY_0008:
007c 00bc | | Action Signal_Activated
007d 00bb | | Action Signal_Completion
007e 0000 0000 | | .XXX[0x2]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 4800 |H | Short_Literal 0x0
0084 00db | | Load_Top At_Offset_3
0085 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0086 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0087 0000 | | .XXX[0x1]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 4800 |H | Short_Literal 0x0
008c 00db | | Load_Top At_Offset_3
008d 0227 | ' | Execute Access,All_Reference
008e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
008f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00da | | Load_Top At_Offset_2
0094 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0095 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0096 0000 0000 | | .XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 0227 | ' | Execute Access,All_Reference
009d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
009e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
009f 0000 | | .XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00da | | Load_Top At_Offset_2
00a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00a6 0000 0000 | | .XXX[0x2]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00da | | Load_Top At_Offset_2
00ac 0227 | ' | Execute Access,All_Reference
00ad 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00af 0000 | | .XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 00da | | Load_Top At_Offset_2
00b4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00b5 00db | | Load_Top At_Offset_3
00b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00b7 0272 | r | Execute Discrete,Minus
00b8 00e3 | | Load_Encached Natural_Cache
00b9 025b | [ | Execute Discrete,Check_In_Type
00ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00bb 0000 0000 | | .BLANK 0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00da | | Load_Top At_Offset_2
00c4 0227 | ' | Execute Access,All_Reference
00c5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00c6 00db | | Load_Top At_Offset_3
00c7 0227 | ' | Execute Access,All_Reference
00c8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c9 0272 | r | Execute Discrete,Minus
00ca 00e3 | | Load_Encached Natural_Cache
00cb 025b | [ | Execute Discrete,Check_In_Type
00cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00cd 0000 0000 | | .XXX[0x3]
00cf 0000 | |
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 00db | | Load_Top At_Offset_3
00d4 00db | | Load_Top At_Offset_3
00d5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00d6 027d | } | Execute Discrete,Greater
00d7 6802 |h | Jump_Zero 0xda
00d8 4800 |H | Short_Literal 0x0
00d9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00da 00db | | Load_Top At_Offset_3
00db 00db | | Load_Top At_Offset_3
00dc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00dd 01d7 | | Execute Vector,Field_Read
00de 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 00db | | Load_Top At_Offset_3
00e4 00db | | Load_Top At_Offset_3
00e5 0227 | ' | Execute Access,All_Reference
00e6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00e7 027d | } | Execute Discrete,Greater
00e8 6802 |h | Jump_Zero 0xeb
00e9 4800 |H | Short_Literal 0x0
00ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00eb 00db | | Load_Top At_Offset_3
00ec 00db | | Load_Top At_Offset_3
00ed 0227 | ' | Execute Access,All_Reference
00ee 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00ef 01d7 | | Execute Vector,Field_Read
00f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00f1 0000 0000 | | .BLANK 0000[0x7]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00da | | Load_Top At_Offset_2
00fc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00fd 0c01 | | Execute_Immediate Greater_Equal,0x1
00fe 6805 |h | Jump_Zero 0x104
00ff 4801 |H | Short_Literal 0x1
0100 00db | | Load_Top At_Offset_3
0101 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0102 01d7 | | Execute Vector,Field_Read
0103 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0104 4800 |H | Short_Literal 0x0
0105 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0106 0000 0000 | | .XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00da | | Load_Top At_Offset_2
010c 0227 | ' | Execute Access,All_Reference
010d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
010e 0c01 | | Execute_Immediate Greater_Equal,0x1
010f 6806 |h | Jump_Zero 0x116
0110 4801 |H | Short_Literal 0x1
0111 00db | | Load_Top At_Offset_3
0112 0227 | ' | Execute Access,All_Reference
0113 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0114 01d7 | | Execute Vector,Field_Read
0115 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0116 4800 |H | Short_Literal 0x0
0117 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b | | .CONST 0x011b ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0001 | | .CONST 0x0001 ; Number of locals
011b BODY_0118:
011b INIT_0118:
011b 00da | | Load_Top At_Offset_2
011c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
011d 7003 |p | Jump_Nonzero 0x121
011e 4800 |H | Short_Literal 0x0
011f a5fe | | Store_Unchecked 0x2,-0x2
0120 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0121 4801 |H | Short_Literal 0x1
0122 00db | | Load_Top At_Offset_3
0123 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0124 01d7 | | Execute Vector,Field_Read
0125 a5fe | | Store_Unchecked 0x2,-0x2
0126 00da | | Load_Top At_Offset_2
0127 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0128 0aff | | Execute_Immediate Plus,-0x1
0129 00db | | Load_Top At_Offset_3
012a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
012b 4802 |H | Short_Literal 0x2
012c 00db | | Load_Top At_Offset_3
012d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
012e 0a01 | | Execute_Immediate Plus,0x1
012f e5ff | | Load 0x2,-0x1
0130 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0131 01cf | | Execute Vector,Slice_Read
0132 4801 |H | Short_Literal 0x1
0133 e5ff | | Load 0x2,-0x1
0134 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0135 e5ff | | Load 0x2,-0x1
0136 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0137 01ce | | Execute Vector,Slice_Write
0138 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0139 0000 0000 | | .BLANK 0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0144 | D | .CONST 0x0144 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0002 | | .CONST 0x0002 ; Number of locals
0143 INIT_0140:
0143 00e8 | | Load_Encached Character_Cache
0144 BODY_0140:
0144 00db | | Load_Top At_Offset_3
0145 0227 | ' | Execute Access,All_Reference
0146 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0147 7002 |p | Jump_Nonzero 0x14a
0148 4800 |H | Short_Literal 0x0
0149 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
014a 4801 |H | Short_Literal 0x1
014b e5ff | | Load 0x2,-0x1
014c 0227 | ' | Execute Access,All_Reference
014d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
014e 01d7 | | Execute Vector,Field_Read
014f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0150 00db | | Load_Top At_Offset_3
0151 0227 | ' | Execute Access,All_Reference
0152 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0153 0aff | | Execute_Immediate Plus,-0x1
0154 e5ff | | Load 0x2,-0x1
0155 0227 | ' | Execute Access,All_Reference
0156 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0157 4802 |H | Short_Literal 0x2
0158 e5ff | | Load 0x2,-0x1
0159 0227 | ' | Execute Access,All_Reference
015a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
015b 0a01 | | Execute_Immediate Plus,0x1
015c e5ff | | Load 0x2,-0x1
015d 0227 | ' | Execute Access,All_Reference
015e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
015f 01cf | | Execute Vector,Slice_Read
0160 4801 |H | Short_Literal 0x1
0161 e5ff | | Load 0x2,-0x1
0162 0227 | ' | Execute Access,All_Reference
0163 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0164 e5ff | | Load 0x2,-0x1
0165 0229 | ) | Execute Access,All_Read
0166 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0167 01ce | | Execute Vector,Slice_Write
0168 00d8 | | Load_Top At_Offset_0
0169 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
016a 0000 0000 | | .BLANK 0000[0x6]
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 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0175 0c01 | | Execute_Immediate Greater_Equal,0x1
0176 6806 |h | Jump_Zero 0x17d
0177 00da | | Load_Top At_Offset_2
0178 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0179 00db | | Load_Top At_Offset_3
017a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
017b 01d7 | | Execute Vector,Field_Read
017c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
017d 4800 |H | Short_Literal 0x0
017e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
017f 0000 | | .XXX[0x1]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 00da | | Load_Top At_Offset_2
0184 0227 | ' | Execute Access,All_Reference
0185 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0186 0c01 | | Execute_Immediate Greater_Equal,0x1
0187 6808 |h | Jump_Zero 0x190
0188 00da | | Load_Top At_Offset_2
0189 0227 | ' | Execute Access,All_Reference
018a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
018b 00db | | Load_Top At_Offset_3
018c 0227 | ' | Execute Access,All_Reference
018d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
018e 01d7 | | Execute Vector,Field_Read
018f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0190 4800 |H | Short_Literal 0x0
0191 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0192 0000 0000 | | .BLANK 0000[0x6]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 00da | | Load_Top At_Offset_2
019c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
019d 7003 |p | Jump_Nonzero 0x1a1
019e 4800 |H | Short_Literal 0x0
019f a5fe | | Store_Unchecked 0x2,-0x2
01a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01a1 00da | | Load_Top At_Offset_2
01a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01a3 00db | | Load_Top At_Offset_3
01a4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01a5 01d7 | | Execute Vector,Field_Read
01a6 a5fe | | Store_Unchecked 0x2,-0x2
01a7 00da | | Load_Top At_Offset_2
01a8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01a9 0aff | | Execute_Immediate Plus,-0x1
01aa 00db | | Load_Top At_Offset_3
01ab 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01ac 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ad 0000 0000 | | .XXX[0x3]
01af 0000 | |
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 0227 | ' | Execute Access,All_Reference
01b5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01b6 7002 |p | Jump_Nonzero 0x1b9
01b7 4800 |H | Short_Literal 0x0
01b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01b9 00da | | Load_Top At_Offset_2
01ba 0227 | ' | Execute Access,All_Reference
01bb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01bc 0aff | | Execute_Immediate Plus,-0x1
01bd 00db | | Load_Top At_Offset_3
01be 0227 | ' | Execute Access,All_Reference
01bf 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01c0 00da | | Load_Top At_Offset_2
01c1 0227 | ' | Execute Access,All_Reference
01c2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01c3 0a01 | | Execute_Immediate Plus,0x1
01c4 00db | | Load_Top At_Offset_3
01c5 0227 | ' | Execute Access,All_Reference
01c6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01c7 01d7 | | Execute Vector,Field_Read
01c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c9 0000 0000 | | .BLANK 0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e5fd | | Load 0x2,-0x3
01d4 00db | | Load_Top At_Offset_3
01d5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01d6 027d | } | Execute Discrete,Greater
01d7 6808 |h | Jump_Zero 0x1e0
01d8 00db | | Load_Top At_Offset_3
01d9 00db | | Load_Top At_Offset_3
01da 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01db e5ff | | Load 0x2,-0x1
01dc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01dd 01cf | | Execute Vector,Slice_Read
01de 0335 | 5 | Declare_Variable Array,Duplicate
01df 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01e0 00db | | Load_Top At_Offset_3
01e1 e5fd | | Load 0x2,-0x3
01e2 e5ff | | Load 0x2,-0x1
01e3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01e4 01cf | | Execute Vector,Slice_Read
01e5 0335 | 5 | Declare_Variable Array,Duplicate
01e6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01e7 0000 | | .XXX[0x1]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb e5fd | | Load 0x2,-0x3
01ec 00db | | Load_Top At_Offset_3
01ed 0227 | ' | Execute Access,All_Reference
01ee 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01ef 027d | } | Execute Discrete,Greater
01f0 680a |h | Jump_Zero 0x1fb
01f1 00db | | Load_Top At_Offset_3
01f2 00db | | Load_Top At_Offset_3
01f3 0227 | ' | Execute Access,All_Reference
01f4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01f5 e5ff | | Load 0x2,-0x1
01f6 0227 | ' | Execute Access,All_Reference
01f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01f8 01cf | | Execute Vector,Slice_Read
01f9 0335 | 5 | Declare_Variable Array,Duplicate
01fa 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01fb 00db | | Load_Top At_Offset_3
01fc e5fd | | Load 0x2,-0x3
01fd e5ff | | Load 0x2,-0x1
01fe 0227 | ' | Execute Access,All_Reference
01ff 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0200 01cf | | Execute Vector,Slice_Read
0201 0335 | 5 | Declare_Variable Array,Duplicate
0202 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0203 0000 0000 | | .BLANK 0000[0x5]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0214 | | .CONST 0x0214 ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0003 | | .CONST 0x0003 ; Number of locals
020b INIT_0208:
020b 00db | | Load_Top At_Offset_3
020c 00e3 | | Load_Encached Natural_Cache
020d 03f1 | | Declare_Variable Discrete,With_Value
020e e5fe | | Load 0x2,-0x2
020f e5ff | | Load 0x2,-0x1
0210 0272 | r | Execute Discrete,Minus
0211 0a01 | | Execute_Immediate Plus,0x1
0212 00e3 | | Load_Encached Natural_Cache
0213 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0214 BODY_0208:
0214 00d9 | | Load_Top At_Offset_1
0215 e5fd | | Load 0x2,-0x3
0216 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0217 027d | } | Execute Discrete,Greater
0218 6809 |h | Jump_Zero 0x222
0219 e5fd | | Load 0x2,-0x3
021a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
021b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
021c e5fd | | Load 0x2,-0x3
021d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
021e e5ff | | Load 0x2,-0x1
021f 0272 | r | Execute Discrete,Minus
0220 0a01 | | Execute_Immediate Plus,0x1
0221 0059 | Y | Store_Top Discrete,At_Offset_1
0222 e5ff | | Load 0x2,-0x1
0223 0f01 | | Execute_Immediate Equal,0x1
0224 6804 |h | Jump_Zero 0x229
0225 00d8 | | Load_Top At_Offset_0
0226 e5fd | | Load 0x2,-0x3
0227 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0228 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0229 e5ff | | Load 0x2,-0x1
022a 00da | | Load_Top At_Offset_2
022b e5fd | | Load 0x2,-0x3
022c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
022d 01cf | | Execute Vector,Slice_Read
022e 4801 |H | Short_Literal 0x1
022f 00da | | Load_Top At_Offset_2
0230 e5fd | | Load 0x2,-0x3
0231 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0232 01ce | | Execute Vector,Slice_Write
0233 00d8 | | Load_Top At_Offset_0
0234 e5fd | | Load 0x2,-0x3
0235 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0236 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0237 0000 | | .XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0244 | D | .CONST 0x0244 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0003 | | .CONST 0x0003 ; Number of locals
023b INIT_0238:
023b e5fd | | Load 0x2,-0x3
023c 00e3 | | Load_Encached Natural_Cache
023d 03f1 | | Declare_Variable Discrete,With_Value
023e e5fd | | Load 0x2,-0x3
023f e5fe | | Load 0x2,-0x2
0240 0272 | r | Execute Discrete,Minus
0241 0a01 | | Execute_Immediate Plus,0x1
0242 00e3 | | Load_Encached Natural_Cache
0243 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0244 BODY_0238:
0244 00d9 | | Load_Top At_Offset_1
0245 e5ff | | Load 0x2,-0x1
0246 0227 | ' | Execute Access,All_Reference
0247 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0248 027d | } | Execute Discrete,Greater
0249 680b |h | Jump_Zero 0x255
024a e5ff | | Load 0x2,-0x1
024b 0227 | ' | Execute Access,All_Reference
024c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
024d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
024e e5ff | | Load 0x2,-0x1
024f 0227 | ' | Execute Access,All_Reference
0250 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0251 e5fe | | Load 0x2,-0x2
0252 0272 | r | Execute Discrete,Minus
0253 0a01 | | Execute_Immediate Plus,0x1
0254 0059 | Y | Store_Top Discrete,At_Offset_1
0255 e5fe | | Load 0x2,-0x2
0256 0f01 | | Execute_Immediate Equal,0x1
0257 6805 |h | Jump_Zero 0x25d
0258 00d8 | | Load_Top At_Offset_0
0259 e5ff | | Load 0x2,-0x1
025a 0227 | ' | Execute Access,All_Reference
025b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
025c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
025d e5fe | | Load 0x2,-0x2
025e 00da | | Load_Top At_Offset_2
025f e5ff | | Load 0x2,-0x1
0260 0227 | ' | Execute Access,All_Reference
0261 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0262 01cf | | Execute Vector,Slice_Read
0263 4801 |H | Short_Literal 0x1
0264 00da | | Load_Top At_Offset_2
0265 e5ff | | Load 0x2,-0x1
0266 0229 | ) | Execute Access,All_Read
0267 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0268 01ce | | Execute Vector,Slice_Write
0269 00d8 | | Load_Top At_Offset_0
026a e5ff | | Load 0x2,-0x1
026b 0227 | ' | Execute Access,All_Reference
026c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
026d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026e 0000 0000 | | .XXX[0x2]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0274 | t | .CONST 0x0274 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0002 | | .CONST 0x0002 ; Number of locals
0273 INIT_0270:
0273 00e3 | | Load_Encached Natural_Cache
0274 BODY_0270:
0274 e5fd | | Load 0x2,-0x3
0275 e5ff | | Load 0x2,-0x1
0276 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0277 027b | { | Execute Discrete,Greater_Equal
0278 6808 |h | Jump_Zero 0x281
0279 e5fe | | Load 0x2,-0x2
027a e5ff | | Load 0x2,-0x1
027b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
027c e5ff | | Load 0x2,-0x1
027d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
027e 01cf | | Execute Vector,Slice_Read
027f 0335 | 5 | Declare_Variable Array,Duplicate
0280 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0281 e5fe | | Load 0x2,-0x2
0282 e5fd | | Load 0x2,-0x3
0283 0273 | s | Execute Discrete,Plus
0284 0aff | | Execute_Immediate Plus,-0x1
0285 0059 | Y | Store_Top Discrete,At_Offset_1
0286 00d8 | | Load_Top At_Offset_0
0287 e5ff | | Load 0x2,-0x1
0288 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0289 027b | { | Execute Discrete,Greater_Equal
028a 6808 |h | Jump_Zero 0x293
028b e5fe | | Load 0x2,-0x2
028c e5ff | | Load 0x2,-0x1
028d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
028e e5ff | | Load 0x2,-0x1
028f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0290 01cf | | Execute Vector,Slice_Read
0291 0335 | 5 | Declare_Variable Array,Duplicate
0292 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0293 e5fe | | Load 0x2,-0x2
0294 00d9 | | Load_Top At_Offset_1
0295 e5ff | | Load 0x2,-0x1
0296 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0297 01cf | | Execute Vector,Slice_Read
0298 0335 | 5 | Declare_Variable Array,Duplicate
0299 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
029a 0000 0000 | | .BLANK 0000[0x6]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a4 | | .CONST 0x02a4 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0002 | | .CONST 0x0002 ; Number of locals
02a3 INIT_02a0:
02a3 00e3 | | Load_Encached Natural_Cache
02a4 BODY_02a0:
02a4 e5fd | | Load 0x2,-0x3
02a5 e5ff | | Load 0x2,-0x1
02a6 0227 | ' | Execute Access,All_Reference
02a7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02a8 027b | { | Execute Discrete,Greater_Equal
02a9 680a |h | Jump_Zero 0x2b4
02aa e5fe | | Load 0x2,-0x2
02ab e5ff | | Load 0x2,-0x1
02ac 0227 | ' | Execute Access,All_Reference
02ad 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02ae e5ff | | Load 0x2,-0x1
02af 0227 | ' | Execute Access,All_Reference
02b0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b1 01cf | | Execute Vector,Slice_Read
02b2 0335 | 5 | Declare_Variable Array,Duplicate
02b3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02b4 e5fe | | Load 0x2,-0x2
02b5 e5fd | | Load 0x2,-0x3
02b6 0273 | s | Execute Discrete,Plus
02b7 0aff | | Execute_Immediate Plus,-0x1
02b8 0059 | Y | Store_Top Discrete,At_Offset_1
02b9 00d8 | | Load_Top At_Offset_0
02ba e5ff | | Load 0x2,-0x1
02bb 0227 | ' | Execute Access,All_Reference
02bc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02bd 027b | { | Execute Discrete,Greater_Equal
02be 680a |h | Jump_Zero 0x2c9
02bf e5fe | | Load 0x2,-0x2
02c0 e5ff | | Load 0x2,-0x1
02c1 0227 | ' | Execute Access,All_Reference
02c2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02c3 e5ff | | Load 0x2,-0x1
02c4 0227 | ' | Execute Access,All_Reference
02c5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02c6 01cf | | Execute Vector,Slice_Read
02c7 0335 | 5 | Declare_Variable Array,Duplicate
02c8 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02c9 e5fe | | Load 0x2,-0x2
02ca 00d9 | | Load_Top At_Offset_1
02cb e5ff | | Load 0x2,-0x1
02cc 0227 | ' | Execute Access,All_Reference
02cd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02ce 01cf | | Execute Vector,Slice_Read
02cf 0335 | 5 | Declare_Variable Array,Duplicate
02d0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02d1 0000 0000 | | .BLANK 0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02df | | .CONST 0x02df ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0003 | | .CONST 0x0003 ; Number of locals
02db INIT_02d8:
02db 00e3 | | Load_Encached Natural_Cache
02dc e5fe | | Load 0x2,-0x2
02dd 00e3 | | Load_Encached Natural_Cache
02de 03f1 | | Declare_Variable Discrete,With_Value
02df BODY_02d8:
02df e5fe | | Load 0x2,-0x2
02e0 e5fd | | Load 0x2,-0x3
02e1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02e2 027b | { | Execute Discrete,Greater_Equal
02e3 680a |h | Jump_Zero 0x2ee
02e4 e5fd | | Load 0x2,-0x3
02e5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02e6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02e7 e5fd | | Load 0x2,-0x3
02e8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02e9 e5ff | | Load 0x2,-0x1
02ea 0272 | r | Execute Discrete,Minus
02eb 0a01 | | Execute_Immediate Plus,0x1
02ec 0059 | Y | Store_Top Discrete,At_Offset_1
02ed 7813 |x | Jump 0x301
02ee e5ff | | Load 0x2,-0x1
02ef e5fe | | Load 0x2,-0x2
02f0 0273 | s | Execute Discrete,Plus
02f1 0aff | | Execute_Immediate Plus,-0x1
02f2 005a | Z | Store_Top Discrete,At_Offset_2
02f3 00d9 | | Load_Top At_Offset_1
02f4 e5fd | | Load 0x2,-0x3
02f5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02f6 027b | { | Execute Discrete,Greater_Equal
02f7 6809 |h | Jump_Zero 0x301
02f8 e5fd | | Load 0x2,-0x3
02f9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02fa 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02fb e5fd | | Load 0x2,-0x3
02fc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02fd e5ff | | Load 0x2,-0x1
02fe 0272 | r | Execute Discrete,Minus
02ff 0a01 | | Execute_Immediate Plus,0x1
0300 0059 | Y | Store_Top Discrete,At_Offset_1
0301 e5ff | | Load 0x2,-0x1
0302 0f01 | | Execute_Immediate Equal,0x1
0303 6804 |h | Jump_Zero 0x308
0304 00d8 | | Load_Top At_Offset_0
0305 e5fd | | Load 0x2,-0x3
0306 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0307 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0308 e5ff | | Load 0x2,-0x1
0309 00da | | Load_Top At_Offset_2
030a e5fd | | Load 0x2,-0x3
030b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
030c 01cf | | Execute Vector,Slice_Read
030d 4801 |H | Short_Literal 0x1
030e 00da | | Load_Top At_Offset_2
030f e5fd | | Load 0x2,-0x3
0310 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0311 01ce | | Execute Vector,Slice_Write
0312 00d8 | | Load_Top At_Offset_0
0313 e5fd | | Load 0x2,-0x3
0314 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0315 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0316 0000 0000 | | .XXX[0x2]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031f | | .CONST 0x031f ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 0003 | | .CONST 0x0003 ; Number of locals
031b INIT_0318:
031b 00e3 | | Load_Encached Natural_Cache
031c e5fd | | Load 0x2,-0x3
031d 00e3 | | Load_Encached Natural_Cache
031e 03f1 | | Declare_Variable Discrete,With_Value
031f BODY_0318:
031f e5fd | | Load 0x2,-0x3
0320 e5ff | | Load 0x2,-0x1
0321 0227 | ' | Execute Access,All_Reference
0322 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0323 027b | { | Execute Discrete,Greater_Equal
0324 680c |h | Jump_Zero 0x331
0325 e5ff | | Load 0x2,-0x1
0326 0227 | ' | Execute Access,All_Reference
0327 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0328 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0329 e5ff | | Load 0x2,-0x1
032a 0227 | ' | Execute Access,All_Reference
032b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
032c e5fe | | Load 0x2,-0x2
032d 0272 | r | Execute Discrete,Minus
032e 0a01 | | Execute_Immediate Plus,0x1
032f 0059 | Y | Store_Top Discrete,At_Offset_1
0330 7816 |x | Jump 0x347
0331 e5fe | | Load 0x2,-0x2
0332 e5fd | | Load 0x2,-0x3
0333 0273 | s | Execute Discrete,Plus
0334 0aff | | Execute_Immediate Plus,-0x1
0335 005a | Z | Store_Top Discrete,At_Offset_2
0336 00d9 | | Load_Top At_Offset_1
0337 e5ff | | Load 0x2,-0x1
0338 0227 | ' | Execute Access,All_Reference
0339 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
033a 027b | { | Execute Discrete,Greater_Equal
033b 680b |h | Jump_Zero 0x347
033c e5ff | | Load 0x2,-0x1
033d 0227 | ' | Execute Access,All_Reference
033e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
033f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0340 e5ff | | Load 0x2,-0x1
0341 0227 | ' | Execute Access,All_Reference
0342 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0343 e5fe | | Load 0x2,-0x2
0344 0272 | r | Execute Discrete,Minus
0345 0a01 | | Execute_Immediate Plus,0x1
0346 0059 | Y | Store_Top Discrete,At_Offset_1
0347 e5fe | | Load 0x2,-0x2
0348 0f01 | | Execute_Immediate Equal,0x1
0349 6805 |h | Jump_Zero 0x34f
034a 00d8 | | Load_Top At_Offset_0
034b e5ff | | Load 0x2,-0x1
034c 0227 | ' | Execute Access,All_Reference
034d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
034e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
034f e5fe | | Load 0x2,-0x2
0350 00da | | Load_Top At_Offset_2
0351 e5ff | | Load 0x2,-0x1
0352 0227 | ' | Execute Access,All_Reference
0353 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0354 01cf | | Execute Vector,Slice_Read
0355 4801 |H | Short_Literal 0x1
0356 00da | | Load_Top At_Offset_2
0357 e5ff | | Load 0x2,-0x1
0358 0229 | ) | Execute Access,All_Read
0359 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
035a 01ce | | Execute Vector,Slice_Write
035b 00d8 | | Load_Top At_Offset_0
035c e5ff | | Load 0x2,-0x1
035d 0227 | ' | Execute Access,All_Reference
035e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
035f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363 | c | .CONST 0x0363 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0001 | | .CONST 0x0001 ; Number of locals
0363 BODY_0360:
0363 INIT_0360:
0363 4801 |H | Short_Literal 0x1
0364 00db | | Load_Top At_Offset_3
0365 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0366 e5ff | | Load 0x2,-0x1
0367 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0368 01cf | | Execute Vector,Slice_Read
0369 0335 | 5 | Declare_Variable Array,Duplicate
036a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
036b 0000 0000 | | .BLANK 0000[0x5]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373 | s | .CONST 0x0373 ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0001 | | .CONST 0x0001 ; Number of locals
0373 BODY_0370:
0373 INIT_0370:
0373 4801 |H | Short_Literal 0x1
0374 00db | | Load_Top At_Offset_3
0375 0227 | ' | Execute Access,All_Reference
0376 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0377 e5ff | | Load 0x2,-0x1
0378 0227 | ' | Execute Access,All_Reference
0379 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
037a 01cf | | Execute Vector,Slice_Read
037b 0335 | 5 | Declare_Variable Array,Duplicate
037c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
037d 0000 0000 | | .XXX[0x3]
037f 0000 | |
0380 ; --------------------------------------------------------------------------------------
0380 ; Debug Table
0380 ; --------------------------------------------------------------------------------------
0380 0004 0004 | | .DEBUG4 0x0004,0x0004,0xa8ec,0x0000,0x0001,0x0000
0386 822a 1800 | * | .XXX[0xa]
0388 00bb e800 | |
038a 0099 b800 | |
038c 010a 5000 | P |
038e 002c f800 | , |
0390 0000 0000 | | .BLANK 0000[0x7]
0397 d974 2c00 | t, | .XXX[0x4]
0399 0069 2400 | i$ |
039b 0000 0000 | | .BLANK 0000[0x7]
03a2 0fc0 000f | | .XXX[0x7]
03a4 a040 0000 | @ |
03a6 0000 0000 | |
03a8 0900 | |
03a9 0000 0000 | | .BLANK 0000[0x4]
03ad 0001 0000 | | .XXX[0x6]
03af 0001 8000 | |
03b1 0000 0400 | |
03b3 0000 0000 | | .BLANK 0000[0x7]
03ba 2c00 02d8 |, | .XXX[0xf]
03bc d800 0000 | |
03be 0800 00db | |
03c0 3000 0000 |0 |
03c2 5800 05b1 |X |
03c4 a000 0000 | |
03c6 1000 01c6 | |
03c8 4000 |@ |
03c9 0000 0000 | | .BLANK 0000[0x10]
03d9 00ef 0000 | | .XXX[0x4]
03db 082a 8000 | * |
03dd 0000 0000 | | .BLANK 0000[0x5]
03e2 8000 0009 | | .XXX[0x17]
03e4 0000 0000 | |
03e6 0000 0002 | |
03e8 0000 0024 | $|
03ea 0005 4550 | EP|
03ec 0000 0008 | |
03ee e59c e858 | X|
03f0 0006 7b50 | {P|
03f2 0000 0936 | 6|
03f4 e000 0000 | |
03f6 0000 0000 | |
03f8 00c0 | |
03f9 0000 0000 | | .BLANK 0000[0x7]