test/compiler/6340864/TestShortVect.java

Tue, 23 Oct 2012 13:06:37 -0700

author
kvn
date
Tue, 23 Oct 2012 13:06:37 -0700
changeset 4204
b2c669fd8114
parent 4001
006050192a5a
child 6876
710a3c8b516e
permissions
-rw-r--r--

8001183: incorrect results of char vectors right shift operaiton
Summary: do vector right shift operation for small int types only after loads
Reviewed-by: jrose, dlong

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@4204 78
kvn@4001 79 test_mulc(a0, a1);
kvn@4001 80 test_mulv(a0, a1, (short)VALUE);
kvn@4001 81 test_mula(a0, a1, a2);
kvn@4001 82 test_divc(a0, a1);
kvn@4001 83 test_divv(a0, a1, (short)VALUE);
kvn@4001 84 test_diva(a0, a1, a2);
kvn@4001 85 test_mulc_n(a0, a1);
kvn@4001 86 test_mulv(a0, a1, (short)-VALUE);
kvn@4001 87 test_mula(a0, a1, a3);
kvn@4001 88 test_divc_n(a0, a1);
kvn@4001 89 test_divv(a0, a1, (short)-VALUE);
kvn@4001 90 test_diva(a0, a1, a3);
kvn@4204 91
kvn@4001 92 test_andc(a0, a1);
kvn@4001 93 test_andv(a0, a1, (short)BIT_MASK);
kvn@4001 94 test_anda(a0, a1, a4);
kvn@4001 95 test_orc(a0, a1);
kvn@4001 96 test_orv(a0, a1, (short)BIT_MASK);
kvn@4001 97 test_ora(a0, a1, a4);
kvn@4001 98 test_xorc(a0, a1);
kvn@4001 99 test_xorv(a0, a1, (short)BIT_MASK);
kvn@4001 100 test_xora(a0, a1, a4);
kvn@4204 101
kvn@4001 102 test_sllc(a0, a1);
kvn@4001 103 test_sllv(a0, a1, VALUE);
kvn@4001 104 test_srlc(a0, a1);
kvn@4001 105 test_srlv(a0, a1, VALUE);
kvn@4001 106 test_srac(a0, a1);
kvn@4001 107 test_srav(a0, a1, VALUE);
kvn@4204 108
kvn@4001 109 test_sllc_n(a0, a1);
kvn@4001 110 test_sllv(a0, a1, -VALUE);
kvn@4001 111 test_srlc_n(a0, a1);
kvn@4001 112 test_srlv(a0, a1, -VALUE);
kvn@4001 113 test_srac_n(a0, a1);
kvn@4001 114 test_srav(a0, a1, -VALUE);
kvn@4204 115
kvn@4001 116 test_sllc_o(a0, a1);
kvn@4001 117 test_sllv(a0, a1, SHIFT);
kvn@4001 118 test_srlc_o(a0, a1);
kvn@4001 119 test_srlv(a0, a1, SHIFT);
kvn@4001 120 test_srac_o(a0, a1);
kvn@4001 121 test_srav(a0, a1, SHIFT);
kvn@4204 122
kvn@4001 123 test_sllc_on(a0, a1);
kvn@4001 124 test_sllv(a0, a1, -SHIFT);
kvn@4001 125 test_srlc_on(a0, a1);
kvn@4001 126 test_srlv(a0, a1, -SHIFT);
kvn@4001 127 test_srac_on(a0, a1);
kvn@4001 128 test_srav(a0, a1, -SHIFT);
kvn@4204 129
kvn@4204 130 test_sllc_add(a0, a1);
kvn@4204 131 test_sllv_add(a0, a1, ADD_INIT);
kvn@4204 132 test_srlc_add(a0, a1);
kvn@4204 133 test_srlv_add(a0, a1, ADD_INIT);
kvn@4204 134 test_srac_add(a0, a1);
kvn@4204 135 test_srav_add(a0, a1, ADD_INIT);
kvn@4204 136
kvn@4204 137 test_sllc_and(a0, a1);
kvn@4204 138 test_sllv_and(a0, a1, BIT_MASK);
kvn@4204 139 test_srlc_and(a0, a1);
kvn@4204 140 test_srlv_and(a0, a1, BIT_MASK);
kvn@4204 141 test_srac_and(a0, a1);
kvn@4204 142 test_srav_and(a0, a1, BIT_MASK);
kvn@4204 143
kvn@4001 144 test_pack2(p2, a1);
kvn@4001 145 test_unpack2(a0, p2);
kvn@4001 146 test_pack2_swap(p2, a1);
kvn@4001 147 test_unpack2_swap(a0, p2);
kvn@4001 148 test_pack4(p4, a1);
kvn@4001 149 test_unpack4(a0, p4);
kvn@4001 150 test_pack4_swap(p4, a1);
kvn@4001 151 test_unpack4_swap(a0, p4);
kvn@4001 152 }
kvn@4001 153 // Test and verify results
kvn@4001 154 System.out.println("Verification");
kvn@4001 155 int errn = 0;
kvn@4001 156 {
kvn@4001 157 int sum = test_sum(a1);
kvn@4001 158 if (sum != gold_sum) {
kvn@4001 159 System.err.println("test_sum: " + sum + " != " + gold_sum);
kvn@4001 160 errn++;
kvn@4001 161 }
kvn@4001 162
kvn@4001 163 test_addc(a0, a1);
kvn@4001 164 for (int i=0; i<ARRLEN; i++) {
kvn@4001 165 errn += verify("test_addc: ", i, a0[i], (short)((short)(ADD_INIT+i)+VALUE));
kvn@4001 166 }
kvn@4001 167 test_addv(a0, a1, (short)VALUE);
kvn@4001 168 for (int i=0; i<ARRLEN; i++) {
kvn@4001 169 errn += verify("test_addv: ", i, a0[i], (short)((short)(ADD_INIT+i)+VALUE));
kvn@4001 170 }
kvn@4001 171 test_adda(a0, a1, a2);
kvn@4001 172 for (int i=0; i<ARRLEN; i++) {
kvn@4001 173 errn += verify("test_adda: ", i, a0[i], (short)((short)(ADD_INIT+i)+VALUE));
kvn@4001 174 }
kvn@4001 175
kvn@4001 176 test_subc(a0, a1);
kvn@4001 177 for (int i=0; i<ARRLEN; i++) {
kvn@4001 178 errn += verify("test_subc: ", i, a0[i], (short)((short)(ADD_INIT+i)-VALUE));
kvn@4001 179 }
kvn@4001 180 test_subv(a0, a1, (short)VALUE);
kvn@4001 181 for (int i=0; i<ARRLEN; i++) {
kvn@4001 182 errn += verify("test_subv: ", i, a0[i], (short)((short)(ADD_INIT+i)-VALUE));
kvn@4001 183 }
kvn@4001 184 test_suba(a0, a1, a2);
kvn@4001 185 for (int i=0; i<ARRLEN; i++) {
kvn@4001 186 errn += verify("test_suba: ", i, a0[i], (short)((short)(ADD_INIT+i)-VALUE));
kvn@4001 187 }
kvn@4001 188
kvn@4001 189 test_mulc(a0, a1);
kvn@4001 190 for (int i=0; i<ARRLEN; i++) {
kvn@4001 191 errn += verify("test_mulc: ", i, a0[i], (short)((short)(ADD_INIT+i)*VALUE));
kvn@4001 192 }
kvn@4001 193 test_mulv(a0, a1, (short)VALUE);
kvn@4001 194 for (int i=0; i<ARRLEN; i++) {
kvn@4001 195 errn += verify("test_mulv: ", i, a0[i], (short)((short)(ADD_INIT+i)*VALUE));
kvn@4001 196 }
kvn@4001 197 test_mula(a0, a1, a2);
kvn@4001 198 for (int i=0; i<ARRLEN; i++) {
kvn@4001 199 errn += verify("test_mula: ", i, a0[i], (short)((short)(ADD_INIT+i)*VALUE));
kvn@4001 200 }
kvn@4001 201
kvn@4001 202 test_divc(a0, a1);
kvn@4001 203 for (int i=0; i<ARRLEN; i++) {
kvn@4001 204 errn += verify("test_divc: ", i, a0[i], (short)((short)(ADD_INIT+i)/VALUE));
kvn@4001 205 }
kvn@4001 206 test_divv(a0, a1, (short)VALUE);
kvn@4001 207 for (int i=0; i<ARRLEN; i++) {
kvn@4001 208 errn += verify("test_divv: ", i, a0[i], (short)((short)(ADD_INIT+i)/VALUE));
kvn@4001 209 }
kvn@4001 210 test_diva(a0, a1, a2);
kvn@4001 211 for (int i=0; i<ARRLEN; i++) {
kvn@4001 212 errn += verify("test_diva: ", i, a0[i], (short)((short)(ADD_INIT+i)/VALUE));
kvn@4001 213 }
kvn@4001 214
kvn@4001 215 test_mulc_n(a0, a1);
kvn@4001 216 for (int i=0; i<ARRLEN; i++) {
kvn@4001 217 errn += verify("test_mulc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)*(-VALUE)));
kvn@4001 218 }
kvn@4001 219 test_mulv(a0, a1, (short)-VALUE);
kvn@4001 220 for (int i=0; i<ARRLEN; i++) {
kvn@4001 221 errn += verify("test_mulv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)*(-VALUE)));
kvn@4001 222 }
kvn@4001 223 test_mula(a0, a1, a3);
kvn@4001 224 for (int i=0; i<ARRLEN; i++) {
kvn@4001 225 errn += verify("test_mula_n: ", i, a0[i], (short)((short)(ADD_INIT+i)*(-VALUE)));
kvn@4001 226 }
kvn@4001 227
kvn@4001 228 test_divc_n(a0, a1);
kvn@4001 229 for (int i=0; i<ARRLEN; i++) {
kvn@4001 230 errn += verify("test_divc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)/(-VALUE)));
kvn@4001 231 }
kvn@4001 232 test_divv(a0, a1, (short)-VALUE);
kvn@4001 233 for (int i=0; i<ARRLEN; i++) {
kvn@4001 234 errn += verify("test_divv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)/(-VALUE)));
kvn@4001 235 }
kvn@4001 236 test_diva(a0, a1, a3);
kvn@4001 237 for (int i=0; i<ARRLEN; i++) {
kvn@4001 238 errn += verify("test_diva_n: ", i, a0[i], (short)((short)(ADD_INIT+i)/(-VALUE)));
kvn@4001 239 }
kvn@4001 240
kvn@4001 241 test_andc(a0, a1);
kvn@4001 242 for (int i=0; i<ARRLEN; i++) {
kvn@4001 243 errn += verify("test_andc: ", i, a0[i], (short)((short)(ADD_INIT+i)&BIT_MASK));
kvn@4001 244 }
kvn@4001 245 test_andv(a0, a1, (short)BIT_MASK);
kvn@4001 246 for (int i=0; i<ARRLEN; i++) {
kvn@4001 247 errn += verify("test_andv: ", i, a0[i], (short)((short)(ADD_INIT+i)&BIT_MASK));
kvn@4001 248 }
kvn@4001 249 test_anda(a0, a1, a4);
kvn@4001 250 for (int i=0; i<ARRLEN; i++) {
kvn@4001 251 errn += verify("test_anda: ", i, a0[i], (short)((short)(ADD_INIT+i)&BIT_MASK));
kvn@4001 252 }
kvn@4001 253
kvn@4001 254 test_orc(a0, a1);
kvn@4001 255 for (int i=0; i<ARRLEN; i++) {
kvn@4001 256 errn += verify("test_orc: ", i, a0[i], (short)((short)(ADD_INIT+i)|BIT_MASK));
kvn@4001 257 }
kvn@4001 258 test_orv(a0, a1, (short)BIT_MASK);
kvn@4001 259 for (int i=0; i<ARRLEN; i++) {
kvn@4001 260 errn += verify("test_orv: ", i, a0[i], (short)((short)(ADD_INIT+i)|BIT_MASK));
kvn@4001 261 }
kvn@4001 262 test_ora(a0, a1, a4);
kvn@4001 263 for (int i=0; i<ARRLEN; i++) {
kvn@4001 264 errn += verify("test_ora: ", i, a0[i], (short)((short)(ADD_INIT+i)|BIT_MASK));
kvn@4001 265 }
kvn@4001 266
kvn@4001 267 test_xorc(a0, a1);
kvn@4001 268 for (int i=0; i<ARRLEN; i++) {
kvn@4001 269 errn += verify("test_xorc: ", i, a0[i], (short)((short)(ADD_INIT+i)^BIT_MASK));
kvn@4001 270 }
kvn@4001 271 test_xorv(a0, a1, (short)BIT_MASK);
kvn@4001 272 for (int i=0; i<ARRLEN; i++) {
kvn@4001 273 errn += verify("test_xorv: ", i, a0[i], (short)((short)(ADD_INIT+i)^BIT_MASK));
kvn@4001 274 }
kvn@4001 275 test_xora(a0, a1, a4);
kvn@4001 276 for (int i=0; i<ARRLEN; i++) {
kvn@4001 277 errn += verify("test_xora: ", i, a0[i], (short)((short)(ADD_INIT+i)^BIT_MASK));
kvn@4001 278 }
kvn@4001 279
kvn@4001 280 test_sllc(a0, a1);
kvn@4001 281 for (int i=0; i<ARRLEN; i++) {
kvn@4001 282 errn += verify("test_sllc: ", i, a0[i], (short)((short)(ADD_INIT+i)<<VALUE));
kvn@4001 283 }
kvn@4001 284 test_sllv(a0, a1, VALUE);
kvn@4001 285 for (int i=0; i<ARRLEN; i++) {
kvn@4001 286 errn += verify("test_sllv: ", i, a0[i], (short)((short)(ADD_INIT+i)<<VALUE));
kvn@4001 287 }
kvn@4001 288
kvn@4001 289 test_srlc(a0, a1);
kvn@4001 290 for (int i=0; i<ARRLEN; i++) {
kvn@4001 291 errn += verify("test_srlc: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>VALUE));
kvn@4001 292 }
kvn@4001 293 test_srlv(a0, a1, VALUE);
kvn@4001 294 for (int i=0; i<ARRLEN; i++) {
kvn@4001 295 errn += verify("test_srlv: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>VALUE));
kvn@4001 296 }
kvn@4001 297
kvn@4001 298 test_srac(a0, a1);
kvn@4001 299 for (int i=0; i<ARRLEN; i++) {
kvn@4001 300 errn += verify("test_srac: ", i, a0[i], (short)((short)(ADD_INIT+i)>>VALUE));
kvn@4001 301 }
kvn@4001 302 test_srav(a0, a1, VALUE);
kvn@4001 303 for (int i=0; i<ARRLEN; i++) {
kvn@4001 304 errn += verify("test_srav: ", i, a0[i], (short)((short)(ADD_INIT+i)>>VALUE));
kvn@4001 305 }
kvn@4001 306
kvn@4001 307 test_sllc_n(a0, a1);
kvn@4001 308 for (int i=0; i<ARRLEN; i++) {
kvn@4001 309 errn += verify("test_sllc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-VALUE)));
kvn@4001 310 }
kvn@4001 311 test_sllv(a0, a1, -VALUE);
kvn@4001 312 for (int i=0; i<ARRLEN; i++) {
kvn@4001 313 errn += verify("test_sllv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-VALUE)));
kvn@4001 314 }
kvn@4001 315
kvn@4001 316 test_srlc_n(a0, a1);
kvn@4001 317 for (int i=0; i<ARRLEN; i++) {
kvn@4001 318 errn += verify("test_srlc_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-VALUE)));
kvn@4001 319 }
kvn@4001 320 test_srlv(a0, a1, -VALUE);
kvn@4001 321 for (int i=0; i<ARRLEN; i++) {
kvn@4001 322 errn += verify("test_srlv_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-VALUE)));
kvn@4001 323 }
kvn@4001 324
kvn@4001 325 test_srac_n(a0, a1);
kvn@4001 326 for (int i=0; i<ARRLEN; i++) {
kvn@4001 327 errn += verify("test_srac_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-VALUE)));
kvn@4001 328 }
kvn@4001 329 test_srav(a0, a1, -VALUE);
kvn@4001 330 for (int i=0; i<ARRLEN; i++) {
kvn@4001 331 errn += verify("test_srav_n: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-VALUE)));
kvn@4001 332 }
kvn@4001 333
kvn@4001 334 test_sllc_o(a0, a1);
kvn@4001 335 for (int i=0; i<ARRLEN; i++) {
kvn@4001 336 errn += verify("test_sllc_o: ", i, a0[i], (short)((short)(ADD_INIT+i)<<SHIFT));
kvn@4001 337 }
kvn@4001 338 test_sllv(a0, a1, SHIFT);
kvn@4001 339 for (int i=0; i<ARRLEN; i++) {
kvn@4001 340 errn += verify("test_sllv_o: ", i, a0[i], (short)((short)(ADD_INIT+i)<<SHIFT));
kvn@4001 341 }
kvn@4001 342
kvn@4001 343 test_srlc_o(a0, a1);
kvn@4001 344 for (int i=0; i<ARRLEN; i++) {
kvn@4001 345 errn += verify("test_srlc_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>SHIFT));
kvn@4001 346 }
kvn@4001 347 test_srlv(a0, a1, SHIFT);
kvn@4001 348 for (int i=0; i<ARRLEN; i++) {
kvn@4001 349 errn += verify("test_srlv_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>SHIFT));
kvn@4001 350 }
kvn@4001 351
kvn@4001 352 test_srac_o(a0, a1);
kvn@4001 353 for (int i=0; i<ARRLEN; i++) {
kvn@4001 354 errn += verify("test_srac_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>SHIFT));
kvn@4001 355 }
kvn@4001 356 test_srav(a0, a1, SHIFT);
kvn@4001 357 for (int i=0; i<ARRLEN; i++) {
kvn@4001 358 errn += verify("test_srav_o: ", i, a0[i], (short)((short)(ADD_INIT+i)>>SHIFT));
kvn@4001 359 }
kvn@4001 360
kvn@4001 361 test_sllc_on(a0, a1);
kvn@4001 362 for (int i=0; i<ARRLEN; i++) {
kvn@4001 363 errn += verify("test_sllc_on: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-SHIFT)));
kvn@4001 364 }
kvn@4001 365 test_sllv(a0, a1, -SHIFT);
kvn@4001 366 for (int i=0; i<ARRLEN; i++) {
kvn@4001 367 errn += verify("test_sllv_on: ", i, a0[i], (short)((short)(ADD_INIT+i)<<(-SHIFT)));
kvn@4001 368 }
kvn@4001 369
kvn@4001 370 test_srlc_on(a0, a1);
kvn@4001 371 for (int i=0; i<ARRLEN; i++) {
kvn@4001 372 errn += verify("test_srlc_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-SHIFT)));
kvn@4001 373 }
kvn@4001 374 test_srlv(a0, a1, -SHIFT);
kvn@4001 375 for (int i=0; i<ARRLEN; i++) {
kvn@4001 376 errn += verify("test_srlv_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>>(-SHIFT)));
kvn@4001 377 }
kvn@4001 378
kvn@4001 379 test_srac_on(a0, a1);
kvn@4001 380 for (int i=0; i<ARRLEN; i++) {
kvn@4001 381 errn += verify("test_srac_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-SHIFT)));
kvn@4001 382 }
kvn@4001 383 test_srav(a0, a1, -SHIFT);
kvn@4001 384 for (int i=0; i<ARRLEN; i++) {
kvn@4001 385 errn += verify("test_srav_on: ", i, a0[i], (short)((short)(ADD_INIT+i)>>(-SHIFT)));
kvn@4001 386 }
kvn@4001 387
kvn@4204 388 test_sllc_add(a0, a1);
kvn@4204 389 for (int i=0; i<ARRLEN; i++) {
kvn@4204 390 errn += verify("test_sllc_add: ", i, a0[i], (short)(((short)(ADD_INIT+i) + ADD_INIT)<<VALUE));
kvn@4204 391 }
kvn@4204 392 test_sllv_add(a0, a1, ADD_INIT);
kvn@4204 393 for (int i=0; i<ARRLEN; i++) {
kvn@4204 394 errn += verify("test_sllv_add: ", i, a0[i], (short)(((short)(ADD_INIT+i) + ADD_INIT)<<VALUE));
kvn@4204 395 }
kvn@4204 396
kvn@4204 397 test_srlc_add(a0, a1);
kvn@4204 398 for (int i=0; i<ARRLEN; i++) {
kvn@4204 399 errn += verify("test_srlc_add: ", i, a0[i], (short)(((short)(ADD_INIT+i) + ADD_INIT)>>>VALUE));
kvn@4204 400 }
kvn@4204 401 test_srlv_add(a0, a1, ADD_INIT);
kvn@4204 402 for (int i=0; i<ARRLEN; i++) {
kvn@4204 403 errn += verify("test_srlv_add: ", i, a0[i], (short)(((short)(ADD_INIT+i) + ADD_INIT)>>>VALUE));
kvn@4204 404 }
kvn@4204 405
kvn@4204 406 test_srac_add(a0, a1);
kvn@4204 407 for (int i=0; i<ARRLEN; i++) {
kvn@4204 408 errn += verify("test_srac_add: ", i, a0[i], (short)(((short)(ADD_INIT+i) + ADD_INIT)>>VALUE));
kvn@4204 409 }
kvn@4204 410 test_srav_add(a0, a1, ADD_INIT);
kvn@4204 411 for (int i=0; i<ARRLEN; i++) {
kvn@4204 412 errn += verify("test_srav_add: ", i, a0[i], (short)(((short)(ADD_INIT+i) + ADD_INIT)>>VALUE));
kvn@4204 413 }
kvn@4204 414
kvn@4204 415 test_sllc_and(a0, a1);
kvn@4204 416 for (int i=0; i<ARRLEN; i++) {
kvn@4204 417 errn += verify("test_sllc_and: ", i, a0[i], (short)(((short)(ADD_INIT+i) & BIT_MASK)<<VALUE));
kvn@4204 418 }
kvn@4204 419 test_sllv_and(a0, a1, BIT_MASK);
kvn@4204 420 for (int i=0; i<ARRLEN; i++) {
kvn@4204 421 errn += verify("test_sllv_and: ", i, a0[i], (short)(((short)(ADD_INIT+i) & BIT_MASK)<<VALUE));
kvn@4204 422 }
kvn@4204 423
kvn@4204 424 test_srlc_and(a0, a1);
kvn@4204 425 for (int i=0; i<ARRLEN; i++) {
kvn@4204 426 errn += verify("test_srlc_and: ", i, a0[i], (short)(((short)(ADD_INIT+i) & BIT_MASK)>>>VALUE));
kvn@4204 427 }
kvn@4204 428 test_srlv_and(a0, a1, BIT_MASK);
kvn@4204 429 for (int i=0; i<ARRLEN; i++) {
kvn@4204 430 errn += verify("test_srlv_and: ", i, a0[i], (short)(((short)(ADD_INIT+i) & BIT_MASK)>>>VALUE));
kvn@4204 431 }
kvn@4204 432
kvn@4204 433 test_srac_and(a0, a1);
kvn@4204 434 for (int i=0; i<ARRLEN; i++) {
kvn@4204 435 errn += verify("test_srac_and: ", i, a0[i], (short)(((short)(ADD_INIT+i) & BIT_MASK)>>VALUE));
kvn@4204 436 }
kvn@4204 437 test_srav_and(a0, a1, BIT_MASK);
kvn@4204 438 for (int i=0; i<ARRLEN; i++) {
kvn@4204 439 errn += verify("test_srav_and: ", i, a0[i], (short)(((short)(ADD_INIT+i) & BIT_MASK)>>VALUE));
kvn@4204 440 }
kvn@4204 441
kvn@4001 442 test_pack2(p2, a1);
kvn@4001 443 for (int i=0; i<ARRLEN/2; i++) {
kvn@4001 444 errn += verify("test_pack2: ", i, p2[i], ((int)(ADD_INIT+2*i) & 0xFFFF) | ((int)(ADD_INIT+2*i+1) << 16));
kvn@4001 445 }
kvn@4001 446 for (int i=0; i<ARRLEN; i++) {
kvn@4001 447 a0[i] = -1;
kvn@4001 448 }
kvn@4001 449 test_unpack2(a0, p2);
kvn@4001 450 for (int i=0; i<(ARRLEN&(-2)); i++) {
kvn@4001 451 errn += verify("test_unpack2: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 452 }
kvn@4001 453
kvn@4001 454 test_pack2_swap(p2, a1);
kvn@4001 455 for (int i=0; i<ARRLEN/2; i++) {
kvn@4001 456 errn += verify("test_pack2_swap: ", i, p2[i], ((int)(ADD_INIT+2*i+1) & 0xFFFF) | ((int)(ADD_INIT+2*i) << 16));
kvn@4001 457 }
kvn@4001 458 for (int i=0; i<ARRLEN; i++) {
kvn@4001 459 a0[i] = -1;
kvn@4001 460 }
kvn@4001 461 test_unpack2_swap(a0, p2);
kvn@4001 462 for (int i=0; i<(ARRLEN&(-2)); i++) {
kvn@4001 463 errn += verify("test_unpack2_swap: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 464 }
kvn@4001 465
kvn@4001 466 test_pack4(p4, a1);
kvn@4001 467 for (int i=0; i<ARRLEN/4; i++) {
kvn@4001 468 errn += verify("test_pack4: ", i, p4[i], ((long)(ADD_INIT+4*i+0) & 0xFFFFl) |
kvn@4001 469 (((long)(ADD_INIT+4*i+1) & 0xFFFFl) << 16) |
kvn@4001 470 (((long)(ADD_INIT+4*i+2) & 0xFFFFl) << 32) |
kvn@4001 471 (((long)(ADD_INIT+4*i+3) & 0xFFFFl) << 48));
kvn@4001 472 }
kvn@4001 473 for (int i=0; i<ARRLEN; i++) {
kvn@4001 474 a0[i] = -1;
kvn@4001 475 }
kvn@4001 476 test_unpack4(a0, p4);
kvn@4001 477 for (int i=0; i<(ARRLEN&(-4)); i++) {
kvn@4001 478 errn += verify("test_unpack4: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 479 }
kvn@4001 480
kvn@4001 481 test_pack4_swap(p4, a1);
kvn@4001 482 for (int i=0; i<ARRLEN/4; i++) {
kvn@4001 483 errn += verify("test_pack4_swap: ", i, p4[i], ((long)(ADD_INIT+4*i+3) & 0xFFFFl) |
kvn@4001 484 (((long)(ADD_INIT+4*i+2) & 0xFFFFl) << 16) |
kvn@4001 485 (((long)(ADD_INIT+4*i+1) & 0xFFFFl) << 32) |
kvn@4001 486 (((long)(ADD_INIT+4*i+0) & 0xFFFFl) << 48));
kvn@4001 487 }
kvn@4001 488 for (int i=0; i<ARRLEN; i++) {
kvn@4001 489 a0[i] = -1;
kvn@4001 490 }
kvn@4001 491 test_unpack4_swap(a0, p4);
kvn@4001 492 for (int i=0; i<(ARRLEN&(-4)); i++) {
kvn@4001 493 errn += verify("test_unpack4_swap: ", i, a0[i], (short)(ADD_INIT+i));
kvn@4001 494 }
kvn@4001 495
kvn@4001 496 }
kvn@4001 497
kvn@4001 498 if (errn > 0)
kvn@4001 499 return errn;
kvn@4001 500
kvn@4001 501 System.out.println("Time");
kvn@4001 502 long start, end;
kvn@4001 503
kvn@4001 504 start = System.currentTimeMillis();
kvn@4001 505 for (int i=0; i<ITERS; i++) {
kvn@4001 506 test_sum(a1);
kvn@4001 507 }
kvn@4001 508 end = System.currentTimeMillis();
kvn@4001 509 System.out.println("test_sum: " + (end - start));
kvn@4001 510
kvn@4001 511 start = System.currentTimeMillis();
kvn@4001 512 for (int i=0; i<ITERS; i++) {
kvn@4001 513 test_addc(a0, a1);
kvn@4001 514 }
kvn@4001 515 end = System.currentTimeMillis();
kvn@4001 516 System.out.println("test_addc: " + (end - start));
kvn@4001 517 start = System.currentTimeMillis();
kvn@4001 518 for (int i=0; i<ITERS; i++) {
kvn@4001 519 test_addv(a0, a1, (short)VALUE);
kvn@4001 520 }
kvn@4001 521 end = System.currentTimeMillis();
kvn@4001 522 System.out.println("test_addv: " + (end - start));
kvn@4001 523 start = System.currentTimeMillis();
kvn@4001 524 for (int i=0; i<ITERS; i++) {
kvn@4001 525 test_adda(a0, a1, a2);
kvn@4001 526 }
kvn@4001 527 end = System.currentTimeMillis();
kvn@4001 528 System.out.println("test_adda: " + (end - start));
kvn@4001 529
kvn@4001 530 start = System.currentTimeMillis();
kvn@4001 531 for (int i=0; i<ITERS; i++) {
kvn@4001 532 test_subc(a0, a1);
kvn@4001 533 }
kvn@4001 534 end = System.currentTimeMillis();
kvn@4001 535 System.out.println("test_subc: " + (end - start));
kvn@4001 536 start = System.currentTimeMillis();
kvn@4001 537 for (int i=0; i<ITERS; i++) {
kvn@4001 538 test_subv(a0, a1, (short)VALUE);
kvn@4001 539 }
kvn@4001 540 end = System.currentTimeMillis();
kvn@4001 541 System.out.println("test_subv: " + (end - start));
kvn@4001 542 start = System.currentTimeMillis();
kvn@4001 543 for (int i=0; i<ITERS; i++) {
kvn@4001 544 test_suba(a0, a1, a2);
kvn@4001 545 }
kvn@4001 546 end = System.currentTimeMillis();
kvn@4001 547 System.out.println("test_suba: " + (end - start));
kvn@4001 548
kvn@4001 549 start = System.currentTimeMillis();
kvn@4001 550 for (int i=0; i<ITERS; i++) {
kvn@4001 551 test_mulc(a0, a1);
kvn@4001 552 }
kvn@4001 553 end = System.currentTimeMillis();
kvn@4001 554 System.out.println("test_mulc: " + (end - start));
kvn@4001 555 start = System.currentTimeMillis();
kvn@4001 556 for (int i=0; i<ITERS; i++) {
kvn@4001 557 test_mulv(a0, a1, (short)VALUE);
kvn@4001 558 }
kvn@4001 559 end = System.currentTimeMillis();
kvn@4001 560 System.out.println("test_mulv: " + (end - start));
kvn@4001 561 start = System.currentTimeMillis();
kvn@4001 562 for (int i=0; i<ITERS; i++) {
kvn@4001 563 test_mula(a0, a1, a2);
kvn@4001 564 }
kvn@4001 565 end = System.currentTimeMillis();
kvn@4001 566 System.out.println("test_mula: " + (end - start));
kvn@4001 567
kvn@4001 568 start = System.currentTimeMillis();
kvn@4001 569 for (int i=0; i<ITERS; i++) {
kvn@4001 570 test_divc(a0, a1);
kvn@4001 571 }
kvn@4001 572 end = System.currentTimeMillis();
kvn@4001 573 System.out.println("test_divc: " + (end - start));
kvn@4001 574 start = System.currentTimeMillis();
kvn@4001 575 for (int i=0; i<ITERS; i++) {
kvn@4001 576 test_divv(a0, a1, (short)VALUE);
kvn@4001 577 }
kvn@4001 578 end = System.currentTimeMillis();
kvn@4001 579 System.out.println("test_divv: " + (end - start));
kvn@4001 580 start = System.currentTimeMillis();
kvn@4001 581 for (int i=0; i<ITERS; i++) {
kvn@4001 582 test_diva(a0, a1, a2);
kvn@4001 583 }
kvn@4001 584 end = System.currentTimeMillis();
kvn@4001 585 System.out.println("test_diva: " + (end - start));
kvn@4001 586
kvn@4001 587 start = System.currentTimeMillis();
kvn@4001 588 for (int i=0; i<ITERS; i++) {
kvn@4001 589 test_mulc_n(a0, a1);
kvn@4001 590 }
kvn@4001 591 end = System.currentTimeMillis();
kvn@4001 592 System.out.println("test_mulc_n: " + (end - start));
kvn@4001 593 start = System.currentTimeMillis();
kvn@4001 594 for (int i=0; i<ITERS; i++) {
kvn@4001 595 test_mulv(a0, a1, (short)-VALUE);
kvn@4001 596 }
kvn@4001 597 end = System.currentTimeMillis();
kvn@4001 598 System.out.println("test_mulv_n: " + (end - start));
kvn@4001 599 start = System.currentTimeMillis();
kvn@4001 600 for (int i=0; i<ITERS; i++) {
kvn@4001 601 test_mula(a0, a1, a3);
kvn@4001 602 }
kvn@4001 603 end = System.currentTimeMillis();
kvn@4001 604 System.out.println("test_mula_n: " + (end - start));
kvn@4001 605
kvn@4001 606 start = System.currentTimeMillis();
kvn@4001 607 for (int i=0; i<ITERS; i++) {
kvn@4001 608 test_divc_n(a0, a1);
kvn@4001 609 }
kvn@4001 610 end = System.currentTimeMillis();
kvn@4001 611 System.out.println("test_divc_n: " + (end - start));
kvn@4001 612 start = System.currentTimeMillis();
kvn@4001 613 for (int i=0; i<ITERS; i++) {
kvn@4001 614 test_divv(a0, a1, (short)-VALUE);
kvn@4001 615 }
kvn@4001 616 end = System.currentTimeMillis();
kvn@4001 617 System.out.println("test_divv_n: " + (end - start));
kvn@4001 618 start = System.currentTimeMillis();
kvn@4001 619 for (int i=0; i<ITERS; i++) {
kvn@4001 620 test_diva(a0, a1, a3);
kvn@4001 621 }
kvn@4001 622 end = System.currentTimeMillis();
kvn@4001 623 System.out.println("test_diva_n: " + (end - start));
kvn@4001 624
kvn@4001 625 start = System.currentTimeMillis();
kvn@4001 626 for (int i=0; i<ITERS; i++) {
kvn@4001 627 test_andc(a0, a1);
kvn@4001 628 }
kvn@4001 629 end = System.currentTimeMillis();
kvn@4001 630 System.out.println("test_andc: " + (end - start));
kvn@4001 631 start = System.currentTimeMillis();
kvn@4001 632 for (int i=0; i<ITERS; i++) {
kvn@4001 633 test_andv(a0, a1, (short)BIT_MASK);
kvn@4001 634 }
kvn@4001 635 end = System.currentTimeMillis();
kvn@4001 636 System.out.println("test_andv: " + (end - start));
kvn@4001 637 start = System.currentTimeMillis();
kvn@4001 638 for (int i=0; i<ITERS; i++) {
kvn@4001 639 test_anda(a0, a1, a4);
kvn@4001 640 }
kvn@4001 641 end = System.currentTimeMillis();
kvn@4001 642 System.out.println("test_anda: " + (end - start));
kvn@4001 643
kvn@4001 644 start = System.currentTimeMillis();
kvn@4001 645 for (int i=0; i<ITERS; i++) {
kvn@4001 646 test_orc(a0, a1);
kvn@4001 647 }
kvn@4001 648 end = System.currentTimeMillis();
kvn@4001 649 System.out.println("test_orc: " + (end - start));
kvn@4001 650 start = System.currentTimeMillis();
kvn@4001 651 for (int i=0; i<ITERS; i++) {
kvn@4001 652 test_orv(a0, a1, (short)BIT_MASK);
kvn@4001 653 }
kvn@4001 654 end = System.currentTimeMillis();
kvn@4001 655 System.out.println("test_orv: " + (end - start));
kvn@4001 656 start = System.currentTimeMillis();
kvn@4001 657 for (int i=0; i<ITERS; i++) {
kvn@4001 658 test_ora(a0, a1, a4);
kvn@4001 659 }
kvn@4001 660 end = System.currentTimeMillis();
kvn@4001 661 System.out.println("test_ora: " + (end - start));
kvn@4001 662
kvn@4001 663 start = System.currentTimeMillis();
kvn@4001 664 for (int i=0; i<ITERS; i++) {
kvn@4001 665 test_xorc(a0, a1);
kvn@4001 666 }
kvn@4001 667 end = System.currentTimeMillis();
kvn@4001 668 System.out.println("test_xorc: " + (end - start));
kvn@4001 669 start = System.currentTimeMillis();
kvn@4001 670 for (int i=0; i<ITERS; i++) {
kvn@4001 671 test_xorv(a0, a1, (short)BIT_MASK);
kvn@4001 672 }
kvn@4001 673 end = System.currentTimeMillis();
kvn@4001 674 System.out.println("test_xorv: " + (end - start));
kvn@4001 675 start = System.currentTimeMillis();
kvn@4001 676 for (int i=0; i<ITERS; i++) {
kvn@4001 677 test_xora(a0, a1, a4);
kvn@4001 678 }
kvn@4001 679 end = System.currentTimeMillis();
kvn@4001 680 System.out.println("test_xora: " + (end - start));
kvn@4001 681
kvn@4001 682 start = System.currentTimeMillis();
kvn@4001 683 for (int i=0; i<ITERS; i++) {
kvn@4001 684 test_sllc(a0, a1);
kvn@4001 685 }
kvn@4001 686 end = System.currentTimeMillis();
kvn@4001 687 System.out.println("test_sllc: " + (end - start));
kvn@4001 688 start = System.currentTimeMillis();
kvn@4001 689 for (int i=0; i<ITERS; i++) {
kvn@4001 690 test_sllv(a0, a1, VALUE);
kvn@4001 691 }
kvn@4001 692 end = System.currentTimeMillis();
kvn@4001 693 System.out.println("test_sllv: " + (end - start));
kvn@4001 694
kvn@4001 695 start = System.currentTimeMillis();
kvn@4001 696 for (int i=0; i<ITERS; i++) {
kvn@4001 697 test_srlc(a0, a1);
kvn@4001 698 }
kvn@4001 699 end = System.currentTimeMillis();
kvn@4001 700 System.out.println("test_srlc: " + (end - start));
kvn@4001 701 start = System.currentTimeMillis();
kvn@4001 702 for (int i=0; i<ITERS; i++) {
kvn@4001 703 test_srlv(a0, a1, VALUE);
kvn@4001 704 }
kvn@4001 705 end = System.currentTimeMillis();
kvn@4001 706 System.out.println("test_srlv: " + (end - start));
kvn@4001 707
kvn@4001 708 start = System.currentTimeMillis();
kvn@4001 709 for (int i=0; i<ITERS; i++) {
kvn@4001 710 test_srac(a0, a1);
kvn@4001 711 }
kvn@4001 712 end = System.currentTimeMillis();
kvn@4001 713 System.out.println("test_srac: " + (end - start));
kvn@4001 714 start = System.currentTimeMillis();
kvn@4001 715 for (int i=0; i<ITERS; i++) {
kvn@4001 716 test_srav(a0, a1, VALUE);
kvn@4001 717 }
kvn@4001 718 end = System.currentTimeMillis();
kvn@4001 719 System.out.println("test_srav: " + (end - start));
kvn@4001 720
kvn@4001 721 start = System.currentTimeMillis();
kvn@4001 722 for (int i=0; i<ITERS; i++) {
kvn@4001 723 test_sllc_n(a0, a1);
kvn@4001 724 }
kvn@4001 725 end = System.currentTimeMillis();
kvn@4001 726 System.out.println("test_sllc_n: " + (end - start));
kvn@4001 727 start = System.currentTimeMillis();
kvn@4001 728 for (int i=0; i<ITERS; i++) {
kvn@4001 729 test_sllv(a0, a1, -VALUE);
kvn@4001 730 }
kvn@4001 731 end = System.currentTimeMillis();
kvn@4001 732 System.out.println("test_sllv_n: " + (end - start));
kvn@4001 733
kvn@4001 734 start = System.currentTimeMillis();
kvn@4001 735 for (int i=0; i<ITERS; i++) {
kvn@4001 736 test_srlc_n(a0, a1);
kvn@4001 737 }
kvn@4001 738 end = System.currentTimeMillis();
kvn@4001 739 System.out.println("test_srlc_n: " + (end - start));
kvn@4001 740 start = System.currentTimeMillis();
kvn@4001 741 for (int i=0; i<ITERS; i++) {
kvn@4001 742 test_srlv(a0, a1, -VALUE);
kvn@4001 743 }
kvn@4001 744 end = System.currentTimeMillis();
kvn@4001 745 System.out.println("test_srlv_n: " + (end - start));
kvn@4001 746
kvn@4001 747 start = System.currentTimeMillis();
kvn@4001 748 for (int i=0; i<ITERS; i++) {
kvn@4001 749 test_srac_n(a0, a1);
kvn@4001 750 }
kvn@4001 751 end = System.currentTimeMillis();
kvn@4001 752 System.out.println("test_srac_n: " + (end - start));
kvn@4001 753 start = System.currentTimeMillis();
kvn@4001 754 for (int i=0; i<ITERS; i++) {
kvn@4001 755 test_srav(a0, a1, -VALUE);
kvn@4001 756 }
kvn@4001 757 end = System.currentTimeMillis();
kvn@4001 758 System.out.println("test_srav_n: " + (end - start));
kvn@4001 759
kvn@4001 760 start = System.currentTimeMillis();
kvn@4001 761 for (int i=0; i<ITERS; i++) {
kvn@4001 762 test_sllc_o(a0, a1);
kvn@4001 763 }
kvn@4001 764 end = System.currentTimeMillis();
kvn@4001 765 System.out.println("test_sllc_o: " + (end - start));
kvn@4001 766 start = System.currentTimeMillis();
kvn@4001 767 for (int i=0; i<ITERS; i++) {
kvn@4001 768 test_sllv(a0, a1, SHIFT);
kvn@4001 769 }
kvn@4001 770 end = System.currentTimeMillis();
kvn@4001 771 System.out.println("test_sllv_o: " + (end - start));
kvn@4001 772
kvn@4001 773 start = System.currentTimeMillis();
kvn@4001 774 for (int i=0; i<ITERS; i++) {
kvn@4001 775 test_srlc_o(a0, a1);
kvn@4001 776 }
kvn@4001 777 end = System.currentTimeMillis();
kvn@4001 778 System.out.println("test_srlc_o: " + (end - start));
kvn@4001 779 start = System.currentTimeMillis();
kvn@4001 780 for (int i=0; i<ITERS; i++) {
kvn@4001 781 test_srlv(a0, a1, SHIFT);
kvn@4001 782 }
kvn@4001 783 end = System.currentTimeMillis();
kvn@4001 784 System.out.println("test_srlv_o: " + (end - start));
kvn@4001 785
kvn@4001 786 start = System.currentTimeMillis();
kvn@4001 787 for (int i=0; i<ITERS; i++) {
kvn@4001 788 test_srac_o(a0, a1);
kvn@4001 789 }
kvn@4001 790 end = System.currentTimeMillis();
kvn@4001 791 System.out.println("test_srac_o: " + (end - start));
kvn@4001 792 start = System.currentTimeMillis();
kvn@4001 793 for (int i=0; i<ITERS; i++) {
kvn@4001 794 test_srav(a0, a1, SHIFT);
kvn@4001 795 }
kvn@4001 796 end = System.currentTimeMillis();
kvn@4001 797 System.out.println("test_srav_o: " + (end - start));
kvn@4001 798
kvn@4001 799 start = System.currentTimeMillis();
kvn@4001 800 for (int i=0; i<ITERS; i++) {
kvn@4001 801 test_sllc_on(a0, a1);
kvn@4001 802 }
kvn@4001 803 end = System.currentTimeMillis();
kvn@4001 804 System.out.println("test_sllc_on: " + (end - start));
kvn@4001 805 start = System.currentTimeMillis();
kvn@4001 806 for (int i=0; i<ITERS; i++) {
kvn@4001 807 test_sllv(a0, a1, -SHIFT);
kvn@4001 808 }
kvn@4001 809 end = System.currentTimeMillis();
kvn@4001 810 System.out.println("test_sllv_on: " + (end - start));
kvn@4001 811
kvn@4001 812 start = System.currentTimeMillis();
kvn@4001 813 for (int i=0; i<ITERS; i++) {
kvn@4001 814 test_srlc_on(a0, a1);
kvn@4001 815 }
kvn@4001 816 end = System.currentTimeMillis();
kvn@4001 817 System.out.println("test_srlc_on: " + (end - start));
kvn@4001 818 start = System.currentTimeMillis();
kvn@4001 819 for (int i=0; i<ITERS; i++) {
kvn@4001 820 test_srlv(a0, a1, -SHIFT);
kvn@4001 821 }
kvn@4001 822 end = System.currentTimeMillis();
kvn@4001 823 System.out.println("test_srlv_on: " + (end - start));
kvn@4001 824
kvn@4001 825 start = System.currentTimeMillis();
kvn@4001 826 for (int i=0; i<ITERS; i++) {
kvn@4001 827 test_srac_on(a0, a1);
kvn@4001 828 }
kvn@4001 829 end = System.currentTimeMillis();
kvn@4001 830 System.out.println("test_srac_on: " + (end - start));
kvn@4001 831 start = System.currentTimeMillis();
kvn@4001 832 for (int i=0; i<ITERS; i++) {
kvn@4001 833 test_srav(a0, a1, -SHIFT);
kvn@4001 834 }
kvn@4001 835 end = System.currentTimeMillis();
kvn@4001 836 System.out.println("test_srav_on: " + (end - start));
kvn@4001 837
kvn@4001 838 start = System.currentTimeMillis();
kvn@4001 839 for (int i=0; i<ITERS; i++) {
kvn@4204 840 test_sllc_add(a0, a1);
kvn@4204 841 }
kvn@4204 842 end = System.currentTimeMillis();
kvn@4204 843 System.out.println("test_sllc_add: " + (end - start));
kvn@4204 844 start = System.currentTimeMillis();
kvn@4204 845 for (int i=0; i<ITERS; i++) {
kvn@4204 846 test_sllv_add(a0, a1, ADD_INIT);
kvn@4204 847 }
kvn@4204 848 end = System.currentTimeMillis();
kvn@4204 849 System.out.println("test_sllv_add: " + (end - start));
kvn@4204 850
kvn@4204 851 start = System.currentTimeMillis();
kvn@4204 852 for (int i=0; i<ITERS; i++) {
kvn@4204 853 test_srlc_add(a0, a1);
kvn@4204 854 }
kvn@4204 855 end = System.currentTimeMillis();
kvn@4204 856 System.out.println("test_srlc_add: " + (end - start));
kvn@4204 857 start = System.currentTimeMillis();
kvn@4204 858 for (int i=0; i<ITERS; i++) {
kvn@4204 859 test_srlv_add(a0, a1, ADD_INIT);
kvn@4204 860 }
kvn@4204 861 end = System.currentTimeMillis();
kvn@4204 862 System.out.println("test_srlv_add: " + (end - start));
kvn@4204 863
kvn@4204 864 start = System.currentTimeMillis();
kvn@4204 865 for (int i=0; i<ITERS; i++) {
kvn@4204 866 test_srac_add(a0, a1);
kvn@4204 867 }
kvn@4204 868 end = System.currentTimeMillis();
kvn@4204 869 System.out.println("test_srac_add: " + (end - start));
kvn@4204 870 start = System.currentTimeMillis();
kvn@4204 871 for (int i=0; i<ITERS; i++) {
kvn@4204 872 test_srav_add(a0, a1, ADD_INIT);
kvn@4204 873 }
kvn@4204 874 end = System.currentTimeMillis();
kvn@4204 875 System.out.println("test_srav_add: " + (end - start));
kvn@4204 876
kvn@4204 877 start = System.currentTimeMillis();
kvn@4204 878 for (int i=0; i<ITERS; i++) {
kvn@4204 879 test_sllc_and(a0, a1);
kvn@4204 880 }
kvn@4204 881 end = System.currentTimeMillis();
kvn@4204 882 System.out.println("test_sllc_and: " + (end - start));
kvn@4204 883 start = System.currentTimeMillis();
kvn@4204 884 for (int i=0; i<ITERS; i++) {
kvn@4204 885 test_sllv_and(a0, a1, BIT_MASK);
kvn@4204 886 }
kvn@4204 887 end = System.currentTimeMillis();
kvn@4204 888 System.out.println("test_sllv_and: " + (end - start));
kvn@4204 889
kvn@4204 890 start = System.currentTimeMillis();
kvn@4204 891 for (int i=0; i<ITERS; i++) {
kvn@4204 892 test_srlc_and(a0, a1);
kvn@4204 893 }
kvn@4204 894 end = System.currentTimeMillis();
kvn@4204 895 System.out.println("test_srlc_and: " + (end - start));
kvn@4204 896 start = System.currentTimeMillis();
kvn@4204 897 for (int i=0; i<ITERS; i++) {
kvn@4204 898 test_srlv_and(a0, a1, BIT_MASK);
kvn@4204 899 }
kvn@4204 900 end = System.currentTimeMillis();
kvn@4204 901 System.out.println("test_srlv_and: " + (end - start));
kvn@4204 902
kvn@4204 903 start = System.currentTimeMillis();
kvn@4204 904 for (int i=0; i<ITERS; i++) {
kvn@4204 905 test_srac_and(a0, a1);
kvn@4204 906 }
kvn@4204 907 end = System.currentTimeMillis();
kvn@4204 908 System.out.println("test_srac_and: " + (end - start));
kvn@4204 909 start = System.currentTimeMillis();
kvn@4204 910 for (int i=0; i<ITERS; i++) {
kvn@4204 911 test_srav_and(a0, a1, BIT_MASK);
kvn@4204 912 }
kvn@4204 913 end = System.currentTimeMillis();
kvn@4204 914 System.out.println("test_srav_and: " + (end - start));
kvn@4204 915
kvn@4204 916 start = System.currentTimeMillis();
kvn@4204 917 for (int i=0; i<ITERS; i++) {
kvn@4001 918 test_pack2(p2, a1);
kvn@4001 919 }
kvn@4001 920 end = System.currentTimeMillis();
kvn@4001 921 System.out.println("test_pack2: " + (end - start));
kvn@4001 922 start = System.currentTimeMillis();
kvn@4001 923 for (int i=0; i<ITERS; i++) {
kvn@4001 924 test_unpack2(a0, p2);
kvn@4001 925 }
kvn@4001 926 end = System.currentTimeMillis();
kvn@4001 927 System.out.println("test_unpack2: " + (end - start));
kvn@4001 928 start = System.currentTimeMillis();
kvn@4001 929 for (int i=0; i<ITERS; i++) {
kvn@4001 930 test_pack2_swap(p2, a1);
kvn@4001 931 }
kvn@4001 932 end = System.currentTimeMillis();
kvn@4001 933 System.out.println("test_pack2_swap: " + (end - start));
kvn@4001 934 start = System.currentTimeMillis();
kvn@4001 935 for (int i=0; i<ITERS; i++) {
kvn@4001 936 test_unpack2_swap(a0, p2);
kvn@4001 937 }
kvn@4001 938 end = System.currentTimeMillis();
kvn@4001 939 System.out.println("test_unpack2_swap: " + (end - start));
kvn@4001 940
kvn@4001 941 start = System.currentTimeMillis();
kvn@4001 942 for (int i=0; i<ITERS; i++) {
kvn@4001 943 test_pack4(p4, a1);
kvn@4001 944 }
kvn@4001 945 end = System.currentTimeMillis();
kvn@4001 946 System.out.println("test_pack4: " + (end - start));
kvn@4001 947 start = System.currentTimeMillis();
kvn@4001 948 for (int i=0; i<ITERS; i++) {
kvn@4001 949 test_unpack4(a0, p4);
kvn@4001 950 }
kvn@4001 951 end = System.currentTimeMillis();
kvn@4001 952 System.out.println("test_unpack4: " + (end - start));
kvn@4001 953 start = System.currentTimeMillis();
kvn@4001 954 for (int i=0; i<ITERS; i++) {
kvn@4001 955 test_pack4_swap(p4, a1);
kvn@4001 956 }
kvn@4001 957 end = System.currentTimeMillis();
kvn@4001 958 System.out.println("test_pack4_swap: " + (end - start));
kvn@4001 959 start = System.currentTimeMillis();
kvn@4001 960 for (int i=0; i<ITERS; i++) {
kvn@4001 961 test_unpack4_swap(a0, p4);
kvn@4001 962 }
kvn@4001 963 end = System.currentTimeMillis();
kvn@4001 964 System.out.println("test_unpack4_swap: " + (end - start));
kvn@4001 965
kvn@4001 966 return errn;
kvn@4001 967 }
kvn@4001 968
kvn@4001 969 static int test_sum(short[] a1) {
kvn@4001 970 int sum = 0;
kvn@4001 971 for (int i = 0; i < a1.length; i+=1) {
kvn@4001 972 sum += a1[i];
kvn@4001 973 }
kvn@4001 974 return sum;
kvn@4001 975 }
kvn@4001 976
kvn@4001 977 static void test_addc(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_addv(short[] a0, short[] a1, short b) {
kvn@4001 983 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 984 a0[i] = (short)(a1[i]+b);
kvn@4001 985 }
kvn@4001 986 }
kvn@4001 987 static void test_adda(short[] a0, short[] a1, short[] a2) {
kvn@4001 988 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 989 a0[i] = (short)(a1[i]+a2[i]);
kvn@4001 990 }
kvn@4001 991 }
kvn@4001 992
kvn@4001 993 static void test_subc(short[] a0, short[] a1) {
kvn@4001 994 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 995 a0[i] = (short)(a1[i]-VALUE);
kvn@4001 996 }
kvn@4001 997 }
kvn@4001 998 static void test_subv(short[] a0, short[] a1, short b) {
kvn@4001 999 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1000 a0[i] = (short)(a1[i]-b);
kvn@4001 1001 }
kvn@4001 1002 }
kvn@4001 1003 static void test_suba(short[] a0, short[] a1, short[] a2) {
kvn@4001 1004 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1005 a0[i] = (short)(a1[i]-a2[i]);
kvn@4001 1006 }
kvn@4001 1007 }
kvn@4001 1008
kvn@4001 1009 static void test_mulc(short[] a0, short[] a1) {
kvn@4001 1010 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1011 a0[i] = (short)(a1[i]*VALUE);
kvn@4001 1012 }
kvn@4001 1013 }
kvn@4001 1014 static void test_mulc_n(short[] a0, short[] a1) {
kvn@4001 1015 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1016 a0[i] = (short)(a1[i]*(-VALUE));
kvn@4001 1017 }
kvn@4001 1018 }
kvn@4001 1019 static void test_mulv(short[] a0, short[] a1, short b) {
kvn@4001 1020 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1021 a0[i] = (short)(a1[i]*b);
kvn@4001 1022 }
kvn@4001 1023 }
kvn@4001 1024 static void test_mula(short[] a0, short[] a1, short[] a2) {
kvn@4001 1025 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1026 a0[i] = (short)(a1[i]*a2[i]);
kvn@4001 1027 }
kvn@4001 1028 }
kvn@4001 1029
kvn@4001 1030 static void test_divc(short[] a0, short[] a1) {
kvn@4001 1031 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1032 a0[i] = (short)(a1[i]/VALUE);
kvn@4001 1033 }
kvn@4001 1034 }
kvn@4001 1035 static void test_divc_n(short[] a0, short[] a1) {
kvn@4001 1036 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1037 a0[i] = (short)(a1[i]/(-VALUE));
kvn@4001 1038 }
kvn@4001 1039 }
kvn@4001 1040 static void test_divv(short[] a0, short[] a1, short b) {
kvn@4001 1041 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1042 a0[i] = (short)(a1[i]/b);
kvn@4001 1043 }
kvn@4001 1044 }
kvn@4001 1045 static void test_diva(short[] a0, short[] a1, short[] a2) {
kvn@4001 1046 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1047 a0[i] = (short)(a1[i]/a2[i]);
kvn@4001 1048 }
kvn@4001 1049 }
kvn@4001 1050
kvn@4001 1051 static void test_andc(short[] a0, short[] a1) {
kvn@4001 1052 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1053 a0[i] = (short)(a1[i]&BIT_MASK);
kvn@4001 1054 }
kvn@4001 1055 }
kvn@4001 1056 static void test_andv(short[] a0, short[] a1, short b) {
kvn@4001 1057 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1058 a0[i] = (short)(a1[i]&b);
kvn@4001 1059 }
kvn@4001 1060 }
kvn@4001 1061 static void test_anda(short[] a0, short[] a1, short[] a2) {
kvn@4001 1062 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1063 a0[i] = (short)(a1[i]&a2[i]);
kvn@4001 1064 }
kvn@4001 1065 }
kvn@4001 1066
kvn@4001 1067 static void test_orc(short[] a0, short[] a1) {
kvn@4001 1068 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1069 a0[i] = (short)(a1[i]|BIT_MASK);
kvn@4001 1070 }
kvn@4001 1071 }
kvn@4001 1072 static void test_orv(short[] a0, short[] a1, short b) {
kvn@4001 1073 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1074 a0[i] = (short)(a1[i]|b);
kvn@4001 1075 }
kvn@4001 1076 }
kvn@4001 1077 static void test_ora(short[] a0, short[] a1, short[] a2) {
kvn@4001 1078 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1079 a0[i] = (short)(a1[i]|a2[i]);
kvn@4001 1080 }
kvn@4001 1081 }
kvn@4001 1082
kvn@4001 1083 static void test_xorc(short[] a0, short[] a1) {
kvn@4001 1084 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1085 a0[i] = (short)(a1[i]^BIT_MASK);
kvn@4001 1086 }
kvn@4001 1087 }
kvn@4001 1088 static void test_xorv(short[] a0, short[] a1, short b) {
kvn@4001 1089 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1090 a0[i] = (short)(a1[i]^b);
kvn@4001 1091 }
kvn@4001 1092 }
kvn@4001 1093 static void test_xora(short[] a0, short[] a1, short[] a2) {
kvn@4001 1094 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1095 a0[i] = (short)(a1[i]^a2[i]);
kvn@4001 1096 }
kvn@4001 1097 }
kvn@4001 1098
kvn@4001 1099 static void test_sllc(short[] a0, short[] a1) {
kvn@4001 1100 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1101 a0[i] = (short)(a1[i]<<VALUE);
kvn@4001 1102 }
kvn@4001 1103 }
kvn@4001 1104 static void test_sllc_n(short[] a0, short[] a1) {
kvn@4001 1105 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1106 a0[i] = (short)(a1[i]<<(-VALUE));
kvn@4001 1107 }
kvn@4001 1108 }
kvn@4001 1109 static void test_sllc_o(short[] a0, short[] a1) {
kvn@4001 1110 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1111 a0[i] = (short)(a1[i]<<SHIFT);
kvn@4001 1112 }
kvn@4001 1113 }
kvn@4001 1114 static void test_sllc_on(short[] a0, short[] a1) {
kvn@4001 1115 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1116 a0[i] = (short)(a1[i]<<(-SHIFT));
kvn@4001 1117 }
kvn@4001 1118 }
kvn@4001 1119 static void test_sllv(short[] a0, short[] a1, int b) {
kvn@4001 1120 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1121 a0[i] = (short)(a1[i]<<b);
kvn@4001 1122 }
kvn@4001 1123 }
kvn@4204 1124 static void test_sllc_add(short[] a0, short[] a1) {
kvn@4204 1125 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1126 a0[i] = (short)((a1[i] + ADD_INIT)<<VALUE);
kvn@4204 1127 }
kvn@4204 1128 }
kvn@4204 1129 static void test_sllv_add(short[] a0, short[] a1, int b) {
kvn@4204 1130 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1131 a0[i] = (short)((a1[i] + b)<<VALUE);
kvn@4204 1132 }
kvn@4204 1133 }
kvn@4204 1134 static void test_sllc_and(short[] a0, short[] a1) {
kvn@4204 1135 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1136 a0[i] = (short)((a1[i] & BIT_MASK)<<VALUE);
kvn@4204 1137 }
kvn@4204 1138 }
kvn@4204 1139 static void test_sllv_and(short[] a0, short[] a1, int b) {
kvn@4204 1140 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1141 a0[i] = (short)((a1[i] & b)<<VALUE);
kvn@4204 1142 }
kvn@4204 1143 }
kvn@4001 1144
kvn@4001 1145 static void test_srlc(short[] a0, short[] a1) {
kvn@4001 1146 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1147 a0[i] = (short)(a1[i]>>>VALUE);
kvn@4001 1148 }
kvn@4001 1149 }
kvn@4001 1150 static void test_srlc_n(short[] a0, short[] a1) {
kvn@4001 1151 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1152 a0[i] = (short)(a1[i]>>>(-VALUE));
kvn@4001 1153 }
kvn@4001 1154 }
kvn@4001 1155 static void test_srlc_o(short[] a0, short[] a1) {
kvn@4001 1156 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1157 a0[i] = (short)(a1[i]>>>SHIFT);
kvn@4001 1158 }
kvn@4001 1159 }
kvn@4001 1160 static void test_srlc_on(short[] a0, short[] a1) {
kvn@4001 1161 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1162 a0[i] = (short)(a1[i]>>>(-SHIFT));
kvn@4001 1163 }
kvn@4001 1164 }
kvn@4001 1165 static void test_srlv(short[] a0, short[] a1, int b) {
kvn@4001 1166 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1167 a0[i] = (short)(a1[i]>>>b);
kvn@4001 1168 }
kvn@4001 1169 }
kvn@4204 1170 static void test_srlc_add(short[] a0, short[] a1) {
kvn@4204 1171 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1172 a0[i] = (short)((a1[i] + ADD_INIT)>>>VALUE);
kvn@4204 1173 }
kvn@4204 1174 }
kvn@4204 1175 static void test_srlv_add(short[] a0, short[] a1, int b) {
kvn@4204 1176 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1177 a0[i] = (short)((a1[i] + b)>>>VALUE);
kvn@4204 1178 }
kvn@4204 1179 }
kvn@4204 1180 static void test_srlc_and(short[] a0, short[] a1) {
kvn@4204 1181 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1182 a0[i] = (short)((a1[i] & BIT_MASK)>>>VALUE);
kvn@4204 1183 }
kvn@4204 1184 }
kvn@4204 1185 static void test_srlv_and(short[] a0, short[] a1, int b) {
kvn@4204 1186 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1187 a0[i] = (short)((a1[i] & b)>>>VALUE);
kvn@4204 1188 }
kvn@4204 1189 }
kvn@4001 1190
kvn@4001 1191 static void test_srac(short[] a0, short[] a1) {
kvn@4001 1192 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1193 a0[i] = (short)(a1[i]>>VALUE);
kvn@4001 1194 }
kvn@4001 1195 }
kvn@4001 1196 static void test_srac_n(short[] a0, short[] a1) {
kvn@4001 1197 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1198 a0[i] = (short)(a1[i]>>(-VALUE));
kvn@4001 1199 }
kvn@4001 1200 }
kvn@4001 1201 static void test_srac_o(short[] a0, short[] a1) {
kvn@4001 1202 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1203 a0[i] = (short)(a1[i]>>SHIFT);
kvn@4001 1204 }
kvn@4001 1205 }
kvn@4001 1206 static void test_srac_on(short[] a0, short[] a1) {
kvn@4001 1207 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1208 a0[i] = (short)(a1[i]>>(-SHIFT));
kvn@4001 1209 }
kvn@4001 1210 }
kvn@4001 1211 static void test_srav(short[] a0, short[] a1, int b) {
kvn@4001 1212 for (int i = 0; i < a0.length; i+=1) {
kvn@4001 1213 a0[i] = (short)(a1[i]>>b);
kvn@4001 1214 }
kvn@4001 1215 }
kvn@4204 1216 static void test_srac_add(short[] a0, short[] a1) {
kvn@4204 1217 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1218 a0[i] = (short)((a1[i] + ADD_INIT)>>VALUE);
kvn@4204 1219 }
kvn@4204 1220 }
kvn@4204 1221 static void test_srav_add(short[] a0, short[] a1, int b) {
kvn@4204 1222 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1223 a0[i] = (short)((a1[i] + b)>>VALUE);
kvn@4204 1224 }
kvn@4204 1225 }
kvn@4204 1226 static void test_srac_and(short[] a0, short[] a1) {
kvn@4204 1227 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1228 a0[i] = (short)((a1[i] & BIT_MASK)>>VALUE);
kvn@4204 1229 }
kvn@4204 1230 }
kvn@4204 1231 static void test_srav_and(short[] a0, short[] a1, int b) {
kvn@4204 1232 for (int i = 0; i < a0.length; i+=1) {
kvn@4204 1233 a0[i] = (short)((a1[i] & b)>>VALUE);
kvn@4204 1234 }
kvn@4204 1235 }
kvn@4001 1236
kvn@4001 1237 static void test_pack2(int[] p2, short[] a1) {
kvn@4001 1238 if (p2.length*2 > a1.length) return;
kvn@4001 1239 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1240 int l0 = (int)a1[i*2+0];
kvn@4001 1241 int l1 = (int)a1[i*2+1];
kvn@4001 1242 p2[i] = (l1 << 16) | (l0 & 0xFFFF);
kvn@4001 1243 }
kvn@4001 1244 }
kvn@4001 1245 static void test_unpack2(short[] a0, int[] p2) {
kvn@4001 1246 if (p2.length*2 > a0.length) return;
kvn@4001 1247 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1248 int l = p2[i];
kvn@4001 1249 a0[i*2+0] = (short)(l & 0xFFFF);
kvn@4001 1250 a0[i*2+1] = (short)(l >> 16);
kvn@4001 1251 }
kvn@4001 1252 }
kvn@4001 1253 static void test_pack2_swap(int[] p2, short[] a1) {
kvn@4001 1254 if (p2.length*2 > a1.length) return;
kvn@4001 1255 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1256 int l0 = (int)a1[i*2+0];
kvn@4001 1257 int l1 = (int)a1[i*2+1];
kvn@4001 1258 p2[i] = (l0 << 16) | (l1 & 0xFFFF);
kvn@4001 1259 }
kvn@4001 1260 }
kvn@4001 1261 static void test_unpack2_swap(short[] a0, int[] p2) {
kvn@4001 1262 if (p2.length*2 > a0.length) return;
kvn@4001 1263 for (int i = 0; i < p2.length; i+=1) {
kvn@4001 1264 int l = p2[i];
kvn@4001 1265 a0[i*2+0] = (short)(l >> 16);
kvn@4001 1266 a0[i*2+1] = (short)(l & 0xFFFF);
kvn@4001 1267 }
kvn@4001 1268 }
kvn@4001 1269
kvn@4001 1270 static void test_pack4(long[] p4, short[] a1) {
kvn@4001 1271 if (p4.length*4 > a1.length) return;
kvn@4001 1272 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1273 long l0 = (long)a1[i*4+0];
kvn@4001 1274 long l1 = (long)a1[i*4+1];
kvn@4001 1275 long l2 = (long)a1[i*4+2];
kvn@4001 1276 long l3 = (long)a1[i*4+3];
kvn@4001 1277 p4[i] = (l0 & 0xFFFFl) |
kvn@4001 1278 ((l1 & 0xFFFFl) << 16) |
kvn@4001 1279 ((l2 & 0xFFFFl) << 32) |
kvn@4001 1280 ((l3 & 0xFFFFl) << 48);
kvn@4001 1281 }
kvn@4001 1282 }
kvn@4001 1283 static void test_unpack4(short[] a0, long[] p4) {
kvn@4001 1284 if (p4.length*4 > a0.length) return;
kvn@4001 1285 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1286 long l = p4[i];
kvn@4001 1287 a0[i*4+0] = (short)(l & 0xFFFFl);
kvn@4001 1288 a0[i*4+1] = (short)(l >> 16);
kvn@4001 1289 a0[i*4+2] = (short)(l >> 32);
kvn@4001 1290 a0[i*4+3] = (short)(l >> 48);
kvn@4001 1291 }
kvn@4001 1292 }
kvn@4001 1293 static void test_pack4_swap(long[] p4, short[] a1) {
kvn@4001 1294 if (p4.length*4 > a1.length) return;
kvn@4001 1295 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1296 long l0 = (long)a1[i*4+0];
kvn@4001 1297 long l1 = (long)a1[i*4+1];
kvn@4001 1298 long l2 = (long)a1[i*4+2];
kvn@4001 1299 long l3 = (long)a1[i*4+3];
kvn@4001 1300 p4[i] = (l3 & 0xFFFFl) |
kvn@4001 1301 ((l2 & 0xFFFFl) << 16) |
kvn@4001 1302 ((l1 & 0xFFFFl) << 32) |
kvn@4001 1303 ((l0 & 0xFFFFl) << 48);
kvn@4001 1304 }
kvn@4001 1305 }
kvn@4001 1306 static void test_unpack4_swap(short[] a0, long[] p4) {
kvn@4001 1307 if (p4.length*4 > a0.length) return;
kvn@4001 1308 for (int i = 0; i < p4.length; i+=1) {
kvn@4001 1309 long l = p4[i];
kvn@4001 1310 a0[i*4+0] = (short)(l >> 48);
kvn@4001 1311 a0[i*4+1] = (short)(l >> 32);
kvn@4001 1312 a0[i*4+2] = (short)(l >> 16);
kvn@4001 1313 a0[i*4+3] = (short)(l & 0xFFFFl);
kvn@4001 1314 }
kvn@4001 1315 }
kvn@4001 1316
kvn@4001 1317 static int verify(String text, int i, short elem, short val) {
kvn@4001 1318 if (elem != val) {
kvn@4001 1319 System.err.println(text + "[" + i + "] = " + elem + " != " + val);
kvn@4001 1320 return 1;
kvn@4001 1321 }
kvn@4001 1322 return 0;
kvn@4001 1323 }
kvn@4001 1324
kvn@4001 1325 static int verify(String text, int i, int elem, int val) {
kvn@4001 1326 if (elem != val) {
kvn@4001 1327 System.err.println(text + "[" + i + "] = " + Integer.toHexString(elem) + " != " + Integer.toHexString(val));
kvn@4001 1328 return 1;
kvn@4001 1329 }
kvn@4001 1330 return 0;
kvn@4001 1331 }
kvn@4001 1332
kvn@4001 1333 static int verify(String text, int i, long elem, long val) {
kvn@4001 1334 if (elem != val) {
kvn@4001 1335 System.err.println(text + "[" + i + "] = " + Long.toHexString(elem) + " != " + Long.toHexString(val));
kvn@4001 1336 return 1;
kvn@4001 1337 }
kvn@4001 1338 return 0;
kvn@4001 1339 }
kvn@4001 1340 }

mercurial