SCM_COMPLEXP 715 src/bignum.c if (SCM_FLONUMP(v) || SCM_COMPLEXP(v)) { SCM_COMPLEXP 738 src/bignum.c if (SCM_FLONUMP(v) || SCM_COMPLEXP(v)) { SCM_COMPLEXP 909 src/bignum.c if (SCM_FLONUMP(v) || SCM_COMPLEXP(v)) { SCM_COMPLEXP 1980 src/gauche.h #define SCM_NUMBERP(obj) (SCM_REALP(obj)||SCM_COMPLEXP(obj)) SCM_COMPLEXP 1982 src/gauche.h #define SCM_INEXACTP(obj) (SCM_FLONUMP(obj)||SCM_COMPLEXP(obj)) SCM_COMPLEXP 287 src/number.c } else if (!SCM_COMPLEXP(z)) { SCM_COMPLEXP 303 src/number.c } else if (!SCM_COMPLEXP(z)) { SCM_COMPLEXP 667 src/number.c if (SCM_COMPLEXP(obj)) return FALSE; SCM_COMPLEXP 703 src/number.c } else if (SCM_COMPLEXP(obj)) { SCM_COMPLEXP 752 src/number.c } else if (SCM_COMPLEXP(obj)) { SCM_COMPLEXP 772 src/number.c } else if (SCM_COMPLEXP(obj)) { SCM_COMPLEXP 796 src/number.c } else if (!SCM_FLONUMP(obj) && !SCM_COMPLEXP(obj)) { SCM_COMPLEXP 811 src/number.c } else if (SCM_COMPLEXP(obj)) { SCM_COMPLEXP 852 src/number.c if (SCM_COMPLEXP(obj)) return obj; SCM_COMPLEXP 902 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 937 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 950 src/number.c if (SCM_COMPLEXP(arg0)) { SCM_COMPLEXP 961 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1007 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1037 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1050 src/number.c if (SCM_COMPLEXP(arg0)) { SCM_COMPLEXP 1061 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1111 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1141 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1153 src/number.c if (SCM_COMPLEXP(arg0)) { SCM_COMPLEXP 1168 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1239 src/number.c if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1258 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1272 src/number.c if (SCM_COMPLEXP(arg0)) { SCM_COMPLEXP 1285 src/number.c } else if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1592 src/number.c if (SCM_COMPLEXP(arg0)) { SCM_COMPLEXP 1593 src/number.c if (SCM_COMPLEXP(arg1)) { SCM_COMPLEXP 1599 src/number.c if (SCM_COMPLEXP(arg1)) return FALSE; SCM_COMPLEXP 2134 src/number.c } else if (SCM_COMPLEXP(obj)) { SCM_COMPLEXP 372 src/stdlib.c if (SCM_COMPLEXP(obj)) { SCM_COMPLEXP 1122 src/stdlib.c else if (!SCM_COMPLEXP(z)) { SCM_COMPLEXP 1142 src/stdlib.c SCM_ASSERT(SCM_COMPLEXP(z)); SCM_COMPLEXP 1161 src/stdlib.c SCM_ASSERT(SCM_COMPLEXP(z));