|
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 - metrics - download
Length: 4096 (0x1000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 0728 | ( | .CONST 0x0728 ; 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 029b | | .CONST 0x029b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0025 | % | .CONST 0x0025 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4809 |H | Short_Literal 0x9
000d 029f 02a3 | | Declare_Subprogram For_Call,INIT_02a0
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 00d8 | | Load_Top At_Offset_0
0011 0266 | f | Execute Discrete,Bounds
0012 00e1 | | Load_Encached Boolean_Cache
0013 02a0 | | Declare_Subprogram Null_Subprogram
0014 4801 |H | Short_Literal 0x1
0015 035e | ^ | Declare_Type Array,Defined,Visible
0016 029a 02d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02d0
0018 00d9 | | Load_Top At_Offset_1
0019 0336 | 6 | Declare_Variable Array,Visible
001a 00d8 | | Load_Top At_Offset_0
001b 0335 | 5 | Declare_Variable Array,Duplicate
001c 00cd | | Action Spare6_Action
001d 4809 |H | Short_Literal 0x9
001e 4800 |H | Short_Literal 0x0
001f 4801 |H | Short_Literal 0x1
0020 00d9 | | Load_Top At_Offset_1
0021 e211 | | Load 0x1,0x11
0022 01d6 | | Execute Vector,Field_Write
0023 3ffb |? | Loop_Increasing 0x1f
0024 00d9 | | Load_Top At_Offset_1
0025 01d4 | | Execute Vector,Structure_Write
0026 00da | | Load_Top At_Offset_2
0027 0336 | 6 | Declare_Variable Array,Visible
0028 00d8 | | Load_Top At_Offset_0
0029 0335 | 5 | Declare_Variable Array,Duplicate
002a 00cd | | Action Spare6_Action
002b 4801 |H | Short_Literal 0x1
002c 4800 |H | Short_Literal 0x0
002d 00da | | Load_Top At_Offset_2
002e 01d6 | | Execute Vector,Field_Write
002f 4801 |H | Short_Literal 0x1
0030 4801 |H | Short_Literal 0x1
0031 00da | | Load_Top At_Offset_2
0032 01d6 | | Execute Vector,Field_Write
0033 4801 |H | Short_Literal 0x1
0034 4802 |H | Short_Literal 0x2
0035 00da | | Load_Top At_Offset_2
0036 01d6 | | Execute Vector,Field_Write
0037 4801 |H | Short_Literal 0x1
0038 4803 |H | Short_Literal 0x3
0039 00da | | Load_Top At_Offset_2
003a 01d6 | | Execute Vector,Field_Write
003b 4801 |H | Short_Literal 0x1
003c 4804 |H | Short_Literal 0x4
003d 00da | | Load_Top At_Offset_2
003e 01d6 | | Execute Vector,Field_Write
003f 4801 |H | Short_Literal 0x1
0040 4805 |H | Short_Literal 0x5
0041 00da | | Load_Top At_Offset_2
0042 01d6 | | Execute Vector,Field_Write
0043 4800 |H | Short_Literal 0x0
0044 4806 |H | Short_Literal 0x6
0045 00da | | Load_Top At_Offset_2
0046 01d6 | | Execute Vector,Field_Write
0047 4800 |H | Short_Literal 0x0
0048 4807 |H | Short_Literal 0x7
0049 00da | | Load_Top At_Offset_2
004a 01d6 | | Execute Vector,Field_Write
004b 4800 |H | Short_Literal 0x0
004c 4808 |H | Short_Literal 0x8
004d 00da | | Load_Top At_Offset_2
004e 01d6 | | Execute Vector,Field_Write
004f 4800 |H | Short_Literal 0x0
0050 4809 |H | Short_Literal 0x9
0051 00da | | Load_Top At_Offset_2
0052 01d6 | | Execute Vector,Field_Write
0053 00d9 | | Load_Top At_Offset_1
0054 01d4 | | Execute Vector,Structure_Write
0055 00db | | Load_Top At_Offset_3
0056 0336 | 6 | Declare_Variable Array,Visible
0057 00d8 | | Load_Top At_Offset_0
0058 0335 | 5 | Declare_Variable Array,Duplicate
0059 00cd | | Action Spare6_Action
005a 4800 |H | Short_Literal 0x0
005b 4800 |H | Short_Literal 0x0
005c 00da | | Load_Top At_Offset_2
005d 01d6 | | Execute Vector,Field_Write
005e 4800 |H | Short_Literal 0x0
005f 4801 |H | Short_Literal 0x1
0060 00da | | Load_Top At_Offset_2
0061 01d6 | | Execute Vector,Field_Write
0062 4800 |H | Short_Literal 0x0
0063 4802 |H | Short_Literal 0x2
0064 00da | | Load_Top At_Offset_2
0065 01d6 | | Execute Vector,Field_Write
0066 4800 |H | Short_Literal 0x0
0067 4803 |H | Short_Literal 0x3
0068 00da | | Load_Top At_Offset_2
0069 01d6 | | Execute Vector,Field_Write
006a 4800 |H | Short_Literal 0x0
006b 4804 |H | Short_Literal 0x4
006c 00da | | Load_Top At_Offset_2
006d 01d6 | | Execute Vector,Field_Write
006e 4800 |H | Short_Literal 0x0
006f 4805 |H | Short_Literal 0x5
0070 00da | | Load_Top At_Offset_2
0071 01d6 | | Execute Vector,Field_Write
0072 4801 |H | Short_Literal 0x1
0073 4806 |H | Short_Literal 0x6
0074 00da | | Load_Top At_Offset_2
0075 01d6 | | Execute Vector,Field_Write
0076 4800 |H | Short_Literal 0x0
0077 4807 |H | Short_Literal 0x7
0078 00da | | Load_Top At_Offset_2
0079 01d6 | | Execute Vector,Field_Write
007a 4800 |H | Short_Literal 0x0
007b 4808 |H | Short_Literal 0x8
007c 00da | | Load_Top At_Offset_2
007d 01d6 | | Execute Vector,Field_Write
007e 4800 |H | Short_Literal 0x0
007f 4809 |H | Short_Literal 0x9
0080 00da | | Load_Top At_Offset_2
0081 01d6 | | Execute Vector,Field_Write
0082 00d9 | | Load_Top At_Offset_1
0083 01d4 | | Execute Vector,Structure_Write
0084 029a 02fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02f8
0086 00bf | | Action Accept_Activation
0087 0093 0000 | | PushFullAddress InMicrocode
0089 6242 |bB | Indirect_Literal Discrete,0x2cc,{0x80000000, 0x00010000}
008a 0273 | s | Execute Discrete,Plus
008b 0007 | | Action Break_Optional
008c e002 | | Load 0x0,0x2
008d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008e 02c7 | | Declare_Variable Any
008f 00d8 | | Load_Top At_Offset_0
0090 1c00 | | Execute_Immediate Run_Utility,0x0
0091 e003 | | Load 0x0,0x3
0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0093 02c7 | | Declare_Variable Any
0094 00d8 | | Load_Top At_Offset_0
0095 1c00 | | Execute_Immediate Run_Utility,0x0
0096 00e1 | | Load_Encached Boolean_Cache
0097 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0098 00e9 | | Load_Encached String_Cache
0099 02a0 | | Declare_Subprogram Null_Subprogram
009a 480d |H | Short_Literal 0xd
009b 03d3 | | Declare_Type Access,Defined,Accesses_Protected
009c 622b |b+ | Indirect_Literal Discrete,0x2c8,{0x00000000, 0x00001400}
009d 0aff | | Execute_Immediate Plus,-0x1
009e 4800 |H | Short_Literal 0x0
009f 026b | k | Execute Discrete,Maximum
00a0 00d9 | | Load_Top At_Offset_1
00a1 0082 | | QQUnknown InMicrocode
00a2 e20d | | Load 0x1,0xd
00a3 0266 | f | Execute Discrete,Bounds
00a4 00da | | Load_Top At_Offset_2
00a5 02a0 | | Declare_Subprogram Null_Subprogram
00a6 4801 |H | Short_Literal 0x1
00a7 035d | ] | Declare_Type Array,Defined
00a8 00d8 | | Load_Top At_Offset_0
00a9 0337 | 7 | Declare_Variable Array
00aa 00d8 | | Load_Top At_Offset_0
00ab 0335 | 5 | Declare_Variable Array,Duplicate
00ac 00cd | | Action Spare6_Action
00ad 0092 05f7 | | Action Push_String_Extended,0x5f7 ; "COMMENTS"
00af e218 | | Load 0x1,0x18
00b0 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00b1 4800 |H | Short_Literal 0x0
00b2 00da | | Load_Top At_Offset_2
00b3 01d6 | | Execute Vector,Field_Write
00b4 0092 05f8 | | Action Push_String_Extended,0x5f8 ; "IOP_DUMP0"
00b6 e218 | | Load 0x1,0x18
00b7 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00b8 4801 |H | Short_Literal 0x1
00b9 00da | | Load_Top At_Offset_2
00ba 01d6 | | Execute Vector,Field_Write
00bb 0092 05f9 | | Action Push_String_Extended,0x5f9 ; "IOP_DUMP1"
00bd e218 | | Load 0x1,0x18
00be 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00bf 4802 |H | Short_Literal 0x2
00c0 00da | | Load_Top At_Offset_2
00c1 01d6 | | Execute Vector,Field_Write
00c2 0092 05fa | | Action Push_String_Extended,0x5fa ; "IOP_DUMP2"
00c4 e218 | | Load 0x1,0x18
00c5 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00c6 4803 |H | Short_Literal 0x3
00c7 00da | | Load_Top At_Offset_2
00c8 01d6 | | Execute Vector,Field_Write
00c9 0092 05fb | | Action Push_String_Extended,0x5fb ; "IOP_DUMP3"
00cb e218 | | Load 0x1,0x18
00cc 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00cd 4804 |H | Short_Literal 0x4
00ce 00da | | Load_Top At_Offset_2
00cf 01d6 | | Execute Vector,Field_Write
00d0 0092 05fc | | Action Push_String_Extended,0x5fc ; "IOP_DUMP4"
00d2 e218 | | Load 0x1,0x18
00d3 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00d4 4805 |H | Short_Literal 0x5
00d5 00da | | Load_Top At_Offset_2
00d6 01d6 | | Execute Vector,Field_Write
00d7 0092 05fd | | Action Push_String_Extended,0x5fd ; "SAVED_STATE"
00d9 e218 | | Load 0x1,0x18
00da 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00db 4806 |H | Short_Literal 0x6
00dc 00da | | Load_Top At_Offset_2
00dd 01d6 | | Execute Vector,Field_Write
00de 0092 05fe | | Action Push_String_Extended,0x5fe ; "REGISTERS"
00e0 e218 | | Load 0x1,0x18
00e1 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00e2 4807 |H | Short_Literal 0x7
00e3 00da | | Load_Top At_Offset_2
00e4 01d6 | | Execute Vector,Field_Write
00e5 0092 05ff | | Action Push_String_Extended,0x5ff ; "TAG_STORE"
00e7 e218 | | Load 0x1,0x18
00e8 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00e9 4808 |H | Short_Literal 0x8
00ea 00da | | Load_Top At_Offset_2
00eb 01d6 | | Execute Vector,Field_Write
00ec 0092 0600 | | Action Push_String_Extended,0x600 ; "MEMORY"
00ee e218 | | Load 0x1,0x18
00ef 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00f0 4809 |H | Short_Literal 0x9
00f1 00da | | Load_Top At_Offset_2
00f2 01d6 | | Execute Vector,Field_Write
00f3 00d9 | | Load_Top At_Offset_1
00f4 01d4 | | Execute Vector,Structure_Write
00f5 e20d | | Load 0x1,0xd
00f6 0266 | f | Execute Discrete,Bounds
00f7 00e1 | | Load_Encached Boolean_Cache
00f8 02a0 | | Declare_Subprogram Null_Subprogram
00f9 4801 |H | Short_Literal 0x1
00fa 035d | ] | Declare_Type Array,Defined
00fb 00d8 | | Load_Top At_Offset_0
00fc 0337 | 7 | Declare_Variable Array
00fd 00d8 | | Load_Top At_Offset_0
00fe 0335 | 5 | Declare_Variable Array,Duplicate
00ff 00cd | | Action Spare6_Action
0100 4800 |H | Short_Literal 0x0
0101 4800 |H | Short_Literal 0x0
0102 00da | | Load_Top At_Offset_2
0103 01d6 | | Execute Vector,Field_Write
0104 4801 |H | Short_Literal 0x1
0105 4801 |H | Short_Literal 0x1
0106 00da | | Load_Top At_Offset_2
0107 01d6 | | Execute Vector,Field_Write
0108 4800 |H | Short_Literal 0x0
0109 4802 |H | Short_Literal 0x2
010a 00da | | Load_Top At_Offset_2
010b 01d6 | | Execute Vector,Field_Write
010c 4800 |H | Short_Literal 0x0
010d 4803 |H | Short_Literal 0x3
010e 00da | | Load_Top At_Offset_2
010f 01d6 | | Execute Vector,Field_Write
0110 4801 |H | Short_Literal 0x1
0111 4804 |H | Short_Literal 0x4
0112 00da | | Load_Top At_Offset_2
0113 01d6 | | Execute Vector,Field_Write
0114 4801 |H | Short_Literal 0x1
0115 4805 |H | Short_Literal 0x5
0116 00da | | Load_Top At_Offset_2
0117 01d6 | | Execute Vector,Field_Write
0118 4800 |H | Short_Literal 0x0
0119 4806 |H | Short_Literal 0x6
011a 00da | | Load_Top At_Offset_2
011b 01d6 | | Execute Vector,Field_Write
011c 4800 |H | Short_Literal 0x0
011d 4807 |H | Short_Literal 0x7
011e 00da | | Load_Top At_Offset_2
011f 01d6 | | Execute Vector,Field_Write
0120 4800 |H | Short_Literal 0x0
0121 4808 |H | Short_Literal 0x8
0122 00da | | Load_Top At_Offset_2
0123 01d6 | | Execute Vector,Field_Write
0124 4800 |H | Short_Literal 0x0
0125 4809 |H | Short_Literal 0x9
0126 00da | | Load_Top At_Offset_2
0127 01d6 | | Execute Vector,Field_Write
0128 00d9 | | Load_Top At_Offset_1
0129 01d4 | | Execute Vector,Structure_Write
012a 0092 0601 | | Action Push_String_Extended,0x601 ; "LABELS"
012c 4801 |H | Short_Literal 0x1
012d 4850 |HP | Short_Literal 0x50
012e e004 | | Load 0x0,0x4
012f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0130 035b | [ | Declare_Type Array,Constrained
0131 4801 |H | Short_Literal 0x1
0132 4851 |HQ | Short_Literal 0x51
0133 e004 | | Load 0x0,0x4
0134 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0135 035b | [ | Declare_Type Array,Constrained
0136 4801 |H | Short_Literal 0x1
0137 4850 |HP | Short_Literal 0x50
0138 00e9 | | Load_Encached String_Cache
0139 035b | [ | Declare_Type Array,Constrained
013a 0337 | 7 | Declare_Variable Array
013b 00d8 | | Load_Top At_Offset_0
013c 0335 | 5 | Declare_Variable Array,Duplicate
013d 00cd | | Action Spare6_Action
013e 482a |H* | Short_Literal 0x2a
013f 4801 |H | Short_Literal 0x1
0140 00da | | Load_Top At_Offset_2
0141 01d6 | | Execute Vector,Field_Write
0142 482a |H* | Short_Literal 0x2a
0143 4802 |H | Short_Literal 0x2
0144 00da | | Load_Top At_Offset_2
0145 01d6 | | Execute Vector,Field_Write
0146 482a |H* | Short_Literal 0x2a
0147 4803 |H | Short_Literal 0x3
0148 00da | | Load_Top At_Offset_2
0149 01d6 | | Execute Vector,Field_Write
014a 484d |HM | Short_Literal 0x4d
014b 4804 |H | Short_Literal 0x4
014c 00da | | Load_Top At_Offset_2
014d 01d6 | | Execute Vector,Field_Write
014e 4841 |HA | Short_Literal 0x41
014f 4805 |H | Short_Literal 0x5
0150 00da | | Load_Top At_Offset_2
0151 01d6 | | Execute Vector,Field_Write
0152 4852 |HR | Short_Literal 0x52
0153 4806 |H | Short_Literal 0x6
0154 00da | | Load_Top At_Offset_2
0155 01d6 | | Execute Vector,Field_Write
0156 484b |HK | Short_Literal 0x4b
0157 4807 |H | Short_Literal 0x7
0158 00da | | Load_Top At_Offset_2
0159 01d6 | | Execute Vector,Field_Write
015a 482a |H* | Short_Literal 0x2a
015b 4808 |H | Short_Literal 0x8
015c 00da | | Load_Top At_Offset_2
015d 01d6 | | Execute Vector,Field_Write
015e 482a |H* | Short_Literal 0x2a
015f 4809 |H | Short_Literal 0x9
0160 00da | | Load_Top At_Offset_2
0161 01d6 | | Execute Vector,Field_Write
0162 482a |H* | Short_Literal 0x2a
0163 480a |H | Short_Literal 0xa
0164 00da | | Load_Top At_Offset_2
0165 01d6 | | Execute Vector,Field_Write
0166 4820 |H | Short_Literal 0x20
0167 480b |H | Short_Literal 0xb
0168 00da | | Load_Top At_Offset_2
0169 01d6 | | Execute Vector,Field_Write
016a 4820 |H | Short_Literal 0x20
016b 480c |H | Short_Literal 0xc
016c 00da | | Load_Top At_Offset_2
016d 01d6 | | Execute Vector,Field_Write
016e 4820 |H | Short_Literal 0x20
016f 480d |H | Short_Literal 0xd
0170 00da | | Load_Top At_Offset_2
0171 01d6 | | Execute Vector,Field_Write
0172 4820 |H | Short_Literal 0x20
0173 480e |H | Short_Literal 0xe
0174 00da | | Load_Top At_Offset_2
0175 01d6 | | Execute Vector,Field_Write
0176 4820 |H | Short_Literal 0x20
0177 480f |H | Short_Literal 0xf
0178 00da | | Load_Top At_Offset_2
0179 01d6 | | Execute Vector,Field_Write
017a 4820 |H | Short_Literal 0x20
017b 4810 |H | Short_Literal 0x10
017c 00da | | Load_Top At_Offset_2
017d 01d6 | | Execute Vector,Field_Write
017e 4820 |H | Short_Literal 0x20
017f 4811 |H | Short_Literal 0x11
0180 00da | | Load_Top At_Offset_2
0181 01d6 | | Execute Vector,Field_Write
0182 4820 |H | Short_Literal 0x20
0183 4812 |H | Short_Literal 0x12
0184 00da | | Load_Top At_Offset_2
0185 01d6 | | Execute Vector,Field_Write
0186 4820 |H | Short_Literal 0x20
0187 4813 |H | Short_Literal 0x13
0188 00da | | Load_Top At_Offset_2
0189 01d6 | | Execute Vector,Field_Write
018a 4820 |H | Short_Literal 0x20
018b 4814 |H | Short_Literal 0x14
018c 00da | | Load_Top At_Offset_2
018d 01d6 | | Execute Vector,Field_Write
018e 4820 |H | Short_Literal 0x20
018f 4815 |H | Short_Literal 0x15
0190 00da | | Load_Top At_Offset_2
0191 01d6 | | Execute Vector,Field_Write
0192 4820 |H | Short_Literal 0x20
0193 4816 |H | Short_Literal 0x16
0194 00da | | Load_Top At_Offset_2
0195 01d6 | | Execute Vector,Field_Write
0196 4820 |H | Short_Literal 0x20
0197 4817 |H | Short_Literal 0x17
0198 00da | | Load_Top At_Offset_2
0199 01d6 | | Execute Vector,Field_Write
019a 4820 |H | Short_Literal 0x20
019b 4818 |H | Short_Literal 0x18
019c 00da | | Load_Top At_Offset_2
019d 01d6 | | Execute Vector,Field_Write
019e 4820 |H | Short_Literal 0x20
019f 4819 |H | Short_Literal 0x19
01a0 00da | | Load_Top At_Offset_2
01a1 01d6 | | Execute Vector,Field_Write
01a2 4820 |H | Short_Literal 0x20
01a3 481a |H | Short_Literal 0x1a
01a4 00da | | Load_Top At_Offset_2
01a5 01d6 | | Execute Vector,Field_Write
01a6 4820 |H | Short_Literal 0x20
01a7 481b |H | Short_Literal 0x1b
01a8 00da | | Load_Top At_Offset_2
01a9 01d6 | | Execute Vector,Field_Write
01aa 4820 |H | Short_Literal 0x20
01ab 481c |H | Short_Literal 0x1c
01ac 00da | | Load_Top At_Offset_2
01ad 01d6 | | Execute Vector,Field_Write
01ae 4820 |H | Short_Literal 0x20
01af 481d |H | Short_Literal 0x1d
01b0 00da | | Load_Top At_Offset_2
01b1 01d6 | | Execute Vector,Field_Write
01b2 4820 |H | Short_Literal 0x20
01b3 481e |H | Short_Literal 0x1e
01b4 00da | | Load_Top At_Offset_2
01b5 01d6 | | Execute Vector,Field_Write
01b6 4820 |H | Short_Literal 0x20
01b7 481f |H | Short_Literal 0x1f
01b8 00da | | Load_Top At_Offset_2
01b9 01d6 | | Execute Vector,Field_Write
01ba 4820 |H | Short_Literal 0x20
01bb 4820 |H | Short_Literal 0x20
01bc 00da | | Load_Top At_Offset_2
01bd 01d6 | | Execute Vector,Field_Write
01be 4820 |H | Short_Literal 0x20
01bf 4821 |H! | Short_Literal 0x21
01c0 00da | | Load_Top At_Offset_2
01c1 01d6 | | Execute Vector,Field_Write
01c2 4820 |H | Short_Literal 0x20
01c3 4822 |H" | Short_Literal 0x22
01c4 00da | | Load_Top At_Offset_2
01c5 01d6 | | Execute Vector,Field_Write
01c6 4820 |H | Short_Literal 0x20
01c7 4823 |H# | Short_Literal 0x23
01c8 00da | | Load_Top At_Offset_2
01c9 01d6 | | Execute Vector,Field_Write
01ca 4820 |H | Short_Literal 0x20
01cb 4824 |H$ | Short_Literal 0x24
01cc 00da | | Load_Top At_Offset_2
01cd 01d6 | | Execute Vector,Field_Write
01ce 4820 |H | Short_Literal 0x20
01cf 4825 |H% | Short_Literal 0x25
01d0 00da | | Load_Top At_Offset_2
01d1 01d6 | | Execute Vector,Field_Write
01d2 4820 |H | Short_Literal 0x20
01d3 4826 |H& | Short_Literal 0x26
01d4 00da | | Load_Top At_Offset_2
01d5 01d6 | | Execute Vector,Field_Write
01d6 4820 |H | Short_Literal 0x20
01d7 4827 |H' | Short_Literal 0x27
01d8 00da | | Load_Top At_Offset_2
01d9 01d6 | | Execute Vector,Field_Write
01da 4820 |H | Short_Literal 0x20
01db 4828 |H( | Short_Literal 0x28
01dc 00da | | Load_Top At_Offset_2
01dd 01d6 | | Execute Vector,Field_Write
01de 4820 |H | Short_Literal 0x20
01df 4829 |H) | Short_Literal 0x29
01e0 00da | | Load_Top At_Offset_2
01e1 01d6 | | Execute Vector,Field_Write
01e2 4820 |H | Short_Literal 0x20
01e3 482a |H* | Short_Literal 0x2a
01e4 00da | | Load_Top At_Offset_2
01e5 01d6 | | Execute Vector,Field_Write
01e6 4820 |H | Short_Literal 0x20
01e7 482b |H+ | Short_Literal 0x2b
01e8 00da | | Load_Top At_Offset_2
01e9 01d6 | | Execute Vector,Field_Write
01ea 4820 |H | Short_Literal 0x20
01eb 482c |H, | Short_Literal 0x2c
01ec 00da | | Load_Top At_Offset_2
01ed 01d6 | | Execute Vector,Field_Write
01ee 4820 |H | Short_Literal 0x20
01ef 482d |H- | Short_Literal 0x2d
01f0 00da | | Load_Top At_Offset_2
01f1 01d6 | | Execute Vector,Field_Write
01f2 4820 |H | Short_Literal 0x20
01f3 482e |H. | Short_Literal 0x2e
01f4 00da | | Load_Top At_Offset_2
01f5 01d6 | | Execute Vector,Field_Write
01f6 4820 |H | Short_Literal 0x20
01f7 482f |H/ | Short_Literal 0x2f
01f8 00da | | Load_Top At_Offset_2
01f9 01d6 | | Execute Vector,Field_Write
01fa 4820 |H | Short_Literal 0x20
01fb 4830 |H0 | Short_Literal 0x30
01fc 00da | | Load_Top At_Offset_2
01fd 01d6 | | Execute Vector,Field_Write
01fe 4820 |H | Short_Literal 0x20
01ff 4831 |H1 | Short_Literal 0x31
0200 00da | | Load_Top At_Offset_2
0201 01d6 | | Execute Vector,Field_Write
0202 4820 |H | Short_Literal 0x20
0203 4832 |H2 | Short_Literal 0x32
0204 00da | | Load_Top At_Offset_2
0205 01d6 | | Execute Vector,Field_Write
0206 4820 |H | Short_Literal 0x20
0207 4833 |H3 | Short_Literal 0x33
0208 00da | | Load_Top At_Offset_2
0209 01d6 | | Execute Vector,Field_Write
020a 4820 |H | Short_Literal 0x20
020b 4834 |H4 | Short_Literal 0x34
020c 00da | | Load_Top At_Offset_2
020d 01d6 | | Execute Vector,Field_Write
020e 4820 |H | Short_Literal 0x20
020f 4835 |H5 | Short_Literal 0x35
0210 00da | | Load_Top At_Offset_2
0211 01d6 | | Execute Vector,Field_Write
0212 4820 |H | Short_Literal 0x20
0213 4836 |H6 | Short_Literal 0x36
0214 00da | | Load_Top At_Offset_2
0215 01d6 | | Execute Vector,Field_Write
0216 4820 |H | Short_Literal 0x20
0217 4837 |H7 | Short_Literal 0x37
0218 00da | | Load_Top At_Offset_2
0219 01d6 | | Execute Vector,Field_Write
021a 4820 |H | Short_Literal 0x20
021b 4838 |H8 | Short_Literal 0x38
021c 00da | | Load_Top At_Offset_2
021d 01d6 | | Execute Vector,Field_Write
021e 4820 |H | Short_Literal 0x20
021f 4839 |H9 | Short_Literal 0x39
0220 00da | | Load_Top At_Offset_2
0221 01d6 | | Execute Vector,Field_Write
0222 4820 |H | Short_Literal 0x20
0223 483a |H: | Short_Literal 0x3a
0224 00da | | Load_Top At_Offset_2
0225 01d6 | | Execute Vector,Field_Write
0226 4820 |H | Short_Literal 0x20
0227 483b |H; | Short_Literal 0x3b
0228 00da | | Load_Top At_Offset_2
0229 01d6 | | Execute Vector,Field_Write
022a 4820 |H | Short_Literal 0x20
022b 483c |H< | Short_Literal 0x3c
022c 00da | | Load_Top At_Offset_2
022d 01d6 | | Execute Vector,Field_Write
022e 4820 |H | Short_Literal 0x20
022f 483d |H= | Short_Literal 0x3d
0230 00da | | Load_Top At_Offset_2
0231 01d6 | | Execute Vector,Field_Write
0232 4820 |H | Short_Literal 0x20
0233 483e |H> | Short_Literal 0x3e
0234 00da | | Load_Top At_Offset_2
0235 01d6 | | Execute Vector,Field_Write
0236 4820 |H | Short_Literal 0x20
0237 483f |H? | Short_Literal 0x3f
0238 00da | | Load_Top At_Offset_2
0239 01d6 | | Execute Vector,Field_Write
023a 4820 |H | Short_Literal 0x20
023b 4840 |H@ | Short_Literal 0x40
023c 00da | | Load_Top At_Offset_2
023d 01d6 | | Execute Vector,Field_Write
023e 4820 |H | Short_Literal 0x20
023f 4841 |HA | Short_Literal 0x41
0240 00da | | Load_Top At_Offset_2
0241 01d6 | | Execute Vector,Field_Write
0242 4820 |H | Short_Literal 0x20
0243 4842 |HB | Short_Literal 0x42
0244 00da | | Load_Top At_Offset_2
0245 01d6 | | Execute Vector,Field_Write
0246 4820 |H | Short_Literal 0x20
0247 4843 |HC | Short_Literal 0x43
0248 00da | | Load_Top At_Offset_2
0249 01d6 | | Execute Vector,Field_Write
024a 4820 |H | Short_Literal 0x20
024b 4844 |HD | Short_Literal 0x44
024c 00da | | Load_Top At_Offset_2
024d 01d6 | | Execute Vector,Field_Write
024e 4820 |H | Short_Literal 0x20
024f 4845 |HE | Short_Literal 0x45
0250 00da | | Load_Top At_Offset_2
0251 01d6 | | Execute Vector,Field_Write
0252 4820 |H | Short_Literal 0x20
0253 4846 |HF | Short_Literal 0x46
0254 00da | | Load_Top At_Offset_2
0255 01d6 | | Execute Vector,Field_Write
0256 4820 |H | Short_Literal 0x20
0257 4847 |HG | Short_Literal 0x47
0258 00da | | Load_Top At_Offset_2
0259 01d6 | | Execute Vector,Field_Write
025a 4820 |H | Short_Literal 0x20
025b 4848 |HH | Short_Literal 0x48
025c 00da | | Load_Top At_Offset_2
025d 01d6 | | Execute Vector,Field_Write
025e 4820 |H | Short_Literal 0x20
025f 4849 |HI | Short_Literal 0x49
0260 00da | | Load_Top At_Offset_2
0261 01d6 | | Execute Vector,Field_Write
0262 4820 |H | Short_Literal 0x20
0263 484a |HJ | Short_Literal 0x4a
0264 00da | | Load_Top At_Offset_2
0265 01d6 | | Execute Vector,Field_Write
0266 4820 |H | Short_Literal 0x20
0267 484b |HK | Short_Literal 0x4b
0268 00da | | Load_Top At_Offset_2
0269 01d6 | | Execute Vector,Field_Write
026a 4820 |H | Short_Literal 0x20
026b 484c |HL | Short_Literal 0x4c
026c 00da | | Load_Top At_Offset_2
026d 01d6 | | Execute Vector,Field_Write
026e 4820 |H | Short_Literal 0x20
026f 484d |HM | Short_Literal 0x4d
0270 00da | | Load_Top At_Offset_2
0271 01d6 | | Execute Vector,Field_Write
0272 4820 |H | Short_Literal 0x20
0273 484e |HN | Short_Literal 0x4e
0274 00da | | Load_Top At_Offset_2
0275 01d6 | | Execute Vector,Field_Write
0276 4820 |H | Short_Literal 0x20
0277 484f |HO | Short_Literal 0x4f
0278 00da | | Load_Top At_Offset_2
0279 01d6 | | Execute Vector,Field_Write
027a 4820 |H | Short_Literal 0x20
027b 4850 |HP | Short_Literal 0x50
027c 00da | | Load_Top At_Offset_2
027d 01d6 | | Execute Vector,Field_Write
027e 00d9 | | Load_Top At_Offset_1
027f 01d4 | | Execute Vector,Structure_Write
0280 00da | | Load_Top At_Offset_2
0281 0337 | 7 | Declare_Variable Array
0282 00d9 | | Load_Top At_Offset_1
0283 e005 | | Load 0x0,0x5
0284 180e | | Execute Package,Field_Execute,Field_Number 0xe
0285 00d9 | | Load_Top At_Offset_1
0286 01d4 | | Execute Vector,Structure_Write
0287 e006 | | Load 0x0,0x6
0288 e007 | | Load 0x0,0x7
0289 e21f | | Load 0x1,0x1f
028a e002 | | Load 0x0,0x2
028b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
028c 0387 | | Declare_Variable Package
028d 00d8 | | Load_Top At_Offset_0
028e 020f | | Execute Module,Activate
028f 029d 032b | +| Declare_Subprogram For_Outer_Call,INIT_0328
0291 029d 038b | | Declare_Subprogram For_Outer_Call,INIT_0388
0293 029b 039b | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0398
0295 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0296 00c7 | | Action Elaborate_Subprogram
0297 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0298 00c7 | | Action Elaborate_Subprogram
0299 1d13 | | Execute_Immediate Reference_Lex_1,0x13
029a 00c7 | | Action Elaborate_Subprogram
029b BODY_0008:
029b 00bc | | Action Signal_Activated
029c 00bb | | Action Signal_Completion
029d 0000 0000 | | .XXX[0x3]
029f 0000 | |
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 4607 |F | Jump_Case 0x7
02a4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
02a5 7807 |x | Jump 0x2ad ; case 0x1
02a6 780a |x | Jump 0x2b1 ; case 0x2
02a7 780e |x | Jump 0x2b6 ; case 0x3
02a8 7811 |x | Jump 0x2ba ; case 0x4
02a9 7812 |x | Jump 0x2bc ; case 0x5
02aa 7813 |x | Jump 0x2be ; case 0x6
02ab 7816 |x | Jump 0x2c2 ; case 0x7
02ac 4302 |C | .XXX[0x1]
02ad 00da | | Load_Top At_Offset_2
02ae 0091 05f7 | | Action Push_String_Extended_Indexed,0x5f7 ; "COMMENTS"
02b0 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
02b1 00db | | Load_Top At_Offset_3
02b2 00db | | Load_Top At_Offset_3
02b3 00e0 | | Load_Encached Standard_Cache
02b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02b5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02b6 00da | | Load_Top At_Offset_2
02b7 00e0 | | Load_Encached Standard_Cache
02b8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02b9 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
02ba 00db | | Load_Top At_Offset_3
02bb 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02bc 00db | | Load_Top At_Offset_3
02bd 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02be e20d | | Load 0x1,0xd
02bf 00dc | | Load_Top At_Offset_4
02c0 0267 | g | Execute Discrete,Predecessor
02c1 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02c2 e20d | | Load 0x1,0xd
02c3 00dc | | Load_Top At_Offset_4
02c4 0268 | h | Execute Discrete,Successor
02c5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
02c6 0000 0000 | | .XXX[0x2]
02c8 0000 0000 | | .LITERAL {0x00000000, 0x00001400}
02cc 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02e4 | | .CONST 0x02e4 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0005 | | .CONST 0x0005 ; Number of locals
02d3 INIT_02d0:
02d3 029f 03fb | | Declare_Subprogram For_Call,INIT_03f8
02d5 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
02d6 00c6 | | Action Check_Subprogram_Elaborated
02d7 4802 |H | Short_Literal 0x2
02d8 4802 |H | Short_Literal 0x2
02d9 0099 | | Action Reference_Dynamic
02da 0093 0000 | | PushFullAddress InMicrocode
02dc 6017 |` | Indirect_Literal Discrete,0x2f4,{0x80000000, 0x00020000}
02dd 0273 | s | Execute Discrete,Plus
02de e008 | | Load 0x0,0x8
02df 0273 | s | Execute Discrete,Plus
02e0 e009 | | Load 0x0,0x9
02e1 0273 | s | Execute Discrete,Plus
02e2 4805 |H | Short_Literal 0x5
02e3 0007 | | Action Break_Optional
02e4 BODY_02d0:
02e4 e5fb | | Load 0x2,-0x5
02e5 e5fc | | Load 0x2,-0x4
02e6 e5fd | | Load 0x2,-0x3
02e7 e5fe | | Load 0x2,-0x2
02e8 4800 |H | Short_Literal 0x0
02e9 e5ff | | Load 0x2,-0x1
02ea 4803 |H | Short_Literal 0x3
02eb 4802 |H | Short_Literal 0x2
02ec 0099 | | Action Reference_Dynamic
02ed 4804 |H | Short_Literal 0x4
02ee 4802 |H | Short_Literal 0x2
02ef 0099 | | Action Reference_Dynamic
02f0 8225 | % | Call 0x1,0x25
02f1 4506 |E | Exit_Subprogram 0x6
02f2 0000 0000 | | .XXX[0x2]
02f4 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 030c | | .CONST 0x030c ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0004 | | .CONST 0x0004 ; Number of locals
02fb INIT_02f8:
02fb 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
02fc 00c6 | | Action Check_Subprogram_Elaborated
02fd 4ffe |O | Short_Literal 0x7fe
02fe 4802 |H | Short_Literal 0x2
02ff 0099 | | Action Reference_Dynamic
0300 0093 0000 | | PushFullAddress InMicrocode
0302 601d |` | Indirect_Literal Discrete,0x320,{0x80000000, 0x00010000}
0303 0273 | s | Execute Discrete,Plus
0304 e5ff | | Load 0x2,-0x1
0305 6016 |` | Indirect_Literal Discrete,0x31c,{0x00000000, 0x0000ffff}
0306 0279 | y | Execute Discrete,And
0307 0273 | s | Execute Discrete,Plus
0308 e00a | | Load 0x0,0xa
0309 0273 | s | Execute Discrete,Plus
030a 4804 |H | Short_Literal 0x4
030b 0007 | | Action Break_Optional
030c BODY_02f8:
030c e5f9 | | Load 0x2,-0x7
030d e5fa | | Load 0x2,-0x6
030e e5fb | | Load 0x2,-0x5
030f e5fc | | Load 0x2,-0x4
0310 4800 |H | Short_Literal 0x0
0311 e5fd | | Load 0x2,-0x3
0312 4802 |H | Short_Literal 0x2
0313 4802 |H | Short_Literal 0x2
0314 0099 | | Action Reference_Dynamic
0315 4803 |H | Short_Literal 0x3
0316 4802 |H | Short_Literal 0x2
0317 0099 | | Action Reference_Dynamic
0318 8225 | % | Call 0x1,0x25
0319 4508 |E | Exit_Subprogram 0x8
031a 0000 0000 | | .XXX[0x2]
031c 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0320 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0324 0000 0000 | | .BLANK 0000[0x4]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0330 | 0 | .CONST 0x0330 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0002 | | .CONST 0x0002 ; Number of locals
032b INIT_0328:
032b e21e | | Load 0x1,0x1e
032c 01da | | Execute Vector,Bounds
032d 00e9 | | Load_Encached String_Cache
032e 035b | [ | Declare_Type Array,Constrained
032f 0337 | 7 | Declare_Variable Array
0330 BODY_0328:
0330 00d8 | | Load_Top At_Offset_0
0331 4801 |H | Short_Literal 0x1
0332 4803 |H | Short_Literal 0x3
0333 00da | | Load_Top At_Offset_2
0334 035b | [ | Declare_Type Array,Constrained
0335 00d9 | | Load_Top At_Offset_1
0336 01cd | | Execute Vector,Slice_Reference
0337 4801 |H | Short_Literal 0x1
0338 4803 |H | Short_Literal 0x3
0339 00e9 | | Load_Encached String_Cache
033a 035b | [ | Declare_Type Array,Constrained
033b 0337 | 7 | Declare_Variable Array
033c 482a |H* | Short_Literal 0x2a
033d 4801 |H | Short_Literal 0x1
033e 00da | | Load_Top At_Offset_2
033f 01d6 | | Execute Vector,Field_Write
0340 482a |H* | Short_Literal 0x2a
0341 4802 |H | Short_Literal 0x2
0342 00da | | Load_Top At_Offset_2
0343 01d6 | | Execute Vector,Field_Write
0344 482a |H* | Short_Literal 0x2a
0345 4803 |H | Short_Literal 0x3
0346 00da | | Load_Top At_Offset_2
0347 01d6 | | Execute Vector,Field_Write
0348 00cd | | Action Spare6_Action
0349 4801 |H | Short_Literal 0x1
034a 4803 |H | Short_Literal 0x3
034b 00db | | Load_Top At_Offset_3
034c 01ce | | Execute Vector,Slice_Write
034d 00d1 | | Pop_Control Pop_Count_1
034e 00db | | Load_Top At_Offset_3
034f 01db | | Execute Vector,Length
0350 0d4e | N | Execute_Immediate Less,0x4e
0351 6819 |h | Jump_Zero 0x36b
0352 00db | | Load_Top At_Offset_3
0353 4801 |H | Short_Literal 0x1
0354 484d |HM | Short_Literal 0x4d
0355 e5ff | | Load 0x2,-0x1
0356 01db | | Execute Vector,Length
0357 0272 | r | Execute Discrete,Minus
0358 00e9 | | Load_Encached String_Cache
0359 035b | [ | Declare_Type Array,Constrained
035a 0337 | 7 | Declare_Variable Array
035b 00d8 | | Load_Top At_Offset_0
035c 01dc | | Execute Vector,Last
035d 4801 |H | Short_Literal 0x1
035e 0263 | c | Execute Discrete,Above_Bound
035f 7005 |p | Jump_Nonzero 0x365
0360 4820 |H | Short_Literal 0x20
0361 00d9 | | Load_Top At_Offset_1
0362 e404 | | Load 0x2,0x4
0363 01d6 | | Execute Vector,Field_Write
0364 3ffb |? | Loop_Increasing 0x360
0365 01cc | | Execute Vector,Catenate
0366 4804 |H | Short_Literal 0x4
0367 4850 |HP | Short_Literal 0x50
0368 00db | | Load_Top At_Offset_3
0369 01ce | | Execute Vector,Slice_Write
036a 7811 |x | Jump 0x37c
036b 00db | | Load_Top At_Offset_3
036c 01dd | | Execute Vector,First
036d e5ff | | Load 0x2,-0x1
036e 01dd | | Execute Vector,First
036f 0a4f | O | Execute_Immediate Plus,0x4f
0370 0afd | | Execute_Immediate Plus,-0x3
0371 00d8 | | Load_Top At_Offset_0
0372 00e2 | | Load_Encached Integer_Cache
0373 0260 | ` | Execute Discrete,In_Type
0374 7001 |p | Jump_Nonzero 0x376
0375 0801 | | Execute_Immediate Raise,0x1
0376 e5ff | | Load 0x2,-0x1
0377 01cf | | Execute Vector,Slice_Read
0378 4804 |H | Short_Literal 0x4
0379 4850 |HP | Short_Literal 0x50
037a 00db | | Load_Top At_Offset_3
037b 01ce | | Execute Vector,Slice_Write
037c 00d8 | | Load_Top At_Offset_0
037d e005 | | Load 0x0,0x5
037e 180e | | Execute Package,Field_Execute,Field_Number 0xe
037f e21e | | Load 0x1,0x1e
0380 01c6 | | Execute Vector,Convert_To_Formal
0381 4401 |D | Exit_Subprogram With_Result,0x1
0382 0000 0000 | | .BLANK 0000[0x6]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 480a |H | Short_Literal 0xa
038c 00db | | Load_Top At_Offset_3
038d 01cb | | Execute Vector,Append
038e e21f | | Load 0x1,0x1f
038f 01c3 | | Execute Vector,Check_In_Type
0390 e215 | | Load 0x1,0x15
0391 e222 | " | Load 0x1,0x22
0392 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0393 4502 |E | Exit_Subprogram 0x2
0394 0000 0000 | | .BLANK 0000[0x4]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03b8 | | .CONST 0x03b8 ; Address of begin
0399 03eb | | .CONST 0x03eb ; Address of exception handler
039a 000b | | .CONST 0x000b ; Number of locals
039b INIT_0398:
039b 4801 |H | Short_Literal 0x1
039c e5f8 | | Load 0x2,-0x8
039d e004 | | Load 0x0,0x4
039e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
039f 035b | [ | Declare_Type Array,Constrained
03a0 e00b | | Load 0x0,0xb
03a1 e00c | | Load 0x0,0xc
03a2 00da | | Load_Top At_Offset_2
03a3 e002 | | Load 0x0,0x2
03a4 1b19 | | Execute Package,Field_Read,Field_Number 0x19
03a5 0387 | | Declare_Variable Package
03a6 00d8 | | Load_Top At_Offset_0
03a7 020f | | Execute Module,Activate
03a8 029f 0403 | | Declare_Subprogram For_Call,INIT_0400
03aa 029f 042b | +| Declare_Subprogram For_Call,INIT_0428
03ac 029f 0443 | C| Declare_Subprogram For_Call,INIT_0440
03ae 029f 047b | {| Declare_Subprogram For_Call,INIT_0478
03b0 029f 04cb | | Declare_Subprogram For_Call,INIT_04c8
03b2 029f 0533 | 3| Declare_Subprogram For_Call,INIT_0530
03b4 029f 0573 | s| Declare_Subprogram For_Call,INIT_0570
03b6 029f 059b | | Declare_Subprogram For_Call,INIT_0598
03b8 BODY_0398:
03b8 8409 | | Call 0x2,0x9
03b9 00cf | | Action Mark_Auxiliary
03ba e20d | | Load 0x1,0xd
03bb 0265 | e | Execute Discrete,Reverse_Bounds
03bc 0007 | | Action Break_Optional
03bd 00d8 | | Load_Top At_Offset_0
03be 840b | | Call 0x2,0xb
03bf 7002 |p | Jump_Nonzero 0x3c2
03c0 00d2 | | Pop_Control Pop_Count_2
03c1 7826 |x& | Jump 0x3e8
03c2 e217 | | Load 0x1,0x17
03c3 00d9 | | Load_Top At_Offset_1
03c4 e21c | | Load 0x1,0x1c
03c5 01d7 | | Execute Vector,Field_Read
03c6 0f00 | | Execute_Immediate Equal,0x0
03c7 0278 | x | Execute Discrete,Or
03c8 681d |h | Jump_Zero 0x3e6
03c9 00d8 | | Load_Top At_Offset_0
03ca e5fb | | Load 0x2,-0x5
03cb 01d7 | | Execute Vector,Field_Read
03cc 6814 |h | Jump_Zero 0x3e1
03cd 00d8 | | Load_Top At_Offset_0
03ce 85fe | | Call 0x2,-0x2
03cf 7002 |p | Jump_Nonzero 0x3d2
03d0 00d2 | | Pop_Control Pop_Count_2
03d1 7816 |x | Jump 0x3e8
03d2 6021 |`! | Indirect_Literal Discrete,0x3f4,{0x00000000, 0x7fffffff}
03d3 8406 | | Call 0x2,0x6
03d4 00d8 | | Load_Top At_Offset_0
03d5 e21a | | Load 0x1,0x1a
03d6 01d7 | | Execute Vector,Field_Read
03d7 0227 | ' | Execute Access,All_Reference
03d8 8408 | | Call 0x2,0x8
03d9 601a |` | Indirect_Literal Discrete,0x3f4,{0x00000000, 0x7fffffff}
03da 8406 | | Call 0x2,0x6
03db 00d8 | | Load_Top At_Offset_0
03dc 0f09 | | Execute_Immediate Equal,0x9
03dd 6808 |h | Jump_Zero 0x3e6
03de 6015 |` | Indirect_Literal Discrete,0x3f4,{0x00000000, 0x7fffffff}
03df 8406 | | Call 0x2,0x6
03e0 7805 |x | Jump 0x3e6
03e1 00d8 | | Load_Top At_Offset_0
03e2 e21a | | Load 0x1,0x1a
03e3 01d7 | | Execute Vector,Field_Read
03e4 0227 | ' | Execute Access,All_Reference
03e5 8407 | | Call 0x2,0x7
03e6 00c8 | | Action Pop_Auxiliary_Range
03e7 3fd5 |? | Loop_Increasing 0x3bd
03e8 00ce | | Action Pop_Auxiliary
03e9 840a | | Call 0x2,0xa
03ea 4509 |E | Exit_Subprogram 0x9
03eb TRAP_0398:
03eb 0007 | | Action Break_Optional
03ec e215 | | Load 0x1,0x15
03ed e002 | | Load 0x0,0x2
03ee 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03ef c215 | | Store 0x1,0x15
03f0 00d8 | | Load_Top At_Offset_0
03f1 0101 | | Execute Exception,Reraise
03f2 0000 0000 | | .XXX[0x2]
03f4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
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 4401 |D | Exit_Subprogram With_Result,0x1
03fd 0000 0000 | | .XXX[0x3]
03ff 0000 | |
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 0415 | | .CONST 0x0415 ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 00da | | Load_Top At_Offset_2
0404 00d8 | | Load_Top At_Offset_0
0405 e00d | | Load 0x0,0xd
0406 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0407 0260 | ` | Execute Discrete,In_Type
0408 7001 |p | Jump_Nonzero 0x40a
0409 0801 | | Execute_Immediate Raise,0x1
040a e216 | | Load 0x1,0x16
040b e00e | | Load 0x0,0xe
040c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
040d 00da | | Load_Top At_Offset_2
040e 0e50 | P | Execute_Immediate Not_Equal,0x50
040f 6804 |h | Jump_Zero 0x414
0410 4800 |H | Short_Literal 0x0
0411 e216 | | Load 0x1,0x16
0412 e00e | | Load 0x0,0xe
0413 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0414 4502 |E | Exit_Subprogram 0x2
0415 TRAP_0400:
0415 0007 | | Action Break_Optional
0416 e00f | | Load 0x0,0xf
0417 180e | | Execute Package,Field_Execute,Field_Number 0xe
0418 4808 |H | Short_Literal 0x8
0419 0092 0602 | | Action Push_String_Extended,0x602 ; "unexpected exception from Set_Block_Size or Set_Streaming_Mode(On):"
041b 4801 |H | Short_Literal 0x1
041c 4801 |H | Short_Literal 0x1
041d e010 | | Load 0x0,0x10
041e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
041f 01cc | | Execute Vector,Catenate
0420 e011 | | Load 0x0,0x11
0421 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0422 00d8 | | Load_Top At_Offset_0
0423 0101 | | Execute Exception,Reraise
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b | + | .CONST 0x042b ; Address of begin
0429 0430 | 0 | .CONST 0x0430 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b BODY_0428:
042b INIT_0428:
042b 4801 |H | Short_Literal 0x1
042c e216 | | Load 0x1,0x16
042d e00e | | Load 0x0,0xe
042e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
042f 4501 |E | Exit_Subprogram 0x1
0430 TRAP_0428:
0430 0007 | | Action Break_Optional
0431 e00f | | Load 0x0,0xf
0432 180e | | Execute Package,Field_Execute,Field_Number 0xe
0433 4808 |H | Short_Literal 0x8
0434 0092 0603 | | Action Push_String_Extended,0x603 ; "unexpected exception from Set_Streaming_Mode(Off):"
0436 4801 |H | Short_Literal 0x1
0437 4801 |H | Short_Literal 0x1
0438 e010 | | Load 0x0,0x10
0439 1815 | | Execute Package,Field_Execute,Field_Number 0x15
043a 01cc | | Execute Vector,Catenate
043b e011 | | Load 0x0,0x11
043c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
043d 00d8 | | Load_Top At_Offset_0
043e 0101 | | Execute Exception,Reraise
043f 0000 | | .XXX[0x1]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0448 | H | .CONST 0x0448 ; Address of begin
0441 0469 | i | .CONST 0x0469 ; Address of exception handler
0442 0004 | | .CONST 0x0004 ; Number of locals
0443 INIT_0440:
0443 00e3 | | Load_Encached Natural_Cache
0444 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0445 00e3 | | Load_Encached Natural_Cache
0446 e21e | | Load 0x1,0x1e
0447 0337 | 7 | Declare_Variable Array
0448 BODY_0440:
0448 4850 |HP | Short_Literal 0x50
0449 8404 | | Call 0x2,0x4
044a 00cf | | Action Mark_Auxiliary
044b 7816 |x | Jump 0x462
044c 00e3 | | Load_Encached Natural_Cache
044d 00da | | Load_Top At_Offset_2
044e e216 | | Load 0x1,0x16
044f e00e | | Load 0x0,0xe
0450 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0451 00d1 | | Pop_Control Pop_Count_1
0452 005b | [ | Store_Top Discrete,At_Offset_3
0453 00da | | Load_Top At_Offset_2
0454 7003 |p | Jump_Nonzero 0x458
0455 e221 | ! | Load 0x1,0x21
0456 8224 | $ | Call 0x1,0x24
0457 780e |x | Jump 0x466
0458 00da | | Load_Top At_Offset_2
0459 0f50 | P | Execute_Immediate Equal,0x50
045a 7001 |p | Jump_Nonzero 0x45c
045b 0887 | | Execute_Immediate Raise,0x87
045c 00d9 | | Load_Top At_Offset_1
045d 8224 | $ | Call 0x1,0x24
045e 00db | | Load_Top At_Offset_3
045f 0a01 | | Execute_Immediate Plus,0x1
0460 c602 | | Store 0x3,0x2
0461 00c9 | | Action Pop_Auxiliary_Loop
0462 00db | | Load_Top At_Offset_3
0463 e7ff | | Load 0x3,-0x1
0464 027c | | | Execute Discrete,Less
0465 77e6 |w | Jump_Nonzero 0x44c
0466 00ce | | Action Pop_Auxiliary
0467 8405 | | Call 0x2,0x5
0468 4502 |E | Exit_Subprogram 0x2
0469 TRAP_0440:
0469 0007 | | Action Break_Optional
046a e00f | | Load 0x0,0xf
046b 180e | | Execute Package,Field_Execute,Field_Number 0xe
046c 4808 |H | Short_Literal 0x8
046d 0092 0604 | | Action Push_String_Extended,0x604 ; "unexpected exception reading labels: "
046f 4801 |H | Short_Literal 0x1
0470 4801 |H | Short_Literal 0x1
0471 e010 | | Load 0x0,0x10
0472 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0473 01cc | | Execute Vector,Catenate
0474 e011 | | Load 0x0,0x11
0475 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0476 00d8 | | Load_Top At_Offset_0
0477 0101 | | Execute Exception,Reraise
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047e | ~ | .CONST 0x047e ; Address of begin
0479 04b2 | | .CONST 0x04b2 ; Address of exception handler
047a 0003 | | .CONST 0x0003 ; Number of locals
047b INIT_0478:
047b e00e | | Load 0x0,0xe
047c 1b18 | | Execute Package,Field_Read,Field_Number 0x18
047d 00e3 | | Load_Encached Natural_Cache
047e BODY_0478:
047e e7ff | | Load 0x3,-0x1
047f 0092 0605 | | Action Push_String_Extended,0x605 ; " Skipped"
0481 01cc | | Execute Vector,Catenate
0482 8223 | # | Call 0x1,0x23
0483 8224 | $ | Call 0x1,0x24
0484 00e3 | | Load_Encached Natural_Cache
0485 e00e | | Load 0x0,0xe
0486 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0487 4803 |H | Short_Literal 0x3
0488 e216 | | Load 0x1,0x16
0489 e00e | | Load 0x0,0xe
048a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
048b 005b | [ | Store_Top Discrete,At_Offset_3
048c 0059 | Y | Store_Top Discrete,At_Offset_1
048d 00d8 | | Load_Top At_Offset_0
048e 0e03 | | Execute_Immediate Not_Equal,0x3
048f 6821 |h! | Jump_Zero 0x4b1
0490 e00f | | Load 0x0,0xf
0491 180e | | Execute Package,Field_Execute,Field_Number 0xe
0492 4807 |H | Short_Literal 0x7
0493 0092 0606 | | Action Push_String_Extended,0x606 ; "skipping "
0495 e7ff | | Load 0x3,-0x1
0496 01cc | | Execute Vector,Catenate
0497 0092 0607 | | Action Push_String_Extended,0x607 ; " file skipped"
0499 01cc | | Execute Vector,Catenate
049a 00db | | Load_Top At_Offset_3
049b 00e0 | | Load_Encached Standard_Cache
049c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
049d 01cc | | Execute Vector,Catenate
049e 0092 0608 | | Action Push_String_Extended,0x608 ; " instead of"
04a0 01cc | | Execute Vector,Catenate
04a1 0092 0609 | | Action Push_String_Extended,0x609 ; " 3"
04a3 01cc | | Execute Vector,Catenate
04a4 0092 060a | | Action Push_String_Extended,0x60a ; " marks; obstacle encountered => "
04a6 01cc | | Execute Vector,Catenate
04a7 e602 | | Load 0x3,0x2
04a8 e00e | | Load 0x0,0xe
04a9 1b18 | | Execute Package,Field_Read,Field_Number 0x18
04aa 011c | | Execute Any,Convert_Unchecked
04ab 1c01 | | Execute_Immediate Run_Utility,0x1
04ac 01cc | | Execute Vector,Catenate
04ad e011 | | Load 0x0,0x11
04ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04af e214 | | Load 0x1,0x14
04b0 0257 | W | Execute Discrete,Raise
04b1 4502 |E | Exit_Subprogram 0x2
04b2 TRAP_0478:
04b2 0007 | | Action Break_Optional
04b3 e00f | | Load 0x0,0xf
04b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
04b5 4808 |H | Short_Literal 0x8
04b6 0092 060b | | Action Push_String_Extended,0x60b ; "unexpected exception skipping "
04b8 e7ff | | Load 0x3,-0x1
04b9 01cc | | Execute Vector,Catenate
04ba 0092 060c | | Action Push_String_Extended,0x60c ; ": "
04bc 01cc | | Execute Vector,Catenate
04bd 4801 |H | Short_Literal 0x1
04be 4801 |H | Short_Literal 0x1
04bf e010 | | Load 0x0,0x10
04c0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04c1 01cc | | Execute Vector,Catenate
04c2 e011 | | Load 0x0,0x11
04c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04c4 00d8 | | Load_Top At_Offset_0
04c5 0101 | | Execute Exception,Reraise
04c6 0000 0000 | | .XXX[0x2]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04d5 | | .CONST 0x04d5 ; Address of begin
04c9 0518 | | .CONST 0x0518 ; Address of exception handler
04ca 0005 | | .CONST 0x0005 ; Number of locals
04cb INIT_04c8:
04cb e002 | | Load 0x0,0x2
04cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04cd 02c7 | | Declare_Variable Any
04ce 00d8 | | Load_Top At_Offset_0
04cf 1c00 | | Execute_Immediate Run_Utility,0x0
04d0 00e3 | | Load_Encached Natural_Cache
04d1 e402 | | Load 0x2,0x2
04d2 0337 | 7 | Declare_Variable Array
04d3 e00e | | Load 0x0,0xe
04d4 1b19 | | Execute Package,Field_Read,Field_Number 0x19
04d5 BODY_04c8:
04d5 e5f8 | | Load 0x2,-0x8
04d6 8404 | | Call 0x2,0x4
04d7 00db | | Load_Top At_Offset_3
04d8 00ea | | Load_Encached Null_String_Cache
04d9 482e |H. | Short_Literal 0x2e
04da e5fd | | Load 0x2,-0x3
04db 01cb | | Execute Vector,Append
04dc e7ff | | Load 0x3,-0x1
04dd 01cc | | Execute Vector,Catenate
04de 4801 |H | Short_Literal 0x1
04df e002 | | Load 0x0,0x2
04e0 180f | | Execute Package,Field_Execute,Field_Number 0xf
04e1 c602 | | Store 0x3,0x2
04e2 e7ff | | Load 0x3,-0x1
04e3 8223 | # | Call 0x1,0x23
04e4 8224 | $ | Call 0x1,0x24
04e5 00cf | | Action Mark_Auxiliary
04e6 e00e | | Load 0x0,0xe
04e7 1b19 | | Execute Package,Field_Read,Field_Number 0x19
04e8 00e3 | | Load_Encached Natural_Cache
04e9 e604 | | Load 0x3,0x4
04ea e216 | | Load 0x1,0x16
04eb e00e | | Load 0x0,0xe
04ec 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04ed 00d1 | | Pop_Control Pop_Count_1
04ee c603 | | Store 0x3,0x3
04ef 005a | Z | Store_Top Discrete,At_Offset_2
04f0 00d9 | | Load_Top At_Offset_1
04f1 6814 |h | Jump_Zero 0x506
04f2 e00f | | Load 0x0,0xf
04f3 180e | | Execute Package,Field_Execute,Field_Number 0xe
04f4 4807 |H | Short_Literal 0x7
04f5 0092 060d | | Action Push_String_Extended,0x60d ; "failed to read "
04f7 e7ff | | Load 0x3,-0x1
04f8 01cc | | Execute Vector,Catenate
04f9 0092 060e | | Action Push_String_Extended,0x60e ; " from tape because "
04fb 01cc | | Execute Vector,Catenate
04fc e605 | | Load 0x3,0x5
04fd e00e | | Load 0x0,0xe
04fe 1b19 | | Execute Package,Field_Read,Field_Number 0x19
04ff 011c | | Execute Any,Convert_Unchecked
0500 1c01 | | Execute_Immediate Run_Utility,0x1
0501 01cc | | Execute Vector,Catenate
0502 e011 | | Load 0x0,0x11
0503 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0504 e214 | | Load 0x1,0x14
0505 0257 | W | Execute Discrete,Raise
0506 00db | | Load_Top At_Offset_3
0507 7003 |p | Jump_Nonzero 0x50b
0508 e221 | ! | Load 0x1,0x21
0509 8224 | $ | Call 0x1,0x24
050a 7806 |x | Jump 0x511
050b 00da | | Load_Top At_Offset_2
050c e602 | | Load 0x3,0x2
050d e403 | | Load 0x2,0x3
050e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
050f 00c9 | | Action Pop_Auxiliary_Loop
0510 7fd5 | | Jump 0x4e6
0511 00ce | | Action Pop_Auxiliary
0512 00db | | Load_Top At_Offset_3
0513 e002 | | Load 0x0,0x2
0514 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0515 c602 | | Store 0x3,0x2
0516 8405 | | Call 0x2,0x5
0517 4502 |E | Exit_Subprogram 0x2
0518 TRAP_04c8:
0518 0007 | | Action Break_Optional
0519 e00f | | Load 0x0,0xf
051a 180e | | Execute Package,Field_Execute,Field_Number 0xe
051b 4808 |H | Short_Literal 0x8
051c 0092 060f | | Action Push_String_Extended,0x60f ; "unexpected exception reading "
051e e7ff | | Load 0x3,-0x1
051f 01cc | | Execute Vector,Catenate
0520 0092 0610 | | Action Push_String_Extended,0x610 ; " from tape: "
0522 01cc | | Execute Vector,Catenate
0523 4801 |H | Short_Literal 0x1
0524 4801 |H | Short_Literal 0x1
0525 e010 | | Load 0x0,0x10
0526 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0527 01cc | | Execute Vector,Catenate
0528 e011 | | Load 0x0,0x11
0529 1813 | | Execute Package,Field_Execute,Field_Number 0x13
052a 00d8 | | Load_Top At_Offset_0
052b 0101 | | Execute Exception,Reraise
052c 0000 0000 | | .BLANK 0000[0x4]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0535 | 5 | .CONST 0x0535 ; Address of begin
0531 0556 | V | .CONST 0x0556 ; Address of exception handler
0532 0002 | | .CONST 0x0002 ; Number of locals
0533 INIT_0530:
0533 029f 05b3 | | Declare_Subprogram For_Call,INIT_05b0
0535 BODY_0530:
0535 e215 | | Load 0x1,0x15
0536 00ea | | Load_Encached Null_String_Cache
0537 482e |H. | Short_Literal 0x2e
0538 e5fd | | Load 0x2,-0x3
0539 01cb | | Execute Vector,Append
053a e21d | | Load 0x1,0x1d
053b 01cc | | Execute Vector,Catenate
053c 4801 |H | Short_Literal 0x1
053d e002 | | Load 0x0,0x2
053e 180f | | Execute Package,Field_Execute,Field_Number 0xf
053f c215 | | Store 0x1,0x15
0540 e216 | | Load 0x1,0x16
0541 e012 | | Load 0x0,0x12
0542 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0543 e013 | | Load 0x0,0x13
0544 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0545 00ea | | Load_Encached Null_String_Cache
0546 e5f9 | | Load 0x2,-0x7
0547 e014 | | Load 0x0,0x14
0548 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0549 00d9 | | Load_Top At_Offset_1
054a 00d0 | | Action Swap_Control
054b 0260 | ` | Execute Discrete,In_Type
054c 7001 |p | Jump_Nonzero 0x54e
054d 0801 | | Execute_Immediate Raise,0x1
054e e014 | | Load 0x0,0x14
054f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0550 4800 |H | Short_Literal 0x0
0551 e003 | | Load 0x0,0x3
0552 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0553 c216 | | Store 0x1,0x16
0554 8602 | | Call 0x3,0x2
0555 4501 |E | Exit_Subprogram 0x1
0556 TRAP_0530:
0556 e214 | | Load 0x1,0x14
0557 010f | | Execute Exception,Equal
0558 6802 |h | Jump_Zero 0x55b
0559 00d8 | | Load_Top At_Offset_0
055a 0101 | | Execute Exception,Reraise
055b e00f | | Load 0x0,0xf
055c 180e | | Execute Package,Field_Execute,Field_Number 0xe
055d 4808 |H | Short_Literal 0x8
055e 0092 0611 | | Action Push_String_Extended,0x611 ; "unexpected exception opening tape: "
0560 4801 |H | Short_Literal 0x1
0561 4801 |H | Short_Literal 0x1
0562 e010 | | Load 0x0,0x10
0563 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0564 01cc | | Execute Vector,Catenate
0565 e011 | | Load 0x0,0x11
0566 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0567 00d8 | | Load_Top At_Offset_0
0568 0101 | | Execute Exception,Reraise
0569 0000 0000 | | .BLANK 0000[0x7]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0582 | | .CONST 0x0582 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 e215 | | Load 0x1,0x15
0574 e002 | | Load 0x0,0x2
0575 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0576 c215 | | Store 0x1,0x15
0577 e5fa | | Load 0x2,-0x6
0578 6804 |h | Jump_Zero 0x57d
0579 e216 | | Load 0x1,0x16
057a e00e | | Load 0x0,0xe
057b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
057c 4501 |E | Exit_Subprogram 0x1
057d e216 | | Load 0x1,0x16
057e e003 | | Load 0x0,0x3
057f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0580 c216 | | Store 0x1,0x16
0581 4501 |E | Exit_Subprogram 0x1
0582 TRAP_0570:
0582 0007 | | Action Break_Optional
0583 e00f | | Load 0x0,0xf
0584 180e | | Execute Package,Field_Execute,Field_Number 0xe
0585 4808 |H | Short_Literal 0x8
0586 0092 0612 | | Action Push_String_Extended,0x612 ; "unexpected exception closing tape: "
0588 4801 |H | Short_Literal 0x1
0589 4801 |H | Short_Literal 0x1
058a e010 | | Load 0x0,0x10
058b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
058c 01cc | | Execute Vector,Catenate
058d e011 | | Load 0x0,0x11
058e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
058f 00d8 | | Load_Top At_Offset_0
0590 0101 | | Execute Exception,Reraise
0591 0000 0000 | | .BLANK 0000[0x7]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b | | .CONST 0x059b ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0001 | | .CONST 0x0001 ; Number of locals
059b BODY_0598:
059b INIT_0598:
059b 00cf | | Action Mark_Auxiliary
059c 4809 |H | Short_Literal 0x9
059d e7ff | | Load 0x3,-0x1
059e 0263 | c | Execute Discrete,Above_Bound
059f 7008 |p | Jump_Nonzero 0x5a8
05a0 00d8 | | Load_Top At_Offset_0
05a1 e5fb | | Load 0x2,-0x5
05a2 01d7 | | Execute Vector,Field_Read
05a3 6802 |h | Jump_Zero 0x5a6
05a4 4801 |H | Short_Literal 0x1
05a5 4401 |D | Exit_Subprogram With_Result,0x1
05a6 00c8 | | Action Pop_Auxiliary_Range
05a7 3ff8 |? | Loop_Increasing 0x5a0
05a8 00ce | | Action Pop_Auxiliary
05a9 4800 |H | Short_Literal 0x0
05aa 4401 |D | Exit_Subprogram With_Result,0x1
05ab 0000 0000 | | .BLANK 0000[0x5]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b6 | | .CONST 0x05b6 ; Address of begin
05b1 05e8 | | .CONST 0x05e8 ; Address of exception handler
05b2 0003 | | .CONST 0x0003 ; Number of locals
05b3 INIT_05b0:
05b3 00e3 | | Load_Encached Natural_Cache
05b4 e21e | | Load 0x1,0x1e
05b5 0337 | 7 | Declare_Variable Array
05b6 BODY_05b0:
05b6 4802 |H | Short_Literal 0x2
05b7 8406 | | Call 0x2,0x6
05b8 4850 |HP | Short_Literal 0x50
05b9 8404 | | Call 0x2,0x4
05ba 00e3 | | Load_Encached Natural_Cache
05bb 00d9 | | Load_Top At_Offset_1
05bc e216 | | Load 0x1,0x16
05bd e00e | | Load 0x0,0xe
05be 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05bf 00d1 | | Pop_Control Pop_Count_1
05c0 005a | Z | Store_Top Discrete,At_Offset_2
05c1 00d9 | | Load_Top At_Offset_1
05c2 0f50 | P | Execute_Immediate Equal,0x50
05c3 7001 |p | Jump_Nonzero 0x5c5
05c4 0887 | | Execute_Immediate Raise,0x87
05c5 00d8 | | Load_Top At_Offset_0
05c6 8224 | $ | Call 0x1,0x24
05c7 8405 | | Call 0x2,0x5
05c8 4850 |HP | Short_Literal 0x50
05c9 00d9 | | Load_Top At_Offset_1
05ca 01d7 | | Execute Vector,Field_Read
05cb 0f31 | 1 | Execute_Immediate Equal,0x31
05cc 6803 |h | Jump_Zero 0x5d0
05cd 4800 |H | Short_Literal 0x0
05ce a217 | | Store_Unchecked 0x1,0x17
05cf 4501 |E | Exit_Subprogram 0x1
05d0 4850 |HP | Short_Literal 0x50
05d1 00d9 | | Load_Top At_Offset_1
05d2 01d7 | | Execute Vector,Field_Read
05d3 0f32 | 2 | Execute_Immediate Equal,0x32
05d4 6803 |h | Jump_Zero 0x5d8
05d5 4801 |H | Short_Literal 0x1
05d6 a217 | | Store_Unchecked 0x1,0x17
05d7 4501 |E | Exit_Subprogram 0x1
05d8 e00f | | Load 0x0,0xf
05d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
05da 4807 |H | Short_Literal 0x7
05db 0092 0613 | | Action Push_String_Extended,0x613 ; "unexpected tape format; UVL2 label = \x22"
05dd 00db | | Load_Top At_Offset_3
05de e005 | | Load 0x0,0x5
05df 180d | | Execute Package,Field_Execute,Field_Number 0xd
05e0 01cc | | Execute Vector,Catenate
05e1 0092 0614 | | Action Push_String_Extended,0x614 ; "\x22"
05e3 01cc | | Execute Vector,Catenate
05e4 e011 | | Load 0x0,0x11
05e5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05e6 e214 | | Load 0x1,0x14
05e7 0257 | W | Execute Discrete,Raise
05e8 TRAP_05b0:
05e8 0007 | | Action Break_Optional
05e9 e00f | | Load 0x0,0xf
05ea 180e | | Execute Package,Field_Execute,Field_Number 0xe
05eb 4808 |H | Short_Literal 0x8
05ec 0092 0604 | | Action Push_String_Extended,0x604 ; "unexpected exception reading labels: "
05ee 4801 |H | Short_Literal 0x1
05ef 4801 |H | Short_Literal 0x1
05f0 e010 | | Load 0x0,0x10
05f1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05f2 01cc | | Execute Vector,Catenate
05f3 e011 | | Load 0x0,0x11
05f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05f5 e214 | | Load 0x1,0x14
05f6 0257 | W | Execute Discrete,Raise
05f7 ; --------------------------------------------------------------------------------------
05f7 ; STRING TABLE
05f7 ; --------------------------------------------------------------------------------------
05f7 003e | > | .STRTAB 0x003e->0x0616 ; "COMMENTS"
; "COMMENTS"
05f8 0044 | D | .STRTAB 0x0044->0x061a ; "IOP_DUMP0"
05f9 004b | K | .STRTAB 0x004b->0x061e ; "IOP_DUMP1"
05fa 0052 | R | .STRTAB 0x0052->0x0623 ; "IOP_DUMP2"
05fb 0059 | Y | .STRTAB 0x0059->0x0627 ; "IOP_DUMP3"
05fc 0060 | ` | .STRTAB 0x0060->0x062c ; "IOP_DUMP4"
05fd 0067 | g | .STRTAB 0x0067->0x0630 ; "SAVED_STATE"
05fe 0070 | p | .STRTAB 0x0070->0x0636 ; "REGISTERS"
05ff 0077 | w | .STRTAB 0x0077->0x063a ; "TAG_STORE"
0600 007e | ~ | .STRTAB 0x007e->0x063f ; "MEMORY"
0601 0082 | | .STRTAB 0x0082->0x0642 ; "LABELS"
0602 0086 | | .STRTAB 0x0086->0x0645 ; "unexpected exception from Set_Block_Size or Set_Streaming_Mode(On):"
0603 00c7 | | .STRTAB 0x00c7->0x0666 ; "unexpected exception from Set_Streaming_Mode(Off):"
0604 00f7 | | .STRTAB 0x00f7->0x067f ; "unexpected exception reading labels: "
; "unexpected exception reading labels: "
0605 011a | | .STRTAB 0x011a->0x0692 ; " Skipped"
0606 0120 | | .STRTAB 0x0120->0x0696 ; "skipping "
0607 0127 | ' | .STRTAB 0x0127->0x069a ; " file skipped"
0608 0132 | 2 | .STRTAB 0x0132->0x06a1 ; " instead of"
0609 013b | ; | .STRTAB 0x013b->0x06a6 ; " 3"
060a 013b | ; | .STRTAB 0x013b->0x06a7 ; " marks; obstacle encountered => "
060b 0159 | Y | .STRTAB 0x0159->0x06b7 ; "unexpected exception skipping "
060c 0175 | u | .STRTAB 0x0175->0x06c6 ; ": "
060d 0175 | u | .STRTAB 0x0175->0x06c7 ; "failed to read "
060e 0182 | | .STRTAB 0x0182->0x06cf ; " from tape because "
060f 0193 | | .STRTAB 0x0193->0x06d8 ; "unexpected exception reading "
0610 01ae | | .STRTAB 0x01ae->0x06e7 ; " from tape: "
0611 01b8 | | .STRTAB 0x01b8->0x06ed ; "unexpected exception opening tape: "
0612 01d9 | | .STRTAB 0x01d9->0x06fe ; "unexpected exception closing tape: "
0613 01fa | | .STRTAB 0x01fa->0x0710 ; "unexpected tape format; UVL2 label = \x22"
0614 021e | | .STRTAB 0x021e->0x0723 ; "\x22"
0615 021d | | .STREND 0x021d->0x0723
0616 434f 4d4d |COMM| .STRTAB_STRINGS
0724 0000 0000 | | .BLANK 0000[0x4]
0728 ; --------------------------------------------------------------------------------------
0728 ; Debug Table
0728 ; --------------------------------------------------------------------------------------
0728 0004 0011 | | .DEBUG4 0x0004,0x0011,0x34c8,0x0000,0x0001,0x0000
072e 0000 0000 | | .BLANK 0000[0xc]
073a 0004 00a0 | | .XXX[0xc]
073c 0000 0000 | |
073e 0000 0800 | |
0740 0000 4400 | D |
0742 0000 0020 | |
0744 0000 0140 | @|
0746 0000 0000 | | .BLANK 0000[0x2e]
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]