|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0310 | | .CONST 0x0310 ; 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 0216 | | .CONST 0x0216 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000e | | .CONST 0x000e ; Number of locals 000b INIT_0008: 000b 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 0007 | | Action Break_Optional 000f 0007 | | Action Break_Optional 0010 4800 |H | Short_Literal 0x0 0011 487f |H | Short_Literal 0x7f 0012 e002 | | Load 0x0,0x2 0013 0334 | 4 | Declare_Variable Array,With_Constraint 0014 4800 |H | Short_Literal 0x0 0015 4800 |H | Short_Literal 0x0 0016 00da | | Load_Top At_Offset_2 0017 01d6 | | Execute Vector,Field_Write 0018 4800 |H | Short_Literal 0x0 0019 4801 |H | Short_Literal 0x1 001a 00da | | Load_Top At_Offset_2 001b 01d6 | | Execute Vector,Field_Write 001c 48c0 |H | Short_Literal 0xc0 001d 4802 |H | Short_Literal 0x2 001e 00da | | Load_Top At_Offset_2 001f 01d6 | | Execute Vector,Field_Write 0020 4803 |H | Short_Literal 0x3 0021 4803 |H | Short_Literal 0x3 0022 00da | | Load_Top At_Offset_2 0023 01d6 | | Execute Vector,Field_Write 0024 481e |H | Short_Literal 0x1e 0025 4804 |H | Short_Literal 0x4 0026 00da | | Load_Top At_Offset_2 0027 01d6 | | Execute Vector,Field_Write 0028 4800 |H | Short_Literal 0x0 0029 4805 |H | Short_Literal 0x5 002a 00da | | Load_Top At_Offset_2 002b 01d6 | | Execute Vector,Field_Write 002c 48f0 |H | Short_Literal 0xf0 002d 4806 |H | Short_Literal 0x6 002e 00da | | Load_Top At_Offset_2 002f 01d6 | | Execute Vector,Field_Write 0030 4803 |H | Short_Literal 0x3 0031 4807 |H | Short_Literal 0x7 0032 00da | | Load_Top At_Offset_2 0033 01d6 | | Execute Vector,Field_Write 0034 4800 |H | Short_Literal 0x0 0035 4808 |H | Short_Literal 0x8 0036 00da | | Load_Top At_Offset_2 0037 01d6 | | Execute Vector,Field_Write 0038 4800 |H | Short_Literal 0x0 0039 4809 |H | Short_Literal 0x9 003a 00da | | Load_Top At_Offset_2 003b 01d6 | | Execute Vector,Field_Write 003c 48f8 |H | Short_Literal 0xf8 003d 480a |H | Short_Literal 0xa 003e 00da | | Load_Top At_Offset_2 003f 01d6 | | Execute Vector,Field_Write 0040 4803 |H | Short_Literal 0x3 0041 480b |H | Short_Literal 0xb 0042 00da | | Load_Top At_Offset_2 0043 01d6 | | Execute Vector,Field_Write 0044 48ff |H | Short_Literal 0xff 0045 480c |H | Short_Literal 0xc 0046 00da | | Load_Top At_Offset_2 0047 01d6 | | Execute Vector,Field_Write 0048 48ff |H | Short_Literal 0xff 0049 480d |H | Short_Literal 0xd 004a 00da | | Load_Top At_Offset_2 004b 01d6 | | Execute Vector,Field_Write 004c 48ff |H | Short_Literal 0xff 004d 480e |H | Short_Literal 0xe 004e 00da | | Load_Top At_Offset_2 004f 01d6 | | Execute Vector,Field_Write 0050 48ff |H | Short_Literal 0xff 0051 480f |H | Short_Literal 0xf 0052 00da | | Load_Top At_Offset_2 0053 01d6 | | Execute Vector,Field_Write 0054 4800 |H | Short_Literal 0x0 0055 4810 |H | Short_Literal 0x10 0056 00da | | Load_Top At_Offset_2 0057 01d6 | | Execute Vector,Field_Write 0058 4800 |H | Short_Literal 0x0 0059 4811 |H | Short_Literal 0x11 005a 00da | | Load_Top At_Offset_2 005b 01d6 | | Execute Vector,Field_Write 005c 48fc |H | Short_Literal 0xfc 005d 4812 |H | Short_Literal 0x12 005e 00da | | Load_Top At_Offset_2 005f 01d6 | | Execute Vector,Field_Write 0060 4803 |H | Short_Literal 0x3 0061 4813 |H | Short_Literal 0x13 0062 00da | | Load_Top At_Offset_2 0063 01d6 | | Execute Vector,Field_Write 0064 4800 |H | Short_Literal 0x0 0065 4814 |H | Short_Literal 0x14 0066 00da | | Load_Top At_Offset_2 0067 01d6 | | Execute Vector,Field_Write 0068 4800 |H | Short_Literal 0x0 0069 4815 |H | Short_Literal 0x15 006a 00da | | Load_Top At_Offset_2 006b 01d6 | | Execute Vector,Field_Write 006c 48fe |H | Short_Literal 0xfe 006d 4816 |H | Short_Literal 0x16 006e 00da | | Load_Top At_Offset_2 006f 01d6 | | Execute Vector,Field_Write 0070 4803 |H | Short_Literal 0x3 0071 4817 |H | Short_Literal 0x17 0072 00da | | Load_Top At_Offset_2 0073 01d6 | | Execute Vector,Field_Write 0074 48ff |H | Short_Literal 0xff 0075 4818 |H | Short_Literal 0x18 0076 00da | | Load_Top At_Offset_2 0077 01d6 | | Execute Vector,Field_Write 0078 48ff |H | Short_Literal 0xff 0079 4819 |H | Short_Literal 0x19 007a 00da | | Load_Top At_Offset_2 007b 01d6 | | Execute Vector,Field_Write 007c 48ff |H | Short_Literal 0xff 007d 481a |H | Short_Literal 0x1a 007e 00da | | Load_Top At_Offset_2 007f 01d6 | | Execute Vector,Field_Write 0080 48ff |H | Short_Literal 0xff 0081 481b |H | Short_Literal 0x1b 0082 00da | | Load_Top At_Offset_2 0083 01d6 | | Execute Vector,Field_Write 0084 4800 |H | Short_Literal 0x0 0085 481c |H | Short_Literal 0x1c 0086 00da | | Load_Top At_Offset_2 0087 01d6 | | Execute Vector,Field_Write 0088 4880 |H | Short_Literal 0x80 0089 481d |H | Short_Literal 0x1d 008a 00da | | Load_Top At_Offset_2 008b 01d6 | | Execute Vector,Field_Write 008c 48ff |H | Short_Literal 0xff 008d 481e |H | Short_Literal 0x1e 008e 00da | | Load_Top At_Offset_2 008f 01d6 | | Execute Vector,Field_Write 0090 4803 |H | Short_Literal 0x3 0091 481f |H | Short_Literal 0x1f 0092 00da | | Load_Top At_Offset_2 0093 01d6 | | Execute Vector,Field_Write 0094 4800 |H | Short_Literal 0x0 0095 4820 |H | Short_Literal 0x20 0096 00da | | Load_Top At_Offset_2 0097 01d6 | | Execute Vector,Field_Write 0098 48c0 |H | Short_Literal 0xc0 0099 4821 |H! | Short_Literal 0x21 009a 00da | | Load_Top At_Offset_2 009b 01d6 | | Execute Vector,Field_Write 009c 48ff |H | Short_Literal 0xff 009d 4822 |H" | Short_Literal 0x22 009e 00da | | Load_Top At_Offset_2 009f 01d6 | | Execute Vector,Field_Write 00a0 4803 |H | Short_Literal 0x3 00a1 4823 |H# | Short_Literal 0x23 00a2 00da | | Load_Top At_Offset_2 00a3 01d6 | | Execute Vector,Field_Write 00a4 48ff |H | Short_Literal 0xff 00a5 4824 |H$ | Short_Literal 0x24 00a6 00da | | Load_Top At_Offset_2 00a7 01d6 | | Execute Vector,Field_Write 00a8 48ff |H | Short_Literal 0xff 00a9 4825 |H% | Short_Literal 0x25 00aa 00da | | Load_Top At_Offset_2 00ab 01d6 | | Execute Vector,Field_Write 00ac 48ff |H | Short_Literal 0xff 00ad 4826 |H& | Short_Literal 0x26 00ae 00da | | Load_Top At_Offset_2 00af 01d6 | | Execute Vector,Field_Write 00b0 48ff |H | Short_Literal 0xff 00b1 4827 |H' | Short_Literal 0x27 00b2 00da | | Load_Top At_Offset_2 00b3 01d6 | | Execute Vector,Field_Write 00b4 4800 |H | Short_Literal 0x0 00b5 4828 |H( | Short_Literal 0x28 00b6 00da | | Load_Top At_Offset_2 00b7 01d6 | | Execute Vector,Field_Write 00b8 48e0 |H | Short_Literal 0xe0 00b9 4829 |H) | Short_Literal 0x29 00ba 00da | | Load_Top At_Offset_2 00bb 01d6 | | Execute Vector,Field_Write 00bc 48ff |H | Short_Literal 0xff 00bd 482a |H* | Short_Literal 0x2a 00be 00da | | Load_Top At_Offset_2 00bf 01d6 | | Execute Vector,Field_Write 00c0 4803 |H | Short_Literal 0x3 00c1 482b |H+ | Short_Literal 0x2b 00c2 00da | | Load_Top At_Offset_2 00c3 01d6 | | Execute Vector,Field_Write 00c4 4800 |H | Short_Literal 0x0 00c5 482c |H, | Short_Literal 0x2c 00c6 00da | | Load_Top At_Offset_2 00c7 01d6 | | Execute Vector,Field_Write 00c8 48f0 |H | Short_Literal 0xf0 00c9 482d |H- | Short_Literal 0x2d 00ca 00da | | Load_Top At_Offset_2 00cb 01d6 | | Execute Vector,Field_Write 00cc 48ff |H | Short_Literal 0xff 00cd 482e |H. | Short_Literal 0x2e 00ce 00da | | Load_Top At_Offset_2 00cf 01d6 | | Execute Vector,Field_Write 00d0 4803 |H | Short_Literal 0x3 00d1 482f |H/ | Short_Literal 0x2f 00d2 00da | | Load_Top At_Offset_2 00d3 01d6 | | Execute Vector,Field_Write 00d4 48ff |H | Short_Literal 0xff 00d5 4830 |H0 | Short_Literal 0x30 00d6 00da | | Load_Top At_Offset_2 00d7 01d6 | | Execute Vector,Field_Write 00d8 48ff |H | Short_Literal 0xff 00d9 4831 |H1 | Short_Literal 0x31 00da 00da | | Load_Top At_Offset_2 00db 01d6 | | Execute Vector,Field_Write 00dc 48ff |H | Short_Literal 0xff 00dd 4832 |H2 | Short_Literal 0x32 00de 00da | | Load_Top At_Offset_2 00df 01d6 | | Execute Vector,Field_Write 00e0 48ff |H | Short_Literal 0xff 00e1 4833 |H3 | Short_Literal 0x33 00e2 00da | | Load_Top At_Offset_2 00e3 01d6 | | Execute Vector,Field_Write 00e4 4800 |H | Short_Literal 0x0 00e5 4834 |H4 | Short_Literal 0x34 00e6 00da | | Load_Top At_Offset_2 00e7 01d6 | | Execute Vector,Field_Write 00e8 48f8 |H | Short_Literal 0xf8 00e9 4835 |H5 | Short_Literal 0x35 00ea 00da | | Load_Top At_Offset_2 00eb 01d6 | | Execute Vector,Field_Write 00ec 48ff |H | Short_Literal 0xff 00ed 4836 |H6 | Short_Literal 0x36 00ee 00da | | Load_Top At_Offset_2 00ef 01d6 | | Execute Vector,Field_Write 00f0 4803 |H | Short_Literal 0x3 00f1 4837 |H7 | Short_Literal 0x37 00f2 00da | | Load_Top At_Offset_2 00f3 01d6 | | Execute Vector,Field_Write 00f4 4800 |H | Short_Literal 0x0 00f5 4838 |H8 | Short_Literal 0x38 00f6 00da | | Load_Top At_Offset_2 00f7 01d6 | | Execute Vector,Field_Write 00f8 48f8 |H | Short_Literal 0xf8 00f9 4839 |H9 | Short_Literal 0x39 00fa 00da | | Load_Top At_Offset_2 00fb 01d6 | | Execute Vector,Field_Write 00fc 48ff |H | Short_Literal 0xff 00fd 483a |H: | Short_Literal 0x3a 00fe 00da | | Load_Top At_Offset_2 00ff 01d6 | | Execute Vector,Field_Write 0100 4803 |H | Short_Literal 0x3 0101 483b |H; | Short_Literal 0x3b 0102 00da | | Load_Top At_Offset_2 0103 01d6 | | Execute Vector,Field_Write 0104 48ff |H | Short_Literal 0xff 0105 483c |H< | Short_Literal 0x3c 0106 00da | | Load_Top At_Offset_2 0107 01d6 | | Execute Vector,Field_Write 0108 48ff |H | Short_Literal 0xff 0109 483d |H= | Short_Literal 0x3d 010a 00da | | Load_Top At_Offset_2 010b 01d6 | | Execute Vector,Field_Write 010c 48ff |H | Short_Literal 0xff 010d 483e |H> | Short_Literal 0x3e 010e 00da | | Load_Top At_Offset_2 010f 01d6 | | Execute Vector,Field_Write 0110 48ff |H | Short_Literal 0xff 0111 483f |H? | Short_Literal 0x3f 0112 00da | | Load_Top At_Offset_2 0113 01d6 | | Execute Vector,Field_Write 0114 4800 |H | Short_Literal 0x0 0115 4840 |H@ | Short_Literal 0x40 0116 00da | | Load_Top At_Offset_2 0117 01d6 | | Execute Vector,Field_Write 0118 48fc |H | Short_Literal 0xfc 0119 4841 |HA | Short_Literal 0x41 011a 00da | | Load_Top At_Offset_2 011b 01d6 | | Execute Vector,Field_Write 011c 48ff |H | Short_Literal 0xff 011d 4842 |HB | Short_Literal 0x42 011e 00da | | Load_Top At_Offset_2 011f 01d6 | | Execute Vector,Field_Write 0120 4803 |H | Short_Literal 0x3 0121 4843 |HC | Short_Literal 0x43 0122 00da | | Load_Top At_Offset_2 0123 01d6 | | Execute Vector,Field_Write 0124 4800 |H | Short_Literal 0x0 0125 4844 |HD | Short_Literal 0x44 0126 00da | | Load_Top At_Offset_2 0127 01d6 | | Execute Vector,Field_Write 0128 48fc |H | Short_Literal 0xfc 0129 4845 |HE | Short_Literal 0x45 012a 00da | | Load_Top At_Offset_2 012b 01d6 | | Execute Vector,Field_Write 012c 48ff |H | Short_Literal 0xff 012d 4846 |HF | Short_Literal 0x46 012e 00da | | Load_Top At_Offset_2 012f 01d6 | | Execute Vector,Field_Write 0130 4803 |H | Short_Literal 0x3 0131 4847 |HG | Short_Literal 0x47 0132 00da | | Load_Top At_Offset_2 0133 01d6 | | Execute Vector,Field_Write 0134 48ff |H | Short_Literal 0xff 0135 4848 |HH | Short_Literal 0x48 0136 00da | | Load_Top At_Offset_2 0137 01d6 | | Execute Vector,Field_Write 0138 48ff |H | Short_Literal 0xff 0139 4849 |HI | Short_Literal 0x49 013a 00da | | Load_Top At_Offset_2 013b 01d6 | | Execute Vector,Field_Write 013c 48ff |H | Short_Literal 0xff 013d 484a |HJ | Short_Literal 0x4a 013e 00da | | Load_Top At_Offset_2 013f 01d6 | | Execute Vector,Field_Write 0140 48ff |H | Short_Literal 0xff 0141 484b |HK | Short_Literal 0x4b 0142 00da | | Load_Top At_Offset_2 0143 01d6 | | Execute Vector,Field_Write 0144 4800 |H | Short_Literal 0x0 0145 484c |HL | Short_Literal 0x4c 0146 00da | | Load_Top At_Offset_2 0147 01d6 | | Execute Vector,Field_Write 0148 48fe |H | Short_Literal 0xfe 0149 484d |HM | Short_Literal 0x4d 014a 00da | | Load_Top At_Offset_2 014b 01d6 | | Execute Vector,Field_Write 014c 48ff |H | Short_Literal 0xff 014d 484e |HN | Short_Literal 0x4e 014e 00da | | Load_Top At_Offset_2 014f 01d6 | | Execute Vector,Field_Write 0150 4803 |H | Short_Literal 0x3 0151 484f |HO | Short_Literal 0x4f 0152 00da | | Load_Top At_Offset_2 0153 01d6 | | Execute Vector,Field_Write 0154 4800 |H | Short_Literal 0x0 0155 4850 |HP | Short_Literal 0x50 0156 00da | | Load_Top At_Offset_2 0157 01d6 | | Execute Vector,Field_Write 0158 48fe |H | Short_Literal 0xfe 0159 4851 |HQ | Short_Literal 0x51 015a 00da | | Load_Top At_Offset_2 015b 01d6 | | Execute Vector,Field_Write 015c 48ff |H | Short_Literal 0xff 015d 4852 |HR | Short_Literal 0x52 015e 00da | | Load_Top At_Offset_2 015f 01d6 | | Execute Vector,Field_Write 0160 4803 |H | Short_Literal 0x3 0161 4853 |HS | Short_Literal 0x53 0162 00da | | Load_Top At_Offset_2 0163 01d6 | | Execute Vector,Field_Write 0164 48ff |H | Short_Literal 0xff 0165 4854 |HT | Short_Literal 0x54 0166 00da | | Load_Top At_Offset_2 0167 01d6 | | Execute Vector,Field_Write 0168 48ff |H | Short_Literal 0xff 0169 4855 |HU | Short_Literal 0x55 016a 00da | | Load_Top At_Offset_2 016b 01d6 | | Execute Vector,Field_Write 016c 48ff |H | Short_Literal 0xff 016d 4856 |HV | Short_Literal 0x56 016e 00da | | Load_Top At_Offset_2 016f 01d6 | | Execute Vector,Field_Write 0170 48ff |H | Short_Literal 0xff 0171 4857 |HW | Short_Literal 0x57 0172 00da | | Load_Top At_Offset_2 0173 01d6 | | Execute Vector,Field_Write 0174 4800 |H | Short_Literal 0x0 0175 4858 |HX | Short_Literal 0x58 0176 00da | | Load_Top At_Offset_2 0177 01d6 | | Execute Vector,Field_Write 0178 48ff |H | Short_Literal 0xff 0179 4859 |HY | Short_Literal 0x59 017a 00da | | Load_Top At_Offset_2 017b 01d6 | | Execute Vector,Field_Write 017c 48ff |H | Short_Literal 0xff 017d 485a |HZ | Short_Literal 0x5a 017e 00da | | Load_Top At_Offset_2 017f 01d6 | | Execute Vector,Field_Write 0180 4803 |H | Short_Literal 0x3 0181 485b |H[ | Short_Literal 0x5b 0182 00da | | Load_Top At_Offset_2 0183 01d6 | | Execute Vector,Field_Write 0184 4800 |H | Short_Literal 0x0 0185 485c |H\ | Short_Literal 0x5c 0186 00da | | Load_Top At_Offset_2 0187 01d6 | | Execute Vector,Field_Write 0188 48ff |H | Short_Literal 0xff 0189 485d |H] | Short_Literal 0x5d 018a 00da | | Load_Top At_Offset_2 018b 01d6 | | Execute Vector,Field_Write 018c 48ff |H | Short_Literal 0xff 018d 485e |H^ | Short_Literal 0x5e 018e 00da | | Load_Top At_Offset_2 018f 01d6 | | Execute Vector,Field_Write 0190 4803 |H | Short_Literal 0x3 0191 485f |H_ | Short_Literal 0x5f 0192 00da | | Load_Top At_Offset_2 0193 01d6 | | Execute Vector,Field_Write 0194 48ff |H | Short_Literal 0xff 0195 4860 |H` | Short_Literal 0x60 0196 00da | | Load_Top At_Offset_2 0197 01d6 | | Execute Vector,Field_Write 0198 48ff |H | Short_Literal 0xff 0199 4861 |Ha | Short_Literal 0x61 019a 00da | | Load_Top At_Offset_2 019b 01d6 | | Execute Vector,Field_Write 019c 48ff |H | Short_Literal 0xff 019d 4862 |Hb | Short_Literal 0x62 019e 00da | | Load_Top At_Offset_2 019f 01d6 | | Execute Vector,Field_Write 01a0 48ff |H | Short_Literal 0xff 01a1 4863 |Hc | Short_Literal 0x63 01a2 00da | | Load_Top At_Offset_2 01a3 01d6 | | Execute Vector,Field_Write 01a4 4880 |H | Short_Literal 0x80 01a5 4864 |Hd | Short_Literal 0x64 01a6 00da | | Load_Top At_Offset_2 01a7 01d6 | | Execute Vector,Field_Write 01a8 48ff |H | Short_Literal 0xff 01a9 4865 |He | Short_Literal 0x65 01aa 00da | | Load_Top At_Offset_2 01ab 01d6 | | Execute Vector,Field_Write 01ac 48ff |H | Short_Literal 0xff 01ad 4866 |Hf | Short_Literal 0x66 01ae 00da | | Load_Top At_Offset_2 01af 01d6 | | Execute Vector,Field_Write 01b0 4803 |H | Short_Literal 0x3 01b1 4867 |Hg | Short_Literal 0x67 01b2 00da | | Load_Top At_Offset_2 01b3 01d6 | | Execute Vector,Field_Write 01b4 48c0 |H | Short_Literal 0xc0 01b5 4868 |Hh | Short_Literal 0x68 01b6 00da | | Load_Top At_Offset_2 01b7 01d6 | | Execute Vector,Field_Write 01b8 48ff |H | Short_Literal 0xff 01b9 4869 |Hi | Short_Literal 0x69 01ba 00da | | Load_Top At_Offset_2 01bb 01d6 | | Execute Vector,Field_Write 01bc 48ff |H | Short_Literal 0xff 01bd 486a |Hj | Short_Literal 0x6a 01be 00da | | Load_Top At_Offset_2 01bf 01d6 | | Execute Vector,Field_Write 01c0 4803 |H | Short_Literal 0x3 01c1 486b |Hk | Short_Literal 0x6b 01c2 00da | | Load_Top At_Offset_2 01c3 01d6 | | Execute Vector,Field_Write 01c4 48ff |H | Short_Literal 0xff 01c5 486c |Hl | Short_Literal 0x6c 01c6 00da | | Load_Top At_Offset_2 01c7 01d6 | | Execute Vector,Field_Write 01c8 48ff |H | Short_Literal 0xff 01c9 486d |Hm | Short_Literal 0x6d 01ca 00da | | Load_Top At_Offset_2 01cb 01d6 | | Execute Vector,Field_Write 01cc 48ff |H | Short_Literal 0xff 01cd 486e |Hn | Short_Literal 0x6e 01ce 00da | | Load_Top At_Offset_2 01cf 01d6 | | Execute Vector,Field_Write 01d0 48ff |H | Short_Literal 0xff 01d1 486f |Ho | Short_Literal 0x6f 01d2 00da | | Load_Top At_Offset_2 01d3 01d6 | | Execute Vector,Field_Write 01d4 48f8 |H | Short_Literal 0xf8 01d5 4870 |Hp | Short_Literal 0x70 01d6 00da | | Load_Top At_Offset_2 01d7 01d6 | | Execute Vector,Field_Write 01d8 48ff |H | Short_Literal 0xff 01d9 4871 |Hq | Short_Literal 0x71 01da 00da | | Load_Top At_Offset_2 01db 01d6 | | Execute Vector,Field_Write 01dc 48ff |H | Short_Literal 0xff 01dd 4872 |Hr | Short_Literal 0x72 01de 00da | | Load_Top At_Offset_2 01df 01d6 | | Execute Vector,Field_Write 01e0 4803 |H | Short_Literal 0x3 01e1 4873 |Hs | Short_Literal 0x73 01e2 00da | | Load_Top At_Offset_2 01e3 01d6 | | Execute Vector,Field_Write 01e4 48ff |H | Short_Literal 0xff 01e5 4874 |Ht | Short_Literal 0x74 01e6 00da | | Load_Top At_Offset_2 01e7 01d6 | | Execute Vector,Field_Write 01e8 48ff |H | Short_Literal 0xff 01e9 4875 |Hu | Short_Literal 0x75 01ea 00da | | Load_Top At_Offset_2 01eb 01d6 | | Execute Vector,Field_Write 01ec 48ff |H | Short_Literal 0xff 01ed 4876 |Hv | Short_Literal 0x76 01ee 00da | | Load_Top At_Offset_2 01ef 01d6 | | Execute Vector,Field_Write 01f0 4803 |H | Short_Literal 0x3 01f1 4877 |Hw | Short_Literal 0x77 01f2 00da | | Load_Top At_Offset_2 01f3 01d6 | | Execute Vector,Field_Write 01f4 48ff |H | Short_Literal 0xff 01f5 4878 |Hx | Short_Literal 0x78 01f6 00da | | Load_Top At_Offset_2 01f7 01d6 | | Execute Vector,Field_Write 01f8 48ff |H | Short_Literal 0xff 01f9 4879 |Hy | Short_Literal 0x79 01fa 00da | | Load_Top At_Offset_2 01fb 01d6 | | Execute Vector,Field_Write 01fc 48ff |H | Short_Literal 0xff 01fd 487a |Hz | Short_Literal 0x7a 01fe 00da | | Load_Top At_Offset_2 01ff 01d6 | | Execute Vector,Field_Write 0200 48ff |H | Short_Literal 0xff 0201 487b |H{ | Short_Literal 0x7b 0202 00da | | Load_Top At_Offset_2 0203 01d6 | | Execute Vector,Field_Write 0204 48ff |H | Short_Literal 0xff 0205 487c |H| | Short_Literal 0x7c 0206 00da | | Load_Top At_Offset_2 0207 01d6 | | Execute Vector,Field_Write 0208 48ff |H | Short_Literal 0xff 0209 487d |H} | Short_Literal 0x7d 020a 00da | | Load_Top At_Offset_2 020b 01d6 | | Execute Vector,Field_Write 020c 48ff |H | Short_Literal 0xff 020d 487e |H~ | Short_Literal 0x7e 020e 00da | | Load_Top At_Offset_2 020f 01d6 | | Execute Vector,Field_Write 0210 4803 |H | Short_Literal 0x3 0211 487f |H | Short_Literal 0x7f 0212 00da | | Load_Top At_Offset_2 0213 01d6 | | Execute Vector,Field_Write 0214 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0215 00c7 | | Action Elaborate_Subprogram 0216 BODY_0008: 0216 00bc | | Action Signal_Activated 0217 00bb | | Action Signal_Completion 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0232 | 2 | .CONST 0x0232 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 000c | | .CONST 0x000c ; Number of locals 021b INIT_0218: 021b e003 | | Load 0x0,0x3 021c 0007 | | Action Break_Optional 021d e004 | | Load 0x0,0x4 021e 0007 | | Action Break_Optional 021f e005 | | Load 0x0,0x5 0220 0007 | | Action Break_Optional 0221 e005 | | Load 0x0,0x5 0222 0007 | | Action Break_Optional 0223 e005 | | Load 0x0,0x5 0224 0007 | | Action Break_Optional 0225 e006 | | Load 0x0,0x6 0226 0322 | " | Declare_Variable Record 0227 e007 | | Load 0x0,0x7 0228 00d9 | | Load_Top At_Offset_1 0229 017d | } | Execute Record,Structure_Write 022a e008 | | Load 0x0,0x8 022b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 022c 03e9 | | Declare_Variable Discrete,Duplicate 022d e009 | | Load 0x0,0x9 022e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 022f 03e9 | | Declare_Variable Discrete,Duplicate 0230 e00a | | Load 0x0,0xa 0231 0337 | 7 | Declare_Variable Array 0232 BODY_0218: 0232 00d8 | | Load_Top At_Offset_0 0233 e409 | | Load 0x2,0x9 0234 e408 | | Load 0x2,0x8 0235 e40b | | Load 0x2,0xb 0236 e40a | | Load 0x2,0xa 0237 e00b | | Load 0x0,0xb 0238 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0239 0227 | ' | Execute Access,All_Reference 023a 800c | | Call 0x0,0xc 023b c40a | | Store 0x2,0xa 023c c40b | | Store 0x2,0xb 023d c408 | | Store 0x2,0x8 023e c409 | | Store 0x2,0x9 023f 00d1 | | Pop_Control Pop_Count_1 0240 481f |H | Short_Literal 0x1f 0241 00d9 | | Load_Top At_Offset_1 0242 01d7 | | Execute Vector,Field_Read 0243 6808 |h | Jump_Zero 0x24c 0244 00da | | Load_Top At_Offset_2 0245 e5ff | | Load 0x2,-0x1 0246 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0247 4801 |H | Short_Literal 0x1 0248 481b |H | Short_Literal 0x1b 0249 e5ff | | Load 0x2,-0x1 024a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 024b 01d6 | | Execute Vector,Field_Write 024c 481e |H | Short_Literal 0x1e 024d 00d9 | | Load_Top At_Offset_1 024e 01d7 | | Execute Vector,Field_Read 024f 6808 |h | Jump_Zero 0x258 0250 00d9 | | Load_Top At_Offset_1 0251 e5ff | | Load 0x2,-0x1 0252 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0253 4801 |H | Short_Literal 0x1 0254 481b |H | Short_Literal 0x1b 0255 e5ff | | Load 0x2,-0x1 0256 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0257 01d6 | | Execute Vector,Field_Write 0258 e004 | | Load 0x0,0x4 0259 e003 | | Load 0x0,0x3 025a e00d | | Load 0x0,0xd 025b 800e | | Call 0x0,0xe 025c e00d | | Load 0x0,0xd 025d 800f | | Call 0x0,0xf 025e c402 | | Store 0x2,0x2 025f c403 | | Store 0x2,0x3 0260 e403 | | Load 0x2,0x3 0261 689c |h | Jump_Zero 0x2fe 0262 4800 |H | Short_Literal 0x0 0263 a405 | | Store_Unchecked 0x2,0x5 0264 00cf | | Action Mark_Auxiliary 0265 e402 | | Load 0x2,0x2 0266 0227 | ' | Execute Access,All_Reference 0267 01d9 | | Execute Vector,Reverse_Bounds 0268 0263 | c | Execute Discrete,Above_Bound 0269 7082 |p | Jump_Nonzero 0x2ec 026a 00d8 | | Load_Top At_Offset_0 026b e402 | | Load 0x2,0x2 026c 0227 | ' | Execute Access,All_Reference 026d 01d5 | | Execute Vector,Field_Reference 026e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 026f 6806 |h | Jump_Zero 0x276 0270 00d8 | | Load_Top At_Offset_0 0271 e402 | | Load 0x2,0x2 0272 0227 | ' | Execute Access,All_Reference 0273 01d5 | | Execute Vector,Field_Reference 0274 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0275 7026 |p& | Jump_Nonzero 0x29c 0276 00d8 | | Load_Top At_Offset_0 0277 e402 | | Load 0x2,0x2 0278 0227 | ' | Execute Access,All_Reference 0279 01d5 | | Execute Vector,Field_Reference 027a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 027b 0f20 | | Execute_Immediate Equal,0x20 027c 680b |h | Jump_Zero 0x288 027d 00d8 | | Load_Top At_Offset_0 027e e402 | | Load 0x2,0x2 027f 0227 | ' | Execute Access,All_Reference 0280 01d5 | | Execute Vector,Field_Reference 0281 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0282 0f20 | | Execute_Immediate Equal,0x20 0283 6804 |h | Jump_Zero 0x288 0284 4820 |H | Short_Literal 0x20 0285 a405 | | Store_Unchecked 0x2,0x5 0286 00d2 | | Pop_Control Pop_Count_2 0287 7864 |xd | Jump 0x2ec 0288 00d8 | | Load_Top At_Offset_0 0289 e402 | | Load 0x2,0x2 028a 0227 | ' | Execute Access,All_Reference 028b 01d5 | | Execute Vector,Field_Reference 028c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 028d 0c20 | | Execute_Immediate Greater_Equal,0x20 028e 680a |h | Jump_Zero 0x299 028f 00d8 | | Load_Top At_Offset_0 0290 e402 | | Load 0x2,0x2 0291 0227 | ' | Execute Access,All_Reference 0292 01d5 | | Execute Vector,Field_Reference 0293 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0294 0c20 | | Execute_Immediate Greater_Equal,0x20 0295 6803 |h | Jump_Zero 0x299 0296 4820 |H | Short_Literal 0x20 0297 a405 | | Store_Unchecked 0x2,0x5 0298 7851 |xQ | Jump 0x2ea 0299 4820 |H | Short_Literal 0x20 029a a405 | | Store_Unchecked 0x2,0x5 029b 784e |xN | Jump 0x2ea 029c e405 | | Load 0x2,0x5 029d 703a |p: | Jump_Nonzero 0x2d8 029e 4820 |H | Short_Literal 0x20 029f 00d9 | | Load_Top At_Offset_1 02a0 e402 | | Load 0x2,0x2 02a1 0227 | ' | Execute Access,All_Reference 02a2 01d5 | | Execute Vector,Field_Reference 02a3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02a4 00da | | Load_Top At_Offset_2 02a5 e402 | | Load 0x2,0x2 02a6 0227 | ' | Execute Access,All_Reference 02a7 01d5 | | Execute Vector,Field_Reference 02a8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02a9 0262 | b | Execute Discrete,In_Range 02aa 682d |h- | Jump_Zero 0x2d8 02ab 4820 |H | Short_Literal 0x20 02ac 00d9 | | Load_Top At_Offset_1 02ad e402 | | Load 0x2,0x2 02ae 0227 | ' | Execute Access,All_Reference 02af 01d5 | | Execute Vector,Field_Reference 02b0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02b1 00da | | Load_Top At_Offset_2 02b2 e402 | | Load 0x2,0x2 02b3 0227 | ' | Execute Access,All_Reference 02b4 01d5 | | Execute Vector,Field_Reference 02b5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02b6 0262 | b | Execute Discrete,In_Range 02b7 6820 |h | Jump_Zero 0x2d8 02b8 4820 |H | Short_Literal 0x20 02b9 00d9 | | Load_Top At_Offset_1 02ba e402 | | Load 0x2,0x2 02bb 0227 | ' | Execute Access,All_Reference 02bc 01d5 | | Execute Vector,Field_Reference 02bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02be 0272 | r | Execute Discrete,Minus 02bf 00d9 | | Load_Top At_Offset_1 02c0 e402 | | Load 0x2,0x2 02c1 0227 | ' | Execute Access,All_Reference 02c2 01d5 | | Execute Vector,Field_Reference 02c3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 02c4 026f | o | Execute Discrete,Remainder 02c5 7012 |p | Jump_Nonzero 0x2d8 02c6 4820 |H | Short_Literal 0x20 02c7 00d9 | | Load_Top At_Offset_1 02c8 e402 | | Load 0x2,0x2 02c9 0227 | ' | Execute Access,All_Reference 02ca 01d5 | | Execute Vector,Field_Reference 02cb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02cc 0272 | r | Execute Discrete,Minus 02cd 00d9 | | Load_Top At_Offset_1 02ce e402 | | Load 0x2,0x2 02cf 0227 | ' | Execute Access,All_Reference 02d0 01d5 | | Execute Vector,Field_Reference 02d1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 02d2 026f | o | Execute Discrete,Remainder 02d3 7004 |p | Jump_Nonzero 0x2d8 02d4 4820 |H | Short_Literal 0x20 02d5 a405 | | Store_Unchecked 0x2,0x5 02d6 00d2 | | Pop_Control Pop_Count_2 02d7 7814 |x | Jump 0x2ec 02d8 e405 | | Load 0x2,0x5 02d9 7010 |p | Jump_Nonzero 0x2ea 02da 00d8 | | Load_Top At_Offset_0 02db e402 | | Load 0x2,0x2 02dc 0227 | ' | Execute Access,All_Reference 02dd 01d5 | | Execute Vector,Field_Reference 02de 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02df 0c20 | | Execute_Immediate Greater_Equal,0x20 02e0 6809 |h | Jump_Zero 0x2ea 02e1 00d8 | | Load_Top At_Offset_0 02e2 e402 | | Load 0x2,0x2 02e3 0227 | ' | Execute Access,All_Reference 02e4 01d5 | | Execute Vector,Field_Reference 02e5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02e6 0c20 | | Execute_Immediate Greater_Equal,0x20 02e7 6802 |h | Jump_Zero 0x2ea 02e8 4820 |H | Short_Literal 0x20 02e9 a405 | | Store_Unchecked 0x2,0x5 02ea 00c8 | | Action Pop_Auxiliary_Range 02eb 3f7e |?~ | Loop_Increasing 0x26a 02ec 00ce | | Action Pop_Auxiliary 02ed e00d | | Load 0x0,0xd 02ee 8010 | | Call 0x0,0x10 02ef 8011 | | Call 0x0,0x11 02f0 e00b | | Load 0x0,0xb 02f1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f2 e00b | | Load 0x0,0xb 02f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02f4 4820 |H | Short_Literal 0x20 02f5 4820 |H | Short_Literal 0x20 02f6 e20e | | Load 0x1,0xe 02f7 e00d | | Load 0x0,0xd 02f8 800e | | Call 0x0,0xe 02f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02fa e00d | | Load 0x0,0xd 02fb 8012 | | Call 0x0,0x12 02fc e407 | | Load 0x2,0x7 02fd 017d | } | Execute Record,Structure_Write 02fe e407 | | Load 0x2,0x7 02ff e007 | | Load 0x0,0x7 0300 017f | | Execute Record,Equal 0301 7008 |p | Jump_Nonzero 0x30a 0302 e407 | | Load 0x2,0x7 0303 e5ff | | Load 0x2,-0x1 0304 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0305 4801 |H | Short_Literal 0x1 0306 481d |H | Short_Literal 0x1d 0307 e5ff | | Load 0x2,-0x1 0308 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0309 01d6 | | Execute Vector,Field_Write 030a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 030b 0000 0000 | | .BLANK 0000[0x5] 0310 ; -------------------------------------------------------------------------------------- 0310 ; Debug Table 0310 ; -------------------------------------------------------------------------------------- 0310 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6835,0x0000,0x0001,0x0003 0316 000b 0322 | "| .DBG4T 0x000b,0x0322,0x8000,0x0000 031a 000e 0325 | %| .DBG4T 0x000e,0x0325,0x8000,0x0000 031e 021b 032b | +| .DBG4T 0x021b,0x032b,0x0001,0x0000 0322 ; -------------------------------------------------------------------------------------- 0322 ; Debug chain 0322 ; -------------------------------------------------------------------------------------- 0322 0001 0000 | | .DBGLEN 0x0001,0x0000 0324 000b | | .DBGLNO 0x000b 0325 ; -------------------------------------------------------------------------------------- 0325 ; Debug chain 0325 ; -------------------------------------------------------------------------------------- 0325 0004 0000 | | .DBGLEN 0x0004,0x0000 0327 000e 000f | | .DBGLNO 0x000e,0x000f,0x0010,0x0214 032b ; -------------------------------------------------------------------------------------- 032b ; Debug chain 032b ; -------------------------------------------------------------------------------------- 032b 0009 001b | | .DBGLEN 0x0009,0x001b 032d 021b 021d | | .DBGLNO 0x021b,0x021d,0x021f,0x0221,0x0223,0x0225,0x022a,0x022d,0x0230,0x0232,0x0240,0x0244,0x0247,0x024c,0x0250,0x0253,0x0258,0x0260,0x0262,0x0265,0x026a,0x0276,0x0284,0x0286,0x0288,0x0296,0x0299,0x029c,0x02d4,0x02d6,0x02d8,0x02e8,0x02ed,0x02fe,0x0302,0x0305 0351 0000 0000 | | .BLANK 0000[0xaf]