diff options
author | Kevin Ryde <user42@zip.com.au> | 2001-10-02 01:07:29 +0200 |
---|---|---|
committer | Kevin Ryde <user42@zip.com.au> | 2001-10-02 01:07:29 +0200 |
commit | 9edc48e967f743b5438c9c47a481ded5f8c50069 (patch) | |
tree | ec6d1dd83810096b882734972ac60e4d2224de2d /mpz | |
parent | 04aae3a0d04bfae2233bfac59e9623a45f1fc31b (diff) | |
download | gmp-9edc48e967f743b5438c9c47a481ded5f8c50069.tar.gz |
* mpz/mul_i.h: Renamed from mpz/mul_siui.c.
Diffstat (limited to 'mpz')
-rw-r--r-- | mpz/mul_siui.c | 76 |
1 files changed, 0 insertions, 76 deletions
diff --git a/mpz/mul_siui.c b/mpz/mul_siui.c deleted file mode 100644 index bd40a4ae7..000000000 --- a/mpz/mul_siui.c +++ /dev/null @@ -1,76 +0,0 @@ -/* mpz_mul_ui/si (product, multiplier, small_multiplicand) -- Set PRODUCT to - MULTIPLICATOR times SMALL_MULTIPLICAND. - -Copyright 1991, 1993, 1994, 1996, 2000, 2001 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" - - -#ifdef OPERATION_mul_si -#define FUNCTION mpz_mul_si -#define MULTIPLICAND_UNSIGNED -#define MULTIPLICAND_ABS(x) ((unsigned long) ABS(x)) -#endif - -#ifdef OPERATION_mul_ui -#define FUNCTION mpz_mul_ui -#define MULTIPLICAND_UNSIGNED unsigned -#define MULTIPLICAND_ABS(x) x -#endif - -#ifndef FUNCTION -Error, error, unrecognised OPERATION -#endif - - -void -FUNCTION (mpz_ptr prod, mpz_srcptr mult, - MULTIPLICAND_UNSIGNED long int small_mult) -{ - mp_size_t size = mult->_mp_size; - mp_size_t sign_product = size; - mp_limb_t cy; - mp_size_t prod_size; - mp_ptr prod_ptr; - - if (size == 0 || small_mult == 0) - { - prod->_mp_size = 0; - return; - } - size = ABS (size); - - prod_size = size + 1; - if (prod->_mp_alloc < prod_size) - _mpz_realloc (prod, prod_size); - - prod_ptr = prod->_mp_d; - - cy = mpn_mul_1 (prod_ptr, mult->_mp_d, size, - (mp_limb_t) MULTIPLICAND_ABS (small_mult)); - if (cy != 0) - { - prod_ptr[size] = cy; - size++; - } - - prod->_mp_size = ((sign_product < 0) ^ (small_mult < 0)) ? -size : size; -} |