X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2Fgmp%2Fmpn%2Fhppa%2Fhppa1_1%2Fumul.s;fp=ghc%2Frts%2Fgmp%2Fmpn%2Fhppa%2Fhppa1_1%2Fumul.s;h=0000000000000000000000000000000000000000;hb=0065d5ab628975892cea1ec7303f968c3338cbe1;hp=1f1300ac9b75ae8bd39f9454ef88ed09eb984bd2;hpb=28a464a75e14cece5db40f2765a29348273ff2d2;p=ghc-hetmet.git diff --git a/ghc/rts/gmp/mpn/hppa/hppa1_1/umul.s b/ghc/rts/gmp/mpn/hppa/hppa1_1/umul.s deleted file mode 100644 index 1f1300a..0000000 --- a/ghc/rts/gmp/mpn/hppa/hppa1_1/umul.s +++ /dev/null @@ -1,42 +0,0 @@ -; Copyright (C) 1999 Free Software Foundation, Inc. - -; 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 the GNU Lesser General Public License as published by -; the Free Software Foundation; either version 2.1 of the License, or (at your -; option) any later version. - -; 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 Lesser General Public -; License for more details. - -; You should have received a copy of the GNU Lesser General Public License -; along with the GNU MP Library; see the file COPYING.LIB. If not, write to -; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, -; MA 02111-1307, USA. - - .code - .export __umul_ppmm - .align 4 -__umul_ppmm - .proc - .callinfo frame=64,no_calls - .entry - - ldo 64(%r30),%r30 - stw %r25,-16(0,%r30) - fldws -16(0,%r30),%fr22R - stw %r24,-16(0,%r30) - fldws -16(0,%r30),%fr22L - xmpyu %fr22R,%fr22L,%fr22 - fstds %fr22,-16(0,%r30) - ldw -16(0,%r30),%r28 - ldw -12(0,%r30),%r29 - stw %r29,0(0,%r26) - bv 0(%r2) - ldo -64(%r30),%r30 - - .exit - .procend