|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_08f0ad
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0290 | | .CONST 0x0290 ; 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 0244 | D | .CONST 0x0244 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001d | | .CONST 0x001d ; Number of locals 000b INIT_0008: 000b e00a | | Load 0x0,0xa 000c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 000d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 000e 02c7 | | Declare_Variable Any 000f e20f | | Load 0x1,0xf 0010 e00a | | Load 0x0,0xa 0011 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0012 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0013 e00a | | Load 0x0,0xa 0014 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0015 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0016 e00a | | Load 0x0,0xa 0017 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0018 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0019 e00a | | Load 0x0,0xa 001a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 001b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 001c e00a | | Load 0x0,0xa 001d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 001e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 001f e00a | | Load 0x0,0xa 0020 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0021 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0022 a402 | | Store_Unchecked 0x2,0x2 0023 e20f | | Load 0x1,0xf 0024 e00a | | Load 0x0,0xa 0025 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0026 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0027 e00a | | Load 0x0,0xa 0028 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0029 1b19 | | Execute Package,Field_Read,Field_Number 0x19 002a 00db | | Load_Top At_Offset_3 002b e00a | | Load 0x0,0xa 002c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002d 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 002e e00a | | Load 0x0,0xa 002f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0030 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0031 e00a | | Load 0x0,0xa 0032 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0033 1b44 | D | Execute Package,Field_Read,Field_Number 0x44 0034 011e | | Execute Any,Convert 0035 e20f | | Load 0x1,0xf 0036 e00a | | Load 0x0,0xa 0037 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0038 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0039 e00a | | Load 0x0,0xa 003a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 003b 1b19 | | Execute Package,Field_Read,Field_Number 0x19 003c 4800 |H | Short_Literal 0x0 003d e00a | | Load 0x0,0xa 003e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 003f 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 0040 0337 | 7 | Declare_Variable Array 0041 4800 |H | Short_Literal 0x0 0042 4803 |H | Short_Literal 0x3 0043 00da | | Load_Top At_Offset_2 0044 01d6 | | Execute Vector,Field_Write 0045 4800 |H | Short_Literal 0x0 0046 480e |H | Short_Literal 0xe 0047 00da | | Load_Top At_Offset_2 0048 01d6 | | Execute Vector,Field_Write 0049 4802 |H | Short_Literal 0x2 004a 4800 |H | Short_Literal 0x0 004b 4801 |H | Short_Literal 0x1 004c 00d9 | | Load_Top At_Offset_1 004d e408 | | Load 0x2,0x8 004e 01d6 | | Execute Vector,Field_Write 004f 3ffb |? | Loop_Increasing 0x4b 0050 480d |H | Short_Literal 0xd 0051 4804 |H | Short_Literal 0x4 0052 4801 |H | Short_Literal 0x1 0053 00d9 | | Load_Top At_Offset_1 0054 e408 | | Load 0x2,0x8 0055 01d6 | | Execute Vector,Field_Write 0056 3ffb |? | Loop_Increasing 0x52 0057 e00a | | Load 0x0,0xa 0058 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0059 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 005a 01c3 | | Execute Vector,Check_In_Type 005b e00a | | Load 0x0,0xa 005c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 005d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 005e e00a | | Load 0x0,0xa 005f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0060 1b4c | L | Execute Package,Field_Read,Field_Number 0x4c 0061 011e | | Execute Any,Convert 0062 e20f | | Load 0x1,0xf 0063 e00a | | Load 0x0,0xa 0064 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0065 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0066 00da | | Load_Top At_Offset_2 0067 e403 | | Load 0x2,0x3 0068 e00a | | Load 0x0,0xa 0069 1b15 | | Execute Package,Field_Read,Field_Number 0x15 006a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 006b e00a | | Load 0x0,0xa 006c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 006d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 006e 011e | | Execute Any,Convert 006f e20f | | Load 0x1,0xf 0070 0092 024e | N| Action Push_String_Extended,0x24e ; "system.long_address" 0072 e00a | | Load 0x0,0xa 0073 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0074 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0075 e00a | | Load 0x0,0xa 0076 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0077 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0078 011e | | Execute Any,Convert 0079 e00a | | Load 0x0,0xa 007a 1b15 | | Execute Package,Field_Read,Field_Number 0x15 007b 181f | | Execute Package,Field_Execute,Field_Number 0x1f 007c e00a | | Load 0x0,0xa 007d 1b15 | | Execute Package,Field_Read,Field_Number 0x15 007e 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 007f 011e | | Execute Any,Convert 0080 e20f | | Load 0x1,0xf 0081 00d9 | | Load_Top At_Offset_1 0082 00db | | Load_Top At_Offset_3 0083 e405 | | Load 0x2,0x5 0084 0092 024f | O| Action Push_String_Extended,0x24f ; "Long_Address" 0086 e00a | | Load 0x0,0xa 0087 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0088 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0089 e00a | | Load 0x0,0xa 008a 1b15 | | Execute Package,Field_Read,Field_Number 0x15 008b 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 008c 011e | | Execute Any,Convert 008d 4801 |H | Short_Literal 0x1 008e 4801 |H | Short_Literal 0x1 008f e00a | | Load 0x0,0xa 0090 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0091 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0092 035b | [ | Declare_Type Array,Constrained 0093 0337 | 7 | Declare_Variable Array 0094 e20f | | Load 0x1,0xf 0095 0092 0250 | P| Action Push_String_Extended,0x250 ; "System.Address" 0097 e00a | | Load 0x0,0xa 0098 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0099 180e | | Execute Package,Field_Execute,Field_Number 0xe 009a e00a | | Load 0x0,0xa 009b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 009c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009d 0119 | | Execute Any,Check_In_Formal_Type 009e 4801 |H | Short_Literal 0x1 009f 00da | | Load_Top At_Offset_2 00a0 01d6 | | Execute Vector,Field_Write 00a1 e20f | | Load 0x1,0xf 00a2 e00a | | Load 0x0,0xa 00a3 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00a4 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00a5 e00a | | Load 0x0,0xa 00a6 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00a7 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00a8 00db | | Load_Top At_Offset_3 00a9 e00a | | Load 0x0,0xa 00aa 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00ab 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00ac e00a | | Load 0x0,0xa 00ad 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00ae 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00af e00a | | Load 0x0,0xa 00b0 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00b1 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00b2 e00a | | Load 0x0,0xa 00b3 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00b4 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00b5 011e | | Execute Any,Convert 00b6 e20f | | Load 0x1,0xf 00b7 00d9 | | Load_Top At_Offset_1 00b8 e00a | | Load 0x0,0xa 00b9 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00ba 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 00bb e00a | | Load 0x0,0xa 00bc 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00bd 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 00be e00a | | Load 0x0,0xa 00bf 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00c1 e00a | | Load 0x0,0xa 00c2 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c4 011e | | Execute Any,Convert 00c5 e20f | | Load 0x1,0xf 00c6 0092 0250 | P| Action Push_String_Extended,0x250 ; "System.Address" 00c8 e00a | | Load 0x0,0xa 00c9 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00cb e00a | | Load 0x0,0xa 00cc 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00ce 011e | | Execute Any,Convert 00cf e20f | | Load 0x1,0xf 00d0 00d8 | | Load_Top At_Offset_0 00d1 e20f | | Load 0x1,0xf 00d2 e00a | | Load 0x0,0xa 00d3 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00d4 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 00d5 0092 0251 | Q| Action Push_String_Extended,0x251 ; "Universal_Integer" 00d7 e00a | | Load 0x0,0xa 00d8 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00d9 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 00da e00a | | Load 0x0,0xa 00db 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00dc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 00dd e00a | | Load 0x0,0xa 00de 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00df 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 00e0 011e | | Execute Any,Convert 00e1 e20f | | Load 0x1,0xf 00e2 00d9 | | Load_Top At_Offset_1 00e3 00db | | Load_Top At_Offset_3 00e4 e40b | | Load 0x2,0xb 00e5 0092 0252 | R| Action Push_String_Extended,0x252 ; "Ref" 00e7 e00a | | Load 0x0,0xa 00e8 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00e9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 00ea e00a | | Load 0x0,0xa 00eb 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00ec 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 00ed 011e | | Execute Any,Convert 00ee e00a | | Load 0x0,0xa 00ef 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00f0 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00f1 02c7 | | Declare_Variable Any 00f2 e20f | | Load 0x1,0xf 00f3 e00a | | Load 0x0,0xa 00f4 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00f5 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00f6 e00a | | Load 0x0,0xa 00f7 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00f8 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00f9 e00a | | Load 0x0,0xa 00fa 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00fb 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00fc e00a | | Load 0x0,0xa 00fd 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00fe 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00ff e00a | | Load 0x0,0xa 0100 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0101 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0102 e00a | | Load 0x0,0xa 0103 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0104 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0105 a40f | | Store_Unchecked 0x2,0xf 0106 e20f | | Load 0x1,0xf 0107 e00a | | Load 0x0,0xa 0108 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0109 1b19 | | Execute Package,Field_Read,Field_Number 0x19 010a e00a | | Load 0x0,0xa 010b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 010c 1b19 | | Execute Package,Field_Read,Field_Number 0x19 010d 00db | | Load_Top At_Offset_3 010e e00a | | Load 0x0,0xa 010f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0110 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e 0111 0337 | 7 | Declare_Variable Array 0112 4801 |H | Short_Literal 0x1 0113 4800 |H | Short_Literal 0x0 0114 00da | | Load_Top At_Offset_2 0115 01d6 | | Execute Vector,Field_Write 0116 4801 |H | Short_Literal 0x1 0117 4807 |H | Short_Literal 0x7 0118 00da | | Load_Top At_Offset_2 0119 01d6 | | Execute Vector,Field_Write 011a 4806 |H | Short_Literal 0x6 011b 4801 |H | Short_Literal 0x1 011c 4800 |H | Short_Literal 0x0 011d 00d9 | | Load_Top At_Offset_1 011e e414 | | Load 0x2,0x14 011f 01d6 | | Execute Vector,Field_Write 0120 3ffb |? | Loop_Increasing 0x11c 0121 e00a | | Load 0x0,0xa 0122 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0123 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e 0124 01c3 | | Execute Vector,Check_In_Type 0125 e00a | | Load 0x0,0xa 0126 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0127 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0128 e00a | | Load 0x0,0xa 0129 1b12 | | Execute Package,Field_Read,Field_Number 0x12 012a 1b44 | D | Execute Package,Field_Read,Field_Number 0x44 012b 011e | | Execute Any,Convert 012c e20f | | Load 0x1,0xf 012d e00a | | Load 0x0,0xa 012e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 012f 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0130 e00a | | Load 0x0,0xa 0131 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0132 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0133 4800 |H | Short_Literal 0x0 0134 e00a | | Load 0x0,0xa 0135 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0136 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 0137 0337 | 7 | Declare_Variable Array 0138 4801 |H | Short_Literal 0x1 0139 4800 |H | Short_Literal 0x0 013a 00da | | Load_Top At_Offset_2 013b 01d6 | | Execute Vector,Field_Write 013c 4801 |H | Short_Literal 0x1 013d 4802 |H | Short_Literal 0x2 013e 00da | | Load_Top At_Offset_2 013f 01d6 | | Execute Vector,Field_Write 0140 4801 |H | Short_Literal 0x1 0141 480d |H | Short_Literal 0xd 0142 00da | | Load_Top At_Offset_2 0143 01d6 | | Execute Vector,Field_Write 0144 4800 |H | Short_Literal 0x0 0145 4801 |H | Short_Literal 0x1 0146 00da | | Load_Top At_Offset_2 0147 01d6 | | Execute Vector,Field_Write 0148 480c |H | Short_Literal 0xc 0149 4803 |H | Short_Literal 0x3 014a 4800 |H | Short_Literal 0x0 014b 00d9 | | Load_Top At_Offset_1 014c e415 | | Load 0x2,0x15 014d 01d6 | | Execute Vector,Field_Write 014e 3ffb |? | Loop_Increasing 0x14a 014f 4800 |H | Short_Literal 0x0 0150 480e |H | Short_Literal 0xe 0151 00da | | Load_Top At_Offset_2 0152 01d6 | | Execute Vector,Field_Write 0153 e00a | | Load 0x0,0xa 0154 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0155 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 0156 01c3 | | Execute Vector,Check_In_Type 0157 e00a | | Load 0x0,0xa 0158 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0159 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 015a e00a | | Load 0x0,0xa 015b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 015c 1b4c | L | Execute Package,Field_Read,Field_Number 0x4c 015d 011e | | Execute Any,Convert 015e e20f | | Load 0x1,0xf 015f e00a | | Load 0x0,0xa 0160 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0161 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0162 00da | | Load_Top At_Offset_2 0163 e410 | | Load 0x2,0x10 0164 e00a | | Load 0x0,0xa 0165 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0166 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0167 e00a | | Load 0x0,0xa 0168 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0169 1b0e | | Execute Package,Field_Read,Field_Number 0xe 016a 011e | | Execute Any,Convert 016b e20f | | Load 0x1,0xf 016c 0092 0253 | S| Action Push_String_Extended,0x253 ; "Machine_Code.Operand" 016e e00a | | Load 0x0,0xa 016f 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0170 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0171 e00a | | Load 0x0,0xa 0172 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0173 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0174 011e | | Execute Any,Convert 0175 e00a | | Load 0x0,0xa 0176 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0177 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0178 e00a | | Load 0x0,0xa 0179 1b15 | | Execute Package,Field_Read,Field_Number 0x15 017a 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 017b 011e | | Execute Any,Convert 017c e20f | | Load 0x1,0xf 017d 00d9 | | Load_Top At_Offset_1 017e 00db | | Load_Top At_Offset_3 017f e412 | | Load 0x2,0x12 0180 0092 0252 | R| Action Push_String_Extended,0x252 ; "Ref" 0182 e00a | | Load 0x0,0xa 0183 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0184 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0185 e00a | | Load 0x0,0xa 0186 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0187 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0188 011e | | Execute Any,Convert 0189 e20f | | Load 0x1,0xf 018a e00a | | Load 0x0,0xa 018b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 018c 1b19 | | Execute Package,Field_Read,Field_Number 0x19 018d e00a | | Load 0x0,0xa 018e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 018f 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0190 e00a | | Load 0x0,0xa 0191 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0192 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0193 e00a | | Load 0x0,0xa 0194 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0195 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0196 0337 | 7 | Declare_Variable Array 0197 4801 |H | Short_Literal 0x1 0198 480b |H | Short_Literal 0xb 0199 00da | | Load_Top At_Offset_2 019a 01d6 | | Execute Vector,Field_Write 019b 480a |H | Short_Literal 0xa 019c 4800 |H | Short_Literal 0x0 019d 4800 |H | Short_Literal 0x0 019e 00d9 | | Load_Top At_Offset_1 019f e41a | | Load 0x2,0x1a 01a0 01d6 | | Execute Vector,Field_Write 01a1 3ffb |? | Loop_Increasing 0x19d 01a2 480e |H | Short_Literal 0xe 01a3 480c |H | Short_Literal 0xc 01a4 4800 |H | Short_Literal 0x0 01a5 00d9 | | Load_Top At_Offset_1 01a6 e41a | | Load 0x2,0x1a 01a7 01d6 | | Execute Vector,Field_Write 01a8 3ffb |? | Loop_Increasing 0x1a4 01a9 e00a | | Load 0x0,0xa 01aa 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01ab 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ac 01c3 | | Execute Vector,Check_In_Type 01ad e00a | | Load 0x0,0xa 01ae 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01af 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01b0 e00a | | Load 0x0,0xa 01b1 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01b2 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01b3 e00a | | Load 0x0,0xa 01b4 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01b5 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 01b6 011e | | Execute Any,Convert 01b7 e20f | | Load 0x1,0xf 01b8 e00a | | Load 0x0,0xa 01b9 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01ba 1b19 | | Execute Package,Field_Read,Field_Number 0x19 01bb e00a | | Load 0x0,0xa 01bc 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01bd 1b19 | | Execute Package,Field_Read,Field_Number 0x19 01be 00db | | Load_Top At_Offset_3 01bf e00a | | Load 0x0,0xa 01c0 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01c1 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 01c2 e00a | | Load 0x0,0xa 01c3 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01c4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 01c5 e00a | | Load 0x0,0xa 01c6 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01c7 1b44 | D | Execute Package,Field_Read,Field_Number 0x44 01c8 011e | | Execute Any,Convert 01c9 e20f | | Load 0x1,0xf 01ca e00a | | Load 0x0,0xa 01cb 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01cc 1b19 | | Execute Package,Field_Read,Field_Number 0x19 01cd e00a | | Load 0x0,0xa 01ce 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01cf 1b19 | | Execute Package,Field_Read,Field_Number 0x19 01d0 4801 |H | Short_Literal 0x1 01d1 e00a | | Load 0x0,0xa 01d2 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01d3 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 01d4 0337 | 7 | Declare_Variable Array 01d5 4801 |H | Short_Literal 0x1 01d6 4803 |H | Short_Literal 0x3 01d7 00da | | Load_Top At_Offset_2 01d8 01d6 | | Execute Vector,Field_Write 01d9 4802 |H | Short_Literal 0x2 01da 4800 |H | Short_Literal 0x0 01db 4800 |H | Short_Literal 0x0 01dc 00d9 | | Load_Top At_Offset_1 01dd e41c | | Load 0x2,0x1c 01de 01d6 | | Execute Vector,Field_Write 01df 3ffb |? | Loop_Increasing 0x1db 01e0 480e |H | Short_Literal 0xe 01e1 4804 |H | Short_Literal 0x4 01e2 4800 |H | Short_Literal 0x0 01e3 00d9 | | Load_Top At_Offset_1 01e4 e41c | | Load 0x2,0x1c 01e5 01d6 | | Execute Vector,Field_Write 01e6 3ffb |? | Loop_Increasing 0x1e2 01e7 e00a | | Load 0x0,0xa 01e8 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01e9 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 01ea 01c3 | | Execute Vector,Check_In_Type 01eb e00a | | Load 0x0,0xa 01ec 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01ed 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01ee e00a | | Load 0x0,0xa 01ef 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01f0 1b4c | L | Execute Package,Field_Read,Field_Number 0x4c 01f1 011e | | Execute Any,Convert 01f2 e20f | | Load 0x1,0xf 01f3 e00a | | Load 0x0,0xa 01f4 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01f5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01f6 00da | | Load_Top At_Offset_2 01f7 e417 | | Load 0x2,0x17 01f8 e00a | | Load 0x0,0xa 01f9 1b15 | | Execute Package,Field_Read,Field_Number 0x15 01fa 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01fb e00a | | Load 0x0,0xa 01fc 1b15 | | Execute Package,Field_Read,Field_Number 0x15 01fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01fe 011e | | Execute Any,Convert 01ff e20f | | Load 0x1,0xf 0200 0092 0254 | T| Action Push_String_Extended,0x254 ; "System.Task_Id" 0202 e00a | | Load 0x0,0xa 0203 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0204 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0205 e00a | | Load 0x0,0xa 0206 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0207 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0208 011e | | Execute Any,Convert 0209 e00a | | Load 0x0,0xa 020a 1b15 | | Execute Package,Field_Read,Field_Number 0x15 020b 181f | | Execute Package,Field_Execute,Field_Number 0x1f 020c e00a | | Load 0x0,0xa 020d 1b15 | | Execute Package,Field_Read,Field_Number 0x15 020e 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 020f 011e | | Execute Any,Convert 0210 e20f | | Load 0x1,0xf 0211 00d9 | | Load_Top At_Offset_1 0212 00db | | Load_Top At_Offset_3 0213 e419 | | Load 0x2,0x19 0214 0092 0255 | U| Action Push_String_Extended,0x255 ; "Task_Id" 0216 e00a | | Load 0x0,0xa 0217 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0218 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0219 e00a | | Load 0x0,0xa 021a 1b15 | | Execute Package,Field_Read,Field_Number 0x15 021b 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 021c 011e | | Execute Any,Convert 021d 4801 |H | Short_Literal 0x1 021e 4804 |H | Short_Literal 0x4 021f e00a | | Load 0x0,0xa 0220 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0221 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 0222 035b | [ | Declare_Type Array,Constrained 0223 0337 | 7 | Declare_Variable Array 0224 e40e | | Load 0x2,0xe 0225 e00a | | Load 0x0,0xa 0226 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0227 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0228 0119 | | Execute Any,Check_In_Formal_Type 0229 4801 |H | Short_Literal 0x1 022a 00da | | Load_Top At_Offset_2 022b 01d6 | | Execute Vector,Field_Write 022c e415 | | Load 0x2,0x15 022d e00a | | Load 0x0,0xa 022e 1b15 | | Execute Package,Field_Read,Field_Number 0x15 022f 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0230 0119 | | Execute Any,Check_In_Formal_Type 0231 4802 |H | Short_Literal 0x2 0232 00da | | Load_Top At_Offset_2 0233 01d6 | | Execute Vector,Field_Write 0234 00d9 | | Load_Top At_Offset_1 0235 e00a | | Load 0x0,0xa 0236 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0237 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0238 0119 | | Execute Any,Check_In_Formal_Type 0239 4803 |H | Short_Literal 0x3 023a 00da | | Load_Top At_Offset_2 023b 01d6 | | Execute Vector,Field_Write 023c e408 | | Load 0x2,0x8 023d e00a | | Load 0x0,0xa 023e 1b15 | | Execute Package,Field_Read,Field_Number 0x15 023f 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0240 0119 | | Execute Any,Check_In_Formal_Type 0241 4804 |H | Short_Literal 0x4 0242 00da | | Load_Top At_Offset_2 0243 01d6 | | Execute Vector,Field_Write 0244 BODY_0008: 0244 e20f | | Load 0x1,0xf 0245 00d9 | | Load_Top At_Offset_1 0246 e00a | | Load 0x0,0xa 0247 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0248 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0249 e00a | | Load 0x0,0xa 024a 1b15 | | Execute Package,Field_Read,Field_Number 0x15 024b 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 024c 011d | | Execute Any,Convert_To_Formal 024d 00ca | | Action Exit_Nullary_Function 024e ; -------------------------------------------------------------------------------------- 024e ; STRING TABLE 024e ; -------------------------------------------------------------------------------------- 024e 0012 | | .STRTAB 0x0012->0x0257 ; "system.long_address" 024f 0023 | # | .STRTAB 0x0023->0x0260 ; "Long_Address" 0250 002d | - | .STRTAB 0x002d->0x0266 ; "System.Address" 0251 0039 | 9 | .STRTAB 0x0039->0x026d ; "Universal_Integer" 0252 0048 | H | .STRTAB 0x0048->0x0276 ; "Ref" 0253 0049 | I | .STRTAB 0x0049->0x0277 ; "Machine_Code.Operand" 0254 005b | [ | .STRTAB 0x005b->0x0281 ; "System.Task_Id" 0255 0067 | g | .STRTAB 0x0067->0x0288 ; "Task_Id" 0256 006c | l | .STREND 0x006c->0x028c 0257 7379 7374 |syst| .STRTAB_STRINGS 028c 0000 0000 | | .BLANK 0000[0x4] 0290 ; -------------------------------------------------------------------------------------- 0290 ; Debug Table 0290 ; -------------------------------------------------------------------------------------- 0290 0004 0009 | | .DEBUG4 0x0004,0x0009,0x9267,0x0000,0x0001,0x0001 0296 000b 029a | | .DBG4T 0x000b,0x029a,0x0002,0x8000 029a ; -------------------------------------------------------------------------------------- 029a ; Debug chain 029a ; -------------------------------------------------------------------------------------- 029a 001c 0001 | | .DBGLEN 0x001c,0x0001 029c 000b 0023 | #| .DBGLNO 0x000b,0x0023,0x0035,0x0062,0x006f,0x0079,0x0080,0x008d,0x00a1,0x00b6,0x00c5,0x00cf,0x00e1,0x00ee,0x0106,0x012c,0x015e,0x016b,0x0175,0x017c,0x0189,0x01b7,0x01c9,0x01f2,0x01ff,0x0209,0x0210,0x021d,0x0244 02b9 0002 0003 | | .XXX[0x1c] 02bb 0004 0005 | | 02bd 0006 0007 | | 02bf 0008 0009 | | 02c1 000a 000b | | 02c3 000c 000d | | 02c5 000e 000f | | 02c7 0010 0011 | | 02c9 0012 0013 | | 02cb 0014 0015 | | 02cd 0016 0017 | | 02cf 0018 0019 | | 02d1 001a 001b | | 02d3 001c 001d | | 02d5 0000 0000 | | .BLANK 0000[0x12b]