|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02c8 | | .CONST 0x02c8 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01f7 | | .CONST 0x01f7 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0 ; Debug Table 0x0 = .DEBUG 0x000b,0x02ea,0x8000,0x0000,0x0054,0x2085,0x0000,0x0003
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 4803 |H | Short_Literal 0x3
000d 029f 0203 | | Declare_Subprogram INIT_0200,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0x10,0xfffe
0012 00bf | | Action Accept_Activation
0013 00e8 | | Load_Encached Character_Cache ; Debug Table 0x1 = .DEBUG 0x0013,0x02f0,0x8000,0x0000,0x0054,0x22c5,0x0000,0x0003
; Debug Table 0x1.0x0 = 0x13,0xffff
0014 0266 | f | Execute Discrete,Bounds
0015 00db | | Load_Top At_Offset_3
0016 0266 | f | Execute Discrete,Bounds
0017 e20d | | Load 0x1,0xd
0018 02a0 | | Declare_Subprogram Null_Subprogram
0019 4802 |H | Short_Literal 0x2
001a 035d | ] | Declare_Type Array,Defined
001b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x1 = 0x1b,0xfffe
001c 0266 | f | Execute Discrete,Bounds
001d 00da | | Load_Top At_Offset_2
001e 02a0 | | Declare_Subprogram Null_Subprogram
001f 4801 |H | Short_Literal 0x1
0020 035d | ] | Declare_Type Array,Defined
0021 00d8 | | Load_Top At_Offset_0
0022 0337 | 7 | Declare_Variable Array
0023 00d8 | | Load_Top At_Offset_0
0024 0337 | 7 | Declare_Variable Array
0025 00db | | Load_Top At_Offset_3
0026 0337 | 7 | Declare_Variable Array
0027 485a |HZ | Short_Literal 0x5a
0028 4841 |HA | Short_Literal 0x41
0029 4801 |H | Short_Literal 0x1
002a 4800 |H | Short_Literal 0x0
002b 00da | | Load_Top At_Offset_2
002c e213 | | Load 0x1,0x13
002d 01a6 | | Execute Matrix,Field_Write
002e 4801 |H | Short_Literal 0x1
002f 4801 |H | Short_Literal 0x1
0030 00da | | Load_Top At_Offset_2
0031 e213 | | Load 0x1,0x13
0032 01a6 | | Execute Matrix,Field_Write
0033 4802 |H | Short_Literal 0x2
0034 4802 |H | Short_Literal 0x2
0035 00da | | Load_Top At_Offset_2
0036 e213 | | Load 0x1,0x13
0037 01a6 | | Execute Matrix,Field_Write
0038 4801 |H | Short_Literal 0x1
0039 4803 |H | Short_Literal 0x3
003a 00da | | Load_Top At_Offset_2
003b e213 | | Load 0x1,0x13
003c 01a6 | | Execute Matrix,Field_Write
003d 3feb |? | Loop_Increasing 0x29
003e 487a |Hz | Short_Literal 0x7a
003f 4861 |Ha | Short_Literal 0x61
0040 4802 |H | Short_Literal 0x2
0041 4800 |H | Short_Literal 0x0
0042 00da | | Load_Top At_Offset_2
0043 e213 | | Load 0x1,0x13
0044 01a6 | | Execute Matrix,Field_Write
0045 4802 |H | Short_Literal 0x2
0046 4801 |H | Short_Literal 0x1
0047 00da | | Load_Top At_Offset_2
0048 e213 | | Load 0x1,0x13
0049 01a6 | | Execute Matrix,Field_Write
004a 4802 |H | Short_Literal 0x2
004b 4802 |H | Short_Literal 0x2
004c 00da | | Load_Top At_Offset_2
004d e213 | | Load 0x1,0x13
004e 01a6 | | Execute Matrix,Field_Write
004f 4802 |H | Short_Literal 0x2
0050 4803 |H | Short_Literal 0x3
0051 00da | | Load_Top At_Offset_2
0052 e213 | | Load 0x1,0x13
0053 01a6 | | Execute Matrix,Field_Write
0054 3feb |? | Loop_Increasing 0x40
0055 4839 |H9 | Short_Literal 0x39
0056 4830 |H0 | Short_Literal 0x30
0057 4803 |H | Short_Literal 0x3
0058 4800 |H | Short_Literal 0x0
0059 00da | | Load_Top At_Offset_2
005a e213 | | Load 0x1,0x13
005b 01a6 | | Execute Matrix,Field_Write
005c 4801 |H | Short_Literal 0x1
005d 4801 |H | Short_Literal 0x1
005e 00da | | Load_Top At_Offset_2
005f e213 | | Load 0x1,0x13
0060 01a6 | | Execute Matrix,Field_Write
0061 4802 |H | Short_Literal 0x2
0062 4802 |H | Short_Literal 0x2
0063 00da | | Load_Top At_Offset_2
0064 e213 | | Load 0x1,0x13
0065 01a6 | | Execute Matrix,Field_Write
0066 4803 |H | Short_Literal 0x3
0067 4803 |H | Short_Literal 0x3
0068 00da | | Load_Top At_Offset_2
0069 e213 | | Load 0x1,0x13
006a 01a6 | | Execute Matrix,Field_Write
006b 3feb |? | Loop_Increasing 0x57
006c 4803 |H | Short_Literal 0x3
006d 4800 |H | Short_Literal 0x0
006e 4827 |H' | Short_Literal 0x27
006f 00db | | Load_Top At_Offset_3
0070 01a6 | | Execute Matrix,Field_Write
0071 4801 |H | Short_Literal 0x1
0072 4801 |H | Short_Literal 0x1
0073 4827 |H' | Short_Literal 0x27
0074 00db | | Load_Top At_Offset_3
0075 01a6 | | Execute Matrix,Field_Write
0076 4802 |H | Short_Literal 0x2
0077 4802 |H | Short_Literal 0x2
0078 4827 |H' | Short_Literal 0x27
0079 00db | | Load_Top At_Offset_3
007a 01a6 | | Execute Matrix,Field_Write
007b 4803 |H | Short_Literal 0x3
007c 4803 |H | Short_Literal 0x3
007d 4827 |H' | Short_Literal 0x27
007e 00db | | Load_Top At_Offset_3
007f 01a6 | | Execute Matrix,Field_Write
0080 4826 |H& | Short_Literal 0x26
0081 4800 |H | Short_Literal 0x0
0082 4800 |H | Short_Literal 0x0
0083 4800 |H | Short_Literal 0x0
0084 00da | | Load_Top At_Offset_2
0085 e213 | | Load 0x1,0x13
0086 01a6 | | Execute Matrix,Field_Write
0087 4800 |H | Short_Literal 0x0
0088 4801 |H | Short_Literal 0x1
0089 00da | | Load_Top At_Offset_2
008a e213 | | Load 0x1,0x13
008b 01a6 | | Execute Matrix,Field_Write
008c 4800 |H | Short_Literal 0x0
008d 4802 |H | Short_Literal 0x2
008e 00da | | Load_Top At_Offset_2
008f e213 | | Load 0x1,0x13
0090 01a6 | | Execute Matrix,Field_Write
0091 4800 |H | Short_Literal 0x0
0092 4803 |H | Short_Literal 0x3
0093 00da | | Load_Top At_Offset_2
0094 e213 | | Load 0x1,0x13
0095 01a6 | | Execute Matrix,Field_Write
0096 3feb |? | Loop_Increasing 0x82
0097 482f |H/ | Short_Literal 0x2f
0098 4828 |H( | Short_Literal 0x28
0099 4800 |H | Short_Literal 0x0
009a 4800 |H | Short_Literal 0x0
009b 00da | | Load_Top At_Offset_2
009c e213 | | Load 0x1,0x13
009d 01a6 | | Execute Matrix,Field_Write
009e 4800 |H | Short_Literal 0x0
009f 4801 |H | Short_Literal 0x1
00a0 00da | | Load_Top At_Offset_2
00a1 e213 | | Load 0x1,0x13
00a2 01a6 | | Execute Matrix,Field_Write
00a3 4800 |H | Short_Literal 0x0
00a4 4802 |H | Short_Literal 0x2
00a5 00da | | Load_Top At_Offset_2
00a6 e213 | | Load 0x1,0x13
00a7 01a6 | | Execute Matrix,Field_Write
00a8 4800 |H | Short_Literal 0x0
00a9 4803 |H | Short_Literal 0x3
00aa 00da | | Load_Top At_Offset_2
00ab e213 | | Load 0x1,0x13
00ac 01a6 | | Execute Matrix,Field_Write
00ad 3feb |? | Loop_Increasing 0x99
00ae 4840 |H@ | Short_Literal 0x40
00af 483a |H: | Short_Literal 0x3a
00b0 4800 |H | Short_Literal 0x0
00b1 4800 |H | Short_Literal 0x0
00b2 00da | | Load_Top At_Offset_2
00b3 e213 | | Load 0x1,0x13
00b4 01a6 | | Execute Matrix,Field_Write
00b5 4800 |H | Short_Literal 0x0
00b6 4801 |H | Short_Literal 0x1
00b7 00da | | Load_Top At_Offset_2
00b8 e213 | | Load 0x1,0x13
00b9 01a6 | | Execute Matrix,Field_Write
00ba 4800 |H | Short_Literal 0x0
00bb 4802 |H | Short_Literal 0x2
00bc 00da | | Load_Top At_Offset_2
00bd e213 | | Load 0x1,0x13
00be 01a6 | | Execute Matrix,Field_Write
00bf 4800 |H | Short_Literal 0x0
00c0 4803 |H | Short_Literal 0x3
00c1 00da | | Load_Top At_Offset_2
00c2 e213 | | Load 0x1,0x13
00c3 01a6 | | Execute Matrix,Field_Write
00c4 3feb |? | Loop_Increasing 0xb0
00c5 4860 |H` | Short_Literal 0x60
00c6 485b |H[ | Short_Literal 0x5b
00c7 4800 |H | Short_Literal 0x0
00c8 4800 |H | Short_Literal 0x0
00c9 00da | | Load_Top At_Offset_2
00ca e213 | | Load 0x1,0x13
00cb 01a6 | | Execute Matrix,Field_Write
00cc 4800 |H | Short_Literal 0x0
00cd 4801 |H | Short_Literal 0x1
00ce 00da | | Load_Top At_Offset_2
00cf e213 | | Load 0x1,0x13
00d0 01a6 | | Execute Matrix,Field_Write
00d1 4800 |H | Short_Literal 0x0
00d2 4802 |H | Short_Literal 0x2
00d3 00da | | Load_Top At_Offset_2
00d4 e213 | | Load 0x1,0x13
00d5 01a6 | | Execute Matrix,Field_Write
00d6 4800 |H | Short_Literal 0x0
00d7 4803 |H | Short_Literal 0x3
00d8 00da | | Load_Top At_Offset_2
00d9 e213 | | Load 0x1,0x13
00da 01a6 | | Execute Matrix,Field_Write
00db 3feb |? | Loop_Increasing 0xc7
00dc 487f |H | Short_Literal 0x7f
00dd 487b |H{ | Short_Literal 0x7b
00de 4800 |H | Short_Literal 0x0
00df 4800 |H | Short_Literal 0x0
00e0 00da | | Load_Top At_Offset_2
00e1 e213 | | Load 0x1,0x13
00e2 01a6 | | Execute Matrix,Field_Write
00e3 4800 |H | Short_Literal 0x0
00e4 4801 |H | Short_Literal 0x1
00e5 00da | | Load_Top At_Offset_2
00e6 e213 | | Load 0x1,0x13
00e7 01a6 | | Execute Matrix,Field_Write
00e8 4800 |H | Short_Literal 0x0
00e9 4802 |H | Short_Literal 0x2
00ea 00da | | Load_Top At_Offset_2
00eb e213 | | Load 0x1,0x13
00ec 01a6 | | Execute Matrix,Field_Write
00ed 4800 |H | Short_Literal 0x0
00ee 4803 |H | Short_Literal 0x3
00ef 00da | | Load_Top At_Offset_2
00f0 e213 | | Load 0x1,0x13
00f1 01a6 | | Execute Matrix,Field_Write
00f2 3feb |? | Loop_Increasing 0xde
00f3 e20f | | Load 0x1,0xf
00f4 0119 | | Execute Any,Check_In_Formal_Type
00f5 4800 |H | Short_Literal 0x0
00f6 00da | | Load_Top At_Offset_2
00f7 01d6 | | Execute Vector,Field_Write
00f8 00db | | Load_Top At_Offset_3
00f9 0337 | 7 | Declare_Variable Array
00fa 485a |HZ | Short_Literal 0x5a
00fb 4841 |HA | Short_Literal 0x41
00fc 4801 |H | Short_Literal 0x1
00fd 4800 |H | Short_Literal 0x0
00fe 00da | | Load_Top At_Offset_2
00ff e213 | | Load 0x1,0x13
0100 01a6 | | Execute Matrix,Field_Write
0101 4801 |H | Short_Literal 0x1
0102 4801 |H | Short_Literal 0x1
0103 00da | | Load_Top At_Offset_2
0104 e213 | | Load 0x1,0x13
0105 01a6 | | Execute Matrix,Field_Write
0106 4802 |H | Short_Literal 0x2
0107 4802 |H | Short_Literal 0x2
0108 00da | | Load_Top At_Offset_2
0109 e213 | | Load 0x1,0x13
010a 01a6 | | Execute Matrix,Field_Write
010b 4801 |H | Short_Literal 0x1
010c 4803 |H | Short_Literal 0x3
010d 00da | | Load_Top At_Offset_2
010e e213 | | Load 0x1,0x13
010f 01a6 | | Execute Matrix,Field_Write
0110 3feb |? | Loop_Increasing 0xfc
0111 487a |Hz | Short_Literal 0x7a
0112 4861 |Ha | Short_Literal 0x61
0113 4802 |H | Short_Literal 0x2
0114 4800 |H | Short_Literal 0x0
0115 00da | | Load_Top At_Offset_2
0116 e213 | | Load 0x1,0x13
0117 01a6 | | Execute Matrix,Field_Write
0118 4802 |H | Short_Literal 0x2
0119 4801 |H | Short_Literal 0x1
011a 00da | | Load_Top At_Offset_2
011b e213 | | Load 0x1,0x13
011c 01a6 | | Execute Matrix,Field_Write
011d 4802 |H | Short_Literal 0x2
011e 4802 |H | Short_Literal 0x2
011f 00da | | Load_Top At_Offset_2
0120 e213 | | Load 0x1,0x13
0121 01a6 | | Execute Matrix,Field_Write
0122 4802 |H | Short_Literal 0x2
0123 4803 |H | Short_Literal 0x3
0124 00da | | Load_Top At_Offset_2
0125 e213 | | Load 0x1,0x13
0126 01a6 | | Execute Matrix,Field_Write
0127 3feb |? | Loop_Increasing 0x113
0128 4839 |H9 | Short_Literal 0x39
0129 4830 |H0 | Short_Literal 0x30
012a 4803 |H | Short_Literal 0x3
012b 4800 |H | Short_Literal 0x0
012c 00da | | Load_Top At_Offset_2
012d e213 | | Load 0x1,0x13
012e 01a6 | | Execute Matrix,Field_Write
012f 4801 |H | Short_Literal 0x1
0130 4801 |H | Short_Literal 0x1
0131 00da | | Load_Top At_Offset_2
0132 e213 | | Load 0x1,0x13
0133 01a6 | | Execute Matrix,Field_Write
0134 4802 |H | Short_Literal 0x2
0135 4802 |H | Short_Literal 0x2
0136 00da | | Load_Top At_Offset_2
0137 e213 | | Load 0x1,0x13
0138 01a6 | | Execute Matrix,Field_Write
0139 4803 |H | Short_Literal 0x3
013a 4803 |H | Short_Literal 0x3
013b 00da | | Load_Top At_Offset_2
013c e213 | | Load 0x1,0x13
013d 01a6 | | Execute Matrix,Field_Write
013e 3feb |? | Loop_Increasing 0x12a
013f 4803 |H | Short_Literal 0x3
0140 4800 |H | Short_Literal 0x0
0141 4827 |H' | Short_Literal 0x27
0142 00db | | Load_Top At_Offset_3
0143 01a6 | | Execute Matrix,Field_Write
0144 4801 |H | Short_Literal 0x1
0145 4801 |H | Short_Literal 0x1
0146 4827 |H' | Short_Literal 0x27
0147 00db | | Load_Top At_Offset_3
0148 01a6 | | Execute Matrix,Field_Write
0149 4802 |H | Short_Literal 0x2
014a 4802 |H | Short_Literal 0x2
014b 4827 |H' | Short_Literal 0x27
014c 00db | | Load_Top At_Offset_3
014d 01a6 | | Execute Matrix,Field_Write
014e 4803 |H | Short_Literal 0x3
014f 4803 |H | Short_Literal 0x3
0150 4827 |H' | Short_Literal 0x27
0151 00db | | Load_Top At_Offset_3
0152 01a6 | | Execute Matrix,Field_Write
0153 4801 |H | Short_Literal 0x1
0154 4800 |H | Short_Literal 0x0
0155 485f |H_ | Short_Literal 0x5f
0156 00db | | Load_Top At_Offset_3
0157 01a6 | | Execute Matrix,Field_Write
0158 4801 |H | Short_Literal 0x1
0159 4801 |H | Short_Literal 0x1
015a 485f |H_ | Short_Literal 0x5f
015b 00db | | Load_Top At_Offset_3
015c 01a6 | | Execute Matrix,Field_Write
015d 4802 |H | Short_Literal 0x2
015e 4802 |H | Short_Literal 0x2
015f 485f |H_ | Short_Literal 0x5f
0160 00db | | Load_Top At_Offset_3
0161 01a6 | | Execute Matrix,Field_Write
0162 4803 |H | Short_Literal 0x3
0163 4803 |H | Short_Literal 0x3
0164 485f |H_ | Short_Literal 0x5f
0165 00db | | Load_Top At_Offset_3
0166 01a6 | | Execute Matrix,Field_Write
0167 4826 |H& | Short_Literal 0x26
0168 4800 |H | Short_Literal 0x0
0169 4800 |H | Short_Literal 0x0
016a 4800 |H | Short_Literal 0x0
016b 00da | | Load_Top At_Offset_2
016c e213 | | Load 0x1,0x13
016d 01a6 | | Execute Matrix,Field_Write
016e 4800 |H | Short_Literal 0x0
016f 4801 |H | Short_Literal 0x1
0170 00da | | Load_Top At_Offset_2
0171 e213 | | Load 0x1,0x13
0172 01a6 | | Execute Matrix,Field_Write
0173 4800 |H | Short_Literal 0x0
0174 4802 |H | Short_Literal 0x2
0175 00da | | Load_Top At_Offset_2
0176 e213 | | Load 0x1,0x13
0177 01a6 | | Execute Matrix,Field_Write
0178 4800 |H | Short_Literal 0x0
0179 4803 |H | Short_Literal 0x3
017a 00da | | Load_Top At_Offset_2
017b e213 | | Load 0x1,0x13
017c 01a6 | | Execute Matrix,Field_Write
017d 3feb |? | Loop_Increasing 0x169
017e 482f |H/ | Short_Literal 0x2f
017f 4828 |H( | Short_Literal 0x28
0180 4800 |H | Short_Literal 0x0
0181 4800 |H | Short_Literal 0x0
0182 00da | | Load_Top At_Offset_2
0183 e213 | | Load 0x1,0x13
0184 01a6 | | Execute Matrix,Field_Write
0185 4800 |H | Short_Literal 0x0
0186 4801 |H | Short_Literal 0x1
0187 00da | | Load_Top At_Offset_2
0188 e213 | | Load 0x1,0x13
0189 01a6 | | Execute Matrix,Field_Write
018a 4800 |H | Short_Literal 0x0
018b 4802 |H | Short_Literal 0x2
018c 00da | | Load_Top At_Offset_2
018d e213 | | Load 0x1,0x13
018e 01a6 | | Execute Matrix,Field_Write
018f 4800 |H | Short_Literal 0x0
0190 4803 |H | Short_Literal 0x3
0191 00da | | Load_Top At_Offset_2
0192 e213 | | Load 0x1,0x13
0193 01a6 | | Execute Matrix,Field_Write
0194 3feb |? | Loop_Increasing 0x180
0195 4840 |H@ | Short_Literal 0x40
0196 483a |H: | Short_Literal 0x3a
0197 4800 |H | Short_Literal 0x0
0198 4800 |H | Short_Literal 0x0
0199 00da | | Load_Top At_Offset_2
019a e213 | | Load 0x1,0x13
019b 01a6 | | Execute Matrix,Field_Write
019c 4800 |H | Short_Literal 0x0
019d 4801 |H | Short_Literal 0x1
019e 00da | | Load_Top At_Offset_2
019f e213 | | Load 0x1,0x13
01a0 01a6 | | Execute Matrix,Field_Write
01a1 4800 |H | Short_Literal 0x0
01a2 4802 |H | Short_Literal 0x2
01a3 00da | | Load_Top At_Offset_2
01a4 e213 | | Load 0x1,0x13
01a5 01a6 | | Execute Matrix,Field_Write
01a6 4800 |H | Short_Literal 0x0
01a7 4803 |H | Short_Literal 0x3
01a8 00da | | Load_Top At_Offset_2
01a9 e213 | | Load 0x1,0x13
01aa 01a6 | | Execute Matrix,Field_Write
01ab 3feb |? | Loop_Increasing 0x197
01ac 485e |H^ | Short_Literal 0x5e
01ad 485b |H[ | Short_Literal 0x5b
01ae 4800 |H | Short_Literal 0x0
01af 4800 |H | Short_Literal 0x0
01b0 00da | | Load_Top At_Offset_2
01b1 e213 | | Load 0x1,0x13
01b2 01a6 | | Execute Matrix,Field_Write
01b3 4800 |H | Short_Literal 0x0
01b4 4801 |H | Short_Literal 0x1
01b5 00da | | Load_Top At_Offset_2
01b6 e213 | | Load 0x1,0x13
01b7 01a6 | | Execute Matrix,Field_Write
01b8 4800 |H | Short_Literal 0x0
01b9 4802 |H | Short_Literal 0x2
01ba 00da | | Load_Top At_Offset_2
01bb e213 | | Load 0x1,0x13
01bc 01a6 | | Execute Matrix,Field_Write
01bd 4800 |H | Short_Literal 0x0
01be 4803 |H | Short_Literal 0x3
01bf 00da | | Load_Top At_Offset_2
01c0 e213 | | Load 0x1,0x13
01c1 01a6 | | Execute Matrix,Field_Write
01c2 3feb |? | Loop_Increasing 0x1ae
01c3 4800 |H | Short_Literal 0x0
01c4 4800 |H | Short_Literal 0x0
01c5 4860 |H` | Short_Literal 0x60
01c6 00db | | Load_Top At_Offset_3
01c7 01a6 | | Execute Matrix,Field_Write
01c8 4800 |H | Short_Literal 0x0
01c9 4801 |H | Short_Literal 0x1
01ca 4860 |H` | Short_Literal 0x60
01cb 00db | | Load_Top At_Offset_3
01cc 01a6 | | Execute Matrix,Field_Write
01cd 4800 |H | Short_Literal 0x0
01ce 4802 |H | Short_Literal 0x2
01cf 4860 |H` | Short_Literal 0x60
01d0 00db | | Load_Top At_Offset_3
01d1 01a6 | | Execute Matrix,Field_Write
01d2 4800 |H | Short_Literal 0x0
01d3 4803 |H | Short_Literal 0x3
01d4 4860 |H` | Short_Literal 0x60
01d5 00db | | Load_Top At_Offset_3
01d6 01a6 | | Execute Matrix,Field_Write
01d7 487f |H | Short_Literal 0x7f
01d8 487b |H{ | Short_Literal 0x7b
01d9 4800 |H | Short_Literal 0x0
01da 4800 |H | Short_Literal 0x0
01db 00da | | Load_Top At_Offset_2
01dc e213 | | Load 0x1,0x13
01dd 01a6 | | Execute Matrix,Field_Write
01de 4800 |H | Short_Literal 0x0
01df 4801 |H | Short_Literal 0x1
01e0 00da | | Load_Top At_Offset_2
01e1 e213 | | Load 0x1,0x13
01e2 01a6 | | Execute Matrix,Field_Write
01e3 4800 |H | Short_Literal 0x0
01e4 4802 |H | Short_Literal 0x2
01e5 00da | | Load_Top At_Offset_2
01e6 e213 | | Load 0x1,0x13
01e7 01a6 | | Execute Matrix,Field_Write
01e8 4800 |H | Short_Literal 0x0
01e9 4803 |H | Short_Literal 0x3
01ea 00da | | Load_Top At_Offset_2
01eb e213 | | Load 0x1,0x13
01ec 01a6 | | Execute Matrix,Field_Write
01ed 3feb |? | Loop_Increasing 0x1d9
01ee e20f | | Load 0x1,0xf
01ef 0119 | | Execute Any,Check_In_Formal_Type
01f0 4801 |H | Short_Literal 0x1
01f1 00da | | Load_Top At_Offset_2
01f2 01d6 | | Execute Vector,Field_Write
01f3 00d9 | | Load_Top At_Offset_1
01f4 01d4 | | Execute Vector,Structure_Write
01f5 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x2 = 0x1f5,0xfffd
01f6 00c7 | | Action Elaborate_Subprogram
01f7 BODY_0008:
01f7 00bc | | Action Signal_Activated
01f8 00bb | | Action Signal_Completion
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x0203,0x02f8,0x0005,0x0000,0x0054,0x2085,0x0000,0x0004
0204 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0205 7802 |x | Jump 0x208 ; case 0x1
0206 7805 |x | Jump 0x20c ; case 0x2
0207 7809 |x | Jump 0x211 ; case 0x3
0208 00da | | Load_Top At_Offset_2
0209 0091 02b5 | | Action Push_String_Extended_Indexed,0x2b5 ; "NONE"
020b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
020c 00db | | Load_Top At_Offset_3
020d 00db | | Load_Top At_Offset_3
020e 00e0 | | Load_Encached Standard_Cache
020f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0210 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0211 00da | | Load_Top At_Offset_2
0212 00e0 | | Load_Encached Standard_Cache
0213 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0214 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0215 0000 0000 | | .XXX[0x3]
0217 0000 | |
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0225 | % | .CONST 0x0225 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0004 | | .CONST 0x0004 ; Number of locals
021b INIT_0218:
021b e20d | | Load 0x1,0xd ; Debug Table 0x3 = .DEBUG 0x021b,0x02fa,0x0001,0x0000,0x0054,0x2085,0x0000,0x000c
; Debug Table 0x3.0x0 = 0x21b,0xffff
021c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
021d 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x1 = 0x21d,0xfffe
021e 01dc | | Execute Vector,Last
021f 00e3 | | Load_Encached Natural_Cache
0220 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0221 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x2 = 0x221,0xfffd
0222 e211 | | Load 0x1,0x11
0223 01d5 | | Execute Vector,Field_Reference
0224 0007 | | Action Break_Optional
0225 BODY_0218:
0225 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x3 = 0x225,0x1
0226 a5f8 | | Store_Unchecked 0x2,-0x8
0227 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x4 = 0x227,0x2
0228 0a01 | | Execute_Immediate Plus,0x1
0229 c5fc | | Store 0x2,-0x4
022a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x5 = 0x22a,0x3
022b a5fb | | Store_Unchecked 0x2,-0x5
022c 4820 |H | Short_Literal 0x20 ; Debug Table 0x3.0x6 = 0x22c,0x4
022d a5fa | | Store_Unchecked 0x2,-0x6
022e 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x7 = 0x22e,0x5
022f a5f9 | | Store_Unchecked 0x2,-0x7
0230 00cf | | Action Mark_Auxiliary
0231 7804 |x | Jump 0x236
0232 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x8 = 0x232,0x7
0233 0a01 | | Execute_Immediate Plus,0x1
0234 c5fd | | Store 0x2,-0x3
0235 00c9 | | Action Pop_Auxiliary_Loop
0236 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x9 = 0x236,0x6
0237 00db | | Load_Top At_Offset_3
0238 027a | z | Execute Discrete,Less_Equal
0239 6807 |h | Jump_Zero 0x241
023a 4800 |H | Short_Literal 0x0
023b e5fd | | Load 0x2,-0x3
023c e5ff | | Load 0x2,-0x1
023d 01d7 | | Execute Vector,Field_Read
023e 00db | | Load_Top At_Offset_3
023f 01a7 | | Execute Matrix,Field_Read
0240 6ff1 |o | Jump_Zero 0x232
0241 00ce | | Action Pop_Auxiliary
0242 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0xa = 0x242,0x8
0243 00da | | Load_Top At_Offset_2
0244 027d | } | Execute Discrete,Greater
0245 6801 |h | Jump_Zero 0x247
0246 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x3.0xb = 0x246,0x9
0247 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0xc = 0x247,0xa
0248 a5fc | | Store_Unchecked 0x2,-0x4
0249 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0xd = 0x249,0xb
024a 0a01 | | Execute_Immediate Plus,0x1
024b c5fd | | Store 0x2,-0x3
024c 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xe = 0x24c,0xc
024d e5fc | | Load 0x2,-0x4
024e e5ff | | Load 0x2,-0x1
024f 01d7 | | Execute Vector,Field_Read
0250 00da | | Load_Top At_Offset_2
0251 01a7 | | Execute Matrix,Field_Read
0252 a5f8 | | Store_Unchecked 0x2,-0x8
0253 00cf | | Action Mark_Auxiliary
0254 7813 |x | Jump 0x268
0255 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x3.0xf = 0x255,0xe
0256 e5fd | | Load 0x2,-0x3
0257 e5ff | | Load 0x2,-0x1
0258 01d7 | | Execute Vector,Field_Read
0259 00db | | Load_Top At_Offset_3
025a 01a7 | | Execute Matrix,Field_Read
025b a402 | | Store_Unchecked 0x2,0x2
025c 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x10 = 0x25c,0xf
025d 7004 |p | Jump_Nonzero 0x262
025e e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x11 = 0x25e,0x10
025f 0aff | | Execute_Immediate Plus,-0x1
0260 c5fb | | Store 0x2,-0x5
0261 780a |x | Jump 0x26c ; Debug Table 0x3.0x12 = 0x261,0x11
0262 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x13 = 0x262,0x12
0263 a5f8 | | Store_Unchecked 0x2,-0x8
0264 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x14 = 0x264,0x13
0265 0a01 | | Execute_Immediate Plus,0x1
0266 c5fd | | Store 0x2,-0x3
0267 00c9 | | Action Pop_Auxiliary_Loop
0268 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x15 = 0x268,0xd
0269 00db | | Load_Top At_Offset_3
026a 027a | z | Execute Discrete,Less_Equal
026b 77e9 |w | Jump_Nonzero 0x255
026c 00c9 | | Action Pop_Auxiliary_Loop
026d 7807 |x | Jump 0x275
026e e5fc | | Load 0x2,-0x4 ; Debug Table 0x3.0x16 = 0x26e,0x15
026f 0a01 | | Execute_Immediate Plus,0x1
0270 c5fc | | Store 0x2,-0x4
0271 e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x17 = 0x271,0x16
0272 0aff | | Execute_Immediate Plus,-0x1
0273 c5fb | | Store 0x2,-0x5
0274 00c9 | | Action Pop_Auxiliary_Loop
0275 e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x18 = 0x275,0x14
0276 e5fc | | Load 0x2,-0x4
0277 027d | } | Execute Discrete,Greater
0278 680c |h | Jump_Zero 0x285
0279 e5fc | | Load 0x2,-0x4
027a e5ff | | Load 0x2,-0x1
027b 01d7 | | Execute Vector,Field_Read
027c 0f27 | ' | Execute_Immediate Equal,0x27
027d 6805 |h | Jump_Zero 0x283
027e e5fb | | Load 0x2,-0x5
027f e5ff | | Load 0x2,-0x1
0280 01d7 | | Execute Vector,Field_Read
0281 0f27 | ' | Execute_Immediate Equal,0x27
0282 7801 |x | Jump 0x284
0283 4800 |H | Short_Literal 0x0
0284 77e9 |w | Jump_Nonzero 0x26e
0285 00c9 | | Action Pop_Auxiliary_Loop
0286 7804 |x | Jump 0x28b
0287 e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x19 = 0x287,0x18
0288 0afe | | Execute_Immediate Plus,-0x2
0289 c5fb | | Store 0x2,-0x5
028a 00c9 | | Action Pop_Auxiliary_Loop
028b e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x1a = 0x28b,0x17
028c e5fc | | Load 0x2,-0x4
028d 027d | } | Execute Discrete,Greater
028e 680e |h | Jump_Zero 0x29d
028f e5fb | | Load 0x2,-0x5
0290 e5ff | | Load 0x2,-0x1
0291 01d7 | | Execute Vector,Field_Read
0292 0f27 | ' | Execute_Immediate Equal,0x27
0293 6807 |h | Jump_Zero 0x29b
0294 e5fb | | Load 0x2,-0x5
0295 0aff | | Execute_Immediate Plus,-0x1
0296 0248 | H | Execute Discrete,Check_In_Integer
0297 e5ff | | Load 0x2,-0x1
0298 01d7 | | Execute Vector,Field_Read
0299 0f27 | ' | Execute_Immediate Equal,0x27
029a 7801 |x | Jump 0x29c
029b 4800 |H | Short_Literal 0x0
029c 77ea |w | Jump_Nonzero 0x287
029d 00ce | | Action Pop_Auxiliary
029e e5fc | | Load 0x2,-0x4 ; Debug Table 0x3.0x1b = 0x29e,0x19
029f e5ff | | Load 0x2,-0x1
02a0 01dd | | Execute Vector,First
02a1 027d | } | Execute Discrete,Greater
02a2 6806 |h | Jump_Zero 0x2a9
02a3 e5fc | | Load 0x2,-0x4 ; Debug Table 0x3.0x1c = 0x2a3,0x1a
02a4 0aff | | Execute_Immediate Plus,-0x1
02a5 0248 | H | Execute Discrete,Check_In_Integer
02a6 e5ff | | Load 0x2,-0x1
02a7 01d7 | | Execute Vector,Field_Read
02a8 a5fa | | Store_Unchecked 0x2,-0x6
02a9 e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x1d = 0x2a9,0x1b
02aa 00da | | Load_Top At_Offset_2
02ab 027c | | | Execute Discrete,Less
02ac 6807 |h | Jump_Zero 0x2b4
02ad e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x1e = 0x2ad,0x1c
02ae 0a01 | | Execute_Immediate Plus,0x1
02af 0248 | H | Execute Discrete,Check_In_Integer
02b0 e5ff | | Load 0x2,-0x1
02b1 01d7 | | Execute Vector,Field_Read
02b2 0f2e | . | Execute_Immediate Equal,0x2e
02b3 a5f9 | | Store_Unchecked 0x2,-0x7
02b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02b5 ; --------------------------------------------------------------------------------------
02b5 ; STRING TABLE
02b5 ; --------------------------------------------------------------------------------------
02b5 000a | | .STRTAB 0x000a->0x02ba ; "NONE"
02b6 000c | | .STRTAB 0x000c->0x02bc ; "ACRONYM"
02b7 0011 | | .STRTAB 0x0011->0x02bf ; "WORD"
02b8 0013 | | .STRTAB 0x0013->0x02c1 ; "NUMBER"
02b9 0017 | | .STREND 0x0017->0x02c4
02ba 4e4f 4e45 |NONE| .STRTAB_STRINGS
02c5 0000 0000 | | .XXX[0x3]
02c7 0000 | |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; Debug Table
02c8 ; --------------------------------------------------------------------------------------
02c8 0003 0004 | | .CONST 0x0003,0x0004
02ca 000b 02ea | | .DEBUG 0x000b,0x02ea,0x8000,0x0000,0x0054,0x2085,0x0000,0x0003
02d2 0013 02f0 | | .DEBUG 0x0013,0x02f0,0x8000,0x0000,0x0054,0x22c5,0x0000,0x0003
02da 0203 02f8 | | .DEBUG 0x0203,0x02f8,0x0005,0x0000,0x0054,0x2085,0x0000,0x0004
02e2 021b 02fa | | .DEBUG 0x021b,0x02fa,0x0001,0x0000,0x0054,0x2085,0x0000,0x000c
02ea ; --------------------------------------------------------------------------------------
02ea ; Debug3 Subtable 0x0
02ea ; --------------------------------------------------------------------------------------
02ea 0002 0000 | | .DBG3TAB 0x0002,0x0000
02ec 000b ffff | | .CONST 0x000b,0xffff
02ee 0010 fffe | | .CONST 0x0010,0xfffe
02f0 ; --------------------------------------------------------------------------------------
02f0 ; Debug3 Subtable 0x1
02f0 ; --------------------------------------------------------------------------------------
02f0 0003 0000 | | .DBG3TAB 0x0003,0x0000
02f2 0013 ffff | | .CONST 0x0013,0xffff
02f4 001b fffe | | .CONST 0x001b,0xfffe
02f6 01f5 fffd | | .CONST 0x01f5,0xfffd
02f8 ; --------------------------------------------------------------------------------------
02f8 ; Debug3 Subtable 0x2
02f8 ; --------------------------------------------------------------------------------------
02f8 0000 0000 | | .DBG3TAB 0x0000,0x0000
02fa ; --------------------------------------------------------------------------------------
02fa ; Debug3 Subtable 0x3
02fa ; --------------------------------------------------------------------------------------
02fa 0003 001c | | .DBG3TAB 0x0003,0x001c
02fc 021b ffff | | .CONST 0x021b,0xffff
02fe 021d fffe | | .CONST 0x021d,0xfffe
0300 0221 fffd | ! | .CONST 0x0221,0xfffd
0302 0225 0001 | % | .CONST 0x0225,0x0001
0304 0227 0002 | ' | .CONST 0x0227,0x0002
0306 022a 0003 | * | .CONST 0x022a,0x0003
0308 022c 0004 | , | .CONST 0x022c,0x0004
030a 022e 0005 | . | .CONST 0x022e,0x0005
030c 0232 0007 | 2 | .CONST 0x0232,0x0007
030e 0236 0006 | 6 | .CONST 0x0236,0x0006
0310 0242 0008 | B | .CONST 0x0242,0x0008
0312 0246 0009 | F | .CONST 0x0246,0x0009
0314 0247 000a | G | .CONST 0x0247,0x000a
0316 0249 000b | I | .CONST 0x0249,0x000b
0318 024c 000c | L | .CONST 0x024c,0x000c
031a 0255 000e | U | .CONST 0x0255,0x000e
031c 025c 000f | \ | .CONST 0x025c,0x000f
031e 025e 0010 | ^ | .CONST 0x025e,0x0010
0320 0261 0011 | a | .CONST 0x0261,0x0011
0322 0262 0012 | b | .CONST 0x0262,0x0012
0324 0264 0013 | d | .CONST 0x0264,0x0013
0326 0268 000d | h | .CONST 0x0268,0x000d
0328 026e 0015 | n | .CONST 0x026e,0x0015
032a 0271 0016 | q | .CONST 0x0271,0x0016
032c 0275 0014 | u | .CONST 0x0275,0x0014
032e 0287 0018 | | .CONST 0x0287,0x0018
0330 028b 0017 | | .CONST 0x028b,0x0017
0332 029e 0019 | | .CONST 0x029e,0x0019
0334 02a3 001a | | .CONST 0x02a3,0x001a
0336 02a9 001b | | .CONST 0x02a9,0x001b
0338 02ad 001c | | .CONST 0x02ad,0x001c
033a 0000 0000 | | .BLANK 0000[0xc6]