Home | History | Annotate | Download | only in mpf

Lines Matching refs:trunc

42 check_one (mpf_srcptr src, mpf_srcptr trunc, mpf_srcptr ceil, mpf_srcptr floor)
46   mpf_init2 (got, mpf_get_prec (trunc));
47   ASSERT_ALWAYS (PREC(got) == PREC(trunc));
62   CHECK_SEP ("mpf_trunc", mpf_trunc, trunc);
77   CHECK_INPLACE ("mpf_trunc", mpf_trunc, trunc);
81   if (mpf_size (src) <= PREC(trunc)+1)
91 check_all (mpf_ptr src, mpf_ptr trunc, mpf_ptr ceil, mpf_ptr floor)
95   MPF_CHECK_FORMAT (trunc);
99   check_one (src, trunc, ceil, floor);
102   mpf_neg (trunc, trunc);
105   check_one (src, trunc, floor, ceil);
111   mpf_t  src, trunc, ceil, floor;
115   mpf_init2 (trunc, 256L);
121   mpf_set_ui (trunc, 0L);
124   check_all (src, trunc, ceil, floor);
128   mpf_set_ui (trunc, 1L);
131   check_all (src, trunc, ceil, floor);
136   mpf_set (trunc, src);
139   check_all (src, trunc, ceil, floor);
144   mpf_set_si (trunc, 0L);
147   check_all (src, trunc, ceil, floor);
152   mpf_set_si (trunc, 0L);
155   check_all (src, trunc, ceil, floor);
161   mpf_set_si (trunc, 123L);
164   check_all (src, trunc, ceil, floor);
167   n = PREC(trunc)+1;
173   mpf_set (trunc, src);
176   check_all (src, trunc, ceil, floor);
179   n = PREC(trunc)+1;
185   EXP(trunc) = n-1;
186   SIZ(trunc) = n-1;
187   for (i = 0; i < SIZ(trunc); i++)
188     PTR(trunc)[i] = i+201;
189   mpf_set (floor, trunc);
190   mpf_add_ui (ceil, trunc, 1L);
191   check_all (src, trunc, ceil, floor);
194   n = PREC(trunc)+3;
200   EXP(trunc) = n;
201   SIZ(trunc) = n-2;
202   for (i = 0; i < SIZ(trunc); i++)
203     PTR(trunc)[i] = i+302;
204   mpf_set (floor, trunc);
205   mpf_set (ceil, trunc);
207   check_all (src, trunc, ceil, floor);
210   n = PREC(trunc)+4;
216   EXP(trunc) = n-1;
217   SIZ(trunc) = n-3;
218   for (i = 0; i < SIZ(trunc); i++)
219     PTR(trunc)[i] = i+403;
220   mpf_set (floor, trunc);
221   mpf_set (ceil, trunc);
223   check_all (src, trunc, ceil, floor);
230   EXP(trunc) = 1;
231   SIZ(trunc) = 1;
232   PTR(trunc)[0] = GMP_NUMB_MAX;
233   mpf_set (floor, trunc);
237   check_all (src, trunc, ceil, floor);
245   EXP(trunc) = 2;
246   SIZ(trunc) = 2;
247   PTR(trunc)[0] = GMP_NUMB_MAX;
248   PTR(trunc)[1] = GMP_NUMB_MAX;
249   mpf_set (floor, trunc);
253   check_all (src, trunc, ceil, floor);
256   mpf_clear (trunc);