X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2Fgmp%2Fmpn%2Fz8000x%2Fsub_n.s;fp=ghc%2Frts%2Fgmp%2Fmpn%2Fz8000x%2Fsub_n.s;h=f416d1d6eb2e38aa6cb2eb74dd1ef884d8707f11;hb=e72806f1683fc7acf7bd10885e8e45ff06d790f1;hp=9eeece69d49f8e59787824428f8fb3dc1022e70a;hpb=a6c4cc3666b15a6392279d492f87861c1f18b2de;p=ghc-hetmet.git diff --git a/ghc/rts/gmp/mpn/z8000x/sub_n.s b/ghc/rts/gmp/mpn/z8000x/sub_n.s index 9eeece6..f416d1d 100644 --- a/ghc/rts/gmp/mpn/z8000x/sub_n.s +++ b/ghc/rts/gmp/mpn/z8000x/sub_n.s @@ -1,21 +1,21 @@ -! Z8000 (32 bit limb version) __mpn_sub_n -- Subtract two limb vectors of the +! Z8000 (32 bit limb version) __gmpn_sub_n -- Subtract two limb vectors of the ! same length > 0 and store difference in a third limb vector. -! Copyright (C) 1993, 1994 Free Software Foundation, Inc. +! Copyright (C) 1993, 1994, 2000 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 Library General Public License as published by -! the Free Software Foundation; either version 2 of the License, or (at your +! 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 Library General Public +! 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 Library General Public License +! 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. @@ -34,8 +34,8 @@ segm .text even - global ___mpn_sub_n -___mpn_sub_n: + global ___gmpn_sub_n +___gmpn_sub_n: popl rr0,@r6 popl rr8,@r5 subl rr0,rr8