test/compiler/6340864/TestShortVect.java

Mon, 20 Aug 2012 09:07:21 -0700

author
kvn
date
Mon, 20 Aug 2012 09:07:21 -0700
changeset 4001
006050192a5a
child 4204
b2c669fd8114
permissions
-rw-r--r--

6340864: Implement vectorization optimizations in hotspot-server
Summary: Added asm encoding and mach nodes for vector arithmetic instructions on x86.
Reviewed-by: roland

kvn@4001 1 /*
kvn@4001 2 * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
kvn@4001 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
kvn@4001 4 *
kvn@4001 5 * This code is free software; you can redistribute it and/or modify it
kvn@4001 6 * under the terms of the GNU General Public License version 2 only, as
kvn@4001 7 * published by the Free Software Foundation.
kvn@4001 8 *
kvn@4001 9 * This code is distributed in the hope that it will be useful, but WITHOUT
kvn@4001 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
kvn@4001 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
kvn@4001 12 * version 2 for more details (a copy is included in the LICENSE file that
kvn@4001 13 * accompanied this code).
kvn@4001 14 *
kvn@4001 15 * You should have received a copy of the GNU General Public License version
kvn@4001 16 * 2 along with this work; if not, write to the Free Software Foundation,
kvn@4001 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
kvn@4001 18 *
kvn@4001 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
kvn@4001 20 * or visit www.oracle.com if you need additional information or have any
kvn@4001 21 * questions.
kvn@4001 22 *
kvn@4001 23 */
kvn@4001 24
kvn@4001 25 /**
kvn@4001 26 * @test
kvn@4001 27 * @bug 6340864
kvn@4001 28 * @summary Implement vectorization optimizations in hotspot-server
kvn@4001 29 *
kvn@4001 30 * @run main/othervm/timeout=400 -Xbatch -Xmx64m TestShortVect
kvn@4001 31 */
kvn@4001 32
kvn@4001 33 public class TestShortVect {
kvn@4001 34 private static final int ARRLEN = 997;
kvn@4001 35 private static final int ITERS = 11000;
kvn@4001 36 private static final int ADD_INIT = Short.MAX_VALUE-500;
kvn@4001 37 private static final int BIT_MASK = 0xB731;
kvn@4001 38 private static final int VALUE = 7;
kvn@4001 39 private static final int SHIFT = 16;
kvn@4001 40
kvn@4001 41 public static void main(String args[]) {
kvn@4001 42 System.out.println("Testing Short vectors");
kvn@4001 43 int errn = test();
kvn@4001 44 if (errn > 0) {
kvn@4001 45 System.err.println("FAILED: " + errn + " errors");
kvn@4001 46 System.exit(97);
kvn@4001 47 }
kvn@4001 48 System.out.println("PASSED");
kvn@4001 49 }
kvn@4001 50
kvn@4001 51 static int test() {
kvn@4001 52 short[] a0 = new short[ARRLEN];
kvn@4001 53 short[] a1 = new short[ARRLEN];
kvn@4001 54 short[] a2 = new short[ARRLEN];
kvn@4001 55 short[] a3 = new short[ARRLEN];
kvn@4001 56 short[] a4 = new short[ARRLEN];
kvn@4001 57 int[] p2 = new int[ARRLEN/2];
kvn@4001 58 long[] p4 = new long[ARRLEN/4];
kvn@4001 59 // Initialize
kvn@4001 60 int gold_sum = 0;
kvn@4001 61 for (int i=0; i<ARRLEN; i++) {
kvn@4001 62 short val = (short)(ADD_INIT+i);
kvn@4001 63 gold_sum += val;
kvn@4001 64 a1[i] = val;
kvn@4001 65 a2[i] = (short)VALUE;
kvn@4001 66 a3[i] = (short)-VALUE;
kvn@4001 67 a4[i] = (short)BIT_MASK;
kvn@4001 68 }
kvn@4001 69 System.out.println("Warmup");
kvn@4001 70 for (int i=0; i<ITERS; i++) {
kvn@4001 71 test_sum(a1);
kvn@4001 72 test_addc(a0, a1);
kvn@4001 73 test_addv(a0, a1, (short)VALUE);
kvn@4001 74 test_adda(a0, a1, a2);
kvn@4001 75 test_subc(a0, a1);
kvn@4001 76 test_subv(a0, a1, (short)VALUE);
kvn@4001 77 test_suba(a0, a1, a2);
kvn@4001 78 test_mulc(a0, a1);
kvn@4001 79 test_mulv(a0, a1, (short)VALUE);
kvn@4001 80 test_mula(a0, a1, a2);
kvn@4001 81 test_divc(a0, a1);
kvn@4001 82 test_divv(a0, a1, (short)VALUE);
kvn@4001 83 test_diva(a0, a1, a2);
kvn@4001 84 test_mulc_n(a0, a1);
kvn@4001 85 test_mulv(a0, a1, (short)-VALUE);
kvn@4001 86 test_mula(a0, a1, a3);
kvn@4001 87 test_divc_n(a0, a1);
kvn@4001 88 test_divv(a0, a1, (short)-VALUE);
kvn@4001 89 test_diva(a0, a1, a3);
kvn@4001 90 test_andc(a0, a1);
kvn@4001 91 test_andv(a0, a1, (short)BIT_MASK);
kvn@4001 92 test_anda(a0, a1, a4);
kvn@4001 93 test_orc(a0, a1);
kvn@4001 94 test_orv(a0, a1, (short)BIT_MASK);
kvn@4001 95 test_ora(a0, a1, a4);
kvn@4001 96 test_xorc(a0, a1);
kvn@4001 97 test_xorv(a0, a1, (short)BIT_MASK);
kvn@4001 98 test_xora(a0, a1, a4);
kvn@4001 99 test_sllc(a0, a1);
kvn@4001 100 test_sllv(a0, a1, VALUE);
kvn@4001 101 test_srlc(a0, a1);
kvn@4001 102 test_srlv(a0, a1, VALUE);
kvn@4001 103 test_srac(a0, a1);
kvn@4001 104 test_srav(a0, a1, VALUE);
kvn@4001 105 test_sllc_n(a0, a1);
kvn@4001 106 test_sllv(a0, a1, -VALUE);
kvn@4001 107 test_srlc_n(a0, a1);
kvn@4001 108 test_srlv(a0, a1, -VALUE);
kvn@4001 109 test_srac_n(a0, a1);
kvn@4001 110 test_srav(a0, a1, -VALUE);
kvn@4001 111 test_sllc_o(a0, a1);
kvn@4001 112 test_sllv(a0, a1, SHIFT);
kvn@4001 113 test_srlc_o(a0, a1);
kvn@4001 114 test_srlv(a0, a1, SHIFT);
kvn@4001 115 test_srac_o(a0, a1);
kvn@4001 116 test_srav(a0, a1, SHIFT);
kvn@4001 117 test_sllc_on(a0, a1);
kvn@4001 118 test_sllv(a0, a1, -SHIFT);
kvn@4001 119 test_srlc_on(a0, a1);
kvn@4001 120 test_srlv(a0, a1, -SHIFT);
kvn@4001 121 test_srac_on(a0, a1);
kvn@4001 122 test_srav(a0, a1, -SHIFT);
kvn@4001 123 test_pack2(p2, a1);
kvn@4001 124 test_unpack2(a0, p2);
kvn@4001 125 test_pack2_swap(p2, a1);
kvn@4001 126 test_unpack2_swap(a0, p2);
kvn@4001 127 test_pack4(p4, a1);
kvn@4001 128 test_unpack4(a0, p4);
kvn@4001 129 test_pack4_swap(p4, a1);
kvn@4001 130 test_unpack4_swap(a0, p4);
kvn@4001 131 }
kvn@4001 132 // Test and verify results
kvn@4001 133 System.out.println("Verification");
kvn@4001 134 int errn = 0;
kvn@4001 135 {
kvn@4001 136 int sum = test_sum(a1);
kvn@4001 137 if (sum != gold_sum) {
kvn@4001 138 System.err.println("test_sum: " + sum + " != " + gold_sum);
kvn@4001 139 errn++;
kvn@4001 140 }
kvn@4001 141
kvn@4001 142 test_addc(a0, a1);
kvn@4001 143 for (int i=0; i<ARRLEN; i++) {
kvn@4001 144 errn += verify("test_addc: ", i, a0[i], (short)((short)(ADD_INIT+i)+VALUE));
kvn@4001 145 }
kvn@4001 146 test_addv(a0, a1, (short)VALUE);
kvn@4001 147 for (int i=0; i<ARRLEN; i++) {
kvn@4001 148 errn += verify("test_addv: ", i, a0[i], (short)((short)(ADD_INIT+i)+VALUE));
kvn@4001 149 }
kvn@4001 150 test_adda(a0, a1, a2);
kvn@4001 151 for (int i=0; i<ARRLEN; i++) {
kvn@4001 152 errn += verify("test_adda: ", i, a0[i], (short)((short)(ADD_INIT+i)+VALUE));
kvn@4001 153 }
kvn@4001 154
kvn@4001 155 test_subc(a0, a1);
kvn@4001 156 for (int i=0; i<ARRLEN; i++) {
kvn@4001 157 errn += verify("test_subc: ", i, a0[i], (short)((short)(ADD_INIT+i)-VALUE));
kvn@4001 158 }
kvn@4001 159 test_subv(a0, a1, (short)VALUE);
kvn@4001 160 for (int i=0; i<ARRLEN; i++) {
kvn@4001 161 errn += verify("test_subv: ", i, a0[i], (short)((short)(ADD_INIT+i)-VALUE));
kvn@4001 162 }
kvn@4001 163 test_suba(a0, a1, a2);
kvn@4001 164 for (int i=0; i<ARRLEN; i++) {
kvn@4001 165 errn += verify("test_suba: ", i, a0[i], (short)((short)(ADD_INIT+i)-VALUE));
kvn@4001 166 }
kvn@4001 167
kvn@4001 168 test_mulc(a0, a1);
kvn@4001 169 for (int i=0; i<ARRLEN; i++) {
kvn@4001 170 errn += verify("test_mulc: ", i, a0[i], (short)((short)(ADD_INIT+i)*VALUE));
kvn@4001 171 }
kvn@4001 172 test_mulv(a0, a1, (short)VALUE);
kvn@4001 173 for (int i=0; i<ARRLEN; i++) {
kvn@4001 174 errn += verify("test_mulv: ", i, a0[i], (short)((short)(ADD_INIT+i)*VALUE));
kvn@4001 175 }
kvn@4001 176 test_mula(a0, a1, a2);
kvn@4001 177 for (int i=0; i<ARRLEN; i++) {
kvn@4001 178 errn += verify("test_mula: ", i, a0[i], (short)((short)(ADD_INIT+i)*VALUE));
kvn@4001 179 }
kvn@4001 180
kvn@4001 181 test_divc(a0, a1);
kvn@4001 182 for (int i=0; i<ARRLEN; i++) {
kvn@4001 183 errn += verify("test_divc: ", i, a0[i], (short)((short)(ADD_INIT+i)/VALUE));
kvn@4001 184 }
kvn@4001 185 test_divv(a0, a1, (short)VALUE);
kvn@4001 186 for (int i=0; i<ARRLEN; i++) {
kvn@4001 187 errn += verify("test_divv: ", i, a0[i], (short)((short)(ADD_INIT+i)/VALUE));
kvn@4001 188 }
kvn@4001 189 test_diva(a0, a1, a2);
kvn@4001 190 for (int i=0; i<ARRLEN; i++) {
kvn@4001 191 errn += verify("test_diva: ", i, a0[i], (short)((short)(ADD_INIT+i)/VALUE));
kvn@4001 192 }
kvn@4001 193
kvn@4001 194 test_mulc_n(a0, a1);
kvn@4001 195 for (int i=0; i<ARRLEN; i++) {
kvn@4001 196 errn += verify("test_mulc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)*(-VALUE)));
kvn@4001 197 }
kvn@4001 198 test_mulv(a0, a1, (short)-VALUE);
kvn@4001 199 for (int i=0; i<ARRLEN; i++) {
kvn@4001 200 errn += verify("test_mulv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)*(-VALUE)));
kvn@4001 201 }
kvn@4001 202 test_mula(a0, a1, a3);
kvn@4001 203 for (int i=0; i<ARRLEN; i++) {
kvn@4001 204 errn += verify("test_mula_n: ", i, a0[i], (short)((short)(ADD_INIT+i)*(-VALUE)));
kvn@4001 205 }
kvn@4001 206
kvn@4001 207 test_divc_n(a0, a1);
kvn@4001 208 for (int i=0; i<ARRLEN; i++) {
kvn@4001 209 errn += verify("test_divc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)/(-VALUE)));
kvn@4001 210 }
kvn@4001 211 test_divv(a0, a1, (short)-VALUE);
kvn@4001 212 for (int i=0; i<ARRLEN; i++) {
kvn@4001 213 errn += verify("test_divv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)/(-VALUE)));
kvn@4001 214 }
kvn@4001 215 test_diva(a0, a1, a3);
kvn@4001 216 for (int i=0; i<ARRLEN; i++) {
kvn@4001 217 errn += verify("test_diva_n: ", i, a0[i], (short)((short)(ADD_INIT+i)/(-VALUE)));
kvn@4001 218 }
kvn@4001 219
kvn@4001 220 test_andc(a0, a1);
kvn@4001 221 for (int i=0; i<ARRLEN; i++) {
kvn@4001 222 errn += verify("test_andc: ", i, a0[i], (short)((short)(ADD_INIT+i)&BIT_MASK));
kvn@4001 223 }
kvn@4001 224 test_andv(a0, a1, (short)BIT_MASK);
kvn@4001 225 for (int i=0; i<ARRLEN; i++) {
kvn@4001 226 errn += verify("test_andv: ", i, a0[i], (short)((short)(ADD_INIT+i)&BIT_MASK));
kvn@4001 227 }
kvn@4001 228 test_anda(a0, a1, a4);
kvn@4001 229 for (int i=0; i<ARRLEN; i++) {
kvn@4001 230 errn += verify("test_anda: ", i, a0[i], (short)((short)(ADD_INIT+i)&BIT_MASK));
kvn@4001 231 }
kvn@4001 232
kvn@4001 233 test_orc(a0, a1);
kvn@4001 234 for (int i=0; i<ARRLEN; i++) {
kvn@4001 235 errn += verify("test_orc: ", i, a0[i], (short)((short)(ADD_INIT+i)|BIT_MASK));
kvn@4001 236 }
kvn@4001 237 test_orv(a0, a1, (short)BIT_MASK);
kvn@4001 238 for (int i=0; i<ARRLEN; i++) {
kvn@4001 239 errn += verify("test_orv: ", i, a0[i], (short)((short)(ADD_INIT+i)|BIT_MASK));
kvn@4001 240 }
kvn@4001 241 test_ora(a0, a1, a4);
kvn@4001 242 for (int i=0; i<ARRLEN; i++) {
kvn@4001 243 errn += verify("test_ora: ", i, a0[i], (short)((short)(ADD_INIT+i)|BIT_MASK));
kvn@4001 244 }
kvn@4001 245
kvn@4001 246 test_xorc(a0, a1);
kvn@4001 247 for (int i=0; i<ARRLEN; i++) {
kvn@4001 248 errn += verify("test_xorc: ", i, a0[i], (short)((short)(ADD_INIT+i)^BIT_MASK));
kvn@4001 249 }
kvn@4001 250 test_xorv(a0, a1, (short)BIT_MASK);
kvn@4001 251 for (int i=0; i<ARRLEN; i++) {
kvn@4001 252 errn += verify("test_xorv: ", i, a0[i], (short)((short)(ADD_INIT+i)^BIT_MASK));
kvn@4001 253 }
kvn@4001 254 test_xora(a0, a1, a4);
kvn@4001 255 for (int i=0; i<ARRLEN; i++) {
kvn@4001 256 errn += verify("test_xora: ", i, a0[i], (short)((short)(ADD_INIT+i)^BIT_MASK));
kvn@4001 257 }
kvn@4001 258
kvn@4001 259 test_sllc(a0, a1);
kvn@4001 260 for (int i=0; i<ARRLEN; i++) {
kvn@4001 261 errn += verify("test_sllc: ", i, a0[i], (short)((short)(ADD_INIT+i)<<VALUE));
kvn@4001 262 }
kvn@4001 263 test_sllv(a0, a1, VALUE);
kvn@4001 264 for (int i=0; i<ARRLEN; i++) {
kvn@4001 265 errn += verify("test_sllv: ", i, a0[i], (short)((short)(ADD_INIT+i)<<VALUE));
kvn@4001 266 }
kvn@4001 267
kvn@4001 268 test_srlc(a0, a1);
kvn@4001 269 for (int i=0; i<ARRLEN; i++) {
kvn@4001 270 errn += verify("test_srlc: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>VALUE));
kvn@4001 271 }
kvn@4001 272 test_srlv(a0, a1, VALUE);
kvn@4001 273 for (int i=0; i<ARRLEN; i++) {
kvn@4001 274 errn += verify("test_srlv: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>VALUE));
kvn@4001 275 }
kvn@4001 276
kvn@4001 277 test_srac(a0, a1);
kvn@4001 278 for (int i=0; i<ARRLEN; i++) {
kvn@4001 279 errn += verify("test_srac: ", i, a0[i], (short)((short)(ADD_INIT+i)>>VALUE));
kvn@4001 280 }
kvn@4001 281 test_srav(a0, a1, VALUE);
kvn@4001 282 for (int i=0; i<ARRLEN; i++) {
kvn@4001 283 errn += verify("test_srav: ", i, a0[i], (short)((short)(ADD_INIT+i)>>VALUE));
kvn@4001 284 }
kvn@4001 285
kvn@4001 286 test_sllc_n(a0, a1);
kvn@4001 287 for (int i=0; i<ARRLEN; i++) {
kvn@4001 288 errn += verify("test_sllc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-VALUE)));
kvn@4001 289 }
kvn@4001 290 test_sllv(a0, a1, -VALUE);
kvn@4001 291 for (int i=0; i<ARRLEN; i++) {
kvn@4001 292 errn += verify("test_sllv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-VALUE)));
kvn@4001 293 }
kvn@4001 294
kvn@4001 295 test_srlc_n(a0, a1);
kvn@4001 296 for (int i=0; i<ARRLEN; i++) {
kvn@4001 297 errn += verify("test_srlc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-VALUE)));
kvn@4001 298 }
kvn@4001 299 test_srlv(a0, a1, -VALUE);
kvn@4001 300 for (int i=0; i<ARRLEN; i++) {
kvn@4001 301 errn += verify("test_srlv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-VALUE)));
kvn@4001 302 }
kvn@4001 303
kvn@4001 304 test_srac_n(a0, a1);
kvn@4001 305 for (int i=0; i<ARRLEN; i++) {
kvn@4001 306 errn += verify("test_srac_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-VALUE)));
kvn@4001 307 }
kvn@4001 308 test_srav(a0, a1, -VALUE);
kvn@4001 309 for (int i=0; i<ARRLEN; i++) {
kvn@4001 310 errn += verify("test_srav_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-VALUE)));
kvn@4001 311 }
kvn@4001 312
kvn@4001 313 test_sllc_o(a0, a1);
kvn@4001 314 for (int i=0; i<ARRLEN; i++) {
kvn@4001 315 errn += verify("test_sllc_o: ", i, a0[i], (short)((short)(ADD_INIT+i)<<SHIFT));
kvn@4001 316 }
kvn@4001 317 test_sllv(a0, a1, SHIFT);
kvn@4001 318 for (int i=0; i<ARRLEN; i++) {
kvn@4001 319 errn += verify("test_sllv_o: ", i, a0[i], (short)((short)(ADD_INIT+i)<<SHIFT));
kvn@4001 320 }
kvn@4001 321
kvn@4001 322 test_srlc_o(a0, a1);
kvn@4001 323 for (int i=0; i<ARRLEN; i++) {
kvn@4001 324 errn += verify("test_srlc_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>SHIFT));
kvn@4001 325 }
kvn@4001 326 test_srlv(a0, a1, SHIFT);
kvn@4001 327 for (int i=0; i<ARRLEN; i++) {
kvn@4001 328 errn += verify("test_srlv_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>SHIFT));
kvn@4001 329 }
kvn@4001 330
kvn@4001 331 test_srac_o(a0, a1);
kvn@4001 332 for (int i=0; i<ARRLEN; i++) {
kvn@4001 333 errn += verify("test_srac_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>SHIFT));
kvn@4001 334 }
kvn@4001 335 test_srav(a0, a1, SHIFT);
kvn@4001 336 for (int i=0; i<ARRLEN; i++) {
kvn@4001 337 errn += verify("test_srav_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>SHIFT));
kvn@4001 338 }
kvn@4001 339
kvn@4001 340 test_sllc_on(a0, a1);
kvn@4001 341 for (int i=0; i<ARRLEN; i++) {
kvn@4001 342 errn += verify("test_sllc_on: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-SHIFT)));
kvn@4001 343 }
kvn@4001 344 test_sllv(a0, a1, -SHIFT);
kvn@4001 345 for (int i=0; i<ARRLEN; i++) {
kvn@4001 346 errn += verify("test_sllv_on: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-SHIFT)));
kvn@4001 347 }
kvn@4001 348
kvn@4001 349 test_srlc_on(a0, a1);
kvn@4001 350 for (int i=0; i<ARRLEN; i++) {
kvn@4001 351 errn += verify("test_srlc_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-SHIFT)));
kvn@4001 352 }
kvn@4001 353 test_srlv(a0, a1, -SHIFT);
kvn@4001 354 for (int i=0; i<ARRLEN; i++) {
kvn@4001 355 errn += verify("test_srlv_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-SHIFT)));
kvn@4001 356 }
kvn@4001 357
kvn@4001 358 test_srac_on(a0, a1);
kvn@4001 359 for (int i=0; i<ARRLEN; i++) {
kvn@4001 360 errn += verify("test_srac_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-SHIFT)));
kvn@4001 361 }
kvn@4001 362 test_srav(a0, a1, -SHIFT);
kvn@4001 363 for (int i=0; i<ARRLEN; i++) {
kvn@4001 364 errn += verify("test_srav_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-SHIFT)));
kvn@4001 365 }
kvn@4001 366
kvn@4001 367 test_pack2(p2, a1);
kvn@4001 368 for (int i=0; i<ARRLEN/2; i++) {
kvn@4001 369 errn += verify("test_pack2: ", i, p2[i], ((int)(ADD_INIT+2*i) & 0xFFFF) | ((int)(ADD_INIT+2*i+1) << 16));
kvn@4001 370 }
kvn@4001 371 for (int i=0; i<ARRLEN; i++) {
kvn@4001 372 a0[i] = -1;
kvn@4001 373 }
kvn@4001 374 test_unpack2(a0, p2);
kvn@4001 375 for (int i=0; i<(ARRLEN&(-2)); i++) {
kvn@4001 376 errn += verify("test_unpack2: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 377 }
kvn@4001 378
kvn@4001 379 test_pack2_swap(p2, a1);
kvn@4001 380 for (int i=0; i<ARRLEN/2; i++) {
kvn@4001 381 errn += verify("test_pack2_swap: ", i, p2[i], ((int)(ADD_INIT+2*i+1) & 0xFFFF) | ((int)(ADD_INIT+2*i) << 16));
kvn@4001 382 }
kvn@4001 383 for (int i=0; i<ARRLEN; i++) {
kvn@4001 384 a0[i] = -1;
kvn@4001 385 }
kvn@4001 386 test_unpack2_swap(a0, p2);
kvn@4001 387 for (int i=0; i<(ARRLEN&(-2)); i++) {
kvn@4001 388 errn += verify("test_unpack2_swap: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 389 }
kvn@4001 390
kvn@4001 391 test_pack4(p4, a1);
kvn@4001 392 for (int i=0; i<ARRLEN/4; i++) {
kvn@4001 393 errn += verify("test_pack4: ", i, p4[i], ((long)(ADD_INIT+4*i+0) & 0xFFFFl) |
kvn@4001 394 (((long)(ADD_INIT+4*i+1) & 0xFFFFl) << 16) |
kvn@4001 395 (((long)(ADD_INIT+4*i+2) & 0xFFFFl) << 32) |
kvn@4001 396 (((long)(ADD_INIT+4*i+3) & 0xFFFFl) << 48));
kvn@4001 397 }
kvn@4001 398 for (int i=0; i<ARRLEN; i++) {
kvn@4001 399 a0[i] = -1;
kvn@4001 400 }
kvn@4001 401 test_unpack4(a0, p4);
kvn@4001 402 for (int i=0; i<(ARRLEN&(-4)); i++) {
kvn@4001 403 errn += verify("test_unpack4: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 404 }
kvn@4001 405
kvn@4001 406 test_pack4_swap(p4, a1);
kvn@4001 407 for (int i=0; i<ARRLEN/4; i++) {
kvn@4001 408 errn += verify("test_pack4_swap: ", i, p4[i], ((long)(ADD_INIT+4*i+3) & 0xFFFFl) |
kvn@4001 409 (((long)(ADD_INIT+4*i+2) & 0xFFFFl) << 16) |
kvn@4001 410 (((long)(ADD_INIT+4*i+1) & 0xFFFFl) << 32) |
kvn@4001 411 (((long)(ADD_INIT+4*i+0) & 0xFFFFl) << 48));
kvn@4001 412 }
kvn@4001 413 for (int i=0; i<ARRLEN; i++) {
kvn@4001 414 a0[i] = -1;
kvn@4001 415 }
kvn@4001 416 test_unpack4_swap(a0, p4);
kvn@4001 417 for (int i=0; i<(ARRLEN&(-4)); i++) {
kvn@4001 418 errn += verify("test_unpack4_swap: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 419 }
kvn@4001 420
kvn@4001 421 }
kvn@4001 422
kvn@4001 423 if (errn > 0)
kvn@4001 424 return errn;
kvn@4001 425
kvn@4001 426 System.out.println("Time");
kvn@4001 427 long start, end;
kvn@4001 428
kvn@4001 429 start = System.currentTimeMillis();
kvn@4001 430 for (int i=0; i<ITERS; i++) {
kvn@4001 431 test_sum(a1);
kvn@4001 432 }
kvn@4001 433 end = System.currentTimeMillis();
kvn@4001 434 System.out.println("test_sum: " + (end - start));
kvn@4001 435
kvn@4001 436 start = System.currentTimeMillis();
kvn@4001 437 for (int i=0; i<ITERS; i++) {
kvn@4001 438 test_addc(a0, a1);
kvn@4001 439 }
kvn@4001 440 end = System.currentTimeMillis();
kvn@4001 441 System.out.println("test_addc: " + (end - start));
kvn@4001 442 start = System.currentTimeMillis();
kvn@4001 443 for (int i=0; i<ITERS; i++) {
kvn@4001 444 test_addv(a0, a1, (short)VALUE);
kvn@4001 445 }
kvn@4001 446 end = System.currentTimeMillis();
kvn@4001 447 System.out.println("test_addv: " + (end - start));
kvn@4001 448 start = System.currentTimeMillis();
kvn@4001 449 for (int i=0; i<ITERS; i++) {
kvn@4001 450 test_adda(a0, a1, a2);
kvn@4001 451 }
kvn@4001 452 end = System.currentTimeMillis();
kvn@4001 453 System.out.println("test_adda: " + (end - start));
kvn@4001 454
kvn@4001 455 start = System.currentTimeMillis();
kvn@4001 456 for (int i=0; i<ITERS; i++) {
kvn@4001 457 test_subc(a0, a1);
kvn@4001 458 }
kvn@4001 459 end = System.currentTimeMillis();
kvn@4001 460 System.out.println("test_subc: " + (end - start));
kvn@4001 461 start = System.currentTimeMillis();
kvn@4001 462 for (int i=0; i<ITERS; i++) {
kvn@4001 463 test_subv(a0, a1, (short)VALUE);
kvn@4001 464 }
kvn@4001 465 end = System.currentTimeMillis();
kvn@4001 466 System.out.println("test_subv: " + (end - start));
kvn@4001 467 start = System.currentTimeMillis();
kvn@4001 468 for (int i=0; i<ITERS; i++) {
kvn@4001 469 test_suba(a0, a1, a2);
kvn@4001 470 }
kvn@4001 471 end = System.currentTimeMillis();
kvn@4001 472 System.out.println("test_suba: " + (end - start));
kvn@4001 473
kvn@4001 474 start = System.currentTimeMillis();
kvn@4001 475 for (int i=0; i<ITERS; i++) {
kvn@4001 476 test_mulc(a0, a1);
kvn@4001 477 }
kvn@4001 478 end = System.currentTimeMillis();
kvn@4001 479 System.out.println("test_mulc: " + (end - start));
kvn@4001 480 start = System.currentTimeMillis();
kvn@4001 481 for (int i=0; i<ITERS; i++) {
kvn@4001 482 test_mulv(a0, a1, (short)VALUE);
kvn@4001 483 }
kvn@4001 484 end = System.currentTimeMillis();
kvn@4001 485 System.out.println("test_mulv: " + (end - start));
kvn@4001 486 start = System.currentTimeMillis();
kvn@4001 487 for (int i=0; i<ITERS; i++) {
kvn@4001 488 test_mula(a0, a1, a2);
kvn@4001 489 }
kvn@4001 490 end = System.currentTimeMillis();
kvn@4001 491 System.out.println("test_mula: " + (end - start));
kvn@4001 492
kvn@4001 493 start = System.currentTimeMillis();
kvn@4001 494 for (int i=0; i<ITERS; i++) {
kvn@4001 495 test_divc(a0, a1);
kvn@4001 496 }
kvn@4001 497 end = System.currentTimeMillis();
kvn@4001 498 System.out.println("test_divc: " + (end - start));
kvn@4001 499 start = System.currentTimeMillis();
kvn@4001 500 for (int i=0; i<ITERS; i++) {
kvn@4001 501 test_divv(a0, a1, (short)VALUE);
kvn@4001 502 }
kvn@4001 503 end = System.currentTimeMillis();
kvn@4001 504 System.out.println("test_divv: " + (end - start));
kvn@4001 505 start = System.currentTimeMillis();
kvn@4001 506 for (int i=0; i<ITERS; i++) {
kvn@4001 507 test_diva(a0, a1, a2);
kvn@4001 508 }
kvn@4001 509 end = System.currentTimeMillis();
kvn@4001 510 System.out.println("test_diva: " + (end - start));
kvn@4001 511
kvn@4001 512 start = System.currentTimeMillis();
kvn@4001 513 for (int i=0; i<ITERS; i++) {
kvn@4001 514 test_mulc_n(a0, a1);
kvn@4001 515 }
kvn@4001 516 end = System.currentTimeMillis();
kvn@4001 517 System.out.println("test_mulc_n: " + (end - start));
kvn@4001 518 start = System.currentTimeMillis();
kvn@4001 519 for (int i=0; i<ITERS; i++) {
kvn@4001 520 test_mulv(a0, a1, (short)-VALUE);
kvn@4001 521 }
kvn@4001 522 end = System.currentTimeMillis();
kvn@4001 523 System.out.println("test_mulv_n: " + (end - start));
kvn@4001 524 start = System.currentTimeMillis();
kvn@4001 525 for (int i=0; i<ITERS; i++) {
kvn@4001 526 test_mula(a0, a1, a3);
kvn@4001 527 }
kvn@4001 528 end = System.currentTimeMillis();
kvn@4001 529 System.out.println("test_mula_n: " + (end - start));
kvn@4001 530
kvn@4001 531 start = System.currentTimeMillis();
kvn@4001 532 for (int i=0; i<ITERS; i++) {
kvn@4001 533 test_divc_n(a0, a1);
kvn@4001 534 }
kvn@4001 535 end = System.currentTimeMillis();
kvn@4001 536 System.out.println("test_divc_n: " + (end - start));
kvn@4001 537 start = System.currentTimeMillis();
kvn@4001 538 for (int i=0; i<ITERS; i++) {
kvn@4001 539 test_divv(a0, a1, (short)-VALUE);
kvn@4001 540 }
kvn@4001 541 end = System.currentTimeMillis();
kvn@4001 542 System.out.println("test_divv_n: " + (end - start));
kvn@4001 543 start = System.currentTimeMillis();
kvn@4001 544 for (int i=0; i<ITERS; i++) {
kvn@4001 545 test_diva(a0, a1, a3);
kvn@4001 546 }
kvn@4001 547 end = System.currentTimeMillis();
kvn@4001 548 System.out.println("test_diva_n: " + (end - start));
kvn@4001 549
kvn@4001 550 start = System.currentTimeMillis();
kvn@4001 551 for (int i=0; i<ITERS; i++) {
kvn@4001 552 test_andc(a0, a1);
kvn@4001 553 }
kvn@4001 554 end = System.currentTimeMillis();
kvn@4001 555 System.out.println("test_andc: " + (end - start));
kvn@4001 556 start = System.currentTimeMillis();
kvn@4001 557 for (int i=0; i<ITERS; i++) {
kvn@4001 558 test_andv(a0, a1, (short)BIT_MASK);
kvn@4001 559 }
kvn@4001 560 end = System.currentTimeMillis();
kvn@4001 561 System.out.println("test_andv: " + (end - start));
kvn@4001 562 start = System.currentTimeMillis();
kvn@4001 563 for (int i=0; i<ITERS; i++) {
kvn@4001 564 test_anda(a0, a1, a4);
kvn@4001 565 }
kvn@4001 566 end = System.currentTimeMillis();
kvn@4001 567 System.out.println("test_anda: " + (end - start));
kvn@4001 568
kvn@4001 569 start = System.currentTimeMillis();
kvn@4001 570 for (int i=0; i<ITERS; i++) {
kvn@4001 571 test_orc(a0, a1);
kvn@4001 572 }
kvn@4001 573 end = System.currentTimeMillis();
kvn@4001 574 System.out.println("test_orc: " + (end - start));
kvn@4001 575 start = System.currentTimeMillis();
kvn@4001 576 for (int i=0; i<ITERS; i++) {
kvn@4001 577 test_orv(a0, a1, (short)BIT_MASK);
kvn@4001 578 }
kvn@4001 579 end = System.currentTimeMillis();
kvn@4001 580 System.out.println("test_orv: " + (end - start));
kvn@4001 581 start = System.currentTimeMillis();
kvn@4001 582 for (int i=0; i<ITERS; i++) {
kvn@4001 583 test_ora(a0, a1, a4);
kvn@4001 584 }
kvn@4001 585 end = System.currentTimeMillis();
kvn@4001 586 System.out.println("test_ora: " + (end - start));
kvn@4001 587
kvn@4001 588 start = System.currentTimeMillis();
kvn@4001 589 for (int i=0; i<ITERS; i++) {
kvn@4001 590 test_xorc(a0, a1);
kvn@4001 591 }
kvn@4001 592 end = System.currentTimeMillis();
kvn@4001 593 System.out.println("test_xorc: " + (end - start));
kvn@4001 594 start = System.currentTimeMillis();
kvn@4001 595 for (int i=0; i<ITERS; i++) {
kvn@4001 596 test_xorv(a0, a1, (short)BIT_MASK);
kvn@4001 597 }
kvn@4001 598 end = System.currentTimeMillis();
kvn@4001 599 System.out.println("test_xorv: " + (end - start));
kvn@4001 600 start = System.currentTimeMillis();
kvn@4001 601 for (int i=0; i<ITERS; i++) {
kvn@4001 602 test_xora(a0, a1, a4);
kvn@4001 603 }
kvn@4001 604 end = System.currentTimeMillis();
kvn@4001 605 System.out.println("test_xora: " + (end - start));
kvn@4001 606
kvn@4001 607 start = System.currentTimeMillis();
kvn@4001 608 for (int i=0; i<ITERS; i++) {
kvn@4001 609 test_sllc(a0, a1);
kvn@4001 610 }
kvn@4001 611 end = System.currentTimeMillis();
kvn@4001 612 System.out.println("test_sllc: " + (end - start));
kvn@4001 613 start = System.currentTimeMillis();
kvn@4001 614 for (int i=0; i<ITERS; i++) {
kvn@4001 615 test_sllv(a0, a1, VALUE);
kvn@4001 616 }
kvn@4001 617 end = System.currentTimeMillis();
kvn@4001 618 System.out.println("test_sllv: " + (end - start));
kvn@4001 619
kvn@4001 620 start = System.currentTimeMillis();
kvn@4001 621 for (int i=0; i<ITERS; i++) {
kvn@4001 622 test_srlc(a0, a1);
kvn@4001 623 }
kvn@4001 624 end = System.currentTimeMillis();
kvn@4001 625 System.out.println("test_srlc: " + (end - start));
kvn@4001 626 start = System.currentTimeMillis();
kvn@4001 627 for (int i=0; i<ITERS; i++) {
kvn@4001 628 test_srlv(a0, a1, VALUE);
kvn@4001 629 }
kvn@4001 630 end = System.currentTimeMillis();
kvn@4001 631 System.out.println("test_srlv: " + (end - start));
kvn@4001 632
kvn@4001 633 start = System.currentTimeMillis();
kvn@4001 634 for (int i=0; i<ITERS; i++) {
kvn@4001 635 test_srac(a0, a1);
kvn@4001 636 }
kvn@4001 637 end = System.currentTimeMillis();
kvn@4001 638 System.out.println("test_srac: " + (end - start));
kvn@4001 639 start = System.currentTimeMillis();
kvn@4001 640 for (int i=0; i<ITERS; i++) {
kvn@4001 641 test_srav(a0, a1, VALUE);
kvn@4001 642 }
kvn@4001 643 end = System.currentTimeMillis();
kvn@4001 644 System.out.println("test_srav: " + (end - start));
kvn@4001 645
kvn@4001 646 start = System.currentTimeMillis();
kvn@4001 647 for (int i=0; i<ITERS; i++) {
kvn@4001 648 test_sllc_n(a0, a1);
kvn@4001 649 }
kvn@4001 650 end = System.currentTimeMillis();
kvn@4001 651 System.out.println("test_sllc_n: " + (end - start));
kvn@4001 652 start = System.currentTimeMillis();
kvn@4001 653 for (int i=0; i<ITERS; i++) {
kvn@4001 654 test_sllv(a0, a1, -VALUE);
kvn@4001 655 }
kvn@4001 656 end = System.currentTimeMillis();
kvn@4001 657 System.out.println("test_sllv_n: " + (end - start));
kvn@4001 658
kvn@4001 659 start = System.currentTimeMillis();
kvn@4001 660 for (int i=0; i<ITERS; i++) {
kvn@4001 661 test_srlc_n(a0, a1);
kvn@4001 662 }
kvn@4001 663 end = System.currentTimeMillis();
kvn@4001 664 System.out.println("test_srlc_n: " + (end - start));
kvn@4001 665 start = System.currentTimeMillis();
kvn@4001 666 for (int i=0; i<ITERS; i++) {
kvn@4001 667 test_srlv(a0, a1, -VALUE);
kvn@4001 668 }
kvn@4001 669 end = System.currentTimeMillis();
kvn@4001 670 System.out.println("test_srlv_n: " + (end - start));
kvn@4001 671
kvn@4001 672 start = System.currentTimeMillis();
kvn@4001 673 for (int i=0; i<ITERS; i++) {
kvn@4001 674 test_srac_n(a0, a1);
kvn@4001 675 }
kvn@4001 676 end = System.currentTimeMillis();
kvn@4001 677 System.out.println("test_srac_n: " + (end - start));
kvn@4001 678 start = System.currentTimeMillis();
kvn@4001 679 for (int i=0; i<ITERS; i++) {
kvn@4001 680 test_srav(a0, a1, -VALUE);
kvn@4001 681 }
kvn@4001 682 end = System.currentTimeMillis();
kvn@4001 683 System.out.println("test_srav_n: " + (end - start));
kvn@4001 684
kvn@4001 685 start = System.currentTimeMillis();
kvn@4001 686 for (int i=0; i<ITERS; i++) {
kvn@4001 687 test_sllc_o(a0, a1);
kvn@4001 688 }
kvn@4001 689 end = System.currentTimeMillis();
kvn@4001 690 System.out.println("test_sllc_o: " + (end - start));
kvn@4001 691 start = System.currentTimeMillis();
kvn@4001 692 for (int i=0; i<ITERS; i++) {
kvn@4001 693 test_sllv(a0, a1, SHIFT);
kvn@4001 694 }
kvn@4001 695 end = System.currentTimeMillis();
kvn@4001 696 System.out.println("test_sllv_o: " + (end - start));
kvn@4001 697
kvn@4001 698 start = System.currentTimeMillis();
kvn@4001 699 for (int i=0; i<ITERS; i++) {
kvn@4001 700 test_srlc_o(a0, a1);
kvn@4001 701 }
kvn@4001 702 end = System.currentTimeMillis();
kvn@4001 703 System.out.println("test_srlc_o: " + (end - start));
kvn@4001 704 start = System.currentTimeMillis();
kvn@4001 705 for (int i=0; i<ITERS; i++) {
kvn@4001 706 test_srlv(a0, a1, SHIFT);
kvn@4001 707 }
kvn@4001 708 end = System.currentTimeMillis();
kvn@4001 709 System.out.println("test_srlv_o: " + (end - start));
kvn@4001 710
kvn@4001 711 start = System.currentTimeMillis();
kvn@4001 712 for (int i=0; i<ITERS; i++) {
kvn@4001 713 test_srac_o(a0, a1);
kvn@4001 714 }
kvn@4001 715 end = System.currentTimeMillis();
kvn@4001 716 System.out.println("test_srac_o: " + (end - start));
kvn@4001 717 start = System.currentTimeMillis();
kvn@4001 718 for (int i=0; i<ITERS; i++) {
kvn@4001 719 test_srav(a0, a1, SHIFT);
kvn@4001 720 }
kvn@4001 721 end = System.currentTimeMillis();
kvn@4001 722 System.out.println("test_srav_o: " + (end - start));
kvn@4001 723
kvn@4001 724 start = System.currentTimeMillis();
kvn@4001 725 for (int i=0; i<ITERS; i++) {
kvn@4001 726 test_sllc_on(a0, a1);
kvn@4001 727 }
kvn@4001 728 end = System.currentTimeMillis();
kvn@4001 729 System.out.println("test_sllc_on: " + (end - start));
kvn@4001 730 start = System.currentTimeMillis();
kvn@4001 731 for (int i=0; i<ITERS; i++) {
kvn@4001 732 test_sllv(a0, a1, -SHIFT);
kvn@4001 733 }
kvn@4001 734 end = System.currentTimeMillis();
kvn@4001 735 System.out.println("test_sllv_on: " + (end - start));
kvn@4001 736
kvn@4001 737 start = System.currentTimeMillis();
kvn@4001 738 for (int i=0; i<ITERS; i++) {
kvn@4001 739 test_srlc_on(a0, a1);
kvn@4001 740 }
kvn@4001 741 end = System.currentTimeMillis();
kvn@4001 742 System.out.println("test_srlc_on: " + (end - start));
kvn@4001 743 start = System.currentTimeMillis();
kvn@4001 744 for (int i=0; i<ITERS; i++) {
kvn@4001 745 test_srlv(a0, a1, -SHIFT);
kvn@4001 746 }
kvn@4001 747 end = System.currentTimeMillis();
kvn@4001 748 System.out.println("test_srlv_on: " + (end - start));
kvn@4001 749
kvn@4001 750 start = System.currentTimeMillis();
kvn@4001 751 for (int i=0; i<ITERS; i++) {
kvn@4001 752 test_srac_on(a0, a1);
kvn@4001 753 }
kvn@4001 754 end = System.currentTimeMillis();
kvn@4001 755 System.out.println("test_srac_on: " + (end - start));
kvn@4001 756 start = System.currentTimeMillis();
kvn@4001 757 for (int i=0; i<ITERS; i++) {
kvn@4001 758 test_srav(a0, a1, -SHIFT);
kvn@4001 759 }
kvn@4001 760 end = System.currentTimeMillis();
kvn@4001 761 System.out.println("test_srav_on: " + (end - start));
kvn@4001 762
kvn@4001 763 start = System.currentTimeMillis();
kvn@4001 764 for (int i=0; i<ITERS; i++) {
kvn@4001 765 test_pack2(p2, a1);
kvn@4001 766 }
kvn@4001 767 end = System.currentTimeMillis();
kvn@4001 768 System.out.println("test_pack2: " + (end - start));
kvn@4001 769 start = System.currentTimeMillis();
kvn@4001 770 for (int i=0; i<ITERS; i++) {
kvn@4001 771 test_unpack2(a0, p2);
kvn@4001 772 }
kvn@4001 773 end = System.currentTimeMillis();
kvn@4001 774 System.out.println("test_unpack2: " + (end - start));
kvn@4001 775 start = System.currentTimeMillis();
kvn@4001 776 for (int i=0; i<ITERS; i++) {
kvn@4001 777 test_pack2_swap(p2, a1);
kvn@4001 778 }
kvn@4001 779 end = System.currentTimeMillis();
kvn@4001 780 System.out.println("test_pack2_swap: " + (end - start));
kvn@4001 781 start = System.currentTimeMillis();
kvn@4001 782 for (int i=0; i<ITERS; i++) {
kvn@4001 783 test_unpack2_swap(a0, p2);
kvn@4001 784 }
kvn@4001 785 end = System.currentTimeMillis();
kvn@4001 786 System.out.println("test_unpack2_swap: " + (end - start));
kvn@4001 787
kvn@4001 788 start = System.currentTimeMillis();
kvn@4001 789 for (int i=0; i<ITERS; i++) {
kvn@4001 790 test_pack4(p4, a1);
kvn@4001 791 }
kvn@4001 792 end = System.currentTimeMillis();
kvn@4001 793 System.out.println("test_pack4: " + (end - start));
kvn@4001 794 start = System.currentTimeMillis();
kvn@4001 795 for (int i=0; i<ITERS; i++) {
kvn@4001 796 test_unpack4(a0, p4);
kvn@4001 797 }
kvn@4001 798 end = System.currentTimeMillis();
kvn@4001 799 System.out.println("test_unpack4: " + (end - start));
kvn@4001 800 start = System.currentTimeMillis();
kvn@4001 801 for (int i=0; i<ITERS; i++) {
kvn@4001 802 test_pack4_swap(p4, a1);
kvn@4001 803 }
kvn@4001 804 end = System.currentTimeMillis();
kvn@4001 805 System.out.println("test_pack4_swap: " + (end - start));
kvn@4001 806 start = System.currentTimeMillis();
kvn@4001 807 for (int i=0; i<ITERS; i++) {
kvn@4001 808 test_unpack4_swap(a0, p4);
kvn@4001 809 }
kvn@4001 810 end = System.currentTimeMillis();
kvn@4001 811 System.out.println("test_unpack4_swap: " + (end - start));
kvn@4001 812
kvn@4001 813 return errn;
kvn@4001 814 }
kvn@4001 815
kvn@4001 816 static int test_sum(short[] a1) {
kvn@4001 817 int sum = 0;
kvn@4001 818 for (int i = 0; i < a1.length; i+=1) {
kvn@4001 819 sum += a1[i];
kvn@4001 820 }
kvn@4001 821 return sum;
kvn@4001 822 }
kvn@4001 823
kvn@4001 824 static void test_addc(short[] a0, short[] a1) {
kvn@4001 825 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 826 a0[i] = (short)(a1[i]+VALUE);
kvn@4001 827 }
kvn@4001 828 }
kvn@4001 829 static void test_addv(short[] a0, short[] a1, short b) {
kvn@4001 830 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 831 a0[i] = (short)(a1[i]+b);
kvn@4001 832 }
kvn@4001 833 }
kvn@4001 834 static void test_adda(short[] a0, short[] a1, short[] a2) {
kvn@4001 835 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 836 a0[i] = (short)(a1[i]+a2[i]);
kvn@4001 837 }
kvn@4001 838 }
kvn@4001 839
kvn@4001 840 static void test_subc(short[] a0, short[] a1) {
kvn@4001 841 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 842 a0[i] = (short)(a1[i]-VALUE);
kvn@4001 843 }
kvn@4001 844 }
kvn@4001 845 static void test_subv(short[] a0, short[] a1, short b) {
kvn@4001 846 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 847 a0[i] = (short)(a1[i]-b);
kvn@4001 848 }
kvn@4001 849 }
kvn@4001 850 static void test_suba(short[] a0, short[] a1, short[] a2) {
kvn@4001 851 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 852 a0[i] = (short)(a1[i]-a2[i]);
kvn@4001 853 }
kvn@4001 854 }
kvn@4001 855
kvn@4001 856 static void test_mulc(short[] a0, short[] a1) {
kvn@4001 857 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 858 a0[i] = (short)(a1[i]*VALUE);
kvn@4001 859 }
kvn@4001 860 }
kvn@4001 861 static void test_mulc_n(short[] a0, short[] a1) {
kvn@4001 862 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 863 a0[i] = (short)(a1[i]*(-VALUE));
kvn@4001 864 }
kvn@4001 865 }
kvn@4001 866 static void test_mulv(short[] a0, short[] a1, short b) {
kvn@4001 867 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 868 a0[i] = (short)(a1[i]*b);
kvn@4001 869 }
kvn@4001 870 }
kvn@4001 871 static void test_mula(short[] a0, short[] a1, short[] a2) {
kvn@4001 872 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 873 a0[i] = (short)(a1[i]*a2[i]);
kvn@4001 874 }
kvn@4001 875 }
kvn@4001 876
kvn@4001 877 static void test_divc(short[] a0, short[] a1) {
kvn@4001 878 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 879 a0[i] = (short)(a1[i]/VALUE);
kvn@4001 880 }
kvn@4001 881 }
kvn@4001 882 static void test_divc_n(short[] a0, short[] a1) {
kvn@4001 883 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 884 a0[i] = (short)(a1[i]/(-VALUE));
kvn@4001 885 }
kvn@4001 886 }
kvn@4001 887 static void test_divv(short[] a0, short[] a1, short b) {
kvn@4001 888 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 889 a0[i] = (short)(a1[i]/b);
kvn@4001 890 }
kvn@4001 891 }
kvn@4001 892 static void test_diva(short[] a0, short[] a1, short[] a2) {
kvn@4001 893 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 894 a0[i] = (short)(a1[i]/a2[i]);
kvn@4001 895 }
kvn@4001 896 }
kvn@4001 897
kvn@4001 898 static void test_andc(short[] a0, short[] a1) {
kvn@4001 899 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 900 a0[i] = (short)(a1[i]&BIT_MASK);
kvn@4001 901 }
kvn@4001 902 }
kvn@4001 903 static void test_andv(short[] a0, short[] a1, short b) {
kvn@4001 904 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 905 a0[i] = (short)(a1[i]&b);
kvn@4001 906 }
kvn@4001 907 }
kvn@4001 908 static void test_anda(short[] a0, short[] a1, short[] a2) {
kvn@4001 909 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 910 a0[i] = (short)(a1[i]&a2[i]);
kvn@4001 911 }
kvn@4001 912 }
kvn@4001 913
kvn@4001 914 static void test_orc(short[] a0, short[] a1) {
kvn@4001 915 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 916 a0[i] = (short)(a1[i]|BIT_MASK);
kvn@4001 917 }
kvn@4001 918 }
kvn@4001 919 static void test_orv(short[] a0, short[] a1, short b) {
kvn@4001 920 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 921 a0[i] = (short)(a1[i]|b);
kvn@4001 922 }
kvn@4001 923 }
kvn@4001 924 static void test_ora(short[] a0, short[] a1, short[] a2) {
kvn@4001 925 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 926 a0[i] = (short)(a1[i]|a2[i]);
kvn@4001 927 }
kvn@4001 928 }
kvn@4001 929
kvn@4001 930 static void test_xorc(short[] a0, short[] a1) {
kvn@4001 931 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 932 a0[i] = (short)(a1[i]^BIT_MASK);
kvn@4001 933 }
kvn@4001 934 }
kvn@4001 935 static void test_xorv(short[] a0, short[] a1, short b) {
kvn@4001 936 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 937 a0[i] = (short)(a1[i]^b);
kvn@4001 938 }
kvn@4001 939 }
kvn@4001 940 static void test_xora(short[] a0, short[] a1, short[] a2) {
kvn@4001 941 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 942 a0[i] = (short)(a1[i]^a2[i]);
kvn@4001 943 }
kvn@4001 944 }
kvn@4001 945
kvn@4001 946 static void test_sllc(short[] a0, short[] a1) {
kvn@4001 947 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 948 a0[i] = (short)(a1[i]<<VALUE);
kvn@4001 949 }
kvn@4001 950 }
kvn@4001 951 static void test_sllc_n(short[] a0, short[] a1) {
kvn@4001 952 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 953 a0[i] = (short)(a1[i]<<(-VALUE));
kvn@4001 954 }
kvn@4001 955 }
kvn@4001 956 static void test_sllc_o(short[] a0, short[] a1) {
kvn@4001 957 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 958 a0[i] = (short)(a1[i]<<SHIFT);
kvn@4001 959 }
kvn@4001 960 }
kvn@4001 961 static void test_sllc_on(short[] a0, short[] a1) {
kvn@4001 962 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 963 a0[i] = (short)(a1[i]<<(-SHIFT));
kvn@4001 964 }
kvn@4001 965 }
kvn@4001 966 static void test_sllv(short[] a0, short[] a1, int b) {
kvn@4001 967 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 968 a0[i] = (short)(a1[i]<<b);
kvn@4001 969 }
kvn@4001 970 }
kvn@4001 971
kvn@4001 972 static void test_srlc(short[] a0, short[] a1) {
kvn@4001 973 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 974 a0[i] = (short)(a1[i]>>>VALUE);
kvn@4001 975 }
kvn@4001 976 }
kvn@4001 977 static void test_srlc_n(short[] a0, short[] a1) {
kvn@4001 978 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 979 a0[i] = (short)(a1[i]>>>(-VALUE));
kvn@4001 980 }
kvn@4001 981 }
kvn@4001 982 static void test_srlc_o(short[] a0, short[] a1) {
kvn@4001 983 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 984 a0[i] = (short)(a1[i]>>>SHIFT);
kvn@4001 985 }
kvn@4001 986 }
kvn@4001 987 static void test_srlc_on(short[] a0, short[] a1) {
kvn@4001 988 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 989 a0[i] = (short)(a1[i]>>>(-SHIFT));
kvn@4001 990 }
kvn@4001 991 }
kvn@4001 992 static void test_srlv(short[] a0, short[] a1, int b) {
kvn@4001 993 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 994 a0[i] = (short)(a1[i]>>>b);
kvn@4001 995 }
kvn@4001 996 }
kvn@4001 997
kvn@4001 998 static void test_srac(short[] a0, short[] a1) {
kvn@4001 999 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1000 a0[i] = (short)(a1[i]>>VALUE);
kvn@4001 1001 }
kvn@4001 1002 }
kvn@4001 1003 static void test_srac_n(short[] a0, short[] a1) {
kvn@4001 1004 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1005 a0[i] = (short)(a1[i]>>(-VALUE));
kvn@4001 1006 }
kvn@4001 1007 }
kvn@4001 1008 static void test_srac_o(short[] a0, short[] a1) {
kvn@4001 1009 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1010 a0[i] = (short)(a1[i]>>SHIFT);
kvn@4001 1011 }
kvn@4001 1012 }
kvn@4001 1013 static void test_srac_on(short[] a0, short[] a1) {
kvn@4001 1014 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1015 a0[i] = (short)(a1[i]>>(-SHIFT));
kvn@4001 1016 }
kvn@4001 1017 }
kvn@4001 1018 static void test_srav(short[] a0, short[] a1, int b) {
kvn@4001 1019 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1020 a0[i] = (short)(a1[i]>>b);
kvn@4001 1021 }
kvn@4001 1022 }
kvn@4001 1023
kvn@4001 1024 static void test_pack2(int[] p2, short[] a1) {
kvn@4001 1025 if (p2.length*2 > a1.length) return;
kvn@4001 1026 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1027 int l0 = (int)a1[i*2+0];
kvn@4001 1028 int l1 = (int)a1[i*2+1];
kvn@4001 1029 p2[i] = (l1 << 16) | (l0 & 0xFFFF);
kvn@4001 1030 }
kvn@4001 1031 }
kvn@4001 1032 static void test_unpack2(short[] a0, int[] p2) {
kvn@4001 1033 if (p2.length*2 > a0.length) return;
kvn@4001 1034 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1035 int l = p2[i];
kvn@4001 1036 a0[i*2+0] = (short)(l & 0xFFFF);
kvn@4001 1037 a0[i*2+1] = (short)(l >> 16);
kvn@4001 1038 }
kvn@4001 1039 }
kvn@4001 1040 static void test_pack2_swap(int[] p2, short[] a1) {
kvn@4001 1041 if (p2.length*2 > a1.length) return;
kvn@4001 1042 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1043 int l0 = (int)a1[i*2+0];
kvn@4001 1044 int l1 = (int)a1[i*2+1];
kvn@4001 1045 p2[i] = (l0 << 16) | (l1 & 0xFFFF);
kvn@4001 1046 }
kvn@4001 1047 }
kvn@4001 1048 static void test_unpack2_swap(short[] a0, int[] p2) {
kvn@4001 1049 if (p2.length*2 > a0.length) return;
kvn@4001 1050 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1051 int l = p2[i];
kvn@4001 1052 a0[i*2+0] = (short)(l >> 16);
kvn@4001 1053 a0[i*2+1] = (short)(l & 0xFFFF);
kvn@4001 1054 }
kvn@4001 1055 }
kvn@4001 1056
kvn@4001 1057 static void test_pack4(long[] p4, short[] a1) {
kvn@4001 1058 if (p4.length*4 > a1.length) return;
kvn@4001 1059 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1060 long l0 = (long)a1[i*4+0];
kvn@4001 1061 long l1 = (long)a1[i*4+1];
kvn@4001 1062 long l2 = (long)a1[i*4+2];
kvn@4001 1063 long l3 = (long)a1[i*4+3];
kvn@4001 1064 p4[i] = (l0 & 0xFFFFl) |
kvn@4001 1065 ((l1 & 0xFFFFl) << 16) |
kvn@4001 1066 ((l2 & 0xFFFFl) << 32) |
kvn@4001 1067 ((l3 & 0xFFFFl) << 48);
kvn@4001 1068 }
kvn@4001 1069 }
kvn@4001 1070 static void test_unpack4(short[] a0, long[] p4) {
kvn@4001 1071 if (p4.length*4 > a0.length) return;
kvn@4001 1072 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1073 long l = p4[i];
kvn@4001 1074 a0[i*4+0] = (short)(l & 0xFFFFl);
kvn@4001 1075 a0[i*4+1] = (short)(l >> 16);
kvn@4001 1076 a0[i*4+2] = (short)(l >> 32);
kvn@4001 1077 a0[i*4+3] = (short)(l >> 48);
kvn@4001 1078 }
kvn@4001 1079 }
kvn@4001 1080 static void test_pack4_swap(long[] p4, short[] a1) {
kvn@4001 1081 if (p4.length*4 > a1.length) return;
kvn@4001 1082 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1083 long l0 = (long)a1[i*4+0];
kvn@4001 1084 long l1 = (long)a1[i*4+1];
kvn@4001 1085 long l2 = (long)a1[i*4+2];
kvn@4001 1086 long l3 = (long)a1[i*4+3];
kvn@4001 1087 p4[i] = (l3 & 0xFFFFl) |
kvn@4001 1088 ((l2 & 0xFFFFl) << 16) |
kvn@4001 1089 ((l1 & 0xFFFFl) << 32) |
kvn@4001 1090 ((l0 & 0xFFFFl) << 48);
kvn@4001 1091 }
kvn@4001 1092 }
kvn@4001 1093 static void test_unpack4_swap(short[] a0, long[] p4) {
kvn@4001 1094 if (p4.length*4 > a0.length) return;
kvn@4001 1095 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1096 long l = p4[i];
kvn@4001 1097 a0[i*4+0] = (short)(l >> 48);
kvn@4001 1098 a0[i*4+1] = (short)(l >> 32);
kvn@4001 1099 a0[i*4+2] = (short)(l >> 16);
kvn@4001 1100 a0[i*4+3] = (short)(l & 0xFFFFl);
kvn@4001 1101 }
kvn@4001 1102 }
kvn@4001 1103
kvn@4001 1104 static int verify(String text, int i, short elem, short val) {
kvn@4001 1105 if (elem != val) {
kvn@4001 1106 System.err.println(text + "[" + i + "] = " + elem + " != " + val);
kvn@4001 1107 return 1;
kvn@4001 1108 }
kvn@4001 1109 return 0;
kvn@4001 1110 }
kvn@4001 1111
kvn@4001 1112 static int verify(String text, int i, int elem, int val) {
kvn@4001 1113 if (elem != val) {
kvn@4001 1114 System.err.println(text + "[" + i + "] = " + Integer.toHexString(elem) + " != " + Integer.toHexString(val));
kvn@4001 1115 return 1;
kvn@4001 1116 }
kvn@4001 1117 return 0;
kvn@4001 1118 }
kvn@4001 1119
kvn@4001 1120 static int verify(String text, int i, long elem, long val) {
kvn@4001 1121 if (elem != val) {
kvn@4001 1122 System.err.println(text + "[" + i + "] = " + Long.toHexString(elem) + " != " + Long.toHexString(val));
kvn@4001 1123 return 1;
kvn@4001 1124 }
kvn@4001 1125 return 0;
kvn@4001 1126 }
kvn@4001 1127 }

mercurial