Home | History | Annotate | Line # | Download | only in mpq
      1      1.1  mrg /* mpq_init -- Make a new rational number with value 0/1.
      2      1.1  mrg 
      3  1.1.1.4  mrg Copyright 1991, 1994, 1995, 2000-2002, 2015, 2018 Free Software
      4  1.1.1.4  mrg Foundation, Inc.
      5      1.1  mrg 
      6      1.1  mrg This file is part of the GNU MP Library.
      7      1.1  mrg 
      8      1.1  mrg The GNU MP Library is free software; you can redistribute it and/or modify
      9  1.1.1.3  mrg it under the terms of either:
     10  1.1.1.3  mrg 
     11  1.1.1.3  mrg   * the GNU Lesser General Public License as published by the Free
     12  1.1.1.3  mrg     Software Foundation; either version 3 of the License, or (at your
     13  1.1.1.3  mrg     option) any later version.
     14  1.1.1.3  mrg 
     15  1.1.1.3  mrg or
     16  1.1.1.3  mrg 
     17  1.1.1.3  mrg   * the GNU General Public License as published by the Free Software
     18  1.1.1.3  mrg     Foundation; either version 2 of the License, or (at your option) any
     19  1.1.1.3  mrg     later version.
     20  1.1.1.3  mrg 
     21  1.1.1.3  mrg or both in parallel, as here.
     22      1.1  mrg 
     23      1.1  mrg The GNU MP Library is distributed in the hope that it will be useful, but
     24      1.1  mrg WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
     25  1.1.1.3  mrg or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
     26  1.1.1.3  mrg for more details.
     27      1.1  mrg 
     28  1.1.1.3  mrg You should have received copies of the GNU General Public License and the
     29  1.1.1.3  mrg GNU Lesser General Public License along with the GNU MP Library.  If not,
     30  1.1.1.3  mrg see https://www.gnu.org/licenses/.  */
     31      1.1  mrg 
     32      1.1  mrg #include "gmp-impl.h"
     33      1.1  mrg 
     34      1.1  mrg void
     35  1.1.1.3  mrg mpq_init (mpq_t x)
     36      1.1  mrg {
     37  1.1.1.4  mrg   static const mp_limb_t dummy_limb=0xc1a0;
     38  1.1.1.4  mrg   ALLOC(NUM(x)) = 0;
     39  1.1.1.4  mrg   PTR(NUM(x)) = (mp_ptr) &dummy_limb;
     40  1.1.1.2  mrg   SIZ(NUM(x)) = 0;
     41  1.1.1.2  mrg   ALLOC(DEN(x)) = 1;
     42  1.1.1.3  mrg   PTR(DEN(x)) = __GMP_ALLOCATE_FUNC_LIMBS (1);
     43  1.1.1.2  mrg   PTR(DEN(x))[0] = 1;
     44  1.1.1.2  mrg   SIZ(DEN(x)) = 1;
     45      1.1  mrg }
     46