Searched refs:sexp_ratiop (Results 1 – 6 of 6) sorted by relevance
/dports/lang/chibi-scheme/chibi-scheme-0.10/ |
H A D | eval.c | 1501 else if (sexp_ratiop(z)) d = sexp_ratio_to_double(ctx, z); 1562 if (sexp_ratiop(q)) return f(ctx, q); in define_math_op() 1691 if (sexp_ratiop(z)) { in sexp_sqrt() 1756 else if (sexp_ratiop(x)) { in sexp_expt_op() 1771 else if (sexp_ratiop(e)) in sexp_expt_op() 1799 sexp_assert_type(ctx, sexp_ratiop, SEXP_RATIO, rat); in sexp_ratio_numerator_op() 1803 sexp_assert_type(ctx, sexp_ratiop, SEXP_RATIO, rat); in sexp_ratio_denominator_op() 1833 else if (sexp_ratiop(i)) in sexp_exact_to_inexact()
|
H A D | bignum.c | 961 else if (sexp_ratiop(x)) in sexp_to_double() 1056 } else if (sexp_ratiop(x)) { in sexp_to_complex() 1456 if (sexp_ratiop(r)) { in sexp_sub() 1664 if (!sexp_ratiop(a)) in sexp_div() 1684 if (sexp_ratiop(a)) in sexp_div()
|
H A D | sexp.c | 3340 else if (sexp_ratiop(res)) in sexp_read_raw() 3623 if (sexp_ratiop(res)) { in sexp_read_raw()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/srfi/95/ |
H A D | qsort.c | 73 (sexp_flonump(x) || sexp_bignump(x) || sexp_ratiop(x))
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/include/chibi/ |
H A D | sexp.h | 840 #define sexp_ratiop(x) (sexp_check_tag(x, SEXP_RATIO)) macro 842 #define sexp_ratiop(x) 0 macro 1013 #define sexp_exactp(x) (sexp_exact_integerp(x) || sexp_ratiop(x)) 1021 #define sexp_realp(x) (sexp_exact_integerp(x) || sexp_flonump(x) || sexp_ratiop(x)) 1236 #define sexp_ratio_numerator(q) (sexp_pred_field(q, ratio, sexp_ratiop, numerator)) 1237 #define sexp_ratio_denominator(q) (sexp_pred_field(q, ratio, sexp_ratiop, denominator))
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/srfi/18/ |
H A D | threads.c | 182 } else if (sexp_ratiop(timeout)) { in sexp_insert_timed()
|