diff options
author | Ian Lynagh <igloo@earth.li> | 2007-07-05 21:52:40 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2007-07-05 21:52:40 +0000 |
commit | fdf1cd0399158308769fcb2ab7e46e215a68d865 (patch) | |
tree | f6681f1e4c419db48133e66e2279255b6d4cb17e /rts/gmp/mpz/init.c | |
parent | e552cfc427d2734b9a9629f2ab1d22f493e775f6 (diff) | |
download | haskell-fdf1cd0399158308769fcb2ab7e46e215a68d865.tar.gz |
Update the in-tree GMP; fixes trac #832
gmp is now in a top-level directory and we only have the tarball in the
darcs repo. It gets untarred if it is needed.
Diffstat (limited to 'rts/gmp/mpz/init.c')
-rw-r--r-- | rts/gmp/mpz/init.c | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/rts/gmp/mpz/init.c b/rts/gmp/mpz/init.c deleted file mode 100644 index 2e8e4d2cbd..0000000000 --- a/rts/gmp/mpz/init.c +++ /dev/null @@ -1,36 +0,0 @@ -/* mpz_init() -- Make a new multiple precision number with value 0. - -Copyright (C) 1991, 1993, 1994, 1995 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. */ - -#include "gmp.h" -#include "gmp-impl.h" - -void -#if __STDC__ -mpz_init (mpz_ptr x) -#else -mpz_init (x) - mpz_ptr x; -#endif -{ - x->_mp_alloc = 1; - x->_mp_d = (mp_ptr) (*_mp_allocate_func) (BYTES_PER_MP_LIMB); - x->_mp_size = 0; -} |