|
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_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0750 | P | .CONST 0x0750 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0186 | | .CONST 0x0186 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0040 | @ | .CONST 0x0040 ; Number of locals
000b INIT_0008:
000b e002 | | Load 0x0,0x2
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 0129 | ) | Execute Any,Make_Visible
000e e002 | | Load 0x0,0x2
000f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0010 0129 | ) | Execute Any,Make_Visible
0011 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
0035 c22d | - | Store 0x1,0x2d
0036 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
0038 c210 | | Store 0x1,0x10
0039 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
003b c211 | | Store 0x1,0x11
003c 4801 |H | Short_Literal 0x1
003d 4801 |H | Short_Literal 0x1
003e 00e9 | | Load_Encached String_Cache
003f 0334 | 4 | Declare_Variable Array,With_Constraint
0040 480d |H | Short_Literal 0xd
0041 4801 |H | Short_Literal 0x1
0042 00da | | Load_Top At_Offset_2
0043 01d6 | | Execute Vector,Field_Write
0044 0129 | ) | Execute Any,Make_Visible
0045 c212 | | Store 0x1,0x12
0046 4801 |H | Short_Literal 0x1
0047 4801 |H | Short_Literal 0x1
0048 00e9 | | Load_Encached String_Cache
0049 0334 | 4 | Declare_Variable Array,With_Constraint
004a 480a |H | Short_Literal 0xa
004b 4801 |H | Short_Literal 0x1
004c 00da | | Load_Top At_Offset_2
004d 01d6 | | Execute Vector,Field_Write
004e 0129 | ) | Execute Any,Make_Visible
004f c213 | | Store 0x1,0x13
0050 4801 |H | Short_Literal 0x1
0051 4801 |H | Short_Literal 0x1
0052 00e9 | | Load_Encached String_Cache
0053 0334 | 4 | Declare_Variable Array,With_Constraint
0054 481b |H | Short_Literal 0x1b
0055 4801 |H | Short_Literal 0x1
0056 00da | | Load_Top At_Offset_2
0057 01d6 | | Execute Vector,Field_Write
0058 0129 | ) | Execute Any,Make_Visible
0059 c214 | | Store 0x1,0x14
005a 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
005c c215 | | Store 0x1,0x15
005d 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
005f c216 | | Store 0x1,0x16
0060 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
0062 c217 | | Store 0x1,0x17
0063 4800 |H | Short_Literal 0x0
0064 48ff |H | Short_Literal 0xff
0065 00e1 | | Load_Encached Boolean_Cache
0066 02a0 | | Declare_Subprogram Null_Subprogram
0067 4801 |H | Short_Literal 0x1
0068 035e | ^ | Declare_Type Array,Defined,Visible
0069 c218 | | Store 0x1,0x18
006a e218 | | Load 0x1,0x18
006b 0336 | 6 | Declare_Variable Array,Visible
006c 00d8 | | Load_Top At_Offset_0
006d 0335 | 5 | Declare_Variable Array,Duplicate
006e 00cd | | Action Spare6_Action
006f 48ff |H | Short_Literal 0xff
0070 4800 |H | Short_Literal 0x0
0071 4800 |H | Short_Literal 0x0
0072 00d9 | | Load_Top At_Offset_1
0073 e231 | 1 | Load 0x1,0x31
0074 01d6 | | Execute Vector,Field_Write
0075 3ffb |? | Loop_Increasing 0x71
0076 00d9 | | Load_Top At_Offset_1
0077 01d4 | | Execute Vector,Structure_Write
0078 c219 | | Store 0x1,0x19
0079 e218 | | Load 0x1,0x18
007a 0336 | 6 | Declare_Variable Array,Visible
007b 00d8 | | Load_Top At_Offset_0
007c 0335 | 5 | Declare_Variable Array,Duplicate
007d 00cd | | Action Spare6_Action
007e 48ff |H | Short_Literal 0xff
007f 4800 |H | Short_Literal 0x0
0080 4801 |H | Short_Literal 0x1
0081 00d9 | | Load_Top At_Offset_1
0082 e231 | 1 | Load 0x1,0x31
0083 01d6 | | Execute Vector,Field_Write
0084 3ffb |? | Loop_Increasing 0x80
0085 00d9 | | Load_Top At_Offset_1
0086 01d4 | | Execute Vector,Structure_Write
0087 c21a | | Store 0x1,0x1a
0088 4800 |H | Short_Literal 0x0
0089 48ff |H | Short_Literal 0xff
008a e20d | | Load 0x1,0xd
008b 02a0 | | Declare_Subprogram Null_Subprogram
008c 4801 |H | Short_Literal 0x1
008d 035e | ^ | Declare_Type Array,Defined,Visible
008e c21b | | Store 0x1,0x1b
008f 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated
0091 c21c | | Store 0x1,0x1c
0092 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated
0094 c21d | | Store 0x1,0x1d
0095 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
0097 c21e | | Store 0x1,0x1e
0098 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated
009a c21f | | Store 0x1,0x1f
009b 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated
009d c220 | | Store 0x1,0x20
009e e218 | | Load 0x1,0x18
009f e21b | | Load 0x1,0x1b
00a0 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call
00a2 4802 |H | Short_Literal 0x2
00a3 032e | . | Declare_Type Record,Defined,Visible
00a4 c221 | ! | Store 0x1,0x21
00a5 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated
00a7 c222 | " | Store 0x1,0x22
00a8 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated
00aa c22e | . | Store 0x1,0x2e
00ab 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated
00ad c22f | / | Store 0x1,0x2f
00ae e003 | | Load 0x0,0x3
00af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b0 e221 | ! | Load 0x1,0x21
00b1 00e7 | | Load_Encached Duration_Cache
00b2 00e7 | | Load_Encached Duration_Cache
00b3 029f 0673 | s| Declare_Subprogram INIT_0670,For_Call
00b5 4804 |H | Short_Literal 0x4
00b6 032e | . | Declare_Type Record,Defined,Visible
00b7 c223 | # | Store 0x1,0x23
00b8 e003 | | Load 0x0,0x3
00b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ba e221 | ! | Load 0x1,0x21
00bb 00e7 | | Load_Encached Duration_Cache
00bc 029f 069b | | Declare_Subprogram INIT_0698,For_Call
00be 4803 |H | Short_Literal 0x3
00bf 032e | . | Declare_Type Record,Defined,Visible
00c0 c224 | $ | Store 0x1,0x24
00c1 e001 | | Load 0x0,0x1
00c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c3 e221 | ! | Load 0x1,0x21
00c4 00e1 | | Load_Encached Boolean_Cache
00c5 00e1 | | Load_Encached Boolean_Cache
00c6 029f 06bb | | Declare_Subprogram INIT_06b8,For_Call
00c8 4804 |H | Short_Literal 0x4
00c9 032e | . | Declare_Type Record,Defined,Visible
00ca c225 | % | Store 0x1,0x25
00cb 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated
00cd c22b | + | Store 0x1,0x2b
00ce e223 | # | Load 0x1,0x23
00cf e224 | $ | Load 0x1,0x24
00d0 e225 | % | Load 0x1,0x25
00d1 029f 06e3 | | Declare_Subprogram INIT_06e0,For_Call
00d3 4803 |H | Short_Literal 0x3
00d4 032e | . | Declare_Type Record,Defined,Visible
00d5 c226 | & | Store 0x1,0x26
00d6 0092 06fb | | Action Push_String_Extended,0x6fb ; "~echo, ~crlf, edit=none"
00d8 0129 | ) | Execute Any,Make_Visible
00d9 c227 | ' | Store 0x1,0x27
00da 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
00dc c228 | ( | Store 0x1,0x28
00dd 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
00df c229 | ) | Store 0x1,0x29
00e0 4808 |H | Short_Literal 0x8
00e1 e004 | | Load 0x0,0x4
00e2 02a0 | | Declare_Subprogram Null_Subprogram
00e3 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
00e4 00b6 | | Action Make_Scope
00e5 e005 | | Load 0x0,0x5
00e6 e006 | | Load 0x0,0x6
00e7 e007 | | Load 0x0,0x7
00e8 e008 | | Load 0x0,0x8
00e9 e009 | | Load 0x0,0x9
00ea e00a | | Load 0x0,0xa
00eb e00b | | Load 0x0,0xb
00ec 4808 |H | Short_Literal 0x8
00ed e230 | 0 | Load 0x1,0x30
00ee 020e | | Execute Module,Augment_Imports
00ef c22c | , | Store 0x1,0x2c
00f0 00bf | | Action Accept_Activation
00f1 4801 |H | Short_Literal 0x1
00f2 4800 |H | Short_Literal 0x0
00f3 e20e | | Load 0x1,0xe
00f4 035b | [ | Declare_Type Array,Constrained
00f5 0337 | 7 | Declare_Variable Array
00f6 00d8 | | Load_Top At_Offset_0
00f7 0335 | 5 | Declare_Variable Array,Duplicate
00f8 00cd | | Action Spare6_Action
00f9 00d9 | | Load_Top At_Offset_1
00fa 01d4 | | Execute Vector,Structure_Write
00fb 00e4 | | Load_Encached Positive_Cache
00fc 00e3 | | Load_Encached Natural_Cache
00fd 02a0 | | Declare_Subprogram Null_Subprogram
00fe 4802 |H | Short_Literal 0x2
00ff 032d | - | Declare_Type Record,Defined
0100 00e4 | | Load_Encached Positive_Cache
0101 00e4 | | Load_Encached Positive_Cache
0102 00e1 | | Load_Encached Boolean_Cache
0103 00e3 | | Load_Encached Natural_Cache
0104 00e7 | | Load_Encached Duration_Cache
0105 02a0 | | Declare_Subprogram Null_Subprogram
0106 4805 |H | Short_Literal 0x5
0107 032d | - | Declare_Type Record,Defined
0108 00d8 | | Load_Top At_Offset_0
0109 0322 | " | Declare_Variable Record
010a 4801 |H | Short_Literal 0x1
010b 00d9 | | Load_Top At_Offset_1
010c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
010d 4801 |H | Short_Literal 0x1
010e 00d9 | | Load_Top At_Offset_1
010f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0110 4800 |H | Short_Literal 0x0
0111 00d9 | | Load_Top At_Offset_1
0112 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0113 4800 |H | Short_Literal 0x0
0114 00d9 | | Load_Top At_Offset_1
0115 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0116 4800 |H | Short_Literal 0x0
0117 00d9 | | Load_Top At_Offset_1
0118 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0119 00d9 | | Load_Top At_Offset_1
011a 00da | | Load_Top At_Offset_2
011b 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call
011d 4802 |H | Short_Literal 0x2
011e 032d | - | Declare_Type Record,Defined
011f e21b | | Load 0x1,0x1b
0120 0337 | 7 | Declare_Variable Array
0121 e21b | | Load 0x1,0x1b
0122 0337 | 7 | Declare_Variable Array
0123 e21b | | Load 0x1,0x1b
0124 0337 | 7 | Declare_Variable Array
0125 e21b | | Load 0x1,0x1b
0126 0337 | 7 | Declare_Variable Array
0127 e221 | ! | Load 0x1,0x21
0128 0322 | " | Declare_Variable Record
0129 e219 | | Load 0x1,0x19
012a e221 | ! | Load 0x1,0x21
012b 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
012c 0119 | | Execute Any,Check_In_Formal_Type
012d 00d9 | | Load_Top At_Offset_1
012e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012f e221 | ! | Load 0x1,0x21
0130 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
0131 0337 | 7 | Declare_Variable Array
0132 48ff |H | Short_Literal 0xff
0133 4800 |H | Short_Literal 0x0
0134 4800 |H | Short_Literal 0x0
0135 00d9 | | Load_Top At_Offset_1
0136 e23a | : | Load 0x1,0x3a
0137 01d6 | | Execute Vector,Field_Write
0138 3ffb |? | Loop_Increasing 0x134
0139 e221 | ! | Load 0x1,0x21
013a 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
013b 0119 | | Execute Any,Check_In_Formal_Type
013c 00d9 | | Load_Top At_Offset_1
013d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
013e 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
013f 00c7 | | Action Elaborate_Subprogram
0140 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0141 00c7 | | Action Elaborate_Subprogram
0142 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0143 00c7 | | Action Elaborate_Subprogram
0144 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0145 00c7 | | Action Elaborate_Subprogram
0146 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0147 00c7 | | Action Elaborate_Subprogram
0148 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0149 00c7 | | Action Elaborate_Subprogram
014a 029d 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call
014c 029d 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call
014e 1d0f | | Execute_Immediate Reference_Lex_1,0xf
014f 00c7 | | Action Elaborate_Subprogram
0150 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0151 00c7 | | Action Elaborate_Subprogram
0152 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0153 00c7 | | Action Elaborate_Subprogram
0154 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0155 00c7 | | Action Elaborate_Subprogram
0156 029d 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call
0158 029d 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call
015a 1d15 | | Execute_Immediate Reference_Lex_1,0x15
015b 00c7 | | Action Elaborate_Subprogram
015c 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
015d 00c7 | | Action Elaborate_Subprogram
015e 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
015f 00c7 | | Action Elaborate_Subprogram
0160 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
0161 00c7 | | Action Elaborate_Subprogram
0162 029d 040b | | Declare_Subprogram INIT_0408,For_Outer_Call
0164 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
0165 00c7 | | Action Elaborate_Subprogram
0166 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0167 00c7 | | Action Elaborate_Subprogram
0168 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call
016a 029d 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call
016c e00c | | Load 0x0,0xc
016d 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
016e e231 | 1 | Load 0x1,0x31
016f e00d | | Load 0x0,0xd
0170 e003 | | Load 0x0,0x3
0171 e234 | 4 | Load 0x1,0x34
0172 e00f | | Load 0x0,0xf
0173 e014 | | Load 0x0,0x14
0174 e016 | | Load 0x0,0x16
0175 e232 | 2 | Load 0x1,0x32
0176 e230 | 0 | Load 0x1,0x30
0177 e00e | | Load 0x0,0xe
0178 e002 | | Load 0x0,0x2
0179 e017 | | Load 0x0,0x17
017a 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
017b 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
017c 4810 |H | Short_Literal 0x10
017d e22c | , | Load 0x1,0x2c
017e 020e | | Execute Module,Augment_Imports
017f e22c | , | Load 0x1,0x2c
0180 020d | | Execute Module,Elaborate
0181 0007 | | Action Break_Optional
0182 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0183 00c7 | | Action Elaborate_Subprogram
0184 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0185 00c7 | | Action Elaborate_Subprogram
0186 BODY_0008:
0186 00cf | | Action Mark_Auxiliary
0187 48ff |H | Short_Literal 0xff
0188 4800 |H | Short_Literal 0x0
0189 0007 | | Action Break_Optional
018a 00d8 | | Load_Top At_Offset_0
018b 00d9 | | Load_Top At_Offset_1
018c e235 | 5 | Load 0x1,0x35
018d 01d6 | | Execute Vector,Field_Write
018e 00d8 | | Load_Top At_Offset_0
018f 487f |H | Short_Literal 0x7f
0190 0279 | y | Execute Discrete,And
0191 00d9 | | Load_Top At_Offset_1
0192 e238 | 8 | Load 0x1,0x38
0193 01d6 | | Execute Vector,Field_Write
0194 00c8 | | Action Pop_Auxiliary_Range
0195 3ff4 |? | Loop_Increasing 0x18a
0196 00ce | | Action Pop_Auxiliary
0197 e235 | 5 | Load 0x1,0x35
0198 e237 | 7 | Load 0x1,0x37
0199 01d4 | | Execute Vector,Structure_Write
019a 00cf | | Action Mark_Auxiliary
019b 485a |HZ | Short_Literal 0x5a
019c 4841 |HA | Short_Literal 0x41
019d 0007 | | Action Break_Optional
019e 00d8 | | Load_Top At_Offset_0
019f 0a20 | | Execute_Immediate Plus,0x20
01a0 00d8 | | Load_Top At_Offset_0
01a1 e00d | | Load 0x0,0xd
01a2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01a3 0260 | ` | Execute Discrete,In_Type
01a4 7001 |p | Jump_Nonzero 0x1a6
01a5 0801 | | Execute_Immediate Raise,0x1
01a6 00d9 | | Load_Top At_Offset_1
01a7 e237 | 7 | Load 0x1,0x37
01a8 01d6 | | Execute Vector,Field_Write
01a9 00c8 | | Action Pop_Auxiliary_Range
01aa 3ff3 |? | Loop_Increasing 0x19e
01ab 00ce | | Action Pop_Auxiliary
01ac e235 | 5 | Load 0x1,0x35
01ad e236 | 6 | Load 0x1,0x36
01ae 01d4 | | Execute Vector,Structure_Write
01af 00cf | | Action Mark_Auxiliary
01b0 487a |Hz | Short_Literal 0x7a
01b1 4861 |Ha | Short_Literal 0x61
01b2 0007 | | Action Break_Optional
01b3 00d8 | | Load_Top At_Offset_0
01b4 0ae0 | | Execute_Immediate Plus,-0x20
01b5 00d8 | | Load_Top At_Offset_0
01b6 e00d | | Load 0x0,0xd
01b7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01b8 0260 | ` | Execute Discrete,In_Type
01b9 7001 |p | Jump_Nonzero 0x1bb
01ba 0801 | | Execute_Immediate Raise,0x1
01bb 00d9 | | Load_Top At_Offset_1
01bc e236 | 6 | Load 0x1,0x36
01bd 01d6 | | Execute Vector,Field_Write
01be 00c8 | | Action Pop_Auxiliary_Range
01bf 3ff3 |? | Loop_Increasing 0x1b3
01c0 00ce | | Action Pop_Auxiliary
01c1 4801 |H | Short_Literal 0x1
01c2 4801 |H | Short_Literal 0x1
01c3 e212 | | Load 0x1,0x12
01c4 01d7 | | Execute Vector,Field_Read
01c5 00d8 | | Load_Top At_Offset_0
01c6 e00d | | Load 0x0,0xd
01c7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01c8 0260 | ` | Execute Discrete,In_Type
01c9 7001 |p | Jump_Nonzero 0x1cb
01ca 0801 | | Execute_Immediate Raise,0x1
01cb e239 | 9 | Load 0x1,0x39
01cc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01cd 01d6 | | Execute Vector,Field_Write
01ce e235 | 5 | Load 0x1,0x35
01cf e239 | 9 | Load 0x1,0x39
01d0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01d1 00bc | | Action Signal_Activated
01d2 00bb | | Action Signal_Completion
01d3 0000 0000 | | .BLANK 0000[0x5]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e0 | | .CONST 0x01e0 ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0002 | | .CONST 0x0002 ; Number of locals
01db INIT_01d8:
01db 00da | | Load_Top At_Offset_2
01dc 01da | | Execute Vector,Bounds
01dd e20e | | Load 0x1,0xe
01de 035b | [ | Declare_Type Array,Constrained
01df 0337 | 7 | Declare_Variable Array
01e0 BODY_01d8:
01e0 00cf | | Action Mark_Auxiliary
01e1 e5ff | | Load 0x2,-0x1
01e2 01d9 | | Execute Vector,Reverse_Bounds
01e3 0263 | c | Execute Discrete,Above_Bound
01e4 700e |p | Jump_Nonzero 0x1f3
01e5 00d8 | | Load_Top At_Offset_0
01e6 e5ff | | Load 0x2,-0x1
01e7 01d7 | | Execute Vector,Field_Read
01e8 00d8 | | Load_Top At_Offset_0
01e9 e00d | | Load 0x0,0xd
01ea 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01eb 0260 | ` | Execute Discrete,In_Type
01ec 7001 |p | Jump_Nonzero 0x1ee
01ed 0801 | | Execute_Immediate Raise,0x1
01ee 00d9 | | Load_Top At_Offset_1
01ef e402 | | Load 0x2,0x2
01f0 01d6 | | Execute Vector,Field_Write
01f1 00c8 | | Action Pop_Auxiliary_Range
01f2 3ff2 |? | Loop_Increasing 0x1e5
01f3 00ce | | Action Pop_Auxiliary
01f4 00d8 | | Load_Top At_Offset_0
01f5 e00d | | Load 0x0,0xd
01f6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01f7 01c6 | | Execute Vector,Convert_To_Formal
01f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020e | | .CONST 0x020e ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0002 | | .CONST 0x0002 ; Number of locals
0203 INIT_0200:
0203 4801 |H | Short_Literal 0x1
0204 00db | | Load_Top At_Offset_3
0205 01db | | Execute Vector,Length
0206 00d8 | | Load_Top At_Offset_0
0207 00e2 | | Load_Encached Integer_Cache
0208 0260 | ` | Execute Discrete,In_Type
0209 7001 |p | Jump_Nonzero 0x20b
020a 0801 | | Execute_Immediate Raise,0x1
020b 00e9 | | Load_Encached String_Cache
020c 035b | [ | Declare_Type Array,Constrained
020d 0337 | 7 | Declare_Variable Array
020e BODY_0200:
020e 00cf | | Action Mark_Auxiliary
020f 00d9 | | Load_Top At_Offset_1
0210 01d9 | | Execute Vector,Reverse_Bounds
0211 0263 | c | Execute Discrete,Above_Bound
0212 7013 |p | Jump_Nonzero 0x226
0213 e5ff | | Load 0x2,-0x1
0214 01dd | | Execute Vector,First
0215 00d9 | | Load_Top At_Offset_1
0216 0273 | s | Execute Discrete,Plus
0217 0aff | | Execute_Immediate Plus,-0x1
0218 e5ff | | Load 0x2,-0x1
0219 01d7 | | Execute Vector,Field_Read
021a 487f |H | Short_Literal 0x7f
021b 0279 | y | Execute Discrete,And
021c 00d8 | | Load_Top At_Offset_0
021d 00e8 | | Load_Encached Character_Cache
021e 0260 | ` | Execute Discrete,In_Type
021f 7001 |p | Jump_Nonzero 0x221
0220 0801 | | Execute_Immediate Raise,0x1
0221 00d9 | | Load_Top At_Offset_1
0222 e402 | | Load 0x2,0x2
0223 01d6 | | Execute Vector,Field_Write
0224 00c8 | | Action Pop_Auxiliary_Range
0225 3fed |? | Loop_Increasing 0x213
0226 00ce | | Action Pop_Auxiliary
0227 00d8 | | Load_Top At_Offset_0
0228 00e9 | | Load_Encached String_Cache
0229 01c6 | | Execute Vector,Convert_To_Formal
022a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
022b 0000 0000 | | .BLANK 0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2
0234 820f | | Call 0x1,0xf
0235 e5fe | | Load 0x2,-0x2
0236 01cc | | Execute Vector,Catenate
0237 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b 00da | | Load_Top At_Offset_2
023c e5fe | | Load 0x2,-0x2
023d 820f | | Call 0x1,0xf
023e 01cc | | Execute Vector,Catenate
023f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0261 | a | .CONST 0x0261 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0008 | | .CONST 0x0008 ; Number of locals
0243 INIT_0240:
0243 00da | | Load_Top At_Offset_2
0244 01db | | Execute Vector,Length
0245 0a02 | | Execute_Immediate Plus,0x2
0246 00e3 | | Load_Encached Natural_Cache
0247 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0248 4801 |H | Short_Literal 0x1
0249 4800 |H | Short_Literal 0x0
024a 00e9 | | Load_Encached String_Cache
024b 035b | [ | Declare_Type Array,Constrained
024c 0337 | 7 | Declare_Variable Array
024d 00d8 | | Load_Top At_Offset_0
024e 0335 | 5 | Declare_Variable Array,Duplicate
024f 00cd | | Action Spare6_Action
0250 00d9 | | Load_Top At_Offset_1
0251 01d4 | | Execute Vector,Structure_Write
0252 4820 |H | Short_Literal 0x20
0253 487f |H | Short_Literal 0x7f
0254 e20d | | Load 0x1,0xd
0255 03f8 | | Declare_Type Discrete,Constrained
0256 4800 |H | Short_Literal 0x0
0257 4802 |H | Short_Literal 0x2
0258 029f 0463 | c| Declare_Subprogram INIT_0460,For_Call
025a 03fd | | Declare_Type Discrete,Defined
025b 029f 048b | | Declare_Subprogram INIT_0488,For_Call
025d 029f 04c3 | | Declare_Subprogram INIT_04c0,For_Call
025f 029f 057b | {| Declare_Subprogram INIT_0578,For_Call
0261 BODY_0240:
0261 e5ff | | Load 0x2,-0x1
0262 01db | | Execute Vector,Length
0263 0d01 | | Execute_Immediate Less,0x1
0264 6803 |h | Jump_Zero 0x268
0265 0092 06fc | | Action Push_String_Extended,0x6fc ; "\x22\x22"
0267 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0268 00cf | | Action Mark_Auxiliary
0269 8408 | | Call 0x2,0x8
026a 00c9 | | Action Pop_Auxiliary_Loop
026b 7ffd | | Jump 0x269
026c 0000 0000 | | .BLANK 0000[0x4]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 e00e | | Load 0x0,0xe
0274 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0275 00db | | Load_Top At_Offset_3
0276 e00e | | Load 0x0,0xe
0277 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0278 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0279 0000 0000 | | .BLANK 0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 00da | | Load_Top At_Offset_2
0284 e00f | | Load 0x0,0xf
0285 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0286 e00f | | Load 0x0,0xf
0287 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0288 8216 | | Call 0x1,0x16
0289 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
028a 0000 0000 | | .BLANK 0000[0x6]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 e235 | 5 | Load 0x1,0x35
0294 0335 | 5 | Declare_Variable Array,Duplicate
0295 00cd | | Action Spare6_Action
0296 00ca | | Action Exit_Nullary_Function
0297 0000 | | .XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b e236 | 6 | Load 0x1,0x36
029c 0335 | 5 | Declare_Variable Array,Duplicate
029d 00cd | | Action Spare6_Action
029e 00ca | | Action Exit_Nullary_Function
029f 0000 | | .XXX[0x1]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 e237 | 7 | Load 0x1,0x37
02a4 0335 | 5 | Declare_Variable Array,Duplicate
02a5 00cd | | Action Spare6_Action
02a6 00ca | | Action Exit_Nullary_Function
02a7 0000 | | .XXX[0x1]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab e238 | 8 | Load 0x1,0x38
02ac 0335 | 5 | Declare_Variable Array,Duplicate
02ad 00cd | | Action Spare6_Action
02ae 00ca | | Action Exit_Nullary_Function
02af 0000 | | .XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b5 | | .CONST 0x02b5 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0002 | | .CONST 0x0002 ; Number of locals
02b3 INIT_02b0:
02b3 e21b | | Load 0x1,0x1b
02b4 0337 | 7 | Declare_Variable Array
02b5 BODY_02b0:
02b5 00cf | | Action Mark_Auxiliary
02b6 48ff |H | Short_Literal 0xff
02b7 4800 |H | Short_Literal 0x0
02b8 0007 | | Action Break_Optional
02b9 00d8 | | Load_Top At_Offset_0
02ba e5fe | | Load 0x2,-0x2
02bb 01d7 | | Execute Vector,Field_Read
02bc e5ff | | Load 0x2,-0x1
02bd 01d7 | | Execute Vector,Field_Read
02be 00d9 | | Load_Top At_Offset_1
02bf e402 | | Load 0x2,0x2
02c0 01d6 | | Execute Vector,Field_Write
02c1 00c8 | | Action Pop_Auxiliary_Range
02c2 3ff6 |? | Loop_Increasing 0x2b9
02c3 00ce | | Action Pop_Auxiliary
02c4 00d8 | | Load_Top At_Offset_0
02c5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02c6 0000 0000 | | .XXX[0x2]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb e239 | 9 | Load 0x1,0x39
02cc 0320 | | Declare_Variable Record,Duplicate
02cd 00cd | | Action Spare6_Action
02ce 00ca | | Action Exit_Nullary_Function
02cf 0000 | | .XXX[0x1]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02dc | | .CONST 0x02dc ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0003 | | .CONST 0x0003 ; Number of locals
02d3 INIT_02d0:
02d3 00da | | Load_Top At_Offset_2
02d4 01da | | Execute Vector,Bounds
02d5 e20e | | Load 0x1,0xe
02d6 035b | [ | Declare_Type Array,Constrained
02d7 0337 | 7 | Declare_Variable Array
02d8 00d8 | | Load_Top At_Offset_0
02d9 01dd | | Execute Vector,First
02da 00e2 | | Load_Encached Integer_Cache
02db 03f1 | | Declare_Variable Discrete,With_Value
02dc BODY_02d0:
02dc 00cf | | Action Mark_Auxiliary
02dd e5ff | | Load 0x2,-0x1
02de 01d9 | | Execute Vector,Reverse_Bounds
02df 0263 | c | Execute Discrete,Above_Bound
02e0 7013 |p | Jump_Nonzero 0x2f4
02e1 00d8 | | Load_Top At_Offset_0
02e2 e5ff | | Load 0x2,-0x1
02e3 01d7 | | Execute Vector,Field_Read
02e4 e5fe | | Load 0x2,-0x2
02e5 01d7 | | Execute Vector,Field_Read
02e6 700b |p | Jump_Nonzero 0x2f2
02e7 00d8 | | Load_Top At_Offset_0
02e8 e5ff | | Load 0x2,-0x1
02e9 01d7 | | Execute Vector,Field_Read
02ea e5fd | | Load 0x2,-0x3
02eb 01d7 | | Execute Vector,Field_Read
02ec e403 | | Load 0x2,0x3
02ed e402 | | Load 0x2,0x2
02ee 01d6 | | Execute Vector,Field_Write
02ef 00db | | Load_Top At_Offset_3
02f0 0a01 | | Execute_Immediate Plus,0x1
02f1 c403 | | Store 0x2,0x3
02f2 00c8 | | Action Pop_Auxiliary_Range
02f3 3fed |? | Loop_Increasing 0x2e1
02f4 00ce | | Action Pop_Auxiliary
02f5 00d9 | | Load_Top At_Offset_1
02f6 01dd | | Execute Vector,First
02f7 00d9 | | Load_Top At_Offset_1
02f8 0aff | | Execute_Immediate Plus,-0x1
02f9 00d8 | | Load_Top At_Offset_0
02fa 00e2 | | Load_Encached Integer_Cache
02fb 0260 | ` | Execute Discrete,In_Type
02fc 7001 |p | Jump_Nonzero 0x2fe
02fd 0801 | | Execute_Immediate Raise,0x1
02fe 00db | | Load_Top At_Offset_3
02ff 01cf | | Execute Vector,Slice_Read
0300 e00d | | Load 0x0,0xd
0301 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0302 01c6 | | Execute Vector,Convert_To_Formal
0303 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0304 0000 0000 | | .BLANK 0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0314 | | .CONST 0x0314 ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0003 | | .CONST 0x0003 ; Number of locals
030b INIT_0308:
030b 00da | | Load_Top At_Offset_2
030c 01da | | Execute Vector,Bounds
030d e20e | | Load 0x1,0xe
030e 035b | [ | Declare_Type Array,Constrained
030f 0337 | 7 | Declare_Variable Array
0310 00d8 | | Load_Top At_Offset_0
0311 01dd | | Execute Vector,First
0312 00e2 | | Load_Encached Integer_Cache
0313 03f1 | | Declare_Variable Discrete,With_Value
0314 BODY_0308:
0314 00cf | | Action Mark_Auxiliary
0315 e5ff | | Load 0x2,-0x1
0316 01d9 | | Execute Vector,Reverse_Bounds
0317 0263 | c | Execute Discrete,Above_Bound
0318 7013 |p | Jump_Nonzero 0x32c
0319 00d8 | | Load_Top At_Offset_0
031a e5ff | | Load 0x2,-0x1
031b 01d7 | | Execute Vector,Field_Read
031c e5fe | | Load 0x2,-0x2
031d 01d7 | | Execute Vector,Field_Read
031e e403 | | Load 0x2,0x3
031f e402 | | Load 0x2,0x2
0320 01d6 | | Execute Vector,Field_Write
0321 00db | | Load_Top At_Offset_3
0322 e402 | | Load 0x2,0x2
0323 01d7 | | Execute Vector,Field_Read
0324 e5fd | | Load 0x2,-0x3
0325 01d7 | | Execute Vector,Field_Read
0326 7003 |p | Jump_Nonzero 0x32a
0327 00db | | Load_Top At_Offset_3
0328 0a01 | | Execute_Immediate Plus,0x1
0329 c403 | | Store 0x2,0x3
032a 00c8 | | Action Pop_Auxiliary_Range
032b 3fed |? | Loop_Increasing 0x319
032c 00ce | | Action Pop_Auxiliary
032d 00d9 | | Load_Top At_Offset_1
032e 01dd | | Execute Vector,First
032f 00d9 | | Load_Top At_Offset_1
0330 0aff | | Execute_Immediate Plus,-0x1
0331 00d8 | | Load_Top At_Offset_0
0332 00e2 | | Load_Encached Integer_Cache
0333 0260 | ` | Execute Discrete,In_Type
0334 7001 |p | Jump_Nonzero 0x336
0335 0801 | | Execute_Immediate Raise,0x1
0336 00db | | Load_Top At_Offset_3
0337 01cf | | Execute Vector,Slice_Read
0338 e00d | | Load 0x0,0xd
0339 1b12 | | Execute Package,Field_Read,Field_Number 0x12
033a 01c6 | | Execute Vector,Convert_To_Formal
033b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
033c 0000 0000 | | .BLANK 0000[0x4]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0345 | E | .CONST 0x0345 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0002 | | .CONST 0x0002 ; Number of locals
0343 INIT_0340:
0343 029f 0593 | | Declare_Subprogram INIT_0590,For_Call
0345 BODY_0340:
0345 e5fd | | Load 0x2,-0x3
0346 6803 |h | Jump_Zero 0x34a
0347 e5fe | | Load 0x2,-0x2
0348 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0349 7005 |p | Jump_Nonzero 0x34f
034a e5fd | | Load 0x2,-0x3
034b 7014 |p | Jump_Nonzero 0x360
034c e5fe | | Load 0x2,-0x2
034d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
034e 6811 |h | Jump_Zero 0x360
034f e5fe | | Load 0x2,-0x2
0350 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0351 e001 | | Load 0x0,0x1
0352 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0353 e5fe | | Load 0x2,-0x2
0354 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0355 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0356 e5fe | | Load 0x2,-0x2
0357 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0358 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0359 e5ff | | Load 0x2,-0x1
035a 822e | . | Call 0x1,0x2e
035b e5fe | | Load 0x2,-0x2
035c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
035d e001 | | Load 0x0,0x1
035e 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
035f 8402 | | Call 0x2,0x2
0360 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0361 0000 0000 | | .BLANK 0000[0x7]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036e | n | .CONST 0x036e ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0002 | | .CONST 0x0002 ; Number of locals
036b INIT_0368:
036b 00da | | Load_Top At_Offset_2
036c e010 | | Load 0x0,0x10
036d 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
036e BODY_0368:
036e e5fd | | Load 0x2,-0x3
036f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0370 00d8 | | Load_Top At_Offset_0
0371 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0372 e011 | | Load 0x0,0x11
0373 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0374 e012 | | Load 0x0,0x12
0375 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0376 e5fe | | Load 0x2,-0x2
0377 e402 | | Load 0x2,0x2
0378 4801 |H | Short_Literal 0x1
0379 e013 | | Load 0x0,0x13
037a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
037b 00d9 | | Load_Top At_Offset_1
037c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
037d 00d1 | | Pop_Control Pop_Count_1
037e e5fd | | Load 0x2,-0x3
037f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0380 00d8 | | Load_Top At_Offset_0
0381 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0382 e011 | | Load 0x0,0x11
0383 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0384 e012 | | Load 0x0,0x12
0385 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0386 e5fe | | Load 0x2,-0x2
0387 e402 | | Load 0x2,0x2
0388 4800 |H | Short_Literal 0x0
0389 e013 | | Load 0x0,0x13
038a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
038b 00d9 | | Load_Top At_Offset_1
038c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
038d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
038e 0000 0000 | | .XXX[0x2]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0397 | | .CONST 0x0397 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0003 | | .CONST 0x0003 ; Number of locals
0393 INIT_0390:
0393 029f 05ab | | Declare_Subprogram INIT_05a8,For_Call
0395 029f 05bb | | Declare_Subprogram INIT_05b8,For_Call
0397 BODY_0390:
0397 8402 | | Call 0x2,0x2
0398 8403 | | Call 0x2,0x3
0399 4501 |E | Exit_Suprogram New_Top_Offset 0x1
039a 0000 0000 | | .BLANK 0000[0x6]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 4608 |F | Jump_Case 0x9
03a4 7808 |x | Jump 0x3ad ; case 0x0
03a5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
03a6 780d |x | Jump 0x3b4 ; case 0x2
03a7 780c |x | Jump 0x3b4 ; case 0x3
03a8 780b |x | Jump 0x3b4 ; case 0x4
03a9 780a |x | Jump 0x3b4 ; case 0x5
03aa 7809 |x | Jump 0x3b4 ; case 0x6
03ab 7808 |x | Jump 0x3b4 ; case 0x7
03ac 7807 |x | Jump 0x3b4 ; case 0x8
03ad e233 | 3 | Load 0x1,0x33
03ae 00db | | Load_Top At_Offset_3
03af 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03b0 e233 | 3 | Load 0x1,0x33
03b1 00db | | Load_Top At_Offset_3
03b2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03b3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
03b4 0869 | i | Execute_Immediate Raise,0x69
03b5 0000 0000 | | .XXX[0x3]
03b7 0000 | |
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03c0 | | .CONST 0x03c0 ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0002 | | .CONST 0x0002 ; Number of locals
03bb INIT_03b8:
03bb 00da | | Load_Top At_Offset_2
03bc 01da | | Execute Vector,Bounds
03bd e20e | | Load 0x1,0xe
03be 035b | [ | Declare_Type Array,Constrained
03bf 0337 | 7 | Declare_Variable Array
03c0 BODY_03b8:
03c0 00cf | | Action Mark_Auxiliary
03c1 00d9 | | Load_Top At_Offset_1
03c2 01d9 | | Execute Vector,Reverse_Bounds
03c3 0263 | c | Execute Discrete,Above_Bound
03c4 700a |p | Jump_Nonzero 0x3cf
03c5 00d8 | | Load_Top At_Offset_0
03c6 e5ff | | Load 0x2,-0x1
03c7 01d7 | | Execute Vector,Field_Read
03c8 e5fe | | Load 0x2,-0x2
03c9 01d7 | | Execute Vector,Field_Read
03ca 00d9 | | Load_Top At_Offset_1
03cb e402 | | Load 0x2,0x2
03cc 01d6 | | Execute Vector,Field_Write
03cd 00c8 | | Action Pop_Auxiliary_Range
03ce 3ff6 |? | Loop_Increasing 0x3c5
03cf 00ce | | Action Pop_Auxiliary
03d0 00d8 | | Load_Top At_Offset_0
03d1 e00d | | Load 0x0,0xd
03d2 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03d3 01c6 | | Execute Vector,Convert_To_Formal
03d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03d5 0000 0000 | | .XXX[0x3]
03d7 0000 | |
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 00db | | Load_Top At_Offset_3
03dc 6804 |h | Jump_Zero 0x3e1
03dd 821e | | Call 0x1,0x1e
03de 00db | | Load_Top At_Offset_3
03df 823a | : | Call 0x1,0x3a
03e0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03e1 00da | | Load_Top At_Offset_2
03e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03e3 0000 0000 | | .BLANK 0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00db | | Load_Top At_Offset_3
03ec 4801 |H | Short_Literal 0x1
03ed 4801 |H | Short_Literal 0x1
03ee 00e9 | | Load_Encached String_Cache
03ef 0334 | 4 | Declare_Variable Array,With_Constraint
03f0 e5ff | | Load 0x2,-0x1
03f1 4801 |H | Short_Literal 0x1
03f2 00da | | Load_Top At_Offset_2
03f3 01d6 | | Execute Vector,Field_Write
03f4 8210 | | Call 0x1,0x10
03f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03f6 0000 0000 | | .XXX[0x2]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb | | .CONST 0x03fb ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0001 | | .CONST 0x0001 ; Number of locals
03fb BODY_03f8:
03fb INIT_03f8:
03fb 4801 |H | Short_Literal 0x1
03fc 4801 |H | Short_Literal 0x1
03fd 00e9 | | Load_Encached String_Cache
03fe 0334 | 4 | Declare_Variable Array,With_Constraint
03ff e5fe | | Load 0x2,-0x2
0400 4801 |H | Short_Literal 0x1
0401 00da | | Load_Top At_Offset_2
0402 01d6 | | Execute Vector,Field_Write
0403 00db | | Load_Top At_Offset_3
0404 8211 | | Call 0x1,0x11
0405 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0406 0000 0000 | | .XXX[0x2]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b | | .CONST 0x040b ; Address of begin
0409 0004 | | .CONST 0x0004 ; Address of exception handler
040a 0001 | | .CONST 0x0001 ; Number of locals
040b BODY_0408:
040b INIT_0408:
040b 00da | | Load_Top At_Offset_2
040c e5fe | | Load 0x2,-0x2
040d 027c | | | Execute Discrete,Less
040e 6802 |h | Jump_Zero 0x411
040f 00da | | Load_Top At_Offset_2
0410 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0411 00db | | Load_Top At_Offset_3
0412 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0413 0000 0000 | | .BLANK 0000[0x5]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0421 | ! | .CONST 0x0421 ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0004 | | .CONST 0x0004 ; Number of locals
041b INIT_0418:
041b 029f 05cb | | Declare_Subprogram INIT_05c8,For_Call
041d 029f 05db | | Declare_Subprogram INIT_05d8,For_Call
041f 029f 05f3 | | Declare_Subprogram INIT_05f0,For_Call
0421 BODY_0418:
0421 0092 06fd | | Action Push_String_Extended,0x6fd ; "Cue="
0423 4820 |H | Short_Literal 0x20
0424 e5ff | | Load 0x2,-0x1
0425 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0426 00e0 | | Load_Encached Standard_Cache
0427 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0428 e014 | | Load 0x0,0x14
0429 181c | | Execute Package,Field_Execute,Field_Number 0x1c
042a 01cc | | Execute Vector,Catenate
042b 0092 06fe | | Action Push_String_Extended,0x6fe ; ",Data="
042d 01cc | | Execute Vector,Catenate
042e 4820 |H | Short_Literal 0x20
042f e5ff | | Load 0x2,-0x1
0430 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0431 00e0 | | Load_Encached Standard_Cache
0432 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0433 e014 | | Load 0x0,0x14
0434 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0435 01cc | | Execute Vector,Catenate
0436 e5ff | | Load 0x2,-0x1
0437 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0438 8402 | | Call 0x2,0x2
0439 01cc | | Execute Vector,Catenate
043a e5ff | | Load 0x2,-0x1
043b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
043c 8403 | | Call 0x2,0x3
043d 01cc | | Execute Vector,Catenate
043e e5ff | | Load 0x2,-0x1
043f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0440 8404 | | Call 0x2,0x4
0441 01cc | | Execute Vector,Catenate
0442 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0443 0000 0000 | | .BLANK 0000[0x5]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b 0092 06ff | | Action Push_String_Extended,0x6ff ; "Current=("
044d 00db | | Load_Top At_Offset_3
044e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
044f 823f | ? | Call 0x1,0x3f
0450 01cc | | Execute Vector,Catenate
0451 0092 0700 | | Action Push_String_Extended,0x700 ; "), Previous=("
0453 01cc | | Execute Vector,Catenate
0454 00db | | Load_Top At_Offset_3
0455 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0456 823f | ? | Call 0x1,0x3f
0457 01cc | | Execute Vector,Catenate
0458 0092 0701 | | Action Push_String_Extended,0x701 ; ")"
045a 01cc | | Execute Vector,Catenate
045b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
045c 0000 0000 | | .BLANK 0000[0x4]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463 | c | .CONST 0x0463 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0001 | | .CONST 0x0001 ; Number of locals
0463 BODY_0460:
0463 INIT_0460:
0463 4607 |F | Jump_Case 0x8
0464 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0465 7806 |x | Jump 0x46c ; case 0x1
0466 7809 |x | Jump 0x470 ; case 0x2
0467 780d |x | Jump 0x475 ; case 0x3
0468 7810 |x | Jump 0x479 ; case 0x4
0469 7811 |x | Jump 0x47b ; case 0x5
046a 7812 |x | Jump 0x47d ; case 0x6
046b 7815 |x | Jump 0x481 ; case 0x7
046c 00da | | Load_Top At_Offset_2
046d 0091 06f8 | | Action Push_String_Extended_Indexed,0x6f8 ; "CONTROL"
046f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0470 00db | | Load_Top At_Offset_3
0471 00db | | Load_Top At_Offset_3
0472 00e0 | | Load_Encached Standard_Cache
0473 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0474 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0475 00da | | Load_Top At_Offset_2
0476 00e0 | | Load_Encached Standard_Cache
0477 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0478 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0479 00db | | Load_Top At_Offset_3
047a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
047b 00db | | Load_Top At_Offset_3
047c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
047d e405 | | Load 0x2,0x5
047e 00dc | | Load_Top At_Offset_4
047f 0267 | g | Execute Discrete,Predecessor
0480 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0481 e405 | | Load 0x2,0x5
0482 00dc | | Load_Top At_Offset_4
0483 0268 | h | Execute Discrete,Successor
0484 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0485 0000 0000 | | .XXX[0x3]
0487 0000 | |
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b 00da | | Load_Top At_Offset_2
048c 00d8 | | Load_Top At_Offset_0
048d 0c20 | | Execute_Immediate Greater_Equal,0x20
048e 7023 |p# | Jump_Nonzero 0x4b2
048f 461f |F | Jump_Case 0x20
0490 781f |x | Jump 0x4b0 ; case 0x0
0491 781e |x | Jump 0x4b0 ; case 0x1
0492 781d |x | Jump 0x4b0 ; case 0x2
0493 781c |x | Jump 0x4b0 ; case 0x3
0494 781b |x | Jump 0x4b0 ; case 0x4
0495 781a |x | Jump 0x4b0 ; case 0x5
0496 7819 |x | Jump 0x4b0 ; case 0x6
0497 7818 |x | Jump 0x4b0 ; case 0x7
0498 7817 |x | Jump 0x4b0 ; case 0x8
0499 7816 |x | Jump 0x4b0 ; case 0x9
049a 781a |x | Jump 0x4b5 ; case 0xa
049b 7814 |x | Jump 0x4b0 ; case 0xb
049c 7813 |x | Jump 0x4b0 ; case 0xc
049d 7817 |x | Jump 0x4b5 ; case 0xd
049e 7811 |x | Jump 0x4b0 ; case 0xe
049f 7810 |x | Jump 0x4b0 ; case 0xf
04a0 780f |x | Jump 0x4b0 ; case 0x10
04a1 780e |x | Jump 0x4b0 ; case 0x11
04a2 780d |x | Jump 0x4b0 ; case 0x12
04a3 780c |x | Jump 0x4b0 ; case 0x13
04a4 780b |x | Jump 0x4b0 ; case 0x14
04a5 780a |x | Jump 0x4b0 ; case 0x15
04a6 7809 |x | Jump 0x4b0 ; case 0x16
04a7 7808 |x | Jump 0x4b0 ; case 0x17
04a8 7807 |x | Jump 0x4b0 ; case 0x18
04a9 7806 |x | Jump 0x4b0 ; case 0x19
04aa 7805 |x | Jump 0x4b0 ; case 0x1a
04ab 7809 |x | Jump 0x4b5 ; case 0x1b
04ac 7803 |x | Jump 0x4b0 ; case 0x1c
04ad 7802 |x | Jump 0x4b0 ; case 0x1d
04ae 7801 |x | Jump 0x4b0 ; case 0x1e
04af 7800 |x | Jump 0x4b0 ; case 0x1f
04b0 4802 |H | Short_Literal 0x2
04b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04b2 0c80 | | Execute_Immediate Greater_Equal,-0x80
04b3 6803 |h | Jump_Zero 0x4b7
04b4 7ffb | | Jump 0x4b0
04b5 4800 |H | Short_Literal 0x0
04b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04b7 4801 |H | Short_Literal 0x1
04b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04b9 0000 0000 | | .BLANK 0000[0x7]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04d9 | | .CONST 0x04d9 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0008 | | .CONST 0x0008 ; Number of locals
04c3 INIT_04c0:
04c3 4801 |H | Short_Literal 0x1
04c4 00db | | Load_Top At_Offset_3
04c5 00e9 | | Load_Encached String_Cache
04c6 035b | [ | Declare_Type Array,Constrained
04c7 0337 | 7 | Declare_Variable Array
04c8 00e3 | | Load_Encached Natural_Cache
04c9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04ca e5ff | | Load 0x2,-0x1
04cb 01dd | | Execute Vector,First
04cc e5ff | | Load 0x2,-0x1
04cd 01d7 | | Execute Vector,Field_Read
04ce 8406 | | Call 0x2,0x6
04cf e405 | | Load 0x2,0x5
04d0 03f1 | | Declare_Variable Discrete,With_Value
04d1 e405 | | Load 0x2,0x5
04d2 0007 | | Action Break_Optional
04d3 029f 060b | | Declare_Subprogram INIT_0608,For_Call
04d5 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call
04d7 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call
04d9 BODY_04c0:
04d9 e604 | | Load 0x3,0x4
04da 8607 | | Call 0x3,0x7
04db 00cf | | Action Mark_Auxiliary
04dc e5ff | | Load 0x2,-0x1
04dd 01d9 | | Execute Vector,Reverse_Bounds
04de 0263 | c | Execute Discrete,Above_Bound
04df 7087 |p | Jump_Nonzero 0x567
04e0 e604 | | Load 0x3,0x4
04e1 4602 |F | Jump_Case 0x3
04e2 780c |x | Jump 0x4ef ; case 0x0
04e3 783c |x< | Jump 0x520 ; case 0x1
04e4 7800 |x | Jump 0x4e5 ; case 0x2
04e5 4820 |H | Short_Literal 0x20
04e6 00d9 | | Load_Top At_Offset_1
04e7 e5ff | | Load 0x2,-0x1
04e8 01d7 | | Execute Vector,Field_Read
04e9 00e0 | | Load_Encached Standard_Cache
04ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04eb e014 | | Load 0x0,0x14
04ec 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04ed 8606 | | Call 0x3,0x6
04ee 784a |xJ | Jump 0x539
04ef 00d8 | | Load_Top At_Offset_0
04f0 e5ff | | Load 0x2,-0x1
04f1 01d7 | | Execute Vector,Field_Read
04f2 00d8 | | Load_Top At_Offset_0
04f3 0c1c | | Execute_Immediate Greater_Equal,0x1c
04f4 7021 |p! | Jump_Nonzero 0x516
04f5 461b |F | Jump_Case 0x1c
04f6 7820 |x | Jump 0x517 ; case 0x0
04f7 781f |x | Jump 0x517 ; case 0x1
04f8 781e |x | Jump 0x517 ; case 0x2
04f9 781d |x | Jump 0x517 ; case 0x3
04fa 781c |x | Jump 0x517 ; case 0x4
04fb 781b |x | Jump 0x517 ; case 0x5
04fc 781a |x | Jump 0x517 ; case 0x6
04fd 7819 |x | Jump 0x517 ; case 0x7
04fe 7818 |x | Jump 0x517 ; case 0x8
04ff 7817 |x | Jump 0x517 ; case 0x9
0500 781b |x | Jump 0x51c ; case 0xa
0501 7815 |x | Jump 0x517 ; case 0xb
0502 7814 |x | Jump 0x517 ; case 0xc
0503 7814 |x | Jump 0x518 ; case 0xd
0504 7812 |x | Jump 0x517 ; case 0xe
0505 7811 |x | Jump 0x517 ; case 0xf
0506 7810 |x | Jump 0x517 ; case 0x10
0507 780f |x | Jump 0x517 ; case 0x11
0508 780e |x | Jump 0x517 ; case 0x12
0509 780d |x | Jump 0x517 ; case 0x13
050a 780c |x | Jump 0x517 ; case 0x14
050b 780b |x | Jump 0x517 ; case 0x15
050c 780a |x | Jump 0x517 ; case 0x16
050d 7809 |x | Jump 0x517 ; case 0x17
050e 7808 |x | Jump 0x517 ; case 0x18
050f 7807 |x | Jump 0x517 ; case 0x19
0510 7806 |x | Jump 0x517 ; case 0x1a
0511 7800 |x | Jump 0x512 ; case 0x1b
0512 0092 0702 | | Action Push_String_Extended,0x702 ; "ESC"
0514 8606 | | Call 0x3,0x6
0515 7823 |x# | Jump 0x539
0516 00d1 | | Pop_Control Pop_Count_1
0517 08e0 | | Execute_Immediate Raise,0xe0
0518 0092 0703 | | Action Push_String_Extended,0x703 ; "CR"
051a 8606 | | Call 0x3,0x6
051b 781d |x | Jump 0x539
051c 0092 0704 | | Action Push_String_Extended,0x704 ; "LF"
051e 8606 | | Call 0x3,0x6
051f 7819 |x | Jump 0x539
0520 00d8 | | Load_Top At_Offset_0
0521 e5ff | | Load 0x2,-0x1
0522 01d7 | | Execute Vector,Field_Read
0523 0f22 | " | Execute_Immediate Equal,0x22
0524 6804 |h | Jump_Zero 0x529
0525 0092 06fc | | Action Push_String_Extended,0x6fc ; "\x22\x22"
0527 8606 | | Call 0x3,0x6
0528 7810 |x | Jump 0x539
0529 4801 |H | Short_Literal 0x1
052a 4801 |H | Short_Literal 0x1
052b 00e9 | | Load_Encached String_Cache
052c 0334 | 4 | Declare_Variable Array,With_Constraint
052d 00d9 | | Load_Top At_Offset_1
052e e5ff | | Load 0x2,-0x1
052f 01d7 | | Execute Vector,Field_Read
0530 00d8 | | Load_Top At_Offset_0
0531 00e8 | | Load_Encached Character_Cache
0532 0260 | ` | Execute Discrete,In_Type
0533 7001 |p | Jump_Nonzero 0x535
0534 0801 | | Execute_Immediate Raise,0x1
0535 4801 |H | Short_Literal 0x1
0536 00da | | Load_Top At_Offset_2
0537 01d6 | | Execute Vector,Field_Write
0538 8606 | | Call 0x3,0x6
0539 00d8 | | Load_Top At_Offset_0
053a e5ff | | Load 0x2,-0x1
053b 01dc | | Execute Vector,Last
053c 027c | | | Execute Discrete,Less
053d 6827 |h' | Jump_Zero 0x565
053e 00d8 | | Load_Top At_Offset_0
053f 0a01 | | Execute_Immediate Plus,0x1
0540 e5ff | | Load 0x2,-0x1
0541 01d7 | | Execute Vector,Field_Read
0542 8406 | | Call 0x2,0x6
0543 a605 | | Store_Unchecked 0x3,0x5
0544 e605 | | Load 0x3,0x5
0545 e604 | | Load 0x3,0x4
0546 027f | | Execute Discrete,Equal
0547 6811 |h | Jump_Zero 0x559
0548 e604 | | Load 0x3,0x4
0549 4602 |F | Jump_Case 0x3
054a 7807 |x | Jump 0x552 ; case 0x0
054b 7819 |x | Jump 0x565 ; case 0x1
054c 7800 |x | Jump 0x54d ; case 0x2
054d 482c |H, | Short_Literal 0x2c
054e e403 | | Load 0x2,0x3
054f 01ca | | Execute Vector,Prepend
0550 8606 | | Call 0x3,0x6
0551 7813 |x | Jump 0x565
0552 4826 |H& | Short_Literal 0x26
0553 e403 | | Load 0x2,0x3
0554 01cb | | Execute Vector,Append
0555 e403 | | Load 0x2,0x3
0556 01cc | | Execute Vector,Catenate
0557 8606 | | Call 0x3,0x6
0558 780c |x | Jump 0x565
0559 e604 | | Load 0x3,0x4
055a 8608 | | Call 0x3,0x8
055b 4826 |H& | Short_Literal 0x26
055c e403 | | Load 0x2,0x3
055d 01cb | | Execute Vector,Append
055e e403 | | Load 0x2,0x3
055f 01cc | | Execute Vector,Catenate
0560 8606 | | Call 0x3,0x6
0561 e605 | | Load 0x3,0x5
0562 8607 | | Call 0x3,0x7
0563 e605 | | Load 0x3,0x5
0564 a604 | | Store_Unchecked 0x3,0x4
0565 00c8 | | Action Pop_Auxiliary_Range
0566 3f79 |?y | Loop_Increasing 0x4e0
0567 00ce | | Action Pop_Auxiliary
0568 e604 | | Load 0x3,0x4
0569 8608 | | Call 0x3,0x8
056a 4801 |H | Short_Literal 0x1
056b e603 | | Load 0x3,0x3
056c e602 | | Load 0x3,0x2
056d 01cf | | Execute Vector,Slice_Read
056e 00e9 | | Load_Encached String_Cache
056f 01c6 | | Execute Vector,Convert_To_Formal
0570 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0571 0000 0000 | | .BLANK 0000[0x7]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0586 | | .CONST 0x0586 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b e402 | | Load 0x2,0x2
057c 00d8 | | Load_Top At_Offset_0
057d 00e4 | | Load_Encached Positive_Cache
057e 0260 | ` | Execute Discrete,In_Type
057f 7001 |p | Jump_Nonzero 0x581
0580 0801 | | Execute_Immediate Raise,0x1
0581 8407 | | Call 0x2,0x7
0582 00e9 | | Load_Encached String_Cache
0583 01c6 | | Execute Vector,Convert_To_Formal
0584 00cb | | Action Pop_Block_With_Result
0585 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0586 TRAP_0578:
0586 e015 | | Load 0x0,0x15
0587 010f | | Execute Exception,Equal
0588 6804 |h | Jump_Zero 0x58d
0589 e402 | | Load 0x2,0x2
058a 0901 | | Execute_Immediate Binary_Scale,0x1
058b c402 | | Store 0x2,0x2
058c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
058d 0100 | | Execute Exception,Raise
058e 0000 0000 | | .XXX[0x2]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593 | | .CONST 0x0593 ; Address of begin
0591 0598 | | .CONST 0x0598 ; Address of exception handler
0592 0001 | | .CONST 0x0001 ; Number of locals
0593 BODY_0590:
0593 INIT_0590:
0593 00db | | Load_Top At_Offset_3
0594 00db | | Load_Top At_Offset_3
0595 e013 | | Load 0x0,0x13
0596 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0597 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0598 TRAP_0590:
0598 00d8 | | Load_Top At_Offset_0
0599 0107 | | Execute Exception,Get_Name
059a 4930 |I0 | Short_Literal 0x130
059b 493f |I? | Short_Literal 0x13f
059c 0262 | b | Execute Discrete,In_Range
059d 6806 |h | Jump_Zero 0x5a4
059e e7fe | | Load 0x3,-0x2
059f 822d | - | Call 0x1,0x2d
05a0 e7ff | | Load 0x3,-0x1
05a1 e013 | | Load 0x0,0x13
05a2 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
05a3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05a4 0100 | | Execute Exception,Raise
05a5 0000 0000 | | .XXX[0x3]
05a7 0000 | |
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab | | .CONST 0x05ab ; Address of begin
05a9 05b4 | | .CONST 0x05b4 ; Address of exception handler
05aa 0001 | | .CONST 0x0001 ; Number of locals
05ab BODY_05a8:
05ab INIT_05a8:
05ab e5ff | | Load 0x2,-0x1
05ac 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05ad 00d8 | | Load_Top At_Offset_0
05ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05af e013 | | Load 0x0,0x13
05b0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05b1 00d9 | | Load_Top At_Offset_1
05b2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05b3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05b4 TRAP_05a8:
05b4 0007 | | Action Break_Optional
05b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05b6 0000 0000 | | .XXX[0x2]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 05c4 | | .CONST 0x05c4 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb e5ff | | Load 0x2,-0x1
05bc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05bd 00d8 | | Load_Top At_Offset_0
05be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05bf e013 | | Load 0x0,0x13
05c0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05c1 00d9 | | Load_Top At_Offset_1
05c2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05c3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05c4 TRAP_05b8:
05c4 0007 | | Action Break_Optional
05c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05c6 0000 0000 | | .XXX[0x2]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb | | .CONST 0x05cb ; Address of begin
05c9 0004 | | .CONST 0x0004 ; Address of exception handler
05ca 0001 | | .CONST 0x0001 ; Number of locals
05cb BODY_05c8:
05cb INIT_05c8:
05cb 00da | | Load_Top At_Offset_2
05cc e233 | 3 | Load 0x1,0x33
05cd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05ce 027e | ~ | Execute Discrete,Not_Equal
05cf 6803 |h | Jump_Zero 0x5d3
05d0 0092 0705 | | Action Push_String_Extended,0x705 ; ",Event_Matched"
05d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05d3 00ea | | Load_Encached Null_String_Cache
05d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05d5 0000 0000 | | .XXX[0x3]
05d7 0000 | |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00da | | Load_Top At_Offset_2
05dc e233 | 3 | Load 0x1,0x33
05dd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05de 027e | ~ | Execute Discrete,Not_Equal
05df 680a |h | Jump_Zero 0x5ea
05e0 0092 0706 | | Action Push_String_Extended,0x706 ; ",Bytes_Matched="
05e2 4820 |H | Short_Literal 0x20
05e3 e7ff | | Load 0x3,-0x1
05e4 00e0 | | Load_Encached Standard_Cache
05e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05e6 e014 | | Load 0x0,0x14
05e7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05e8 01cc | | Execute Vector,Catenate
05e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ea 00ea | | Load_Encached Null_String_Cache
05eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ec 0000 0000 | | .BLANK 0000[0x4]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f3 | | .CONST 0x05f3 ; Address of begin
05f1 0004 | | .CONST 0x0004 ; Address of exception handler
05f2 0001 | | .CONST 0x0001 ; Number of locals
05f3 BODY_05f0:
05f3 INIT_05f0:
05f3 00da | | Load_Top At_Offset_2
05f4 e233 | 3 | Load 0x1,0x33
05f5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
05f6 027e | ~ | Execute Discrete,Not_Equal
05f7 680a |h | Jump_Zero 0x602
05f8 0092 0707 | | Action Push_String_Extended,0x707 ; ",Silence_Matched="
05fa 4820 |H | Short_Literal 0x20
05fb e7ff | | Load 0x3,-0x1
05fc e00f | | Load 0x0,0xf
05fd 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
05fe e014 | | Load 0x0,0x14
05ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0600 01cc | | Execute Vector,Catenate
0601 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0602 00ea | | Load_Encached Null_String_Cache
0603 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0604 0000 0000 | | .BLANK 0000[0x4]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b | | .CONST 0x060b ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0001 | | .CONST 0x0001 ; Number of locals
060b BODY_0608:
060b INIT_0608:
060b e603 | | Load 0x3,0x3
060c 00db | | Load_Top At_Offset_3
060d 01db | | Execute Vector,Length
060e 0273 | s | Execute Discrete,Plus
060f e602 | | Load 0x3,0x2
0610 01dc | | Execute Vector,Last
0611 027d | } | Execute Discrete,Greater
0612 6802 |h | Jump_Zero 0x615
0613 e015 | | Load 0x0,0x15
0614 0257 | W | Execute Discrete,Raise
0615 00da | | Load_Top At_Offset_2
0616 e603 | | Load 0x3,0x3
0617 0a01 | | Execute_Immediate Plus,0x1
0618 00d8 | | Load_Top At_Offset_0
0619 00e2 | | Load_Encached Integer_Cache
061a 0260 | ` | Execute Discrete,In_Type
061b 7001 |p | Jump_Nonzero 0x61d
061c 0801 | | Execute_Immediate Raise,0x1
061d e603 | | Load 0x3,0x3
061e e9ff | | Load 0x4,-0x1
061f 01db | | Execute Vector,Length
0620 0273 | s | Execute Discrete,Plus
0621 00d8 | | Load_Top At_Offset_0
0622 00e2 | | Load_Encached Integer_Cache
0623 0260 | ` | Execute Discrete,In_Type
0624 7001 |p | Jump_Nonzero 0x626
0625 0801 | | Execute_Immediate Raise,0x1
0626 e602 | | Load 0x3,0x2
0627 01ce | | Execute Vector,Slice_Write
0628 e603 | | Load 0x3,0x3
0629 00db | | Load_Top At_Offset_3
062a 01db | | Execute Vector,Length
062b 0273 | s | Execute Discrete,Plus
062c c603 | | Store 0x3,0x3
062d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
062e 0000 0000 | | .XXX[0x2]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633 | 3 | .CONST 0x0633 ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0001 | | .CONST 0x0001 ; Number of locals
0633 BODY_0630:
0633 INIT_0630:
0633 00da | | Load_Top At_Offset_2
0634 4602 |F | Jump_Case 0x3
0635 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0
0636 7805 |x | Jump 0x63c ; case 0x1
0637 7800 |x | Jump 0x638 ; case 0x2
0638 0092 0708 | | Action Push_String_Extended,0x708 ; "("
063a 8606 | | Call 0x3,0x6
063b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
063c 0092 0709 | | Action Push_String_Extended,0x709 ; "\x22"
063e 8606 | | Call 0x3,0x6
063f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643 | C | .CONST 0x0643 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0001 | | .CONST 0x0001 ; Number of locals
0643 BODY_0640:
0643 INIT_0640:
0643 00da | | Load_Top At_Offset_2
0644 4602 |F | Jump_Case 0x3
0645 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0
0646 7805 |x | Jump 0x64c ; case 0x1
0647 7800 |x | Jump 0x648 ; case 0x2
0648 0092 0701 | | Action Push_String_Extended,0x701 ; ")"
064a 8606 | | Call 0x3,0x6
064b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
064c 0092 0709 | | Action Push_String_Extended,0x709 ; "\x22"
064e 8606 | | Call 0x3,0x6
064f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 4608 |F | Jump_Case 0x9
0654 7808 |x | Jump 0x65d ; case 0x0
0655 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0656 7817 |x | Jump 0x66e ; case 0x2
0657 7816 |x | Jump 0x66e ; case 0x3
0658 7815 |x | Jump 0x66e ; case 0x4
0659 7814 |x | Jump 0x66e ; case 0x5
065a 7813 |x | Jump 0x66e ; case 0x6
065b 7812 |x | Jump 0x66e ; case 0x7
065c 7811 |x | Jump 0x66e ; case 0x8
065d e219 | | Load 0x1,0x19
065e 00db | | Load_Top At_Offset_3
065f 00d9 | | Load_Top At_Offset_1
0660 00d9 | | Load_Top At_Offset_1
0661 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0662 0119 | | Execute Any,Check_In_Formal_Type
0663 00d1 | | Pop_Control Pop_Count_1
0664 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0665 821c | | Call 0x1,0x1c
0666 00db | | Load_Top At_Offset_3
0667 00d9 | | Load_Top At_Offset_1
0668 00d9 | | Load_Top At_Offset_1
0669 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
066a 0119 | | Execute Any,Check_In_Formal_Type
066b 00d1 | | Pop_Control Pop_Count_1
066c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
066d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
066e 0869 | i | Execute_Immediate Raise,0x69
066f 0000 | | .XXX[0x1]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673 | s | .CONST 0x0673 ; Address of begin
0671 0004 | | .CONST 0x0004 ; Address of exception handler
0672 0001 | | .CONST 0x0001 ; Number of locals
0673 BODY_0670:
0673 INIT_0670:
0673 4608 |F | Jump_Case 0x9
0674 7808 |x | Jump 0x67d ; case 0x0
0675 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0676 7816 |x | Jump 0x68d ; case 0x2
0677 7815 |x | Jump 0x68d ; case 0x3
0678 7814 |x | Jump 0x68d ; case 0x4
0679 7813 |x | Jump 0x68d ; case 0x5
067a 7812 |x | Jump 0x68d ; case 0x6
067b 7811 |x | Jump 0x68d ; case 0x7
067c 7810 |x | Jump 0x68d ; case 0x8
067d 00da | | Load_Top At_Offset_2
067e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
067f 0125 | % | Execute Any,Set_Constraint
0680 00da | | Load_Top At_Offset_2
0681 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0682 1c00 | | Execute_Immediate Run_Utility,0x0
0683 00da | | Load_Top At_Offset_2
0684 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0685 1c00 | | Execute_Immediate Run_Utility,0x0
0686 6009 |` | Indirect_Literal Discrete,0x690,{0x00000000, 0x001e0000}
0687 00db | | Load_Top At_Offset_3
0688 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0689 4800 |H | Short_Literal 0x0
068a 00db | | Load_Top At_Offset_3
068b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
068c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
068d 0869 | i | Execute_Immediate Raise,0x69
068e 0000 0000 | | .XXX[0x2]
0690 0000 0000 | | .LITERAL {0x00000000, 0x001e0000}
0694 0000 0000 | | .BLANK 0000[0x4]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b | | .CONST 0x069b ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0001 | | .CONST 0x0001 ; Number of locals
069b BODY_0698:
069b INIT_0698:
069b 4608 |F | Jump_Case 0x9
069c 7808 |x | Jump 0x6a5 ; case 0x0
069d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
069e 7813 |x | Jump 0x6b2 ; case 0x2
069f 7812 |x | Jump 0x6b2 ; case 0x3
06a0 7811 |x | Jump 0x6b2 ; case 0x4
06a1 7810 |x | Jump 0x6b2 ; case 0x5
06a2 780f |x | Jump 0x6b2 ; case 0x6
06a3 780e |x | Jump 0x6b2 ; case 0x7
06a4 780d |x | Jump 0x6b2 ; case 0x8
06a5 00da | | Load_Top At_Offset_2
06a6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06a7 0125 | % | Execute Any,Set_Constraint
06a8 00da | | Load_Top At_Offset_2
06a9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06aa 1c00 | | Execute_Immediate Run_Utility,0x0
06ab 00da | | Load_Top At_Offset_2
06ac 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
06ad 1c00 | | Execute_Immediate Run_Utility,0x0
06ae 67e1 |g | Indirect_Literal Discrete,0x690,{0x00000000, 0x001e0000}
06af 00db | | Load_Top At_Offset_3
06b0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
06b1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
06b2 0869 | i | Execute_Immediate Raise,0x69
06b3 0000 0000 | | .BLANK 0000[0x5]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb | | .CONST 0x06bb ; Address of begin
06b9 0004 | | .CONST 0x0004 ; Address of exception handler
06ba 0001 | | .CONST 0x0001 ; Number of locals
06bb BODY_06b8:
06bb INIT_06b8:
06bb 4608 |F | Jump_Case 0x9
06bc 7808 |x | Jump 0x6c5 ; case 0x0
06bd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
06be 781c |x | Jump 0x6db ; case 0x2
06bf 781b |x | Jump 0x6db ; case 0x3
06c0 781a |x | Jump 0x6db ; case 0x4
06c1 7819 |x | Jump 0x6db ; case 0x5
06c2 7818 |x | Jump 0x6db ; case 0x6
06c3 7817 |x | Jump 0x6db ; case 0x7
06c4 7816 |x | Jump 0x6db ; case 0x8
06c5 00da | | Load_Top At_Offset_2
06c6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06c7 0125 | % | Execute Any,Set_Constraint
06c8 e001 | | Load 0x0,0x1
06c9 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
06ca 00db | | Load_Top At_Offset_3
06cb 00d9 | | Load_Top At_Offset_1
06cc 00d9 | | Load_Top At_Offset_1
06cd 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
06ce 0119 | | Execute Any,Check_In_Formal_Type
06cf 00d1 | | Pop_Control Pop_Count_1
06d0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06d1 8222 | " | Call 0x1,0x22
06d2 00db | | Load_Top At_Offset_3
06d3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
06d4 4800 |H | Short_Literal 0x0
06d5 00db | | Load_Top At_Offset_3
06d6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
06d7 4801 |H | Short_Literal 0x1
06d8 00db | | Load_Top At_Offset_3
06d9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
06da 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
06db 0869 | i | Execute_Immediate Raise,0x69
06dc 0000 0000 | | .BLANK 0000[0x4]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3 | | .CONST 0x06e3 ; Address of begin
06e1 0004 | | .CONST 0x0004 ; Address of exception handler
06e2 0001 | | .CONST 0x0001 ; Number of locals
06e3 BODY_06e0:
06e3 INIT_06e0:
06e3 4608 |F | Jump_Case 0x9
06e4 7808 |x | Jump 0x6ed ; case 0x0
06e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
06e6 7810 |x | Jump 0x6f7 ; case 0x2
06e7 780f |x | Jump 0x6f7 ; case 0x3
06e8 780e |x | Jump 0x6f7 ; case 0x4
06e9 780d |x | Jump 0x6f7 ; case 0x5
06ea 780c |x | Jump 0x6f7 ; case 0x6
06eb 780b |x | Jump 0x6f7 ; case 0x7
06ec 780a |x | Jump 0x6f7 ; case 0x8
06ed 00da | | Load_Top At_Offset_2
06ee 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06ef 1c00 | | Execute_Immediate Run_Utility,0x0
06f0 00da | | Load_Top At_Offset_2
06f1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
06f2 1c00 | | Execute_Immediate Run_Utility,0x0
06f3 00da | | Load_Top At_Offset_2
06f4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
06f5 1c00 | | Execute_Immediate Run_Utility,0x0
06f6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
06f7 0869 | i | Execute_Immediate Raise,0x69
06f8 ; --------------------------------------------------------------------------------------
06f8 ; STRING TABLE
06f8 ; --------------------------------------------------------------------------------------
06f8 0026 | & | .STRTAB 0x0026->0x070b ; "CONTROL"
06f9 002b | + | .STRTAB 0x002b->0x070e ; "CHAR"
06fa 002d | - | .STRTAB 0x002d->0x0710 ; "OTHER"
06fb 0030 | 0 | .STRTAB 0x0030->0x0713 ; "~echo, ~crlf, edit=none"
06fc 0045 | E | .STRTAB 0x0045->0x071e ; "\x22\x22"
06fd 0045 | E | .STRTAB 0x0045->0x071f ; "Cue="
06fe 0047 | G | .STRTAB 0x0047->0x0721 ; ",Data="
06ff 004b | K | .STRTAB 0x004b->0x0724 ; "Current=("
0700 0052 | R | .STRTAB 0x0052->0x0729 ; "), Previous=("
0701 005d | ] | .STRTAB 0x005d->0x072f ; ")"
0702 005c | \ | .STRTAB 0x005c->0x0730 ; "ESC"
0703 005d | ] | .STRTAB 0x005d->0x0731 ; "CR"
0704 005d | ] | .STRTAB 0x005d->0x0732 ; "LF"
0705 005d | ] | .STRTAB 0x005d->0x0733 ; ",Event_Matched"
0706 0069 | i | .STRTAB 0x0069->0x073a ; ",Bytes_Matched="
0707 0076 | v | .STRTAB 0x0076->0x0742 ; ",Silence_Matched="
0708 0085 | | .STRTAB 0x0085->0x074a ; "("
0709 0084 | | .STRTAB 0x0084->0x074b ; "\x22"
070a 0083 | | .STREND 0x0083->0x074b
070b 434f 4e54 |CONT| .STRTAB_STRINGS
074c 0000 0000 | | .BLANK 0000[0x4]
0750 ; --------------------------------------------------------------------------------------
0750 ; Debug Table
0750 ; --------------------------------------------------------------------------------------
0750 0004 000a | | .DEBUG4 0x0004,0x000a,0x7e3c,0x0000,0x0001,0x0000
0756 0000 0000 | | .BLANK 0000[0x1e]
0774 8014 0000 | | .XXX[0xb]
0776 0000 0000 | |
0778 0100 0000 | |
077a 0880 0000 | |
077c 0004 0000 | |
077e 0028 | ( |
077f 0000 0000 | | .BLANK 0000[0x2e]
07ad 1002 8000 | | .XXX[0xb]
07af 0000 0000 | |
07b1 0020 0000 | |
07b3 0110 0000 | |
07b5 0000 8000 | |
07b7 0005 | |
07b8 0000 0000 | | .BLANK 0000[0x48]