/haiku-buildtools/gcc/mpc/tests/ |
H A D | tprec.c | 28 mpfr_prec_t prec, pr, pi; local 32 for (prec = 2; prec <= 1000; prec++) 35 mpfr_set_prec (mpc_realref (z), prec); local 36 mpfr_set_prec (mpc_imagref (z), prec + 1); local 39 printf ("Error in mpc_get_prec for prec (re) = %lu, " 40 "prec (im) = %lu\n", (unsigned long int) prec, 41 (unsigned long int) prec [all...] |
H A D | tadd_si.c | 27 mpfr_prec_t prec; local 33 for (prec=2; prec <= 1024; prec++) { 34 mpc_set_prec (z, prec); 45 mpc_mul_2ui (z, z, (unsigned long int) prec, MPC_RNDNN); 47 printf ("Error in mpc_add_si: 2^(prec+1)-1 cannot be exact\n");
|
H A D | tadd_ui.c | 27 mpfr_prec_t prec; local 32 for (prec=2; prec <= 1024; prec++) 34 mpc_set_prec (z, prec); 44 mpc_mul_2ui (z, z, (unsigned long int) prec, MPC_RNDNN); 47 printf ("Error in mpc_add_ui: 2^prec+1 cannot be exact\n");
|
H A D | tadd.c | 28 mpfr_prec_t prec; local 34 for (prec = 2; prec <= 1000; prec++) 36 mpc_set_prec (x, prec); 37 mpc_set_prec (y, prec); 40 mpc_mul_2ui (x, x, (unsigned long int) prec, MPC_RNDNN); 45 fprintf (stderr, "Error in mpc_add: 2^(-prec)+1 cannot be exact\n");
|
H A D | tadd_fr.c | 27 mpfr_prec_t prec; local 34 for (prec = 2; prec < prec_max; prec += step) 36 mpc_set_prec (z, prec); 37 mpfr_set_prec (f, prec); 48 mpc_mul_2ui (z, z, (unsigned long int) prec, MPC_RNDNN); 51 fprintf (stderr, "Error in mpc_add_fr: 2^prec+1 cannot be exact\n");
|
H A D | tpow.c | 29 mp_prec_t prec = 2; local 31 for (prec = 2; prec <= 20; prec ++) 33 mpc_init2 (x, prec); 34 mpc_init2 (y, prec); 35 mpc_init2 (z, prec);
|
/haiku-buildtools/gcc/mpc/src/ |
H A D | init2.c | 24 mpc_init2 (mpc_t x, mpfr_prec_t prec) argument 26 mpfr_init2 (mpc_realref(x), prec); local 27 mpfr_init2 (mpc_imagref(x), prec); local
|
H A D | set_prec.c | 24 mpc_set_prec (mpc_t x, mpfr_prec_t prec) argument 26 mpfr_set_prec (mpc_realref(x), prec); local 27 mpfr_set_prec (mpc_imagref(x), prec); local
|
/haiku-buildtools/gcc/mpfr/src/ |
H A D | set_dfl_prec.c | 30 mpfr_set_default_prec (mpfr_prec_t prec) argument 32 MPFR_ASSERTN (prec >= MPFR_PREC_MIN && prec <= MPFR_PREC_MAX); 33 __gmpfr_default_fp_bit_precision = prec;
|
H A D | fits_u.h | 29 int prec; local 42 (b) round(f, prec(slong), rnd) <= MAXIMUM */ 46 /* first compute prec(MAXIMUM); fits in an int */ 47 for (s = MAXIMUM, prec = 0; s != 0; s /= 2, prec ++); 49 /* MAXIMUM needs prec bits, i.e. MAXIMUM = 2^prec - 1 */ 51 /* if e <= prec - 1, then f < 2^(prec-1) < MAXIMUM */ 52 if (e <= prec [all...] |
H A D | fits_uintmax.c | 37 int prec; local 50 (b) round(f, prec(slong), rnd) <= MAXIMUM */ 54 /* first compute prec(MAXIMUM); fits in an int */ 55 for (s = MPFR_UINTMAX_MAX, prec = 0; s != 0; s /= 2, prec ++); 57 /* MAXIMUM needs prec bits, i.e. MAXIMUM = 2^prec - 1 */ 59 /* if e <= prec - 1, then f < 2^(prec-1) < MAXIMUM */ 60 if (e <= prec [all...] |
H A D | fits_intmax.c | 37 int prec; local 48 (b) or MINIMUM <= round(f, prec(slong), rnd) <= MAXIMUM */ 58 /* first compute prec(EXTREMUM), this could be done at configure time, 60 to give the compiler a better chance to compute prec statically) */ 66 for (prec = 0; s != 0; s /= 2, prec ++); 72 for (prec = 0; s != 0; s /= 2, prec ++); 75 /* EXTREMUM needs prec bits, i.e. 2^(prec [all...] |
H A D | fits_s.h | 33 int prec; local 44 (b) or MINIMUM <= round(f, prec(slong), rnd) <= MAXIMUM */ 54 /* first compute prec(EXTREMUM), this could be done at configure time, 56 to give the compiler a better chance to compute prec statically) */ 62 for (prec = 0; s != 0; s /= 2, prec ++); 68 for (prec = 0; s != 0; s /= 2, prec ++); 71 /* EXTREMUM needs prec bits, i.e. 2^(prec [all...] |
/haiku-buildtools/gcc/gmp/mpf/ |
H A D | init.c | 26 mp_size_t prec = __gmp_default_fp_limb_precision; local 29 r->_mp_prec = prec; 30 r->_mp_d = (mp_ptr) (*__gmp_allocate_func) ((prec + 1) * BYTES_PER_MP_LIMB);
|
H A D | iset_d.c | 26 mp_size_t prec = __gmp_default_fp_limb_precision; local 27 r->_mp_prec = prec; 28 r->_mp_d = (mp_ptr) (*__gmp_allocate_func) ((prec + 1) * BYTES_PER_MP_LIMB);
|
H A D | init2.c | 26 mp_size_t prec; local 28 prec = __GMPF_BITS_TO_PREC (prec_in_bits); 31 r->_mp_prec = prec; 32 r->_mp_d = (mp_ptr) (*__gmp_allocate_func) ((prec + 1) * BYTES_PER_MP_LIMB);
|
H A D | iset.c | 28 mp_size_t prec; local 30 prec = __gmp_default_fp_limb_precision; 31 r->_mp_d = (mp_ptr) (*__gmp_allocate_func) ((prec + 1) * BYTES_PER_MP_LIMB); 32 r->_mp_prec = prec; 34 prec++; /* lie not to lose precision in assignment */ 41 if (size > prec) 43 sp += size - prec; 44 size = prec;
|
H A D | iset_str.c | 26 mp_size_t prec = __gmp_default_fp_limb_precision; local 29 r->_mp_prec = prec; 30 r->_mp_d = (mp_ptr) (*__gmp_allocate_func) ((prec + 1) * BYTES_PER_MP_LIMB);
|
H A D | abs.c | 31 mp_size_t prec; local 34 prec = r->_mp_prec + 1; /* lie not to lose precision in assignment */ 38 if (size > prec) 40 up += size - prec; 41 size = prec;
|
H A D | neg.c | 31 mp_size_t prec; local 35 prec = r->_mp_prec + 1; /* lie not to lose precision in assignment */ 40 if (asize > prec) 42 up += asize - prec; 43 asize = prec;
|
H A D | set.c | 28 mp_size_t prec; local 30 prec = r->_mp_prec + 1; /* lie not to lose precision in assignment */ 36 if (asize > prec) 38 up += asize - prec; 39 asize = prec;
|
H A D | set_z.c | 28 mp_size_t prec; local 30 prec = PREC (r) + 1; 38 if (asize > prec) 40 up += asize - prec; 41 asize = prec;
|
H A D | mul.c | 29 mp_size_t prec = r->_mp_prec; local 42 if (usize > prec) 44 up += usize - prec; 45 usize = prec; 47 if (vsize > prec) 49 vp += vsize - prec; 50 vsize = prec; 73 prec++; 74 if (rsize > prec) 76 tp += rsize - prec; [all...] |
/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/graphite/ |
H A D | id-3.f90 | 3 prec: do 14 enddo prec
|
/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/ |
H A D | elemental_args_check_1.f90 | 11 integer, parameter :: prec = 8 variable in module:geometry 15 real(kind=prec) :: a 16 real(kind=prec) :: b, Mul 22 real(kind=prec), dimension(:) :: vectors 23 real(kind=prec), dimension(size(vectors),2) :: angles 25 real(kind=prec), dimension(size(vectors)) :: ax 26 real(kind=prec), dimension(size(vectors),2) :: tmpAcc
|