diff options
Diffstat (limited to 'gmp/mpn/cray/cfp/mulwwj90.s')
| -rw-r--r-- | gmp/mpn/cray/cfp/mulwwj90.s | 253 |
1 files changed, 253 insertions, 0 deletions
diff --git a/gmp/mpn/cray/cfp/mulwwj90.s b/gmp/mpn/cray/cfp/mulwwj90.s new file mode 100644 index 0000000000..1c2c7cddbe --- /dev/null +++ b/gmp/mpn/cray/cfp/mulwwj90.s @@ -0,0 +1,253 @@ +* Helper for mpn_mul_1, mpn_addmul_1, and mpn_submul_1 for Cray PVP. + +* Copyright 1996, 2000 Free Software Foundation, Inc. +* This file is generated from mulww.f in this same directory. + +* This file is part of the GNU MP Library. +* +* The GNU MP Library is free software; you can redistribute it and/or modify +* it under the terms of either: +* +* * the GNU Lesser General Public License as published by the Free +* Software Foundation; either version 3 of the License, or (at your +* option) any later version. +* +* or +* +* * the GNU General Public License as published by the Free Software +* Foundation; either version 2 of the License, or (at your option) any +* later version. +* +* or both in parallel, as here. +* +* The GNU MP Library is distributed in the hope that it will be useful, but +* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +* or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +* for more details. +* +* You should have received copies of the GNU General Public License and the +* GNU Lesser General Public License along with the GNU MP Library. If not, +* see https://www.gnu.org/licenses/. + + IDENT GMPN_MULWW +********************************************** +* Assemble with Cal Version 2.0 * +* * +* Generated by CFT77 6.0.4.19 * +* on 06/27/00 at 04:34:13 * +* * +********************************************** +* ALLOW UNDERSCORES IN IDENTIFIERS + EDIT OFF + FORMAT NEW +@DATA SECTION DATA,CM +@DATA = W.* + CON O'0000000000040000000000 + CON O'0435152404713723252514 + CON O'0535270000000000000000 + CON O'0000000000000001200012 + VWD 32/0,32/P.GMPN_MULWW + CON O'0014003000000000001416 + CON O'0000000000000000000011 + CON O'0000000000000000000215 + BSSZ 1 +@CODE SECTION CODE +@CODE = P.* +L3 = P.* + A0 A6 + A5 6 + B03,A5 0,A0 + A0 A1+A2 + A5 1 + 0,A0 T00,A5 + B02 A2 + B66 A3 + B01 A6 + A7 P.L4 + B00 A7 + A6 @DATA + J $STKOFEN +GMPN_MULWW = P.* + A0 @DATA+3 + B77 A0 + A1 13 + A0 B66 + A2 B66 + A4 B67 + 0,A0 B77,A1 + A7 782 + A3 A2+A7 + A0 A4-A3 + JAM L3 + A0 A6 + A5 6 + B03,A5 0,A0 + A0 A1+A2 + A5 1 + 0,A0 T00,A5 + B02 A2 + B66 A3 + B01 A6 +L4 = P.* + A7 B07 + S7 0,A7 + A6 B10 + S6 0,A6 + S5 1 + S4 <22 + S7 S7-S5 + S5 #S7 + T00 S6 + S6 S6>22 + S7 T00 + S7 S7>44 + S3 T00 + S3 S3&S4 + S6 S6&S4 + S7 S7&S4 + S3 S3<24 + S6 S6<24 + S7 S7<24 + S0 S5 + S4 S5 + S1 S6 + S2 S3 + S3 S7 + JSP L5 +L6 = P.* + S7 -S4 + A2 S7 + VL A2 + A3 B06 + A5 B05 + A4 B04 + A1 VL + A2 S4 +L7 = P.* + A0 A3 + VL A1 + V7 ,A0,1 + B11 A5 + A7 22 + B12 A4 + V6 V7>A7 + B13 A3 + S7 <22 + A3 B02 + V5 S7&V6 + A6 24 + V4 V5<A6 + V3 S1*FV4 + V2 S7&V7 + V1 V2<A6 + V0 S3*FV1 + V6 V0+V3 + A5 44 + V5 V7>A5 + V2 S1*FV1 + V3 S7&V5 + A0 14 + B77 A0 + A4 B77 + A0 A4+A3 + ,A0,1 V2 + V0 V3<A6 + V7 S2*FV1 + A4 142 + A0 A4+A3 + ,A0,1 V7 + V5 V7>A7 + V2 S2*FV0 + V3 V6+V2 + S7 <20 + V1 S7&V3 + A4 270 + A0 A4+A3 + ,A0,1 V0 + A4 14 + A0 A4+A3 + V7 ,A0,1 + V6 V1<A7 + V2 S2*FV4 + V0 V7+V2 + S7 <42 + V1 S7&V0 + A4 398 + A0 A4+A3 + ,A0,1 V0 + V7 S3*FV4 + V2 V5+V1 + V0 V3<A5 + A5 526 + A0 A5+A3 + ,A0,1 V0 + A5 270 + A0 A5+A3 + V4 ,A0,1 + V5 V2+V6 + A5 20 + V1 V3>A5 + V0 S1*FV4 + A5 654 + A0 A5+A3 + ,A0,1 V1 + V6 V7+V0 + A5 2 + V2 V6<A5 + V3 S3*FV4 + A5 142 + A0 A5+A3 + V1 ,A0,1 + A5 526 + A0 A5+A3 + V7 ,A0,1 + V0 V1+V7 + V6 V3<A6 + V4 V6+V2 + A6 42 + V7 V5>A6 + A5 654 + A0 A5+A3 + V1 ,A0,1 + A5 398 + A0 A5+A3 + V3 ,A0,1 + V6 V4+V1 + V2 V3>A6 + V5 V6+V2 + A6 B12 + V4 V3<A7 + A7 B13 + A3 A7+A1 + A7 B11 + A5 A7+A1 + A4 A6+A1 + A7 A2+A1 + A0 A2+A1 + A2 64 + B13 A0 + V1 V0+V4 + A0 B11 + ,A0,1 V1 + V6 V5+V7 + A0 A6 + ,A0,1 V6 + A0 B13 + A1 A2 + A2 A7 + JAN L7 +L8 = P.* +L5 = P.* + S1 0 + A0 B02 + A2 B02 + A1 13 + B66 A0 + B77,A1 0,A0 + A0 A2+A1 + A1 1 + T00,A1 0,A0 + J B00 + EXT $STKOFEN:p + ENTRY GMPN_MULWW + END |