Home
last modified time | relevance | path

Searched refs:SG_COMPLEXP (Results 1 – 5 of 5) sorted by relevance

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dnumber.c1386 if (SG_COMPLEXP(obj)) { in Sg_ZeroP()
1474 if (SG_COMPLEXP(n)) { in Sg_RealValuedP()
1489 if (SG_COMPLEXP(n)) { in Sg_RationalValuedP()
1499 if (SG_COMPLEXP(n)) { in Sg_IntegerValuedP()
1525 if (SG_COMPLEXP(obj)) { in Sg_Negate()
1646 if (SG_COMPLEXP(obj)) { in Sg_ExactP()
1658 if (SG_COMPLEXP(obj)) { in Sg_InexactP()
2654 if (SG_COMPLEXP(y)) { in expt_body()
2855 if (SG_COMPLEXP(ans)) { in Sg_Asin()
2916 if (SG_COMPLEXP(x)) { in Sg_NumEq()
[all …]
H A Dcompare.c387 if (SG_COMPLEXP(x) && SG_COMPLEXP(y)) { in eqv_internal()
H A Dlib_core.stub289 (cond ((SG_COMPLEXP r)
297 (cond ((SG_COMPLEXP r)
H A Dlib_core.c2111 if (SG_COMPLEXP(r)){ in core_real_part()
2140 if (SG_COMPLEXP(r)){ in core_imag_part()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dnumber.h81 #define SG_COMPLEXP(obj) SG_XTYPEP(obj, SG_CLASS_COMPLEX) macro
132 #define SG_NUMBERP(obj) (SG_REALP(obj) || SG_COMPLEXP(obj))