|
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: 6144 (0x1800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d2ce3
└─⟦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 0a48 | H | .CONST 0x0a48 ; 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 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0085 | | .CONST 0x0085 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 002b | + | .CONST 0x002b ; Number of locals 000b INIT_0008: 000b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 000d 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 000f 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated 0011 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0013 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0015 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated 0017 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 0019 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated 001b 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 001d 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 001f 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated 0021 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated 0023 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated 0025 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated 0027 029a 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Visible,Unelaborated 0029 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 002b 4804 |H | Short_Literal 0x4 002c 032b | + | Declare_Type Record,Incomplete,Visible 002d 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated 002f 029a 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call,Visible,Unelaborated 0031 029a 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call,Visible,Unelaborated 0033 481e |H | Short_Literal 0x1e 0034 e001 | | Load 0x0,0x1 0035 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0036 1c07 | | Execute_Immediate Run_Utility,0x7 0037 00e2 | | Load_Encached Integer_Cache 0038 00e2 | | Load_Encached Integer_Cache 0039 e002 | | Load 0x0,0x2 003a 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 003b 029f 0943 | C| Declare_Subprogram INIT_0940,For_Call 003d e21d | | Load 0x1,0x1d 003e 0326 | & | Complete_Type Record,By_Defining 003f 00bf | | Action Accept_Activation 0040 4801 |H | Short_Literal 0x1 0041 481e |H | Short_Literal 0x1e 0042 00e9 | | Load_Encached String_Cache 0043 035b | [ | Declare_Type Array,Constrained 0044 0337 | 7 | Declare_Variable Array 0045 e002 | | Load 0x0,0x2 0046 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0047 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0048 e003 | | Load 0x0,0x3 0049 1b0f | | Execute Package,Field_Read,Field_Number 0xf 004a 0322 | " | Declare_Variable Record 004b e004 | | Load 0x0,0x4 004c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004d 0322 | " | Declare_Variable Record 004e e002 | | Load 0x0,0x2 004f 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0050 0337 | 7 | Declare_Variable Array 0051 00e1 | | Load_Encached Boolean_Cache 0052 e005 | | Load 0x0,0x5 0053 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0054 4801 |H | Short_Literal 0x1 0055 4805 |H | Short_Literal 0x5 0056 00e9 | | Load_Encached String_Cache 0057 035b | [ | Declare_Type Array,Constrained 0058 0337 | 7 | Declare_Variable Array 0059 1d0d | | Execute_Immediate Reference_Lex_1,0xd 005a 00c7 | | Action Elaborate_Subprogram 005b 1d0e | | Execute_Immediate Reference_Lex_1,0xe 005c 00c7 | | Action Elaborate_Subprogram 005d 1d12 | | Execute_Immediate Reference_Lex_1,0x12 005e 00c7 | | Action Elaborate_Subprogram 005f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0060 00c7 | | Action Elaborate_Subprogram 0061 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0062 00c7 | | Action Elaborate_Subprogram 0063 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0064 00c7 | | Action Elaborate_Subprogram 0065 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0066 00c7 | | Action Elaborate_Subprogram 0067 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0068 00c7 | | Action Elaborate_Subprogram 0069 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 006a 00c7 | | Action Elaborate_Subprogram 006b 029d 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call 006d 029d 088b | | Declare_Subprogram INIT_0888,For_Outer_Call 006f 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0070 00c7 | | Action Elaborate_Subprogram 0071 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0072 00c7 | | Action Elaborate_Subprogram 0073 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0074 00c7 | | Action Elaborate_Subprogram 0075 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0076 00c7 | | Action Elaborate_Subprogram 0077 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0078 00c7 | | Action Elaborate_Subprogram 0079 1d17 | | Execute_Immediate Reference_Lex_1,0x17 007a 00c7 | | Action Elaborate_Subprogram 007b 029d 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call 007d 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 007e 00c7 | | Action Elaborate_Subprogram 007f 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0080 00c7 | | Action Elaborate_Subprogram 0081 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0082 00c7 | | Action Elaborate_Subprogram 0083 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0084 00c7 | | Action Elaborate_Subprogram 0085 BODY_0008: 0085 00bc | | Action Signal_Activated 0086 00bb | | Action Signal_Completion 0087 0000 | | .XXX[0x1] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b e222 | " | Load 0x1,0x22 008c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 008d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 008e 0000 0000 | | .XXX[0x2] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0097 | | .CONST 0x0097 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0005 | | .CONST 0x0005 ; Number of locals 0093 INIT_0090: 0093 00e2 | | Load_Encached Integer_Cache 0094 00e2 | | Load_Encached Integer_Cache 0095 00e2 | | Load_Encached Integer_Cache 0096 00e1 | | Load_Encached Boolean_Cache 0097 BODY_0090: 0097 4800 |H | Short_Literal 0x0 0098 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0099 4800 |H | Short_Literal 0x0 009a a402 | | Store_Unchecked 0x2,0x2 009b 00cf | | Action Mark_Auxiliary 009c e5ff | | Load 0x2,-0x1 009d e001 | | Load 0x0,0x1 009e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 009f 4801 |H | Short_Literal 0x1 00a0 0263 | c | Execute Discrete,Above_Bound 00a1 710a |q | Jump_Nonzero 0x1ac 00a2 00d8 | | Load_Top At_Offset_0 00a3 e5ff | | Load 0x2,-0x1 00a4 e001 | | Load 0x0,0x1 00a5 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 00a6 e006 | | Load 0x0,0x6 00a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a8 467f |F | Jump_Case 0x80 00a9 787f |x | Jump 0x129 ; case 0x0 00aa 787e |x~ | Jump 0x129 ; case 0x1 00ab 787d |x} | Jump 0x129 ; case 0x2 00ac 787c |x| | Jump 0x129 ; case 0x3 00ad 787b |x{ | Jump 0x129 ; case 0x4 00ae 787a |xz | Jump 0x129 ; case 0x5 00af 7879 |xy | Jump 0x129 ; case 0x6 00b0 7878 |xx | Jump 0x129 ; case 0x7 00b1 7877 |xw | Jump 0x129 ; case 0x8 00b2 7876 |xv | Jump 0x129 ; case 0x9 00b3 7875 |xu | Jump 0x129 ; case 0xa 00b4 7874 |xt | Jump 0x129 ; case 0xb 00b5 7873 |xs | Jump 0x129 ; case 0xc 00b6 7872 |xr | Jump 0x129 ; case 0xd 00b7 7871 |xq | Jump 0x129 ; case 0xe 00b8 7870 |xp | Jump 0x129 ; case 0xf 00b9 786f |xo | Jump 0x129 ; case 0x10 00ba 786e |xn | Jump 0x129 ; case 0x11 00bb 786d |xm | Jump 0x129 ; case 0x12 00bc 786c |xl | Jump 0x129 ; case 0x13 00bd 786b |xk | Jump 0x129 ; case 0x14 00be 786a |xj | Jump 0x129 ; case 0x15 00bf 7869 |xi | Jump 0x129 ; case 0x16 00c0 7868 |xh | Jump 0x129 ; case 0x17 00c1 7867 |xg | Jump 0x129 ; case 0x18 00c2 7866 |xf | Jump 0x129 ; case 0x19 00c3 7865 |xe | Jump 0x129 ; case 0x1a 00c4 7864 |xd | Jump 0x129 ; case 0x1b 00c5 7863 |xc | Jump 0x129 ; case 0x1c 00c6 7862 |xb | Jump 0x129 ; case 0x1d 00c7 7861 |xa | Jump 0x129 ; case 0x1e 00c8 7860 |x` | Jump 0x129 ; case 0x1f 00c9 785f |x_ | Jump 0x129 ; case 0x20 00ca 785e |x^ | Jump 0x129 ; case 0x21 00cb 785d |x] | Jump 0x129 ; case 0x22 00cc 785c |x\ | Jump 0x129 ; case 0x23 00cd 78ca |x | Jump 0x198 ; case 0x24 00ce 785a |xZ | Jump 0x129 ; case 0x25 00cf 7859 |xY | Jump 0x129 ; case 0x26 00d0 7858 |xX | Jump 0x129 ; case 0x27 00d1 7857 |xW | Jump 0x129 ; case 0x28 00d2 7856 |xV | Jump 0x129 ; case 0x29 00d3 7855 |xU | Jump 0x129 ; case 0x2a 00d4 7854 |xT | Jump 0x129 ; case 0x2b 00d5 7853 |xS | Jump 0x129 ; case 0x2c 00d6 7852 |xR | Jump 0x129 ; case 0x2d 00d7 78c9 |x | Jump 0x1a1 ; case 0x2e 00d8 7850 |xP | Jump 0x129 ; case 0x2f 00d9 78a0 |x | Jump 0x17a ; case 0x30 00da 78a2 |x | Jump 0x17d ; case 0x31 00db 78a4 |x | Jump 0x180 ; case 0x32 00dc 78a6 |x | Jump 0x183 ; case 0x33 00dd 78a8 |x | Jump 0x186 ; case 0x34 00de 78aa |x | Jump 0x189 ; case 0x35 00df 78ac |x | Jump 0x18c ; case 0x36 00e0 78ae |x | Jump 0x18f ; case 0x37 00e1 78b0 |x | Jump 0x192 ; case 0x38 00e2 78b2 |x | Jump 0x195 ; case 0x39 00e3 7845 |xE | Jump 0x129 ; case 0x3a 00e4 7844 |xD | Jump 0x129 ; case 0x3b 00e5 7843 |xC | Jump 0x129 ; case 0x3c 00e6 7842 |xB | Jump 0x129 ; case 0x3d 00e7 7841 |xA | Jump 0x129 ; case 0x3e 00e8 78b5 |x | Jump 0x19e ; case 0x3f 00e9 783f |x? | Jump 0x129 ; case 0x40 00ea 7841 |xA | Jump 0x12c ; case 0x41 00eb 7843 |xC | Jump 0x12f ; case 0x42 00ec 7845 |xE | Jump 0x132 ; case 0x43 00ed 7847 |xG | Jump 0x135 ; case 0x44 00ee 7849 |xI | Jump 0x138 ; case 0x45 00ef 784b |xK | Jump 0x13b ; case 0x46 00f0 784d |xM | Jump 0x13e ; case 0x47 00f1 784f |xO | Jump 0x141 ; case 0x48 00f2 7851 |xQ | Jump 0x144 ; case 0x49 00f3 7853 |xS | Jump 0x147 ; case 0x4a 00f4 7855 |xU | Jump 0x14a ; case 0x4b 00f5 7857 |xW | Jump 0x14d ; case 0x4c 00f6 7859 |xY | Jump 0x150 ; case 0x4d 00f7 785b |x[ | Jump 0x153 ; case 0x4e 00f8 785d |x] | Jump 0x156 ; case 0x4f 00f9 785f |x_ | Jump 0x159 ; case 0x50 00fa 7861 |xa | Jump 0x15c ; case 0x51 00fb 7863 |xc | Jump 0x15f ; case 0x52 00fc 7865 |xe | Jump 0x162 ; case 0x53 00fd 7867 |xg | Jump 0x165 ; case 0x54 00fe 7869 |xi | Jump 0x168 ; case 0x55 00ff 786b |xk | Jump 0x16b ; case 0x56 0100 786d |xm | Jump 0x16e ; case 0x57 0101 786f |xo | Jump 0x171 ; case 0x58 0102 7871 |xq | Jump 0x174 ; case 0x59 0103 7873 |xs | Jump 0x177 ; case 0x5a 0104 7824 |x$ | Jump 0x129 ; case 0x5b 0105 7823 |x# | Jump 0x129 ; case 0x5c 0106 7822 |x" | Jump 0x129 ; case 0x5d 0107 7821 |x! | Jump 0x129 ; case 0x5e 0108 7892 |x | Jump 0x19b ; case 0x5f 0109 781f |x | Jump 0x129 ; case 0x60 010a 781e |x | Jump 0x129 ; case 0x61 010b 781d |x | Jump 0x129 ; case 0x62 010c 781c |x | Jump 0x129 ; case 0x63 010d 781b |x | Jump 0x129 ; case 0x64 010e 781a |x | Jump 0x129 ; case 0x65 010f 7819 |x | Jump 0x129 ; case 0x66 0110 7818 |x | Jump 0x129 ; case 0x67 0111 7817 |x | Jump 0x129 ; case 0x68 0112 7816 |x | Jump 0x129 ; case 0x69 0113 7815 |x | Jump 0x129 ; case 0x6a 0114 7814 |x | Jump 0x129 ; case 0x6b 0115 7813 |x | Jump 0x129 ; case 0x6c 0116 7812 |x | Jump 0x129 ; case 0x6d 0117 7811 |x | Jump 0x129 ; case 0x6e 0118 7810 |x | Jump 0x129 ; case 0x6f 0119 780f |x | Jump 0x129 ; case 0x70 011a 780e |x | Jump 0x129 ; case 0x71 011b 780d |x | Jump 0x129 ; case 0x72 011c 780c |x | Jump 0x129 ; case 0x73 011d 780b |x | Jump 0x129 ; case 0x74 011e 780a |x | Jump 0x129 ; case 0x75 011f 7809 |x | Jump 0x129 ; case 0x76 0120 7808 |x | Jump 0x129 ; case 0x77 0121 7807 |x | Jump 0x129 ; case 0x78 0122 7806 |x | Jump 0x129 ; case 0x79 0123 7805 |x | Jump 0x129 ; case 0x7a 0124 7804 |x | Jump 0x129 ; case 0x7b 0125 7803 |x | Jump 0x129 ; case 0x7c 0126 7802 |x | Jump 0x129 ; case 0x7d 0127 7801 |x | Jump 0x129 ; case 0x7e 0128 7800 |x | Jump 0x129 ; case 0x7f 0129 4801 |H | Short_Literal 0x1 012a a405 | | Store_Unchecked 0x2,0x5 012b 7877 |xw | Jump 0x1a3 012c 4801 |H | Short_Literal 0x1 012d a404 | | Store_Unchecked 0x2,0x4 012e 7874 |xt | Jump 0x1a3 012f 4808 |H | Short_Literal 0x8 0130 a404 | | Store_Unchecked 0x2,0x4 0131 7871 |xq | Jump 0x1a3 0132 481b |H | Short_Literal 0x1b 0133 a404 | | Store_Unchecked 0x2,0x4 0134 786e |xn | Jump 0x1a3 0135 4840 |H@ | Short_Literal 0x40 0136 a404 | | Store_Unchecked 0x2,0x4 0137 786b |xk | Jump 0x1a3 0138 487d |H} | Short_Literal 0x7d 0139 a404 | | Store_Unchecked 0x2,0x4 013a 7868 |xh | Jump 0x1a3 013b 48d8 |H | Short_Literal 0xd8 013c a404 | | Store_Unchecked 0x2,0x4 013d 7865 |xe | Jump 0x1a3 013e 4957 |IW | Short_Literal 0x157 013f a404 | | Store_Unchecked 0x2,0x4 0140 7862 |xb | Jump 0x1a3 0141 4a00 |J | Short_Literal 0x200 0142 a404 | | Store_Unchecked 0x2,0x4 0143 785f |x_ | Jump 0x1a3 0144 4ad9 |J | Short_Literal 0x2d9 0145 a404 | | Store_Unchecked 0x2,0x4 0146 785c |x\ | Jump 0x1a3 0147 4be8 |K | Short_Literal 0x3e8 0148 a404 | | Store_Unchecked 0x2,0x4 0149 7859 |xY | Jump 0x1a3 014a 60ed |` | Indirect_Literal Discrete,0x238,{0x00000000, 0x00000533} 014b a404 | | Store_Unchecked 0x2,0x4 014c 7856 |xV | Jump 0x1a3 014d 60e6 |` | Indirect_Literal Discrete,0x234,{0x00000000, 0x000006c0} 014e a404 | | Store_Unchecked 0x2,0x4 014f 7853 |xS | Jump 0x1a3 0150 60df |` | Indirect_Literal Discrete,0x230,{0x00000000, 0x00000895} 0151 a404 | | Store_Unchecked 0x2,0x4 0152 7850 |xP | Jump 0x1a3 0153 60d8 |` | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00000ab8} 0154 a404 | | Store_Unchecked 0x2,0x4 0155 784d |xM | Jump 0x1a3 0156 60d1 |` | Indirect_Literal Discrete,0x228,{0x00000000, 0x00000d2f} 0157 a404 | | Store_Unchecked 0x2,0x4 0158 784a |xJ | Jump 0x1a3 0159 60ca |` | Indirect_Literal Discrete,0x224,{0x00000000, 0x00001000} 015a a404 | | Store_Unchecked 0x2,0x4 015b 7847 |xG | Jump 0x1a3 015c 60c3 |` | Indirect_Literal Discrete,0x220,{0x00000000, 0x00001331} 015d a404 | | Store_Unchecked 0x2,0x4 015e 7844 |xD | Jump 0x1a3 015f 60bc |` | Indirect_Literal Discrete,0x21c,{0x00000000, 0x000016c8} 0160 a404 | | Store_Unchecked 0x2,0x4 0161 7841 |xA | Jump 0x1a3 0162 60b5 |` | Indirect_Literal Discrete,0x218,{0x00000000, 0x00001acb} 0163 a404 | | Store_Unchecked 0x2,0x4 0164 783e |x> | Jump 0x1a3 0165 60ae |` | Indirect_Literal Discrete,0x214,{0x00000000, 0x00001f40} 0166 a404 | | Store_Unchecked 0x2,0x4 0167 783b |x; | Jump 0x1a3 0168 60a7 |` | Indirect_Literal Discrete,0x210,{0x00000000, 0x0000242d} 0169 a404 | | Store_Unchecked 0x2,0x4 016a 7838 |x8 | Jump 0x1a3 016b 60a0 |` | Indirect_Literal Discrete,0x20c,{0x00000000, 0x00002998} 016c a404 | | Store_Unchecked 0x2,0x4 016d 7835 |x5 | Jump 0x1a3 016e 6099 |` | Indirect_Literal Discrete,0x208,{0x00000000, 0x00002f87} 016f a404 | | Store_Unchecked 0x2,0x4 0170 7832 |x2 | Jump 0x1a3 0171 6092 |` | Indirect_Literal Discrete,0x204,{0x00000000, 0x00003600} 0172 a404 | | Store_Unchecked 0x2,0x4 0173 782f |x/ | Jump 0x1a3 0174 608b |` | Indirect_Literal Discrete,0x200,{0x00000000, 0x00003d09} 0175 a404 | | Store_Unchecked 0x2,0x4 0176 782c |x, | Jump 0x1a3 0177 6084 |` | Indirect_Literal Discrete,0x1fc,{0x00000000, 0x000044a8} 0178 a404 | | Store_Unchecked 0x2,0x4 0179 7829 |x) | Jump 0x1a3 017a 607d |`} | Indirect_Literal Discrete,0x1f8,{0x00000000, 0x0001b000} 017b a404 | | Store_Unchecked 0x2,0x4 017c 7826 |x& | Jump 0x1a3 017d 6076 |`v | Indirect_Literal Discrete,0x1f4,{0x00000000, 0x0001cb91} 017e a404 | | Store_Unchecked 0x2,0x4 017f 7823 |x# | Jump 0x1a3 0180 606f |`o | Indirect_Literal Discrete,0x1f0,{0x00000000, 0x0001e848} 0181 a404 | | Store_Unchecked 0x2,0x4 0182 7820 |x | Jump 0x1a3 0183 6068 |`h | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x0002062b} 0184 a404 | | Store_Unchecked 0x2,0x4 0185 781d |x | Jump 0x1a3 0186 6061 |`a | Indirect_Literal Discrete,0x1e8,{0x00000000, 0x00022540} 0187 a404 | | Store_Unchecked 0x2,0x4 0188 781a |x | Jump 0x1a3 0189 605a |`Z | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x0002458d} 018a a404 | | Store_Unchecked 0x2,0x4 018b 7817 |x | Jump 0x1a3 018c 6053 |`S | Indirect_Literal Discrete,0x1e0,{0x00000000, 0x00026718} 018d a404 | | Store_Unchecked 0x2,0x4 018e 7814 |x | Jump 0x1a3 018f 604c |`L | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x000289e7} 0190 a404 | | Store_Unchecked 0x2,0x4 0191 7811 |x | Jump 0x1a3 0192 6045 |`E | Indirect_Literal Discrete,0x1d8,{0x00000000, 0x0002ae00} 0193 a404 | | Store_Unchecked 0x2,0x4 0194 780e |x | Jump 0x1a3 0195 603e |`> | Indirect_Literal Discrete,0x1d4,{0x00000000, 0x0002d369} 0196 a404 | | Store_Unchecked 0x2,0x4 0197 780b |x | Jump 0x1a3 0198 6037 |`7 | Indirect_Literal Discrete,0x1d0,{0x00000000, 0x0000b640} 0199 a404 | | Store_Unchecked 0x2,0x4 019a 7808 |x | Jump 0x1a3 019b 6030 |`0 | Indirect_Literal Discrete,0x1cc,{0x00000000, 0x0000745f} 019c a404 | | Store_Unchecked 0x2,0x4 019d 7805 |x | Jump 0x1a3 019e 6029 |`) | Indirect_Literal Discrete,0x1c8,{0x00000000, 0x0003d0bf} 019f a404 | | Store_Unchecked 0x2,0x4 01a0 7802 |x | Jump 0x1a3 01a1 6022 |`" | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x00017c38} 01a2 a404 | | Store_Unchecked 0x2,0x4 01a3 e402 | | Load 0x2,0x2 01a4 e404 | | Load 0x2,0x4 01a5 00da | | Load_Top At_Offset_2 01a6 0271 | q | Execute Discrete,Times 01a7 0273 | s | Execute Discrete,Plus 01a8 c402 | | Store 0x2,0x2 01a9 00c8 | | Action Pop_Auxiliary_Range 01aa 00a4 00a2 | | Action Loop_Increasing_Extended,0xa2 01ac 00ce | | Action Pop_Auxiliary 01ad 00d8 | | Load_Top At_Offset_0 01ae 6802 |h | Jump_Zero 0x1b1 01af 4800 |H | Short_Literal 0x0 01b0 a402 | | Store_Unchecked 0x2,0x2 01b1 00db | | Load_Top At_Offset_3 01b2 600d |` | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x0000ffff} 01b3 027d | } | Execute Discrete,Greater 01b4 6804 |h | Jump_Zero 0x1b9 01b5 00db | | Load_Top At_Offset_3 01b6 6005 |` | Indirect_Literal Discrete,0x1bc,{0x00000000, 0x00010000} 01b7 026f | o | Execute Discrete,Remainder 01b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b9 00db | | Load_Top At_Offset_3 01ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bb 0000 | | .XXX[0x1] 01bc 0000 0000 | | .LITERAL {0x00000000, 0x00010000} 01c0 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 01c4 0000 0000 | | .LITERAL {0x00000000, 0x00017c38} 01c8 0000 0000 | | .LITERAL {0x00000000, 0x0003d0bf} 01cc 0000 0000 | | .LITERAL {0x00000000, 0x0000745f} 01d0 0000 0000 | | .LITERAL {0x00000000, 0x0000b640} 01d4 0000 0000 | | .LITERAL {0x00000000, 0x0002d369} 01d8 0000 0000 | | .LITERAL {0x00000000, 0x0002ae00} 01dc 0000 0000 | | .LITERAL {0x00000000, 0x000289e7} 01e0 0000 0000 | | .LITERAL {0x00000000, 0x00026718} 01e4 0000 0000 | | .LITERAL {0x00000000, 0x0002458d} 01e8 0000 0000 | | .LITERAL {0x00000000, 0x00022540} 01ec 0000 0000 | | .LITERAL {0x00000000, 0x0002062b} 01f0 0000 0000 | | .LITERAL {0x00000000, 0x0001e848} 01f4 0000 0000 | | .LITERAL {0x00000000, 0x0001cb91} 01f8 0000 0000 | | .LITERAL {0x00000000, 0x0001b000} 01fc 0000 0000 | | .LITERAL {0x00000000, 0x000044a8} 0200 0000 0000 | | .LITERAL {0x00000000, 0x00003d09} 0204 0000 0000 | | .LITERAL {0x00000000, 0x00003600} 0208 0000 0000 | | .LITERAL {0x00000000, 0x00002f87} 020c 0000 0000 | | .LITERAL {0x00000000, 0x00002998} 0210 0000 0000 | | .LITERAL {0x00000000, 0x0000242d} 0214 0000 0000 | | .LITERAL {0x00000000, 0x00001f40} 0218 0000 0000 | | .LITERAL {0x00000000, 0x00001acb} 021c 0000 0000 | | .LITERAL {0x00000000, 0x000016c8} 0220 0000 0000 | | .LITERAL {0x00000000, 0x00001331} 0224 0000 0000 | | .LITERAL {0x00000000, 0x00001000} 0228 0000 0000 | | .LITERAL {0x00000000, 0x00000d2f} 022c 0000 0000 | | .LITERAL {0x00000000, 0x00000ab8} 0230 0000 0000 | | .LITERAL {0x00000000, 0x00000895} 0234 0000 0000 | | .LITERAL {0x00000000, 0x000006c0} 0238 0000 0000 | | .LITERAL {0x00000000, 0x00000533} 023c 0000 0000 | | .BLANK 0000[0x4] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0254 | T | .CONST 0x0254 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0007 | | .CONST 0x0007 ; Number of locals 0243 INIT_0240: 0243 4800 |H | Short_Literal 0x0 0244 4bff |K | Short_Literal 0x3ff 0245 e007 | | Load 0x0,0x7 0246 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0247 02a0 | | Declare_Subprogram Null_Subprogram 0248 4801 |H | Short_Literal 0x1 0249 035d | ] | Declare_Type Array,Defined 024a e004 | | Load 0x0,0x4 024b 1910 | | Execute Package,Field_Reference,Field_Number 0x10 024c 00c6 | | Action Check_Subprogram_Elaborated 024d 00d8 | | Load_Top At_Offset_0 024e e008 | | Load 0x0,0x8 024f e009 | | Load 0x0,0x9 0250 4806 |H | Short_Literal 0x6 0251 0007 | | Action Break_Optional 0252 e402 | | Load 0x2,0x2 0253 0337 | 7 | Declare_Variable Array 0254 BODY_0240: 0254 4800 |H | Short_Literal 0x0 0255 e224 | $ | Load 0x1,0x24 0256 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0257 4800 |H | Short_Literal 0x0 0258 e224 | $ | Load 0x1,0x24 0259 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 025a 4802 |H | Short_Literal 0x2 025b e224 | $ | Load 0x1,0x24 025c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 025d e224 | $ | Load 0x1,0x24 025e e403 | | Load 0x2,0x3 025f 4804 |H | Short_Literal 0x4 0260 4802 |H | Short_Literal 0x2 0261 0099 | | Action Reference_Dynamic 0262 e004 | | Load 0x0,0x4 0263 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0264 00d9 | | Load_Top At_Offset_1 0265 01d4 | | Execute Vector,Structure_Write 0266 4802 |H | Short_Literal 0x2 0267 00d9 | | Load_Top At_Offset_1 0268 01d7 | | Execute Vector,Field_Read 0269 0f45 | E | Execute_Immediate Equal,0x45 026a 4803 |H | Short_Literal 0x3 026b 00da | | Load_Top At_Offset_2 026c 01d7 | | Execute Vector,Field_Read 026d 0f4b | K | Execute_Immediate Equal,0x4b 026e 0279 | y | Execute Discrete,And 026f 6802 |h | Jump_Zero 0x272 0270 4801 |H | Short_Literal 0x1 0271 a222 | " | Store_Unchecked 0x1,0x22 0272 4802 |H | Short_Literal 0x2 0273 00d9 | | Load_Top At_Offset_1 0274 01d7 | | Execute Vector,Field_Read 0275 0f4b | K | Execute_Immediate Equal,0x4b 0276 4803 |H | Short_Literal 0x3 0277 00da | | Load_Top At_Offset_2 0278 01d7 | | Execute Vector,Field_Read 0279 0f45 | E | Execute_Immediate Equal,0x45 027a 0279 | y | Execute Discrete,And 027b 6802 |h | Jump_Zero 0x27e 027c 4802 |H | Short_Literal 0x2 027d a222 | " | Store_Unchecked 0x1,0x22 027e e222 | " | Load 0x1,0x22 027f 00ca | | Action Exit_Nullary_Function 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0289 | | .CONST 0x0289 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0002 | | .CONST 0x0002 ; Number of locals 0283 INIT_0280: 0283 4864 |Hd | Short_Literal 0x64 0284 e001 | | Load 0x0,0x1 0285 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0286 1c08 | | Execute_Immediate Run_Utility,0x8 0287 00d8 | | Load_Top At_Offset_0 0288 1c00 | | Execute_Immediate Run_Utility,0x0 0289 BODY_0280: 0289 00d8 | | Load_Top At_Offset_0 028a e5ff | | Load 0x2,-0x1 028b 821a | | Call 0x1,0x1a 028c 00d1 | | Pop_Control Pop_Count_1 028d e00a | | Load 0x0,0xa 028e 180e | | Execute Package,Field_Execute,Field_Number 0xe 028f 4802 |H | Short_Literal 0x2 0290 00da | | Load_Top At_Offset_2 0291 e001 | | Load 0x0,0x1 0292 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0293 e00b | | Load 0x0,0xb 0294 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0295 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0296 0000 0000 | | .XXX[0x2] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 02a4 | | .CONST 0x02a4 ; Address of begin 0299 02b3 | | .CONST 0x02b3 ; Address of exception handler 029a 0005 | | .CONST 0x0005 ; Number of locals 029b INIT_0298: 029b e004 | | Load 0x0,0x4 029c 1910 | | Execute Package,Field_Reference,Field_Number 0x10 029d 00c6 | | Action Check_Subprogram_Elaborated 029e e005 | | Load 0x0,0x5 029f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 02a0 e00c | | Load 0x0,0xc 02a1 e00d | | Load 0x0,0xd 02a2 4805 |H | Short_Literal 0x5 02a3 0007 | | Action Break_Optional 02a4 BODY_0298: 02a4 e5fe | | Load 0x2,-0x2 02a5 e5ff | | Load 0x2,-0x1 02a6 822a | * | Call 0x1,0x2a 02a7 4800 |H | Short_Literal 0x0 02a8 a5f9 | | Store_Unchecked 0x2,-0x7 02a9 e224 | $ | Load 0x1,0x24 02aa e402 | | Load 0x2,0x2 02ab 4803 |H | Short_Literal 0x3 02ac 4802 |H | Short_Literal 0x2 02ad 0099 | | Action Reference_Dynamic 02ae e004 | | Load 0x0,0x4 02af 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02b0 e5fa | | Load 0x2,-0x6 02b1 01d4 | | Execute Vector,Structure_Write 02b2 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02b3 TRAP_0298: 02b3 e004 | | Load 0x0,0x4 02b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02b5 010f | | Execute Exception,Equal 02b6 680a |h | Jump_Zero 0x2c1 02b7 480b |H | Short_Literal 0xb 02b8 a5f9 | | Store_Unchecked 0x2,-0x7 02b9 e00a | | Load 0x0,0xa 02ba 180e | | Execute Package,Field_Execute,Field_Number 0xe 02bb 4802 |H | Short_Literal 0x2 02bc 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 02be e00b | | Load 0x0,0xb 02bf 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02c0 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02c1 480c |H | Short_Literal 0xc 02c2 a5f9 | | Store_Unchecked 0x2,-0x7 02c3 e00a | | Load 0x0,0xa 02c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 02c5 4802 |H | Short_Literal 0x2 02c6 4800 |H | Short_Literal 0x0 02c7 4801 |H | Short_Literal 0x1 02c8 e00e | | Load 0x0,0xe 02c9 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02ca e00b | | Load 0x0,0xb 02cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02cc 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02cd 0000 0000 | | .XXX[0x3] 02cf 0000 | | 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d8 | | .CONST 0x02d8 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0003 | | .CONST 0x0003 ; Number of locals 02d3 INIT_02d0: 02d3 e005 | | Load 0x0,0x5 02d4 1b13 | | Execute Package,Field_Read,Field_Number 0x13 02d5 0337 | 7 | Declare_Variable Array 02d6 e005 | | Load 0x0,0x5 02d7 1b11 | | Execute Package,Field_Read,Field_Number 0x11 02d8 BODY_02d0: 02d8 4800 |H | Short_Literal 0x0 02d9 a226 | & | Store_Unchecked 0x1,0x26 02da 480c |H | Short_Literal 0xc 02db a5fe | | Store_Unchecked 0x2,-0x2 02dc e5ff | | Load 0x2,-0x1 02dd e00f | | Load 0x0,0xf 02de 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02df 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02e0 e002 | | Load 0x0,0x2 02e1 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 02e2 e00f | | Load 0x0,0xf 02e3 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02e4 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 02e5 607a |`z | Indirect_Literal Discrete,0x360,{0x00000000, 0x00007fff} 02e6 e00f | | Load 0x0,0xf 02e7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02e8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02e9 6076 |`v | Indirect_Literal Discrete,0x360,{0x00000000, 0x00007fff} 02ea e00f | | Load 0x0,0xf 02eb 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02ec 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 02ed e002 | | Load 0x0,0x2 02ee 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 02ef e00f | | Load 0x0,0xf 02f0 1b15 | | Execute Package,Field_Read,Field_Number 0x15 02f1 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 02f2 8218 | | Call 0x1,0x18 02f3 e223 | # | Load 0x1,0x23 02f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f5 6066 |`f | Indirect_Literal Discrete,0x35c,{0x00000000, 0x00007fed} 02f6 027e | ~ | Execute Discrete,Not_Equal 02f7 6803 |h | Jump_Zero 0x2fb 02f8 480d |H | Short_Literal 0xd 02f9 a5fe | | Store_Unchecked 0x2,-0x2 02fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02fb e223 | # | Load 0x1,0x23 02fc 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 02fd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02fe 0e01 | | Execute_Immediate Not_Equal,0x1 02ff 6803 |h | Jump_Zero 0x303 0300 480e |H | Short_Literal 0xe 0301 a5fe | | Store_Unchecked 0x2,-0x2 0302 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0303 e223 | # | Load 0x1,0x23 0304 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0305 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0306 09ff | | Execute_Immediate Binary_Scale,-0x1 0307 00d8 | | Load_Top At_Offset_0 0308 e002 | | Load 0x0,0x2 0309 1b0e | | Execute Package,Field_Read,Field_Number 0xe 030a 0260 | ` | Execute Discrete,In_Type 030b 7001 |p | Jump_Nonzero 0x30d 030c 0801 | | Execute_Immediate Raise,0x1 030d e00f | | Load 0x0,0xf 030e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 030f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0310 e00f | | Load 0x0,0xf 0311 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0312 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0313 e223 | # | Load 0x1,0x23 0314 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0315 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0316 0271 | q | Execute Discrete,Times 0317 00d8 | | Load_Top At_Offset_0 0318 e002 | | Load 0x0,0x2 0319 1b0e | | Execute Package,Field_Read,Field_Number 0xe 031a 0260 | ` | Execute Discrete,In_Type 031b 7001 |p | Jump_Nonzero 0x31d 031c 0801 | | Execute_Immediate Raise,0x1 031d e00f | | Load 0x0,0xf 031e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 031f 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0320 e00f | | Load 0x0,0xf 0321 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0322 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0323 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0324 7006 |p | Jump_Nonzero 0x32b 0325 4800 |H | Short_Literal 0x0 0326 e00f | | Load 0x0,0xf 0327 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0328 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0329 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 032a 782b |x+ | Jump 0x356 032b 00d8 | | Load_Top At_Offset_0 032c 00da | | Load_Top At_Offset_2 032d 4802 |H | Short_Literal 0x2 032e e00f | | Load 0x0,0xf 032f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0330 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0331 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0332 8213 | | Call 0x1,0x13 0333 00d1 | | Pop_Control Pop_Count_1 0334 0059 | Y | Store_Top Discrete,At_Offset_1 0335 00d8 | | Load_Top At_Offset_0 0336 6801 |h | Jump_Zero 0x338 0337 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0338 4800 |H | Short_Literal 0x0 0339 00da | | Load_Top At_Offset_2 033a 01d7 | | Execute Vector,Field_Read 033b 0908 | | Execute_Immediate Binary_Scale,0x8 033c 4801 |H | Short_Literal 0x1 033d 00db | | Load_Top At_Offset_3 033e 01d7 | | Execute Vector,Field_Read 033f 0273 | s | Execute Discrete,Plus 0340 e00f | | Load 0x0,0xf 0341 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0342 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0343 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0344 4802 |H | Short_Literal 0x2 0345 00da | | Load_Top At_Offset_2 0346 01d7 | | Execute Vector,Field_Read 0347 0908 | | Execute_Immediate Binary_Scale,0x8 0348 4803 |H | Short_Literal 0x3 0349 00db | | Load_Top At_Offset_3 034a 01d7 | | Execute Vector,Field_Read 034b 0273 | s | Execute Discrete,Plus 034c 00d8 | | Load_Top At_Offset_0 034d e002 | | Load 0x0,0x2 034e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 034f 0260 | ` | Execute Discrete,In_Type 0350 7001 |p | Jump_Nonzero 0x352 0351 0801 | | Execute_Immediate Raise,0x1 0352 e00f | | Load 0x0,0xf 0353 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0354 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0355 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0356 4800 |H | Short_Literal 0x0 0357 a5fe | | Store_Unchecked 0x2,-0x2 0358 4801 |H | Short_Literal 0x1 0359 a226 | & | Store_Unchecked 0x1,0x26 035a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 035b 0000 | | .XXX[0x1] 035c 0000 0000 | | .LITERAL {0x00000000, 0x00007fed} 0360 0000 0000 | | .LITERAL {0x00000000, 0x00007fff} 0364 0000 0000 | | .BLANK 0000[0x4] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 0375 | u | .CONST 0x0375 ; Address of begin 0369 0385 | | .CONST 0x0385 ; Address of exception handler 036a 0006 | | .CONST 0x0006 ; Number of locals 036b INIT_0368: 036b e004 | | Load 0x0,0x4 036c 1910 | | Execute Package,Field_Reference,Field_Number 0x10 036d 00c6 | | Action Check_Subprogram_Elaborated 036e e005 | | Load 0x0,0x5 036f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0370 e010 | | Load 0x0,0x10 0371 e011 | | Load 0x0,0x11 0372 4805 |H | Short_Literal 0x5 0373 0007 | | Action Break_Optional 0374 00e2 | | Load_Encached Integer_Cache 0375 BODY_0368: 0375 4800 |H | Short_Literal 0x0 0376 a5fc | | Store_Unchecked 0x2,-0x4 0377 e224 | $ | Load 0x1,0x24 0378 e5ff | | Load 0x2,-0x1 0379 8229 | ) | Call 0x1,0x29 037a 00d1 | | Pop_Control Pop_Count_1 037b e224 | $ | Load 0x1,0x24 037c e402 | | Load 0x2,0x2 037d 4803 |H | Short_Literal 0x3 037e 4802 |H | Short_Literal 0x2 037f 0099 | | Action Reference_Dynamic 0380 e004 | | Load 0x0,0x4 0381 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0382 e5fd | | Load 0x2,-0x3 0383 01d4 | | Execute Vector,Structure_Write 0384 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0385 TRAP_0368: 0385 e004 | | Load 0x0,0x4 0386 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0387 010f | | Execute Exception,Equal 0388 680a |h | Jump_Zero 0x393 0389 480b |H | Short_Literal 0xb 038a a5fc | | Store_Unchecked 0x2,-0x4 038b e00a | | Load 0x0,0xa 038c 180e | | Execute Package,Field_Execute,Field_Number 0xe 038d 4802 |H | Short_Literal 0x2 038e 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 0390 e00b | | Load 0x0,0xb 0391 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0392 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0393 480c |H | Short_Literal 0xc 0394 a5fc | | Store_Unchecked 0x2,-0x4 0395 e00a | | Load 0x0,0xa 0396 180e | | Execute Package,Field_Execute,Field_Number 0xe 0397 4802 |H | Short_Literal 0x2 0398 4800 |H | Short_Literal 0x0 0399 4801 |H | Short_Literal 0x1 039a e00e | | Load 0x0,0xe 039b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 039c e00b | | Load 0x0,0xb 039d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 039e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 039f 0000 | | .XXX[0x1] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03ad | | .CONST 0x03ad ; Address of begin 03a1 03bd | | .CONST 0x03bd ; Address of exception handler 03a2 0006 | | .CONST 0x0006 ; Number of locals 03a3 INIT_03a0: 03a3 e004 | | Load 0x0,0x4 03a4 1910 | | Execute Package,Field_Reference,Field_Number 0x10 03a5 00c6 | | Action Check_Subprogram_Elaborated 03a6 e002 | | Load 0x0,0x2 03a7 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 03a8 e012 | | Load 0x0,0x12 03a9 e013 | | Load 0x0,0x13 03aa 4805 |H | Short_Literal 0x5 03ab 0007 | | Action Break_Optional 03ac 00e2 | | Load_Encached Integer_Cache 03ad BODY_03a0: 03ad 4800 |H | Short_Literal 0x0 03ae a5fc | | Store_Unchecked 0x2,-0x4 03af e224 | $ | Load 0x1,0x24 03b0 e5ff | | Load 0x2,-0x1 03b1 8229 | ) | Call 0x1,0x29 03b2 00d1 | | Pop_Control Pop_Count_1 03b3 e224 | $ | Load 0x1,0x24 03b4 e402 | | Load 0x2,0x2 03b5 4803 |H | Short_Literal 0x3 03b6 4802 |H | Short_Literal 0x2 03b7 0099 | | Action Reference_Dynamic 03b8 e004 | | Load 0x0,0x4 03b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ba e5fd | | Load 0x2,-0x3 03bb 01d4 | | Execute Vector,Structure_Write 03bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03bd TRAP_03a0: 03bd e004 | | Load 0x0,0x4 03be 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03bf 010f | | Execute Exception,Equal 03c0 680a |h | Jump_Zero 0x3cb 03c1 480b |H | Short_Literal 0xb 03c2 a5fc | | Store_Unchecked 0x2,-0x4 03c3 e00a | | Load 0x0,0xa 03c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 03c5 4802 |H | Short_Literal 0x2 03c6 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 03c8 e00b | | Load 0x0,0xb 03c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03ca 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03cb 480c |H | Short_Literal 0xc 03cc a5fc | | Store_Unchecked 0x2,-0x4 03cd e00a | | Load 0x0,0xa 03ce 180e | | Execute Package,Field_Execute,Field_Number 0xe 03cf 4802 |H | Short_Literal 0x2 03d0 4800 |H | Short_Literal 0x0 03d1 4801 |H | Short_Literal 0x1 03d2 e00e | | Load 0x0,0xe 03d3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03d4 e00b | | Load 0x0,0xb 03d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03d6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03d7 0000 | | .XXX[0x1] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03e4 | | .CONST 0x03e4 ; Address of begin 03d9 03f3 | | .CONST 0x03f3 ; Address of exception handler 03da 0005 | | .CONST 0x0005 ; Number of locals 03db INIT_03d8: 03db e004 | | Load 0x0,0x4 03dc 1911 | | Execute Package,Field_Reference,Field_Number 0x11 03dd 00c6 | | Action Check_Subprogram_Elaborated 03de e005 | | Load 0x0,0x5 03df 1b13 | | Execute Package,Field_Read,Field_Number 0x13 03e0 e014 | | Load 0x0,0x14 03e1 e015 | | Load 0x0,0x15 03e2 4805 |H | Short_Literal 0x5 03e3 0007 | | Action Break_Optional 03e4 BODY_03d8: 03e4 e5fe | | Load 0x2,-0x2 03e5 e5ff | | Load 0x2,-0x1 03e6 822a | * | Call 0x1,0x2a 03e7 4800 |H | Short_Literal 0x0 03e8 a5f9 | | Store_Unchecked 0x2,-0x7 03e9 4801 |H | Short_Literal 0x1 03ea e5fa | | Load 0x2,-0x6 03eb e224 | $ | Load 0x1,0x24 03ec e402 | | Load 0x2,0x2 03ed 4803 |H | Short_Literal 0x3 03ee 4802 |H | Short_Literal 0x2 03ef 0099 | | Action Reference_Dynamic 03f0 e004 | | Load 0x0,0x4 03f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03f2 4507 |E | Exit_Suprogram New_Top_Offset 0x7 03f3 TRAP_03d8: 03f3 e004 | | Load 0x0,0x4 03f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03f5 010f | | Execute Exception,Equal 03f6 680a |h | Jump_Zero 0x401 03f7 480b |H | Short_Literal 0xb 03f8 a5f9 | | Store_Unchecked 0x2,-0x7 03f9 e00a | | Load 0x0,0xa 03fa 180e | | Execute Package,Field_Execute,Field_Number 0xe 03fb 4802 |H | Short_Literal 0x2 03fc 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 03fe e00b | | Load 0x0,0xb 03ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0400 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0401 480c |H | Short_Literal 0xc 0402 a5f9 | | Store_Unchecked 0x2,-0x7 0403 e00a | | Load 0x0,0xa 0404 180e | | Execute Package,Field_Execute,Field_Number 0xe 0405 4802 |H | Short_Literal 0x2 0406 4800 |H | Short_Literal 0x0 0407 4801 |H | Short_Literal 0x1 0408 e00e | | Load 0x0,0xe 0409 1815 | | Execute Package,Field_Execute,Field_Number 0x15 040a e00b | | Load 0x0,0xb 040b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 040c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 040d 0000 0000 | | .XXX[0x3] 040f 0000 | | 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 041d | | .CONST 0x041d ; Address of begin 0411 042d | - | .CONST 0x042d ; Address of exception handler 0412 0006 | | .CONST 0x0006 ; Number of locals 0413 INIT_0410: 0413 e004 | | Load 0x0,0x4 0414 1911 | | Execute Package,Field_Reference,Field_Number 0x11 0415 00c6 | | Action Check_Subprogram_Elaborated 0416 e005 | | Load 0x0,0x5 0417 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0418 e016 | | Load 0x0,0x16 0419 e017 | | Load 0x0,0x17 041a 4805 |H | Short_Literal 0x5 041b 0007 | | Action Break_Optional 041c 00e2 | | Load_Encached Integer_Cache 041d BODY_0410: 041d 4800 |H | Short_Literal 0x0 041e a5fc | | Store_Unchecked 0x2,-0x4 041f e224 | $ | Load 0x1,0x24 0420 e5ff | | Load 0x2,-0x1 0421 8229 | ) | Call 0x1,0x29 0422 00d1 | | Pop_Control Pop_Count_1 0423 4801 |H | Short_Literal 0x1 0424 e5fd | | Load 0x2,-0x3 0425 e224 | $ | Load 0x1,0x24 0426 e402 | | Load 0x2,0x2 0427 4803 |H | Short_Literal 0x3 0428 4802 |H | Short_Literal 0x2 0429 0099 | | Action Reference_Dynamic 042a e004 | | Load 0x0,0x4 042b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 042c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 042d TRAP_0410: 042d e004 | | Load 0x0,0x4 042e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 042f 010f | | Execute Exception,Equal 0430 680a |h | Jump_Zero 0x43b 0431 480b |H | Short_Literal 0xb 0432 a5fc | | Store_Unchecked 0x2,-0x4 0433 e00a | | Load 0x0,0xa 0434 180e | | Execute Package,Field_Execute,Field_Number 0xe 0435 4802 |H | Short_Literal 0x2 0436 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 0438 e00b | | Load 0x0,0xb 0439 1813 | | Execute Package,Field_Execute,Field_Number 0x13 043a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 043b 480c |H | Short_Literal 0xc 043c a5fc | | Store_Unchecked 0x2,-0x4 043d e00a | | Load 0x0,0xa 043e 180e | | Execute Package,Field_Execute,Field_Number 0xe 043f 4802 |H | Short_Literal 0x2 0440 4800 |H | Short_Literal 0x0 0441 4801 |H | Short_Literal 0x1 0442 e00e | | Load 0x0,0xe 0443 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0444 e00b | | Load 0x0,0xb 0445 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0446 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0447 0000 | | .XXX[0x1] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 045e | ^ | .CONST 0x045e ; Address of begin 0449 046e | n | .CONST 0x046e ; Address of exception handler 044a 000a | | .CONST 0x000a ; Number of locals 044b INIT_0448: 044b e004 | | Load 0x0,0x4 044c 1911 | | Execute Package,Field_Reference,Field_Number 0x11 044d 00c6 | | Action Check_Subprogram_Elaborated 044e e002 | | Load 0x0,0x2 044f 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0450 e018 | | Load 0x0,0x18 0451 e019 | | Load 0x0,0x19 0452 4805 |H | Short_Literal 0x5 0453 0007 | | Action Break_Optional 0454 e004 | | Load 0x0,0x4 0455 1910 | | Execute Package,Field_Reference,Field_Number 0x10 0456 00c6 | | Action Check_Subprogram_Elaborated 0457 e002 | | Load 0x0,0x2 0458 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0459 e01a | | Load 0x0,0x1a 045a e01b | | Load 0x0,0x1b 045b 4809 |H | Short_Literal 0x9 045c 0007 | | Action Break_Optional 045d 00e2 | | Load_Encached Integer_Cache 045e BODY_0448: 045e 4800 |H | Short_Literal 0x0 045f a5fc | | Store_Unchecked 0x2,-0x4 0460 e224 | $ | Load 0x1,0x24 0461 e5ff | | Load 0x2,-0x1 0462 8229 | ) | Call 0x1,0x29 0463 00d1 | | Pop_Control Pop_Count_1 0464 4801 |H | Short_Literal 0x1 0465 e5fd | | Load 0x2,-0x3 0466 e224 | $ | Load 0x1,0x24 0467 e402 | | Load 0x2,0x2 0468 4803 |H | Short_Literal 0x3 0469 4802 |H | Short_Literal 0x2 046a 0099 | | Action Reference_Dynamic 046b e004 | | Load 0x0,0x4 046c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 046d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 046e TRAP_0448: 046e e004 | | Load 0x0,0x4 046f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0470 010f | | Execute Exception,Equal 0471 680a |h | Jump_Zero 0x47c 0472 480b |H | Short_Literal 0xb 0473 a5fc | | Store_Unchecked 0x2,-0x4 0474 e00a | | Load 0x0,0xa 0475 180e | | Execute Package,Field_Execute,Field_Number 0xe 0476 4802 |H | Short_Literal 0x2 0477 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 0479 e00b | | Load 0x0,0xb 047a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 047b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 047c 480c |H | Short_Literal 0xc 047d a5fc | | Store_Unchecked 0x2,-0x4 047e e00a | | Load 0x0,0xa 047f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0480 4802 |H | Short_Literal 0x2 0481 4800 |H | Short_Literal 0x0 0482 4801 |H | Short_Literal 0x1 0483 e00e | | Load 0x0,0xe 0484 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0485 e00b | | Load 0x0,0xb 0486 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0487 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0488 ; -------------------------------------------------------------------------------------- 0488 ; SUBPROGRAM 0488 ; -------------------------------------------------------------------------------------- 0488 049d | | .CONST 0x049d ; Address of begin 0489 04da | | .CONST 0x04da ; Address of exception handler 048a 0009 | | .CONST 0x0009 ; Number of locals 048b INIT_0488: 048b e004 | | Load 0x0,0x4 048c 1910 | | Execute Package,Field_Reference,Field_Number 0x10 048d 00c6 | | Action Check_Subprogram_Elaborated 048e e003 | | Load 0x0,0x3 048f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0490 e01c | | Load 0x0,0x1c 0491 e01d | | Load 0x0,0x1d 0492 4805 |H | Short_Literal 0x5 0493 0007 | | Action Break_Optional 0494 e004 | | Load 0x0,0x4 0495 1910 | | Execute Package,Field_Reference,Field_Number 0x10 0496 00c6 | | Action Check_Subprogram_Elaborated 0497 e003 | | Load 0x0,0x3 0498 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0499 e01e | | Load 0x0,0x1e 049a e01f | | Load 0x0,0x1f 049b 4809 |H | Short_Literal 0x9 049c 0007 | | Action Break_Optional 049d BODY_0488: 049d 4800 |H | Short_Literal 0x0 049e e224 | $ | Load 0x1,0x24 049f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04a0 4800 |H | Short_Literal 0x0 04a1 e224 | $ | Load 0x1,0x24 04a2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04a3 4804 |H | Short_Literal 0x4 04a4 e224 | $ | Load 0x1,0x24 04a5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04a6 e224 | $ | Load 0x1,0x24 04a7 e402 | | Load 0x2,0x2 04a8 4803 |H | Short_Literal 0x3 04a9 4802 |H | Short_Literal 0x2 04aa 0099 | | Action Reference_Dynamic 04ab e004 | | Load 0x0,0x4 04ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04ad e223 | # | Load 0x1,0x23 04ae 017d | } | Execute Record,Structure_Write 04af e223 | # | Load 0x1,0x23 04b0 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 04b1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04b2 09ff | | Execute_Immediate Binary_Scale,-0x1 04b3 00d8 | | Load_Top At_Offset_0 04b4 e002 | | Load 0x0,0x2 04b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04b6 0260 | ` | Execute Discrete,In_Type 04b7 7001 |p | Jump_Nonzero 0x4b9 04b8 0801 | | Execute_Immediate Raise,0x1 04b9 e00f | | Load 0x0,0xf 04ba 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04bb 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 04bc e00f | | Load 0x0,0xf 04bd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04be 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 04bf e223 | # | Load 0x1,0x23 04c0 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 04c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04c2 0271 | q | Execute Discrete,Times 04c3 00d8 | | Load_Top At_Offset_0 04c4 e002 | | Load 0x0,0x2 04c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04c6 0260 | ` | Execute Discrete,In_Type 04c7 7001 |p | Jump_Nonzero 0x4c9 04c8 0801 | | Execute_Immediate Raise,0x1 04c9 e00f | | Load 0x0,0xf 04ca 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04cb 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 04cc 4808 |H | Short_Literal 0x8 04cd e224 | $ | Load 0x1,0x24 04ce 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04cf e224 | $ | Load 0x1,0x24 04d0 e406 | | Load 0x2,0x6 04d1 4807 |H | Short_Literal 0x7 04d2 4802 |H | Short_Literal 0x2 04d3 0099 | | Action Reference_Dynamic 04d4 e004 | | Load 0x0,0x4 04d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04d6 e00f | | Load 0x0,0xf 04d7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04d8 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 04d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04da TRAP_0488: 04da e004 | | Load 0x0,0x4 04db 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04dc 010f | | Execute Exception,Equal 04dd 680a |h | Jump_Zero 0x4e8 04de 480b |H | Short_Literal 0xb 04df a227 | ' | Store_Unchecked 0x1,0x27 04e0 e00a | | Load 0x0,0xa 04e1 180e | | Execute Package,Field_Execute,Field_Number 0xe 04e2 4802 |H | Short_Literal 0x2 04e3 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 04e5 e00b | | Load 0x0,0xb 04e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04e7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04e8 480c |H | Short_Literal 0xc 04e9 a227 | ' | Store_Unchecked 0x1,0x27 04ea e00a | | Load 0x0,0xa 04eb 180e | | Execute Package,Field_Execute,Field_Number 0xe 04ec 4802 |H | Short_Literal 0x2 04ed 4800 |H | Short_Literal 0x0 04ee 4801 |H | Short_Literal 0x1 04ef e00e | | Load 0x0,0xe 04f0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 04f1 e00b | | Load 0x0,0xb 04f2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04f4 0000 0000 | | .BLANK 0000[0x4] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 0504 | | .CONST 0x0504 ; Address of begin 04f9 0517 | | .CONST 0x0517 ; Address of exception handler 04fa 0005 | | .CONST 0x0005 ; Number of locals 04fb INIT_04f8: 04fb e004 | | Load 0x0,0x4 04fc 1911 | | Execute Package,Field_Reference,Field_Number 0x11 04fd 00c6 | | Action Check_Subprogram_Elaborated 04fe e003 | | Load 0x0,0x3 04ff 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0500 e020 | | Load 0x0,0x20 0501 e021 | ! | Load 0x0,0x21 0502 4805 |H | Short_Literal 0x5 0503 0007 | | Action Break_Optional 0504 BODY_04f8: 0504 4800 |H | Short_Literal 0x0 0505 e224 | $ | Load 0x1,0x24 0506 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0507 4800 |H | Short_Literal 0x0 0508 e224 | $ | Load 0x1,0x24 0509 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 050a 4808 |H | Short_Literal 0x8 050b e224 | $ | Load 0x1,0x24 050c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 050d 4801 |H | Short_Literal 0x1 050e e5ff | | Load 0x2,-0x1 050f e224 | $ | Load 0x1,0x24 0510 e402 | | Load 0x2,0x2 0511 4803 |H | Short_Literal 0x3 0512 4802 |H | Short_Literal 0x2 0513 0099 | | Action Reference_Dynamic 0514 e004 | | Load 0x0,0x4 0515 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0516 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0517 TRAP_04f8: 0517 e004 | | Load 0x0,0x4 0518 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0519 010f | | Execute Exception,Equal 051a 680a |h | Jump_Zero 0x525 051b 480b |H | Short_Literal 0xb 051c a227 | ' | Store_Unchecked 0x1,0x27 051d e00a | | Load 0x0,0xa 051e 180e | | Execute Package,Field_Execute,Field_Number 0xe 051f 4802 |H | Short_Literal 0x2 0520 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 0522 e00b | | Load 0x0,0xb 0523 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0524 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0525 480c |H | Short_Literal 0xc 0526 a227 | ' | Store_Unchecked 0x1,0x27 0527 e00a | | Load 0x0,0xa 0528 180e | | Execute Package,Field_Execute,Field_Number 0xe 0529 4802 |H | Short_Literal 0x2 052a 4800 |H | Short_Literal 0x0 052b 4801 |H | Short_Literal 0x1 052c e00e | | Load 0x0,0xe 052d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 052e e00b | | Load 0x0,0xb 052f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0530 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0531 0000 0000 | | .BLANK 0000[0x7] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053b | ; | .CONST 0x053b ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0001 | | .CONST 0x0001 ; Number of locals 053b BODY_0538: 053b INIT_0538: 053b 00da | | Load_Top At_Offset_2 053c 460f |F | Jump_Case 0x10 053d 7816 |x | Jump 0x554 ; case 0x0 053e 781c |x | Jump 0x55b ; case 0x1 053f 7822 |x" | Jump 0x562 ; case 0x2 0540 7828 |x( | Jump 0x569 ; case 0x3 0541 782e |x. | Jump 0x570 ; case 0x4 0542 7834 |x4 | Jump 0x577 ; case 0x5 0543 783a |x: | Jump 0x57e ; case 0x6 0544 7840 |x@ | Jump 0x585 ; case 0x7 0545 7846 |xF | Jump 0x58c ; case 0x8 0546 784c |xL | Jump 0x593 ; case 0x9 0547 7852 |xR | Jump 0x59a ; case 0xa 0548 7858 |xX | Jump 0x5a1 ; case 0xb 0549 785e |x^ | Jump 0x5a8 ; case 0xc 054a 7864 |xd | Jump 0x5af ; case 0xd 054b 786a |xj | Jump 0x5b6 ; case 0xe 054c 7800 |x | Jump 0x54d ; case 0xf 054d 00db | | Load_Top At_Offset_3 054e 0092 095a | Z| Action Push_String_Extended,0x95a ; "No disk" 0550 e001 | | Load 0x0,0x1 0551 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0552 00d1 | | Pop_Control Pop_Count_1 0553 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0554 00db | | Load_Top At_Offset_3 0555 0092 095b | [| Action Push_String_Extended,0x95b ; "File operation successful" 0557 e001 | | Load 0x0,0x1 0558 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0559 00d1 | | Pop_Control Pop_Count_1 055a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 055b 00db | | Load_Top At_Offset_3 055c 0092 095c | \| Action Push_String_Extended,0x95c ; "Bad filename" 055e e001 | | Load 0x0,0x1 055f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0560 00d1 | | Pop_Control Pop_Count_1 0561 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0562 00db | | Load_Top At_Offset_3 0563 0092 095d | ]| Action Push_String_Extended,0x95d ; "File does not exist" 0565 e001 | | Load 0x0,0x1 0566 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0567 00d1 | | Pop_Control Pop_Count_1 0568 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0569 00db | | Load_Top At_Offset_3 056a 0092 095e | ^| Action Push_String_Extended,0x95e ; "File is not open" 056c e001 | | Load 0x0,0x1 056d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 056e 00d1 | | Pop_Control Pop_Count_1 056f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0570 00db | | Load_Top At_Offset_3 0571 0092 095f | _| Action Push_String_Extended,0x95f ; "Disk is full" 0573 e001 | | Load 0x0,0x1 0574 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0575 00d1 | | Pop_Control Pop_Count_1 0576 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0577 00db | | Load_Top At_Offset_3 0578 0092 0960 | `| Action Push_String_Extended,0x960 ; "Directory is full" 057a e001 | | Load 0x0,0x1 057b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 057c 00d1 | | Pop_Control Pop_Count_1 057d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 057e 00db | | Load_Top At_Offset_3 057f 0092 0961 | a| Action Push_String_Extended,0x961 ; "File already exists" 0581 e001 | | Load 0x0,0x1 0582 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0583 00d1 | | Pop_Control Pop_Count_1 0584 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0585 00db | | Load_Top At_Offset_3 0586 0092 0962 | b| Action Push_String_Extended,0x962 ; "Can't rename file" 0588 e001 | | Load 0x0,0x1 0589 1810 | | Execute Package,Field_Execute,Field_Number 0x10 058a 00d1 | | Pop_Control Pop_Count_1 058b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 058c 00db | | Load_Top At_Offset_3 058d 0092 0963 | c| Action Push_String_Extended,0x963 ; "Can't delete file" 058f e001 | | Load 0x0,0x1 0590 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0591 00d1 | | Pop_Control Pop_Count_1 0592 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0593 00db | | Load_Top At_Offset_3 0594 0092 0964 | d| Action Push_String_Extended,0x964 ; "Page error" 0596 e001 | | Load 0x0,0x1 0597 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0598 00d1 | | Pop_Control Pop_Count_1 0599 4502 |E | Exit_Suprogram New_Top_Offset 0x2 059a 00db | | Load_Top At_Offset_3 059b 0092 0965 | e| Action Push_String_Extended,0x965 ; "Slice error" 059d e001 | | Load 0x0,0x1 059e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 059f 00d1 | | Pop_Control Pop_Count_1 05a0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05a1 00db | | Load_Top At_Offset_3 05a2 0092 0966 | f| Action Push_String_Extended,0x966 ; "Bad address" 05a4 e001 | | Load 0x0,0x1 05a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05a6 00d1 | | Pop_Control Pop_Count_1 05a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05a8 00db | | Load_Top At_Offset_3 05a9 0092 0967 | g| Action Push_String_Extended,0x967 ; "Disk error" 05ab e001 | | Load 0x0,0x1 05ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05ad 00d1 | | Pop_Control Pop_Count_1 05ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05af 00db | | Load_Top At_Offset_3 05b0 0092 0968 | h| Action Push_String_Extended,0x968 ; "No labels on disk" 05b2 e001 | | Load 0x0,0x1 05b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05b4 00d1 | | Pop_Control Pop_Count_1 05b5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b6 00db | | Load_Top At_Offset_3 05b7 0092 0969 | i| Action Push_String_Extended,0x969 ; "No dos on disk" 05b9 e001 | | Load 0x0,0x1 05ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05bb 00d1 | | Pop_Control Pop_Count_1 05bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05bd 096a e001 | j | .XXX[0x5] 05bf 1810 00d1 | | 05c1 4502 |E | 05c2 0000 0000 | | .BLANK 0000[0x6] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05d3 | | .CONST 0x05d3 ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0003 | | .CONST 0x0003 ; Number of locals 05cb INIT_05c8: 05cb 4850 |HP | Short_Literal 0x50 05cc e001 | | Load 0x0,0x1 05cd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05ce 1c08 | | Execute_Immediate Run_Utility,0x8 05cf 00d8 | | Load_Top At_Offset_0 05d0 1c00 | | Execute_Immediate Run_Utility,0x0 05d1 029f 0903 | | Declare_Subprogram INIT_0900,For_Call 05d3 BODY_05c8: 05d3 e5ff | | Load 0x2,-0x1 05d4 4602 |F | Jump_Case 0x3 05d5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x0 05d6 7803 |x | Jump 0x5da ; case 0x1 05d7 7800 |x | Jump 0x5d8 ; case 0x2 05d8 8403 | | Call 0x2,0x3 05d9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05da 00d9 | | Load_Top At_Offset_1 05db e5fd | | Load 0x2,-0x3 05dc 821a | | Call 0x1,0x1a 05dd 00d1 | | Pop_Control Pop_Count_1 05de 00d9 | | Load_Top At_Offset_1 05df e5fe | | Load 0x2,-0x2 05e0 e001 | | Load 0x0,0x1 05e1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05e2 00d1 | | Pop_Control Pop_Count_1 05e3 00d9 | | Load_Top At_Offset_1 05e4 e001 | | Load 0x0,0x1 05e5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05e6 e022 | " | Load 0x0,0x22 05e7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05e8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05e9 0000 0000 | | .BLANK 0000[0x7] 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 061b | | .CONST 0x061b ; Address of begin 05f1 0703 | | .CONST 0x0703 ; Address of exception handler 05f2 0012 | | .CONST 0x0012 ; Number of locals 05f3 INIT_05f0: 05f3 481e |H | Short_Literal 0x1e 05f4 e001 | | Load 0x0,0x1 05f5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05f6 1c08 | | Execute_Immediate Run_Utility,0x8 05f7 00d8 | | Load_Top At_Offset_0 05f8 1c00 | | Execute_Immediate Run_Utility,0x0 05f9 e002 | | Load 0x0,0x2 05fa 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 05fb 0322 | " | Declare_Variable Record 05fc 00e2 | | Load_Encached Integer_Cache 05fd 03e9 | | Declare_Variable Discrete,Duplicate 05fe 03e9 | | Declare_Variable Discrete,Duplicate 05ff 03e9 | | Declare_Variable Discrete,Duplicate 0600 03e9 | | Declare_Variable Discrete,Duplicate 0601 03e9 | | Declare_Variable Discrete,Duplicate 0602 00e1 | | Load_Encached Boolean_Cache 0603 00e3 | | Load_Encached Natural_Cache 0604 e007 | | Load 0x0,0x7 0605 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0606 4850 |HP | Short_Literal 0x50 0607 e001 | | Load 0x0,0x1 0608 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0609 1c08 | | Execute_Immediate Run_Utility,0x8 060a 00d8 | | Load_Top At_Offset_0 060b 1c00 | | Execute_Immediate Run_Utility,0x0 060c 4850 |HP | Short_Literal 0x50 060d e001 | | Load 0x0,0x1 060e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 060f 1c08 | | Execute_Immediate Run_Utility,0x8 0610 00d8 | | Load_Top At_Offset_0 0611 1c00 | | Execute_Immediate Run_Utility,0x0 0612 e004 | | Load 0x0,0x4 0613 1910 | | Execute Package,Field_Reference,Field_Number 0x10 0614 00c6 | | Action Check_Subprogram_Elaborated 0615 e002 | | Load 0x0,0x2 0616 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0617 e023 | # | Load 0x0,0x23 0618 e024 | $ | Load 0x0,0x24 0619 4812 |H | Short_Literal 0x12 061a 0007 | | Action Break_Optional 061b BODY_05f0: 061b 8218 | | Call 0x1,0x18 061c 820f | | Call 0x1,0xf 061d a222 | " | Store_Unchecked 0x1,0x22 061e 4800 |H | Short_Literal 0x0 061f a405 | | Store_Unchecked 0x2,0x5 0620 4800 |H | Short_Literal 0x0 0621 a409 | | Store_Unchecked 0x2,0x9 0622 e40e | | Load 0x2,0xe 0623 e5ff | | Load 0x2,-0x1 0624 e001 | | Load 0x0,0x1 0625 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0626 00d1 | | Pop_Control Pop_Count_1 0627 00cf | | Action Mark_Auxiliary 0628 60f7 |` | Indirect_Literal Discrete,0x720,{0x00000000, 0x000007ff} 0629 4800 |H | Short_Literal 0x0 062a 0007 | | Action Break_Optional 062b 00d8 | | Load_Top At_Offset_0 062c 09f8 | | Execute_Immediate Binary_Scale,-0x8 062d e00f | | Load 0x0,0xf 062e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 062f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0630 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0631 01d7 | | Execute Vector,Field_Read 0632 00d9 | | Load_Top At_Offset_1 0633 48ff |H | Short_Literal 0xff 0634 0279 | y | Execute Discrete,And 0635 0273 | s | Execute Discrete,Plus 0636 c408 | | Store 0x2,0x8 0637 e224 | $ | Load 0x1,0x24 0638 e408 | | Load 0x2,0x8 0639 8229 | ) | Call 0x1,0x29 063a 00d1 | | Pop_Control Pop_Count_1 063b e224 | $ | Load 0x1,0x24 063c e40f | | Load 0x2,0xf 063d 4810 |H | Short_Literal 0x10 063e 4802 |H | Short_Literal 0x2 063f 0099 | | Action Reference_Dynamic 0640 e004 | | Load 0x0,0x4 0641 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0642 e225 | % | Load 0x1,0x25 0643 01d4 | | Execute Vector,Structure_Write 0644 00cf | | Action Mark_Auxiliary 0645 480f |H | Short_Literal 0xf 0646 4800 |H | Short_Literal 0x0 0647 0007 | | Action Break_Optional 0648 00d8 | | Load_Top At_Offset_0 0649 e225 | % | Load 0x1,0x25 064a 01d5 | | Execute Vector,Field_Reference 064b e403 | | Load 0x2,0x3 064c 017d | } | Execute Record,Structure_Write 064d e403 | | Load 0x2,0x3 064e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 064f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0650 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0651 6802 |h | Jump_Zero 0x654 0652 00d2 | | Pop_Control Pop_Count_2 0653 788e |x | Jump 0x6e2 0654 e222 | " | Load 0x1,0x22 0655 0f01 | | Execute_Immediate Equal,0x1 0656 6827 |h' | Jump_Zero 0x67e 0657 00cf | | Action Mark_Auxiliary 0658 481e |H | Short_Literal 0x1e 0659 4801 |H | Short_Literal 0x1 065a 0007 | | Action Break_Optional 065b 00d8 | | Load_Top At_Offset_0 065c 4802 |H | Short_Literal 0x2 065d 026f | o | Execute Discrete,Remainder 065e 7008 |p | Jump_Nonzero 0x667 065f e40c | | Load 0x2,0xc 0660 00d9 | | Load_Top At_Offset_1 0661 e418 | | Load 0x2,0x18 0662 e225 | % | Load 0x1,0x25 0663 01d5 | | Execute Vector,Field_Reference 0664 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0665 01d6 | | Execute Vector,Field_Write 0666 7814 |x | Jump 0x67b 0667 00d8 | | Load_Top At_Offset_0 0668 e418 | | Load 0x2,0x18 0669 e225 | % | Load 0x1,0x25 066a 01d5 | | Execute Vector,Field_Reference 066b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 066c 01d7 | | Execute Vector,Field_Read 066d a40c | | Store_Unchecked 0x2,0xc 066e 00d8 | | Load_Top At_Offset_0 066f 0a01 | | Execute_Immediate Plus,0x1 0670 e418 | | Load 0x2,0x18 0671 e225 | % | Load 0x1,0x25 0672 01d5 | | Execute Vector,Field_Reference 0673 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0674 01d7 | | Execute Vector,Field_Read 0675 00d9 | | Load_Top At_Offset_1 0676 e418 | | Load 0x2,0x18 0677 e225 | % | Load 0x1,0x25 0678 01d5 | | Execute Vector,Field_Reference 0679 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 067a 01d6 | | Execute Vector,Field_Write 067b 00c8 | | Action Pop_Auxiliary_Range 067c 3fde |? | Loop_Increasing 0x65b 067d 00ce | | Action Pop_Auxiliary 067e 00d8 | | Load_Top At_Offset_0 067f e225 | % | Load 0x1,0x25 0680 01d5 | | Execute Vector,Field_Reference 0681 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0682 e025 | % | Load 0x0,0x25 0683 180d | | Execute Package,Field_Execute,Field_Number 0xd 0684 e221 | ! | Load 0x1,0x21 0685 01d4 | | Execute Vector,Structure_Write 0686 481e |H | Short_Literal 0x1e 0687 a40b | | Store_Unchecked 0x2,0xb 0688 00cf | | Action Mark_Auxiliary 0689 4801 |H | Short_Literal 0x1 068a 481e |H | Short_Literal 0x1e 068b 0007 | | Action Break_Optional 068c 00d8 | | Load_Top At_Offset_0 068d e221 | ! | Load 0x1,0x21 068e 01d7 | | Execute Vector,Field_Read 068f 7007 |p | Jump_Nonzero 0x697 0690 4820 |H | Short_Literal 0x20 0691 00d9 | | Load_Top At_Offset_1 0692 e221 | ! | Load 0x1,0x21 0693 01d6 | | Execute Vector,Field_Write 0694 00d8 | | Load_Top At_Offset_0 0695 a40b | | Store_Unchecked 0x2,0xb 0696 7802 |x | Jump 0x699 0697 00d2 | | Pop_Control Pop_Count_2 0698 7802 |x | Jump 0x69b 0699 00c8 | | Action Pop_Auxiliary_Range 069a 37f1 |7 | Loop_Decreasing 0x68c 069b 00ce | | Action Pop_Auxiliary 069c e402 | | Load 0x2,0x2 069d e221 | ! | Load 0x1,0x21 069e e001 | | Load 0x0,0x1 069f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06a0 00d1 | | Pop_Control Pop_Count_1 06a1 e402 | | Load 0x2,0x2 06a2 4820 |H | Short_Literal 0x20 06a3 e40b | | Load 0x2,0xb 06a4 0aff | | Execute_Immediate Plus,-0x1 06a5 00d8 | | Load_Top At_Offset_0 06a6 00e3 | | Load_Encached Natural_Cache 06a7 0260 | ` | Execute Discrete,In_Type 06a8 7001 |p | Jump_Nonzero 0x6aa 06a9 0801 | | Execute_Immediate Raise,0x1 06aa e001 | | Load 0x0,0x1 06ab 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 06ac 00d1 | | Pop_Control Pop_Count_1 06ad e40e | | Load 0x2,0xe 06ae e402 | | Load 0x2,0x2 06af e026 | & | Load 0x0,0x26 06b0 180f | | Execute Package,Field_Execute,Field_Number 0xf 06b1 682e |h. | Jump_Zero 0x6e0 06b2 4820 |H | Short_Literal 0x20 06b3 4805 |H | Short_Literal 0x5 06b4 480a |H | Short_Literal 0xa 06b5 e403 | | Load 0x2,0x3 06b6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06b7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06b8 e006 | | Load 0x0,0x6 06b9 1816 | | Execute Package,Field_Execute,Field_Number 0x16 06ba e228 | ( | Load 0x1,0x28 06bb 01d4 | | Execute Vector,Structure_Write 06bc e409 | | Load 0x2,0x9 06bd e403 | | Load 0x2,0x3 06be 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06c0 0273 | s | Execute Discrete,Plus 06c1 c409 | | Store 0x2,0x9 06c2 e405 | | Load 0x2,0x5 06c3 0a01 | | Execute_Immediate Plus,0x1 06c4 c405 | | Store 0x2,0x5 06c5 e40d | | Load 0x2,0xd 06c6 e403 | | Load 0x2,0x3 06c7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06c8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06c9 e027 | ' | Load 0x0,0x27 06ca 180d | | Execute Package,Field_Execute,Field_Number 0xd 06cb e001 | | Load 0x0,0x1 06cc 180f | | Execute Package,Field_Execute,Field_Number 0xf 06cd 00d1 | | Pop_Control Pop_Count_1 06ce 4809 |H | Short_Literal 0x9 06cf e221 | ! | Load 0x1,0x21 06d0 0092 096b | k| Action Push_String_Extended,0x96b ; " " 06d2 01cc | | Execute Vector,Catenate 06d3 e228 | ( | Load 0x1,0x28 06d4 01cc | | Execute Vector,Catenate 06d5 01cb | | Execute Vector,Append 06d6 e40d | | Load 0x2,0xd 06d7 e001 | | Load 0x0,0x1 06d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06d9 01cc | | Execute Vector,Catenate 06da e022 | " | Load 0x0,0x22 06db 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06dc e5fe | | Load 0x2,-0x2 06dd 6802 |h | Jump_Zero 0x6e0 06de e403 | | Load 0x2,0x3 06df 822b | + | Call 0x1,0x2b 06e0 00c8 | | Action Pop_Auxiliary_Range 06e1 3f66 |?f | Loop_Increasing 0x648 06e2 00ce | | Action Pop_Auxiliary 06e3 00c8 | | Action Pop_Auxiliary_Range 06e4 3f46 |?F | Loop_Increasing 0x62b 06e5 00ce | | Action Pop_Auxiliary 06e6 e405 | | Load 0x2,0x5 06e7 0c02 | | Execute_Immediate Greater_Equal,0x2 06e8 6813 |h | Jump_Zero 0x6fc 06e9 0092 096c | l| Action Push_String_Extended,0x96c ; "Total of " 06eb e409 | | Load 0x2,0x9 06ec 00e0 | | Load_Encached Standard_Cache 06ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06ee 01cc | | Execute Vector,Catenate 06ef 0092 096d | m| Action Push_String_Extended,0x96d ; " Pages in " 06f1 01cc | | Execute Vector,Catenate 06f2 e405 | | Load 0x2,0x5 06f3 00e0 | | Load_Encached Standard_Cache 06f4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06f5 01cc | | Execute Vector,Catenate 06f6 0092 096e | n| Action Push_String_Extended,0x96e ; " Files." 06f8 01cc | | Execute Vector,Catenate 06f9 e022 | " | Load 0x0,0x22 06fa 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06fb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06fc e405 | | Load 0x2,0x5 06fd 7004 |p | Jump_Nonzero 0x702 06fe 0092 096f | o| Action Push_String_Extended,0x96f ; "No files found." 0700 e022 | " | Load 0x0,0x22 0701 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0702 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0703 TRAP_05f0: 0703 e004 | | Load 0x0,0x4 0704 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0705 010f | | Execute Exception,Equal 0706 680a |h | Jump_Zero 0x711 0707 480b |H | Short_Literal 0xb 0708 a227 | ' | Store_Unchecked 0x1,0x27 0709 e00a | | Load 0x0,0xa 070a 180e | | Execute Package,Field_Execute,Field_Number 0xe 070b 4802 |H | Short_Literal 0x2 070c 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 070e e00b | | Load 0x0,0xb 070f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0710 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0711 480c |H | Short_Literal 0xc 0712 a227 | ' | Store_Unchecked 0x1,0x27 0713 e00a | | Load 0x0,0xa 0714 180e | | Execute Package,Field_Execute,Field_Number 0xe 0715 4802 |H | Short_Literal 0x2 0716 4800 |H | Short_Literal 0x0 0717 4801 |H | Short_Literal 0x1 0718 e00e | | Load 0x0,0xe 0719 1815 | | Execute Package,Field_Execute,Field_Number 0x15 071a e00b | | Load 0x0,0xb 071b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 071c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 071d 0000 0000 | | .XXX[0x3] 071f 0000 | | 0720 0000 0000 | | .LITERAL {0x00000000, 0x000007ff} 0724 0000 0000 | | .BLANK 0000[0x4] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072b | + | .CONST 0x072b ; Address of begin 0729 0004 | | .CONST 0x0004 ; Address of exception handler 072a 0001 | | .CONST 0x0001 ; Number of locals 072b BODY_0728: 072b INIT_0728: 072b 8218 | | Call 0x1,0x18 072c 4800 |H | Short_Literal 0x0 072d e5fe | | Load 0x2,-0x2 072e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 072f 4800 |H | Short_Literal 0x0 0730 e5fe | | Load 0x2,-0x2 0731 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0732 00db | | Load_Top At_Offset_3 0733 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0734 00db | | Load_Top At_Offset_3 0735 e001 | | Load 0x0,0x1 0736 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0737 00d1 | | Pop_Control Pop_Count_1 0738 820f | | Call 0x1,0xf 0739 a222 | " | Store_Unchecked 0x1,0x22 073a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 073b 0000 0000 | | .BLANK 0000[0x5] 0740 ; -------------------------------------------------------------------------------------- 0740 ; SUBPROGRAM 0740 ; -------------------------------------------------------------------------------------- 0740 0762 | b | .CONST 0x0762 ; Address of begin 0741 081c | | .CONST 0x081c ; Address of exception handler 0742 000d | | .CONST 0x000d ; Number of locals 0743 INIT_0740: 0743 00ea | | Load_Encached Null_String_Cache 0744 481e |H | Short_Literal 0x1e 0745 e001 | | Load 0x0,0x1 0746 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0747 1c08 | | Execute_Immediate Run_Utility,0x8 0748 00d8 | | Load_Top At_Offset_0 0749 1c00 | | Execute_Immediate Run_Utility,0x0 074a 4801 |H | Short_Literal 0x1 074b 481e |H | Short_Literal 0x1e 074c 00e9 | | Load_Encached String_Cache 074d 035b | [ | Declare_Type Array,Constrained 074e 0337 | 7 | Declare_Variable Array 074f e002 | | Load 0x0,0x2 0750 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0751 0322 | " | Declare_Variable Record 0752 00e3 | | Load_Encached Natural_Cache 0753 e004 | | Load 0x0,0x4 0754 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0755 0322 | " | Declare_Variable Record 0756 00e2 | | Load_Encached Integer_Cache 0757 e007 | | Load 0x0,0x7 0758 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0759 e004 | | Load 0x0,0x4 075a 1910 | | Execute Package,Field_Reference,Field_Number 0x10 075b 00c6 | | Action Check_Subprogram_Elaborated 075c e002 | | Load 0x0,0x2 075d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 075e e028 | ( | Load 0x0,0x28 075f e029 | ) | Load 0x0,0x29 0760 480d |H | Short_Literal 0xd 0761 0007 | | Action Break_Optional 0762 BODY_0740: 0762 e5ff | | Load 0x2,-0x1 0763 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0764 e026 | & | Load 0x0,0x26 0765 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0766 7011 |p | Jump_Nonzero 0x778 0767 e5ff | | Load 0x2,-0x1 0768 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0769 700a |p | Jump_Nonzero 0x774 076a e5fe | | Load 0x2,-0x2 076b e5ff | | Load 0x2,-0x1 076c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 076d e001 | | Load 0x0,0x1 076e 180f | | Execute Package,Field_Execute,Field_Number 0xf 076f 00d1 | | Pop_Control Pop_Count_1 0770 4801 |H | Short_Literal 0x1 0771 e5ff | | Load 0x2,-0x1 0772 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0773 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0774 4fff |O | Short_Literal -0x1 0775 e5ff | | Load 0x2,-0x1 0776 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0777 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0778 00cf | | Action Mark_Auxiliary 0779 e5ff | | Load 0x2,-0x1 077a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 077b 701b |p | Jump_Nonzero 0x797 077c e5ff | | Load 0x2,-0x1 077d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 077e 09f8 | | Execute_Immediate Binary_Scale,-0x8 077f e00f | | Load 0x0,0xf 0780 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0781 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0782 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0783 01d7 | | Execute Vector,Field_Read 0784 e5ff | | Load 0x2,-0x1 0785 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0786 48ff |H | Short_Literal 0xff 0787 0279 | y | Execute Discrete,And 0788 0273 | s | Execute Discrete,Plus 0789 c408 | | Store 0x2,0x8 078a e407 | | Load 0x2,0x7 078b e408 | | Load 0x2,0x8 078c 8229 | ) | Call 0x1,0x29 078d 00d1 | | Pop_Control Pop_Count_1 078e e407 | | Load 0x2,0x7 078f e40a | | Load 0x2,0xa 0790 480b |H | Short_Literal 0xb 0791 4802 |H | Short_Literal 0x2 0792 0099 | | Action Reference_Dynamic 0793 e004 | | Load 0x0,0x4 0794 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0795 e5ff | | Load 0x2,-0x1 0796 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0797 e5ff | | Load 0x2,-0x1 0798 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0799 e5ff | | Load 0x2,-0x1 079a 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 079b 01d5 | | Execute Vector,Field_Reference 079c e405 | | Load 0x2,0x5 079d 017d | } | Execute Record,Structure_Write 079e e5ff | | Load 0x2,-0x1 079f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07a0 0a01 | | Execute_Immediate Plus,0x1 07a1 480f |H | Short_Literal 0xf 07a2 026e | n | Execute Discrete,Modulo 07a3 e5ff | | Load 0x2,-0x1 07a4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 07a5 e405 | | Load 0x2,0x5 07a6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 07a7 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 07a8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07a9 6816 |h | Jump_Zero 0x7c0 07aa 4800 |H | Short_Literal 0x0 07ab e5ff | | Load 0x2,-0x1 07ac 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 07ad e5ff | | Load 0x2,-0x1 07ae 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07af 6088 |` | Indirect_Literal Discrete,0x838,{0x00000000, 0x000007ff} 07b0 027c | | | Execute Discrete,Less 07b1 6806 |h | Jump_Zero 0x7b8 07b2 e5ff | | Load 0x2,-0x1 07b3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07b4 0a01 | | Execute_Immediate Plus,0x1 07b5 e5ff | | Load 0x2,-0x1 07b6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 07b7 7862 |xb | Jump 0x81a 07b8 4fff |O | Short_Literal -0x1 07b9 e5ff | | Load 0x2,-0x1 07ba 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 07bb e5fe | | Load 0x2,-0x2 07bc e402 | | Load 0x2,0x2 07bd e001 | | Load 0x0,0x1 07be 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07bf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07c0 e222 | " | Load 0x1,0x22 07c1 0f01 | | Execute_Immediate Equal,0x1 07c2 681f |h | Jump_Zero 0x7e2 07c3 00cf | | Action Mark_Auxiliary 07c4 481e |H | Short_Literal 0x1e 07c5 4801 |H | Short_Literal 0x1 07c6 0007 | | Action Break_Optional 07c7 00d8 | | Load_Top At_Offset_0 07c8 4802 |H | Short_Literal 0x2 07c9 026f | o | Execute Discrete,Remainder 07ca 7006 |p | Jump_Nonzero 0x7d1 07cb e409 | | Load 0x2,0x9 07cc 00d9 | | Load_Top At_Offset_1 07cd e405 | | Load 0x2,0x5 07ce 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07cf 01d6 | | Execute Vector,Field_Write 07d0 780e |x | Jump 0x7df 07d1 00d8 | | Load_Top At_Offset_0 07d2 e405 | | Load 0x2,0x5 07d3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07d4 01d7 | | Execute Vector,Field_Read 07d5 a409 | | Store_Unchecked 0x2,0x9 07d6 00d8 | | Load_Top At_Offset_0 07d7 0a01 | | Execute_Immediate Plus,0x1 07d8 e405 | | Load 0x2,0x5 07d9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07da 01d7 | | Execute Vector,Field_Read 07db 00d9 | | Load_Top At_Offset_1 07dc e405 | | Load 0x2,0x5 07dd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07de 01d6 | | Execute Vector,Field_Write 07df 00c8 | | Action Pop_Auxiliary_Range 07e0 3fe6 |? | Loop_Increasing 0x7c7 07e1 00ce | | Action Pop_Auxiliary 07e2 e405 | | Load 0x2,0x5 07e3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 07e4 e025 | % | Load 0x0,0x25 07e5 180d | | Execute Package,Field_Execute,Field_Number 0xd 07e6 e404 | | Load 0x2,0x4 07e7 01d4 | | Execute Vector,Structure_Write 07e8 481f |H | Short_Literal 0x1f 07e9 a406 | | Store_Unchecked 0x2,0x6 07ea 00cf | | Action Mark_Auxiliary 07eb 4801 |H | Short_Literal 0x1 07ec 481e |H | Short_Literal 0x1e 07ed 0007 | | Action Break_Optional 07ee 00d8 | | Load_Top At_Offset_0 07ef e404 | | Load 0x2,0x4 07f0 01d7 | | Execute Vector,Field_Read 07f1 7007 |p | Jump_Nonzero 0x7f9 07f2 4820 |H | Short_Literal 0x20 07f3 00d9 | | Load_Top At_Offset_1 07f4 e404 | | Load 0x2,0x4 07f5 01d6 | | Execute Vector,Field_Write 07f6 00d8 | | Load_Top At_Offset_0 07f7 a406 | | Store_Unchecked 0x2,0x6 07f8 7802 |x | Jump 0x7fb 07f9 00d2 | | Pop_Control Pop_Count_2 07fa 7802 |x | Jump 0x7fd 07fb 00c8 | | Action Pop_Auxiliary_Range 07fc 37f1 |7 | Loop_Decreasing 0x7ee 07fd 00ce | | Action Pop_Auxiliary 07fe e403 | | Load 0x2,0x3 07ff e404 | | Load 0x2,0x4 0800 e001 | | Load 0x0,0x1 0801 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0802 00d1 | | Pop_Control Pop_Count_1 0803 e403 | | Load 0x2,0x3 0804 4820 |H | Short_Literal 0x20 0805 e406 | | Load 0x2,0x6 0806 0aff | | Execute_Immediate Plus,-0x1 0807 00d8 | | Load_Top At_Offset_0 0808 00e3 | | Load_Encached Natural_Cache 0809 0260 | ` | Execute Discrete,In_Type 080a 7001 |p | Jump_Nonzero 0x80c 080b 0801 | | Execute_Immediate Raise,0x1 080c e001 | | Load 0x0,0x1 080d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 080e 00d1 | | Pop_Control Pop_Count_1 080f e5ff | | Load 0x2,-0x1 0810 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0811 e403 | | Load 0x2,0x3 0812 e026 | & | Load 0x0,0x26 0813 180f | | Execute Package,Field_Execute,Field_Number 0xf 0814 6805 |h | Jump_Zero 0x81a 0815 e5fe | | Load 0x2,-0x2 0816 e403 | | Load 0x2,0x3 0817 e001 | | Load 0x0,0x1 0818 180f | | Execute Package,Field_Execute,Field_Number 0xf 0819 4501 |E | Exit_Suprogram New_Top_Offset 0x1 081a 00c9 | | Action Pop_Auxiliary_Loop 081b 7f5d | ] | Jump 0x779 081c TRAP_0740: 081c e004 | | Load 0x0,0x4 081d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 081e 010f | | Execute Exception,Equal 081f 680a |h | Jump_Zero 0x82a 0820 480b |H | Short_Literal 0xb 0821 a227 | ' | Store_Unchecked 0x1,0x27 0822 e00a | | Load 0x0,0xa 0823 180e | | Execute Package,Field_Execute,Field_Number 0xe 0824 4802 |H | Short_Literal 0x2 0825 0092 0959 | Y| Action Push_String_Extended,0x959 ; "address out of bounds" 0827 e00b | | Load 0x0,0xb 0828 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0829 4501 |E | Exit_Suprogram New_Top_Offset 0x1 082a 480c |H | Short_Literal 0xc 082b a227 | ' | Store_Unchecked 0x1,0x27 082c e00a | | Load 0x0,0xa 082d 180e | | Execute Package,Field_Execute,Field_Number 0xe 082e 4802 |H | Short_Literal 0x2 082f 4800 |H | Short_Literal 0x0 0830 4801 |H | Short_Literal 0x1 0831 e00e | | Load 0x0,0xe 0832 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0833 e00b | | Load 0x0,0xb 0834 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0835 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0836 0000 0000 | | .XXX[0x2] 0838 0000 0000 | | .LITERAL {0x00000000, 0x000007ff} 083c 0000 0000 | | .BLANK 0000[0x4] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0843 | C | .CONST 0x0843 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0001 | | .CONST 0x0001 ; Number of locals 0843 BODY_0840: 0843 INIT_0840: 0843 00da | | Load_Top At_Offset_2 0844 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0845 4fff |O | Short_Literal -0x1 0846 027f | | Execute Discrete,Equal 0847 6802 |h | Jump_Zero 0x84a 0848 4801 |H | Short_Literal 0x1 0849 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 084a 4800 |H | Short_Literal 0x0 084b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 084c 0000 0000 | | .BLANK 0000[0x4] 0850 ; -------------------------------------------------------------------------------------- 0850 ; SUBPROGRAM 0850 ; -------------------------------------------------------------------------------------- 0850 0854 | T | .CONST 0x0854 ; Address of begin 0851 0004 | | .CONST 0x0004 ; Address of exception handler 0852 0002 | | .CONST 0x0002 ; Number of locals 0853 INIT_0850: 0853 00e2 | | Load_Encached Integer_Cache 0854 BODY_0850: 0854 00db | | Load_Top At_Offset_3 0855 e00f | | Load 0x0,0xf 0856 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0857 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0858 0270 | p | Execute Discrete,Divide 0859 00d8 | | Load_Top At_Offset_0 085a e02a | * | Load 0x0,0x2a 085b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 085c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 085d 0260 | ` | Execute Discrete,In_Type 085e 7001 |p | Jump_Nonzero 0x860 085f 0801 | | Execute_Immediate Raise,0x1 0860 e5fe | | Load 0x2,-0x2 0861 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0862 00db | | Load_Top At_Offset_3 0863 e00f | | Load 0x0,0xf 0864 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0865 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0866 026f | o | Execute Discrete,Remainder 0867 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0868 00d8 | | Load_Top At_Offset_0 0869 e00f | | Load 0x0,0xf 086a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 086b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 086c 0270 | p | Execute Discrete,Divide 086d 00d8 | | Load_Top At_Offset_0 086e e02a | * | Load 0x0,0x2a 086f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0870 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0871 0260 | ` | Execute Discrete,In_Type 0872 7001 |p | Jump_Nonzero 0x874 0873 0801 | | Execute_Immediate Raise,0x1 0874 e5fe | | Load 0x2,-0x2 0875 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0876 00d8 | | Load_Top At_Offset_0 0877 e00f | | Load 0x0,0xf 0878 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0879 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 087a 026f | o | Execute Discrete,Remainder 087b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 087c 00d8 | | Load_Top At_Offset_0 087d 0901 | | Execute_Immediate Binary_Scale,0x1 087e 00d8 | | Load_Top At_Offset_0 087f e02a | * | Load 0x0,0x2a 0880 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0881 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0882 0260 | ` | Execute Discrete,In_Type 0883 7001 |p | Jump_Nonzero 0x885 0884 0801 | | Execute_Immediate Raise,0x1 0885 e5fe | | Load 0x2,-0x2 0886 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0887 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0888 ; -------------------------------------------------------------------------------------- 0888 ; SUBPROGRAM 0888 ; -------------------------------------------------------------------------------------- 0888 088f | | .CONST 0x088f ; Address of begin 0889 0004 | | .CONST 0x0004 ; Address of exception handler 088a 0004 | | .CONST 0x0004 ; Number of locals 088b INIT_0888: 088b e002 | | Load 0x0,0x2 088c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 088d 00e2 | | Load_Encached Integer_Cache 088e 00e2 | | Load_Encached Integer_Cache 088f BODY_0888: 088f 4800 |H | Short_Literal 0x0 0890 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0891 4800 |H | Short_Literal 0x0 0892 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0893 00cf | | Action Mark_Auxiliary 0894 780b |x | Jump 0x8a0 0895 00da | | Load_Top At_Offset_2 0896 e5ff | | Load 0x2,-0x1 0897 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0898 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0899 01d5 | | Execute Vector,Field_Reference 089a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 089b a402 | | Store_Unchecked 0x2,0x2 089c 00da | | Load_Top At_Offset_2 089d 0a01 | | Execute_Immediate Plus,0x1 089e 005b | [ | Store_Top Discrete,At_Offset_3 089f 00c9 | | Action Pop_Auxiliary_Loop 08a0 00da | | Load_Top At_Offset_2 08a1 e5ff | | Load 0x2,-0x1 08a2 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08a3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 08a4 01d5 | | Execute Vector,Field_Reference 08a5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08a6 e5fe | | Load 0x2,-0x2 08a7 027a | z | Execute Discrete,Less_Equal 08a8 77ec |w | Jump_Nonzero 0x895 08a9 00ce | | Action Pop_Auxiliary 08aa 00d9 | | Load_Top At_Offset_1 08ab e5ff | | Load 0x2,-0x1 08ac 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08ad 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 08ae 01d5 | | Execute Vector,Field_Reference 08af 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08b0 e5fe | | Load 0x2,-0x2 08b1 e402 | | Load 0x2,0x2 08b2 0272 | r | Execute Discrete,Minus 08b3 0273 | s | Execute Discrete,Plus 08b4 00d8 | | Load_Top At_Offset_0 08b5 00e2 | | Load_Encached Integer_Cache 08b6 0260 | ` | Execute Discrete,In_Type 08b7 7001 |p | Jump_Nonzero 0x8b9 08b8 0801 | | Execute_Immediate Raise,0x1 08b9 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 08ba e224 | $ | Load 0x1,0x24 08bb 00d9 | | Load_Top At_Offset_1 08bc 8229 | ) | Call 0x1,0x29 08bd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08be 0000 0000 | | .XXX[0x2] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08c6 | | .CONST 0x08c6 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0003 | | .CONST 0x0003 ; Number of locals 08c3 INIT_08c0: 08c3 00e2 | | Load_Encached Integer_Cache 08c4 029f 090b | | Declare_Subprogram INIT_0908,For_Call 08c6 BODY_08c0: 08c6 0092 0970 | p| Action Push_String_Extended,0x970 ; " PERMANENT => " 08c8 e5ff | | Load 0x2,-0x1 08c9 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08ca 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 08cb 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 08cc 00e1 | | Load_Encached Boolean_Cache 08cd 011c | | Execute Any,Convert_Unchecked 08ce 1c01 | | Execute_Immediate Run_Utility,0x1 08cf 01cc | | Execute Vector,Catenate 08d0 0092 0971 | q| Action Push_String_Extended,0x971 ; ", EXECUTABLE => " 08d2 01cc | | Execute Vector,Catenate 08d3 e5ff | | Load 0x2,-0x1 08d4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08d5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 08d6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 08d7 00e1 | | Load_Encached Boolean_Cache 08d8 011c | | Execute Any,Convert_Unchecked 08d9 1c01 | | Execute_Immediate Run_Utility,0x1 08da 01cc | | Execute Vector,Catenate 08db 0092 0972 | r| Action Push_String_Extended,0x972 ; ", KERNEL => " 08dd 01cc | | Execute Vector,Catenate 08de e5ff | | Load 0x2,-0x1 08df 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08e0 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 08e1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 08e2 00e1 | | Load_Encached Boolean_Cache 08e3 011c | | Execute Any,Convert_Unchecked 08e4 1c01 | | Execute_Immediate Run_Utility,0x1 08e5 01cc | | Execute Vector,Catenate 08e6 e022 | " | Load 0x0,0x22 08e7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 08e8 4800 |H | Short_Literal 0x0 08e9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08ea 00cf | | Action Mark_Auxiliary 08eb 4805 |H | Short_Literal 0x5 08ec 4800 |H | Short_Literal 0x0 08ed 0007 | | Action Break_Optional 08ee 00d8 | | Load_Top At_Offset_0 08ef e5ff | | Load 0x2,-0x1 08f0 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08f1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 08f2 01d5 | | Execute Vector,Field_Reference 08f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08f4 e402 | | Load 0x2,0x2 08f5 027b | { | Execute Discrete,Greater_Equal 08f6 6801 |h | Jump_Zero 0x8f8 08f7 8403 | | Call 0x2,0x3 08f8 00c8 | | Action Pop_Auxiliary_Range 08f9 3ff4 |? | Loop_Increasing 0x8ee 08fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2 08fb 0000 0000 | | .BLANK 0000[0x5] 0900 ; -------------------------------------------------------------------------------------- 0900 ; SUBPROGRAM 0900 ; -------------------------------------------------------------------------------------- 0900 0903 | | .CONST 0x0903 ; Address of begin 0901 0004 | | .CONST 0x0004 ; Address of exception handler 0902 0001 | | .CONST 0x0001 ; Number of locals 0903 BODY_0900: 0903 INIT_0900: 0903 08e2 | | Execute_Immediate Raise,0xe2 0904 0000 0000 | | .BLANK 0000[0x4] 0908 ; -------------------------------------------------------------------------------------- 0908 ; SUBPROGRAM 0908 ; -------------------------------------------------------------------------------------- 0908 090b | | .CONST 0x090b ; Address of begin 0909 0004 | | .CONST 0x0004 ; Address of exception handler 090a 0001 | | .CONST 0x0001 ; Number of locals 090b BODY_0908: 090b INIT_0908: 090b 0092 0973 | s| Action Push_String_Extended,0x973 ; " File pages " 090d e402 | | Load 0x2,0x2 090e 0a01 | | Execute_Immediate Plus,0x1 090f 00d8 | | Load_Top At_Offset_0 0910 00e2 | | Load_Encached Integer_Cache 0911 0260 | ` | Execute Discrete,In_Type 0912 7001 |p | Jump_Nonzero 0x914 0913 0801 | | Execute_Immediate Raise,0x1 0914 00e0 | | Load_Encached Standard_Cache 0915 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0916 01cc | | Execute Vector,Catenate 0917 0092 0974 | t| Action Push_String_Extended,0x974 ; " .. " 0919 01cc | | Execute Vector,Catenate 091a e406 | | Load 0x2,0x6 091b e5ff | | Load 0x2,-0x1 091c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 091d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 091e 01d5 | | Execute Vector,Field_Reference 091f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0920 0a01 | | Execute_Immediate Plus,0x1 0921 00d8 | | Load_Top At_Offset_0 0922 00e2 | | Load_Encached Integer_Cache 0923 0260 | ` | Execute Discrete,In_Type 0924 7001 |p | Jump_Nonzero 0x926 0925 0801 | | Execute_Immediate Raise,0x1 0926 00e0 | | Load_Encached Standard_Cache 0927 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0928 01cc | | Execute Vector,Catenate 0929 0092 0975 | u| Action Push_String_Extended,0x975 ; " are at disk block " 092b 01cc | | Execute Vector,Catenate 092c e406 | | Load 0x2,0x6 092d e5ff | | Load 0x2,-0x1 092e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 092f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0930 01d5 | | Execute Vector,Field_Reference 0931 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0932 00e0 | | Load_Encached Standard_Cache 0933 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0934 01cc | | Execute Vector,Catenate 0935 e022 | " | Load 0x0,0x22 0936 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0937 e406 | | Load 0x2,0x6 0938 e5ff | | Load 0x2,-0x1 0939 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 093a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 093b 01d5 | | Execute Vector,Field_Reference 093c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 093d 0a01 | | Execute_Immediate Plus,0x1 093e c402 | | Store 0x2,0x2 093f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0940 ; -------------------------------------------------------------------------------------- 0940 ; SUBPROGRAM 0940 ; -------------------------------------------------------------------------------------- 0940 0943 | C | .CONST 0x0943 ; Address of begin 0941 0004 | | .CONST 0x0004 ; Address of exception handler 0942 0001 | | .CONST 0x0001 ; Number of locals 0943 BODY_0940: 0943 INIT_0940: 0943 4608 |F | Jump_Case 0x9 0944 7808 |x | Jump 0x94d ; case 0x0 0945 780e |x | Jump 0x954 ; case 0x1 0946 7811 |x | Jump 0x958 ; case 0x2 0947 7810 |x | Jump 0x958 ; case 0x3 0948 780f |x | Jump 0x958 ; case 0x4 0949 780e |x | Jump 0x958 ; case 0x5 094a 780d |x | Jump 0x958 ; case 0x6 094b 780c |x | Jump 0x958 ; case 0x7 094c 780b |x | Jump 0x958 ; case 0x8 094d 00da | | Load_Top At_Offset_2 094e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 094f 0125 | % | Execute Any,Set_Constraint 0950 00da | | Load_Top At_Offset_2 0951 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0952 1c00 | | Execute_Immediate Run_Utility,0x0 0953 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0954 00da | | Load_Top At_Offset_2 0955 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0956 0125 | % | Execute Any,Set_Constraint 0957 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0958 0869 | i | Execute_Immediate Raise,0x69 0959 ; -------------------------------------------------------------------------------------- 0959 ; STRING TABLE 0959 ; -------------------------------------------------------------------------------------- 0959 003c | < | .STRTAB 0x003c->0x0977 ; "address out of bounds" 095a 004f | O | .STRTAB 0x004f->0x0981 ; "No disk" 095b 0054 | T | .STRTAB 0x0054->0x0985 ; "File operation successful" 095c 006b | k | .STRTAB 0x006b->0x0991 ; "Bad filename" 095d 0075 | u | .STRTAB 0x0075->0x0997 ; "File does not exist" 095e 0086 | | .STRTAB 0x0086->0x09a1 ; "File is not open" 095f 0094 | | .STRTAB 0x0094->0x09a9 ; "Disk is full" 0960 009e | | .STRTAB 0x009e->0x09af ; "Directory is full" 0961 00ad | | .STRTAB 0x00ad->0x09b7 ; "File already exists" 0962 00be | | .STRTAB 0x00be->0x09c1 ; "Can't rename file" 0963 00cd | | .STRTAB 0x00cd->0x09c9 ; "Can't delete file" 0964 00dc | | .STRTAB 0x00dc->0x09d2 ; "Page error" 0965 00e4 | | .STRTAB 0x00e4->0x09d7 ; "Slice error" 0966 00ed | | .STRTAB 0x00ed->0x09dc ; "Bad address" 0967 00f6 | | .STRTAB 0x00f6->0x09e2 ; "Disk error" 0968 00fe | | .STRTAB 0x00fe->0x09e7 ; "No labels on disk" 0969 010d | | .STRTAB 0x010d->0x09ef ; "No dos on disk" 096a 0119 | | .STRTAB 0x0119->0x09f6 ; "Unknown error" 096b 0124 | $ | .STRTAB 0x0124->0x09fd ; " " 096c 0123 | # | .STRTAB 0x0123->0x09fd ; "Total of " 096d 012a | * | .STRTAB 0x012a->0x0a02 ; " Pages in " 096e 0132 | 2 | .STRTAB 0x0132->0x0a07 ; " Files." 096f 0137 | 7 | .STRTAB 0x0137->0x0a0a ; "No files found." 0970 0144 | D | .STRTAB 0x0144->0x0a12 ; " PERMANENT => " 0971 0159 | Y | .STRTAB 0x0159->0x0a1d ; ", EXECUTABLE => " 0972 0167 | g | .STRTAB 0x0167->0x0a25 ; ", KERNEL => " 0973 0171 | q | .STRTAB 0x0171->0x0a2b ; " File pages " 0974 0184 | | .STRTAB 0x0184->0x0a36 ; " .. " 0975 0186 | | .STRTAB 0x0186->0x0a38 ; " are at disk block " 0976 0197 | | .STREND 0x0197->0x0a41 0977 6164 6472 |addr| .STRTAB_STRINGS 0a42 0000 0000 | | .BLANK 0000[0x6] 0a48 ; -------------------------------------------------------------------------------------- 0a48 ; Debug Table 0a48 ; -------------------------------------------------------------------------------------- 0a48 0004 0010 | | .DEBUG4 0x0004,0x0010,0x8b48,0x0000,0x0001,0x0000 0a4e 0d04 e0c0 | | .XXX[0x1b2] 0a50 c0c0 c0c0 | | 0a52 c0c0 d0c0 | | 0a54 c0c5 04d8 | | 0a56 dcc1 04c9 | | 0a58 18c0 e118 | | 0a5a d429 4ccc | )L | 0a5c c4c5 14c0 | | 0a5e c0c1 1509 | | 0a60 0cc0 d115 | | 0a62 08e5 14c0 | | 0a64 c0c1 1510 | | 0a66 c0d8 d8c0 | | 0a68 c104 c918 | | 0a6a c914 c0c0 | | 0a6c c0e1 0904 | | 0a6e 294c ccc4 |)L | 0a70 c514 c0c0 | | 0a72 c115 090d | | 0a74 0cd1 1508 | | 0a76 e514 c0c0 | | 0a78 c115 18e5 | | 0a7a 04d4 e0d1 | | 0a7c 18d1 14d5 | | 0a7e 14d1 14dc | | 0a80 d510 c429 | )| 0a82 4ccc c4c5 |L | 0a84 14c0 c0c1 | | 0a86 1509 10e0 | | 0a88 d114 d4d8 | | 0a8a c0c0 c0c0 | | 0a8c c8c0 d914 | | 0a8e c0c0 c0e0 | | 0a90 c10d 04e0 | | 0a92 c0c0 c0c0 | | 0a94 d510 294c | )L| 0a96 ccc4 c514 | | 0a98 c0c0 c115 | | 0a9a 0914 d0c0 | | 0a9c c0c0 d0c0 | | 0a9e c0c5 04d8 | | 0aa0 dcc1 14c9 | | 0aa2 18c9 14c0 | | 0aa4 c0c1 0cc9 | | 0aa6 18c0 e0c1 | | 0aa8 0c29 4ccc | )L | 0aaa c4c5 14c0 | | 0aac c0c1 1509 | | 0aae 18c0 d115 | | 0ab0 08e5 14c0 | | 0ab2 c0c1 1515 | | 0ab4 10c0 d8c0 | | 0ab6 c114 c918 | | 0ab8 c914 c0c0 | | 0aba c10d 08dc | | 0abc 294c ccc4 |)L | 0abe c514 c0c0 | | 0ac0 c115 0919 | | 0ac2 0cc9 18c9 | | 0ac4 14c0 c0c0 | | 0ac6 e0d1 1508 | | 0ac8 e514 c0c0 | | 0aca c118 c4e0 | | 0acc c8d4 c0d1 | | 0ace 190c e429 | )| 0ad0 4ccc c4c5 |L | 0ad2 14c0 c0c1 | | 0ad4 150c c0e0 | | 0ad6 d114 d514 | | 0ad8 d114 dcd4 | | 0ada d114 d4d9 | | 0adc 1919 190c | | 0ade c918 c914 | | 0ae0 c0c0 c0e1 | | 0ae2 04dc 294c | )L| 0ae4 ccc4 c514 | | 0ae6 c0c0 c115 | | 0ae8 0cc4 d0d1 | | 0aea 1508 e514 | | 0aec c0c0 c111 | | 0aee 10c8 c0d4 | | 0af0 e0d1 18c9 | | 0af2 10d0 c119 | | 0af4 1919 0cc5 | | 0af6 0829 4ccc | )L | 0af8 c4c5 14c0 | | 0afa c0c1 150c | | 0afc c8c0 d8d8 | | 0afe c0d8 dcc1 | | 0b00 1918 d8c0 | | 0b02 c0c0 c0c1 | | 0b04 110c c8c0 | | 0b06 d914 c0c0 | | 0b08 c10c d4c4 | | 0b0a 294c ccc4 |)L | 0b0c c514 c0c0 | | 0b0e c115 0cc9 | | 0b10 0ccc c109 | | 0b12 0cc0 c0c0 | | 0b14 c4c8 c0d9 | | 0b16 14c0 c0c1 | | 0b18 0cc8 c4d9 | | 0b1a 1519 1919 | | 0b1c 0d14 d429 | )| 0b1e 4ccc c4c5 |L | 0b20 14c0 c0c1 | | 0b22 150c cce0 | | 0b24 c0c0 c0c8 | | 0b26 c8c0 d914 | | 0b28 c0c0 c10c | | 0b2a c8c4 d915 | | 0b2c 1919 190c | | 0b2e c0c0 c0d9 | | 0b30 0914 294c | )L| 0b32 ccc4 c514 | | 0b34 c0c0 c115 | | 0b36 0cd0 d0c8 | | 0b38 c0d9 14c0 | | 0b3a c0c1 0cc8 | | 0b3c c4d9 14c0 | | 0b3e c0c0 e0c0 | | 0b40 c0c1 04c9 | | 0b42 18c9 14d0 | | 0b44 d829 4ccc | )L | 0b46 c4c5 14c0 | | 0b48 c0c1 150c | | 0b4a d4c0 c0c0 | | 0b4c c10c d0e0 | | 0b4e dce5 14c0 | | 0b50 c0c4 c0cc | | 0b52 c0e0 d0e0 | | 0b54 dce0 c0c0 | | 0b56 c8c0 cce4 | | 0b58 294c ccc4 |)L | 0b5a c514 c0c0 | | 0b5c c115 0cd5 | | 0b5e 0cd0 e0dc | | 0b60 e0c0 c0c4 | | 0b62 c0d1 1508 | | 0b64 e514 c0c0 | | 0b66 c119 150c | | 0b68 d8d1 1915 | | 0b6a 18c1 1029 | )| 0b6c 4ccc c4c5 |L | 0b6e 14c0 c0c1 | | 0b70 150c d8e0 | | 0b72 c0c0 c4c0 | | 0b74 c918 c914 | | 0b76 c0c0 c10c | | 0b78 d0e0 dce5 | | 0b7a 14c0 c0c4 | | 0b7c c0cc c0e0 | | 0b7e e4d0 294c | )L| 0b80 ccc4 c514 | | 0b82 c0c0 c115 | | 0b84 0cdc d0c9 | | 0b86 18c9 14c0 | | 0b88 c0c4 c0d1 | | 0b8a 1508 e514 | | 0b8c c0c0 c119 | | 0b8e 1904 d0d1 | | 0b90 1915 18dc | | 0b92 e429 4ccc | )L | 0b94 c4c5 14c0 | | 0b96 c0c1 150c | | 0b98 e0c0 c0c0 | | 0b9a c10c c918 | | 0b9c c914 c0c0 | | 0b9e c10c d0e0 | | 0ba0 dce5 14c0 | | 0ba2 c0c4 c0cc | | 0ba4 c0e0 e0c0 | | 0ba6 294c ccc4 |)L | 0ba8 c514 c0c0 | | 0baa c115 0ce1 | | 0bac 0cc9 18c9 | | 0bae 14c0 c0c4 | | 0bb0 d0d0 c904 | | 0bb2 dcd0 e0dc | | 0bb4 e0c0 c0c0 | | 0bb6 c8d1 1508 | | 0bb8 e4dc cc29 | )| 0bba 4ccc c4c5 |L | 0bbc 14c0 c0c1 | | 0bbe 150c e4e1 | | 0bc0 14c0 c0c4 | | 0bc2 c0c0 d4c0 | | 0bc4 d119 1518 | | 0bc6 c0c0 c4d0 | | 0bc8 c918 c914 | | 0bca c0c0 c10c | | 0bcc e514 294c | )L| 0bce ccc4 c514 | | 0bd0 c0c0 c115 | | 0bd2 0d04 d0d0 | | 0bd4 e0dc e514 | | 0bd6 c0c0 c4c0 | | 0bd8 ccc0 e0c8 | | 0bda c0d9 14c0 | | 0bdc c0c4 e0c8 | | 0bde c0c8 e114 | | 0be0 cc29 4ccc | )L | 0be2 c4c5 14c0 | | 0be4 c0c1 150d | | 0be6 08c0 c0c0 | | 0be8 c0d8 e4c1 | | 0bea 04e0 c0c0 | | 0bec c0c8 c918 | | 0bee c0c0 c918 | | 0bf0 c8e0 c0c0 | | 0bf2 c0c9 0504 | | 0bf4 294c ccc4 |)L | 0bf6 c514 c0c0 | | 0bf8 c115 0d09 | | 0bfa 0cd0 c904 | | 0bfc dcd0 e0dc | | 0bfe e0c0 c0c0 | |