53     long[] a0 = new long[ARRLEN];
71       test_addc(a0, a1);
72       test_addv(a0, a1, (long)VALUE);
73       test_adda(a0, a1, a2);
74       test_subc(a0, a1);
75       test_subv(a0, a1, (long)VALUE);
76       test_suba(a0, a1, a2);
78       test_mulc(a0, a1);
79       test_mulv(a0, a1, (long)VALUE);
80       test_mula(a0, a1, a2);
81       test_divc(a0, a1);
82       test_divv(a0, a1, (long)VALUE);
83       test_diva(a0, a1, a2);
84       test_mulc_n(a0, a1);
85       test_mulv(a0, a1, (long)-VALUE);
86       test_mula(a0, a1, a3);
87       test_divc_n(a0, a1);
88       test_divv(a0, a1, (long)-VALUE);
89       test_diva(a0, a1, a3);
91       test_andc(a0, a1);
92       test_andv(a0, a1, (long)BIT_MASK);
93       test_anda(a0, a1, a4);
94       test_orc(a0, a1);
95       test_orv(a0, a1, (long)BIT_MASK);
96       test_ora(a0, a1, a4);
97       test_xorc(a0, a1);
98       test_xorv(a0, a1, (long)BIT_MASK);
99       test_xora(a0, a1, a4);
101       test_sllc(a0, a1);
102       test_sllv(a0, a1, VALUE);
103       test_srlc(a0, a1);
104       test_srlv(a0, a1, VALUE);
105       test_srac(a0, a1);
106       test_srav(a0, a1, VALUE);
108       test_sllc_n(a0, a1);
109       test_sllv(a0, a1, -VALUE);
110       test_srlc_n(a0, a1);
111       test_srlv(a0, a1, -VALUE);
112       test_srac_n(a0, a1);
113       test_srav(a0, a1, -VALUE);
115       test_sllc_o(a0, a1);
116       test_sllv(a0, a1, SHIFT);
117       test_srlc_o(a0, a1);
118       test_srlv(a0, a1, SHIFT);
119       test_srac_o(a0, a1);
120       test_srav(a0, a1, SHIFT);
122       test_sllc_on(a0, a1);
123       test_sllv(a0, a1, -SHIFT);
124       test_srlc_on(a0, a1);
125       test_srlv(a0, a1, -SHIFT);
126       test_srac_on(a0, a1);
127       test_srav(a0, a1, -SHIFT);
129       test_sllc_add(a0, a1);
130       test_sllv_add(a0, a1, ADD_INIT);
131       test_srlc_add(a0, a1);
132       test_srlv_add(a0, a1, ADD_INIT);
133       test_srac_add(a0, a1);
134       test_srav_add(a0, a1, ADD_INIT);
136       test_sllc_and(a0, a1);
137       test_sllv_and(a0, a1, BIT_MASK);
138       test_srlc_and(a0, a1);
139       test_srlv_and(a0, a1, BIT_MASK);
140       test_srac_and(a0, a1);
141       test_srav_and(a0, a1, BIT_MASK);
153       test_addc(a0, a1);
155         errn += verify("test_addc: ", i, a0[i], (long)((long)(ADD_INIT+i)+VALUE));
157       test_addv(a0, a1, (long)VALUE);
159         errn += verify("test_addv: ", i, a0[i], (long)((long)(ADD_INIT+i)+VALUE));
161       test_adda(a0, a1, a2);
163         errn += verify("test_adda: ", i, a0[i], (long)((long)(ADD_INIT+i)+VALUE));
166       test_subc(a0, a1);
168         errn += verify("test_subc: ", i, a0[i], (long)((long)(ADD_INIT+i)-VALUE));
170       test_subv(a0, a1, (long)VALUE);
172         errn += verify("test_subv: ", i, a0[i], (long)((long)(ADD_INIT+i)-VALUE));
174       test_suba(a0, a1, a2);
176         errn += verify("test_suba: ", i, a0[i], (long)((long)(ADD_INIT+i)-VALUE));
179       test_mulc(a0, a1);
181         errn += verify("test_mulc: ", i, a0[i], (long)((long)(ADD_INIT+i)*VALUE));
183       test_mulv(a0, a1, (long)VALUE);
185         errn += verify("test_mulv: ", i, a0[i], (long)((long)(ADD_INIT+i)*VALUE));
187       test_mula(a0, a1, a2);
189         errn += verify("test_mula: ", i, a0[i], (long)((long)(ADD_INIT+i)*VALUE));
192       test_divc(a0, a1);
194         errn += verify("test_divc: ", i, a0[i], (long)((long)(ADD_INIT+i)/VALUE));
196       test_divv(a0, a1, (long)VALUE);
198         errn += verify("test_divv: ", i, a0[i], (long)((long)(ADD_INIT+i)/VALUE));
200       test_diva(a0, a1, a2);
202         errn += verify("test_diva: ", i, a0[i], (long)((long)(ADD_INIT+i)/VALUE));
205       test_mulc_n(a0, a1);
207         errn += verify("test_mulc_n: ", i, a0[i], (long)((long)(ADD_INIT+i)*(-VALUE)));
209       test_mulv(a0, a1, (long)-VALUE);
211         errn += verify("test_mulv_n: ", i, a0[i], (long)((long)(ADD_INIT+i)*(-VALUE)));
213       test_mula(a0, a1, a3);
215         errn += verify("test_mula_n: ", i, a0[i], (long)((long)(ADD_INIT+i)*(-VALUE)));
218       test_divc_n(a0, a1);
220         errn += verify("test_divc_n: ", i, a0[i], (long)((long)(ADD_INIT+i)/(-VALUE)));
222       test_divv(a0, a1, (long)-VALUE);
224         errn += verify("test_divv_n: ", i, a0[i], (long)((long)(ADD_INIT+i)/(-VALUE)));
226       test_diva(a0, a1, a3);
228         errn += verify("test_diva_n: ", i, a0[i], (long)((long)(ADD_INIT+i)/(-VALUE)));
231       test_andc(a0, a1);
233         errn += verify("test_andc: ", i, a0[i], (long)((long)(ADD_INIT+i)&BIT_MASK));
235       test_andv(a0, a1, (long)BIT_MASK);
237         errn += verify("test_andv: ", i, a0[i], (long)((long)(ADD_INIT+i)&BIT_MASK));
239       test_anda(a0, a1, a4);
241         errn += verify("test_anda: ", i, a0[i], (long)((long)(ADD_INIT+i)&BIT_MASK));
244       test_orc(a0, a1);
246         errn += verify("test_orc: ", i, a0[i], (long)((long)(ADD_INIT+i)|BIT_MASK));
248       test_orv(a0, a1, (long)BIT_MASK);
250         errn += verify("test_orv: ", i, a0[i], (long)((long)(ADD_INIT+i)|BIT_MASK));
252       test_ora(a0, a1, a4);
254         errn += verify("test_ora: ", i, a0[i], (long)((long)(ADD_INIT+i)|BIT_MASK));
257       test_xorc(a0, a1);
259         errn += verify("test_xorc: ", i, a0[i], (long)((long)(ADD_INIT+i)^BIT_MASK));
261       test_xorv(a0, a1, (long)BIT_MASK);
263         errn += verify("test_xorv: ", i, a0[i], (long)((long)(ADD_INIT+i)^BIT_MASK));
265       test_xora(a0, a1, a4);
267         errn += verify("test_xora: ", i, a0[i], (long)((long)(ADD_INIT+i)^BIT_MASK));
270       test_sllc(a0, a1);
272         errn += verify("test_sllc: ", i, a0[i], (long)((long)(ADD_INIT+i)<<VALUE));
274       test_sllv(a0, a1, VALUE);
276         errn += verify("test_sllv: ", i, a0[i], (long)((long)(ADD_INIT+i)<<VALUE));
279       test_srlc(a0, a1);
281         errn += verify("test_srlc: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>VALUE));
283       test_srlv(a0, a1, VALUE);
285         errn += verify("test_srlv: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>VALUE));
288       test_srac(a0, a1);
290         errn += verify("test_srac: ", i, a0[i], (long)((long)(ADD_INIT+i)>>VALUE));
292       test_srav(a0, a1, VALUE);
294         errn += verify("test_srav: ", i, a0[i], (long)((long)(ADD_INIT+i)>>VALUE));
297       test_sllc_n(a0, a1);
299         errn += verify("test_sllc_n: ", i, a0[i], (long)((long)(ADD_INIT+i)<<(-VALUE)));
301       test_sllv(a0, a1, -VALUE);
303         errn += verify("test_sllv_n: ", i, a0[i], (long)((long)(ADD_INIT+i)<<(-VALUE)));
306       test_srlc_n(a0, a1);
308         errn += verify("test_srlc_n: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>(-VALUE)));
310       test_srlv(a0, a1, -VALUE);
312         errn += verify("test_srlv_n: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>(-VALUE)));
315       test_srac_n(a0, a1);
317         errn += verify("test_srac_n: ", i, a0[i], (long)((long)(ADD_INIT+i)>>(-VALUE)));
319       test_srav(a0, a1, -VALUE);
321         errn += verify("test_srav_n: ", i, a0[i], (long)((long)(ADD_INIT+i)>>(-VALUE)));
324       test_sllc_o(a0, a1);
326         errn += verify("test_sllc_o: ", i, a0[i], (long)((long)(ADD_INIT+i)<<SHIFT));
328       test_sllv(a0, a1, SHIFT);
330         errn += verify("test_sllv_o: ", i, a0[i], (long)((long)(ADD_INIT+i)<<SHIFT));
333       test_srlc_o(a0, a1);
335         errn += verify("test_srlc_o: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>SHIFT));
337       test_srlv(a0, a1, SHIFT);
339         errn += verify("test_srlv_o: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>SHIFT));
342       test_srac_o(a0, a1);
344         errn += verify("test_srac_o: ", i, a0[i], (long)((long)(ADD_INIT+i)>>SHIFT));
346       test_srav(a0, a1, SHIFT);
348         errn += verify("test_srav_o: ", i, a0[i], (long)((long)(ADD_INIT+i)>>SHIFT));
351       test_sllc_on(a0, a1);
353         errn += verify("test_sllc_on: ", i, a0[i], (long)((long)(ADD_INIT+i)<<(-SHIFT)));
355       test_sllv(a0, a1, -SHIFT);
357         errn += verify("test_sllv_on: ", i, a0[i], (long)((long)(ADD_INIT+i)<<(-SHIFT)));
360       test_srlc_on(a0, a1);
362         errn += verify("test_srlc_on: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>(-SHIFT)));
364       test_srlv(a0, a1, -SHIFT);
366         errn += verify("test_srlv_on: ", i, a0[i], (long)((long)(ADD_INIT+i)>>>(-SHIFT)));
369       test_srac_on(a0, a1);
371         errn += verify("test_srac_on: ", i, a0[i], (long)((long)(ADD_INIT+i)>>(-SHIFT)));
373       test_srav(a0, a1, -SHIFT);
375         errn += verify("test_srav_on: ", i, a0[i], (long)((long)(ADD_INIT+i)>>(-SHIFT)));
378       test_sllc_add(a0, a1);
380         errn += verify("test_sllc_add: ", i, a0[i], (long)(((long)(ADD_INIT+i) + ADD_INIT)<<VALUE));
382       test_sllv_add(a0, a1, ADD_INIT);
384         errn += verify("test_sllv_add: ", i, a0[i], (long)(((long)(ADD_INIT+i) + ADD_INIT)<<VALUE));
387       test_srlc_add(a0, a1);
389         errn += verify("test_srlc_add: ", i, a0[i], (long)(((long)(ADD_INIT+i) + ADD_INIT)>>>VALUE));
391       test_srlv_add(a0, a1, ADD_INIT);
393         errn += verify("test_srlv_add: ", i, a0[i], (long)(((long)(ADD_INIT+i) + ADD_INIT)>>>VALUE));
396       test_srac_add(a0, a1);
398         errn += verify("test_srac_add: ", i, a0[i], (long)(((long)(ADD_INIT+i) + ADD_INIT)>>VALUE));
400       test_srav_add(a0, a1, ADD_INIT);
402         errn += verify("test_srav_add: ", i, a0[i], (long)(((long)(ADD_INIT+i) + ADD_INIT)>>VALUE));
405       test_sllc_and(a0, a1);
407         errn += verify("test_sllc_and: ", i, a0[i], (long)(((long)(ADD_INIT+i) & BIT_MASK)<<VALUE));
409       test_sllv_and(a0, a1, BIT_MASK);
411         errn += verify("test_sllv_and: ", i, a0[i], (long)(((long)(ADD_INIT+i) & BIT_MASK)<<VALUE));
414       test_srlc_and(a0, a1);
416         errn += verify("test_srlc_and: ", i, a0[i], (long)(((long)(ADD_INIT+i) & BIT_MASK)>>>VALUE));
418       test_srlv_and(a0, a1, BIT_MASK);
420         errn += verify("test_srlv_and: ", i, a0[i], (long)(((long)(ADD_INIT+i) & BIT_MASK)>>>VALUE));
423       test_srac_and(a0, a1);
425         errn += verify("test_srac_and: ", i, a0[i], (long)(((long)(ADD_INIT+i) & BIT_MASK)>>VALUE));
427       test_srav_and(a0, a1, BIT_MASK);
429         errn += verify("test_srav_and: ", i, a0[i], (long)(((long)(ADD_INIT+i) & BIT_MASK)>>VALUE));
449       test_addc(a0, a1);
455       test_addv(a0, a1, (long)VALUE);
461       test_adda(a0, a1, a2);
468       test_subc(a0, a1);
474       test_subv(a0, a1, (long)VALUE);
480       test_suba(a0, a1, a2);
487       test_mulc(a0, a1);
493       test_mulv(a0, a1, (long)VALUE);
499       test_mula(a0, a1, a2);
506       test_divc(a0, a1);
512       test_divv(a0, a1, (long)VALUE);
518       test_diva(a0, a1, a2);
525       test_mulc_n(a0, a1);
531       test_mulv(a0, a1, (long)-VALUE);
537       test_mula(a0, a1, a3);
544       test_divc_n(a0, a1);
550       test_divv(a0, a1, (long)-VALUE);
556       test_diva(a0, a1, a3);
563       test_andc(a0, a1);
569       test_andv(a0, a1, (long)BIT_MASK);
575       test_anda(a0, a1, a4);
582       test_orc(a0, a1);
588       test_orv(a0, a1, (long)BIT_MASK);
594       test_ora(a0, a1, a4);
601       test_xorc(a0, a1);
607       test_xorv(a0, a1, (long)BIT_MASK);
613       test_xora(a0, a1, a4);
620       test_sllc(a0, a1);
626       test_sllv(a0, a1, VALUE);
633       test_srlc(a0, a1);
639       test_srlv(a0, a1, VALUE);
646       test_srac(a0, a1);
652       test_srav(a0, a1, VALUE);
659       test_sllc_n(a0, a1);
665       test_sllv(a0, a1, -VALUE);
672       test_srlc_n(a0, a1);
678       test_srlv(a0, a1, -VALUE);
685       test_srac_n(a0, a1);
691       test_srav(a0, a1, -VALUE);
698       test_sllc_o(a0, a1);
704       test_sllv(a0, a1, SHIFT);
711       test_srlc_o(a0, a1);
717       test_srlv(a0, a1, SHIFT);
724       test_srac_o(a0, a1);
730       test_srav(a0, a1, SHIFT);
737       test_sllc_on(a0, a1);
743       test_sllv(a0, a1, -SHIFT);
750       test_srlc_on(a0, a1);
756       test_srlv(a0, a1, -SHIFT);
763       test_srac_on(a0, a1);
769       test_srav(a0, a1, -SHIFT);
776       test_sllc_add(a0, a1);
782       test_sllv_add(a0, a1, ADD_INIT);
789       test_srlc_add(a0, a1);
795       test_srlv_add(a0, a1, ADD_INIT);
802       test_srac_add(a0, a1);
808       test_srav_add(a0, a1, ADD_INIT);
815       test_sllc_and(a0, a1);
821       test_sllv_and(a0, a1, BIT_MASK);
828       test_srlc_and(a0, a1);
834       test_srlv_and(a0, a1, BIT_MASK);
841       test_srac_and(a0, a1);
847       test_srav_and(a0, a1, BIT_MASK);
863   static void test_addc(long[] a0, long[] a1) {
864     for (int i = 0; i < a0.length; i+=1) {
865       a0[i] = (long)(a1[i]+VALUE);
868   static void test_addv(long[] a0, long[] a1, long b) {
869     for (int i = 0; i < a0.length; i+=1) {
870       a0[i] = (long)(a1[i]+b);
873   static void test_adda(long[] a0, long[] a1, long[] a2) {
874     for (int i = 0; i < a0.length; i+=1) {
875       a0[i] = (long)(a1[i]+a2[i]);
879   static void test_subc(long[] a0, long[] a1) {
880     for (int i = 0; i < a0.length; i+=1) {
881       a0[i] = (long)(a1[i]-VALUE);
884   static void test_subv(long[] a0, long[] a1, long b) {
885     for (int i = 0; i < a0.length; i+=1) {
886       a0[i] = (long)(a1[i]-b);
889   static void test_suba(long[] a0, long[] a1, long[] a2) {
890     for (int i = 0; i < a0.length; i+=1) {
891       a0[i] = (long)(a1[i]-a2[i]);
895   static void test_mulc(long[] a0, long[] a1) {
896     for (int i = 0; i < a0.length; i+=1) {
897       a0[i] = (long)(a1[i]*VALUE);
900   static void test_mulc_n(long[] a0, long[] a1) {
901     for (int i = 0; i < a0.length; i+=1) {
902       a0[i] = (long)(a1[i]*(-VALUE));
905   static void test_mulv(long[] a0, long[] a1, long b) {
906     for (int i = 0; i < a0.length; i+=1) {
907       a0[i] = (long)(a1[i]*b);
910   static void test_mula(long[] a0, long[] a1, long[] a2) {
911     for (int i = 0; i < a0.length; i+=1) {
912       a0[i] = (long)(a1[i]*a2[i]);
916   static void test_divc(long[] a0, long[] a1) {
917     for (int i = 0; i < a0.length; i+=1) {
918       a0[i] = (long)(a1[i]/VALUE);
921   static void test_divc_n(long[] a0, long[] a1) {
922     for (int i = 0; i < a0.length; i+=1) {
923       a0[i] = (long)(a1[i]/(-VALUE));
926   static void test_divv(long[] a0, long[] a1, long b) {
927     for (int i = 0; i < a0.length; i+=1) {
928       a0[i] = (long)(a1[i]/b);
931   static void test_diva(long[] a0, long[] a1, long[] a2) {
932     for (int i = 0; i < a0.length; i+=1) {
933       a0[i] = (long)(a1[i]/a2[i]);
937   static void test_andc(long[] a0, long[] a1) {
938     for (int i = 0; i < a0.length; i+=1) {
939       a0[i] = (long)(a1[i]&BIT_MASK);
942   static void test_andv(long[] a0, long[] a1, long b) {
943     for (int i = 0; i < a0.length; i+=1) {
944       a0[i] = (long)(a1[i]&b);
947   static void test_anda(long[] a0, long[] a1, long[] a2) {
948     for (int i = 0; i < a0.length; i+=1) {
949       a0[i] = (long)(a1[i]&a2[i]);
953   static void test_orc(long[] a0, long[] a1) {
954     for (int i = 0; i < a0.length; i+=1) {
955       a0[i] = (long)(a1[i]|BIT_MASK);
958   static void test_orv(long[] a0, long[] a1, long b) {
959     for (int i = 0; i < a0.length; i+=1) {
960       a0[i] = (long)(a1[i]|b);
963   static void test_ora(long[] a0, long[] a1, long[] a2) {
964     for (int i = 0; i < a0.length; i+=1) {
965       a0[i] = (long)(a1[i]|a2[i]);
969   static void test_xorc(long[] a0, long[] a1) {
970     for (int i = 0; i < a0.length; i+=1) {
971       a0[i] = (long)(a1[i]^BIT_MASK);
974   static void test_xorv(long[] a0, long[] a1, long b) {
975     for (int i = 0; i < a0.length; i+=1) {
976       a0[i] = (long)(a1[i]^b);
979   static void test_xora(long[] a0, long[] a1, long[] a2) {
980     for (int i = 0; i < a0.length; i+=1) {
981       a0[i] = (long)(a1[i]^a2[i]);
985   static void test_sllc(long[] a0, long[] a1) {
986     for (int i = 0; i < a0.length; i+=1) {
987       a0[i] = (long)(a1[i]<<VALUE);
990   static void test_sllc_n(long[] a0, long[] a1) {
991     for (int i = 0; i < a0.length; i+=1) {
992       a0[i] = (long)(a1[i]<<(-VALUE));
995   static void test_sllc_o(long[] a0, long[] a1) {
996     for (int i = 0; i < a0.length; i+=1) {
997       a0[i] = (long)(a1[i]<<SHIFT);
1000   static void test_sllc_on(long[] a0, long[] a1) {
1001     for (int i = 0; i < a0.length; i+=1) {
1002       a0[i] = (long)(a1[i]<<(-SHIFT));
1005   static void test_sllv(long[] a0, long[] a1, int b) {
1006     for (int i = 0; i < a0.length; i+=1) {
1007       a0[i] = (long)(a1[i]<<b);
1010   static void test_sllc_add(long[] a0, long[] a1) {
1011     for (int i = 0; i < a0.length; i+=1) {
1012       a0[i] = (long)((a1[i] + ADD_INIT)<<VALUE);
1015   static void test_sllv_add(long[] a0, long[] a1, long b) {
1016     for (int i = 0; i < a0.length; i+=1) {
1017       a0[i] = (long)((a1[i] + b)<<VALUE);
1020   static void test_sllc_and(long[] a0, long[] a1) {
1021     for (int i = 0; i < a0.length; i+=1) {
1022       a0[i] = (long)((a1[i] & BIT_MASK)<<VALUE);
1025   static void test_sllv_and(long[] a0, long[] a1, long b) {
1026     for (int i = 0; i < a0.length; i+=1) {
1027       a0[i] = (long)((a1[i] & b)<<VALUE);
1031   static void test_srlc(long[] a0, long[] a1) {
1032     for (int i = 0; i < a0.length; i+=1) {
1033       a0[i] = (long)(a1[i]>>>VALUE);
1036   static void test_srlc_n(long[] a0, long[] a1) {
1037     for (int i = 0; i < a0.length; i+=1) {
1038       a0[i] = (long)(a1[i]>>>(-VALUE));
1041   static void test_srlc_o(long[] a0, long[] a1) {
1042     for (int i = 0; i < a0.length; i+=1) {
1043       a0[i] = (long)(a1[i]>>>SHIFT);
1046   static void test_srlc_on(long[] a0, long[] a1) {
1047     for (int i = 0; i < a0.length; i+=1) {
1048       a0[i] = (long)(a1[i]>>>(-SHIFT));
1051   static void test_srlv(long[] a0, long[] a1, int b) {
1052     for (int i = 0; i < a0.length; i+=1) {
1053       a0[i] = (long)(a1[i]>>>b);
1056   static void test_srlc_add(long[] a0, long[] a1) {
1057     for (int i = 0; i < a0.length; i+=1) {
1058       a0[i] = (long)((a1[i] + ADD_INIT)>>>VALUE);
1061   static void test_srlv_add(long[] a0, long[] a1, long b) {
1062     for (int i = 0; i < a0.length; i+=1) {
1063       a0[i] = (long)((a1[i] + b)>>>VALUE);
1066   static void test_srlc_and(long[] a0, long[] a1) {
1067     for (int i = 0; i < a0.length; i+=1) {
1068       a0[i] = (long)((a1[i] & BIT_MASK)>>>VALUE);
1071   static void test_srlv_and(long[] a0, long[] a1, long b) {
1072     for (int i = 0; i < a0.length; i+=1) {
1073       a0[i] = (long)((a1[i] & b)>>>VALUE);
1077   static void test_srac(long[] a0, long[] a1) {
1078     for (int i = 0; i < a0.length; i+=1) {
1079       a0[i] = (long)(a1[i]>>VALUE);
1082   static void test_srac_n(long[] a0, long[] a1) {
1083     for (int i = 0; i < a0.length; i+=1) {
1084       a0[i] = (long)(a1[i]>>(-VALUE));
1087   static void test_srac_o(long[] a0, long[] a1) {
1088     for (int i = 0; i < a0.length; i+=1) {
1089       a0[i] = (long)(a1[i]>>SHIFT);
1092   static void test_srac_on(long[] a0, long[] a1) {
1093     for (int i = 0; i < a0.length; i+=1) {
1094       a0[i] = (long)(a1[i]>>(-SHIFT));
1097   static void test_srav(long[] a0, long[] a1, int b) {
1098     for (int i = 0; i < a0.length; i+=1) {
1099       a0[i] = (long)(a1[i]>>b);
1102   static void test_srac_add(long[] a0, long[] a1) {
1103     for (int i = 0; i < a0.length; i+=1) {
1104       a0[i] = (long)((a1[i] + ADD_INIT)>>VALUE);
1107   static void test_srav_add(long[] a0, long[] a1, long b) {
1108     for (int i = 0; i < a0.length; i+=1) {
1109       a0[i] = (long)((a1[i] + b)>>VALUE);
1112   static void test_srac_and(long[] a0, long[] a1) {
1113     for (int i = 0; i < a0.length; i+=1) {
1114       a0[i] = (long)((a1[i] & BIT_MASK)>>VALUE);
1117   static void test_srav_and(long[] a0, long[] a1, long b) {
1118     for (int i = 0; i < a0.length; i+=1) {
1119       a0[i] = (long)((a1[i] & b)>>VALUE);

Indexes created Wed Jun 26 11:41:58 MDT 2024