SCM_FLONUMP 715 src/bignum.c if (SCM_FLONUMP(v) || SCM_COMPLEXP(v)) { SCM_FLONUMP 738 src/bignum.c if (SCM_FLONUMP(v) || SCM_COMPLEXP(v)) { SCM_FLONUMP 909 src/bignum.c if (SCM_FLONUMP(v) || SCM_COMPLEXP(v)) { SCM_FLONUMP 265 src/extlib.c SCM_RESULT = SCM_FLONUMP(x); SCM_FLONUMP 303 src/extlib.c else if (!SCM_FLONUMP(x)) { SCM_FLONUMP 308 src/extlib.c } else if (SCM_FLONUMP(min)) { SCM_FLONUMP 316 src/extlib.c } else if (SCM_FLONUMP(max)) { SCM_FLONUMP 338 src/extlib.c if (SCM_FLONUMP(num)) { SCM_FLONUMP 1979 src/gauche.h #define SCM_REALP(obj) (SCM_INTEGERP(obj)||SCM_FLONUMP(obj)) SCM_FLONUMP 1982 src/gauche.h #define SCM_INEXACTP(obj) (SCM_FLONUMP(obj)||SCM_COMPLEXP(obj)) SCM_FLONUMP 138 src/hash.c } else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 341 src/number.c else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 374 src/number.c else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 523 src/number.c if (SCM_FLONUMP(obj)) { SCM_FLONUMP 544 src/number.c if (SCM_FLONUMP(obj)) { SCM_FLONUMP 588 src/number.c if (SCM_FLONUMP(obj)) { SCM_FLONUMP 616 src/number.c if (SCM_FLONUMP(obj)) { SCM_FLONUMP 646 src/number.c if (SCM_FLONUMP(obj)) return SCM_FLONUM_VALUE(obj); SCM_FLONUMP 661 src/number.c if (SCM_FLONUMP(obj)) { SCM_FLONUMP 680 src/number.c if (SCM_FLONUMP(obj) && Scm_IntegerP(obj)) { SCM_FLONUMP 700 src/number.c } else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 726 src/number.c } else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 750 src/number.c } else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 769 src/number.c } else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 796 src/number.c } else if (!SCM_FLONUMP(obj) && !SCM_COMPLEXP(obj)) { SCM_FLONUMP 804 src/number.c if (SCM_FLONUMP(obj)) { SCM_FLONUMP 839 src/number.c if (SCM_FLONUMP(obj)) return obj; SCM_FLONUMP 850 src/number.c if (SCM_FLONUMP(obj)) SCM_FLONUMP 899 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 927 src/number.c if (SCM_FLONUMP(arg0)) { SCM_FLONUMP 935 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 959 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1004 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1027 src/number.c if (SCM_FLONUMP(arg0)) { SCM_FLONUMP 1035 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1059 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1108 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1131 src/number.c if (SCM_FLONUMP(arg0)) { SCM_FLONUMP 1139 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1165 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1234 src/number.c if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1246 src/number.c if (SCM_FLONUMP(arg0)) { SCM_FLONUMP 1255 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1283 src/number.c } else if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1332 src/number.c if (SCM_FLONUMP(y)) { SCM_FLONUMP 1349 src/number.c } else if (SCM_FLONUMP(y)) { SCM_FLONUMP 1356 src/number.c } else if (SCM_FLONUMP(x)) { SCM_FLONUMP 1363 src/number.c } else if (SCM_FLONUMP(y)) { SCM_FLONUMP 1424 src/number.c if (SCM_FLONUMP(y)) { SCM_FLONUMP 1457 src/number.c if (SCM_FLONUMP(y)) { SCM_FLONUMP 1463 src/number.c } else if (SCM_FLONUMP(x)) { SCM_FLONUMP 1471 src/number.c } else if (SCM_FLONUMP(y)) { SCM_FLONUMP 1616 src/number.c if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1627 src/number.c else if (SCM_FLONUMP(arg0)) { SCM_FLONUMP 1634 src/number.c if (SCM_FLONUMP(arg1)) { SCM_FLONUMP 1649 src/number.c if (SCM_FLONUMP(arg1)) SCM_FLONUMP 1732 src/number.c if (!SCM_FLONUMP(num)) SCM_FLONUMP 2131 src/number.c } else if (SCM_FLONUMP(obj)) { SCM_FLONUMP 2472 src/number.c if (ctx->exactness == INEXACT && !SCM_FLONUMP(ratval)) { SCM_FLONUMP 1121 src/stdlib.c else if (SCM_FLONUMP(z)) { SCM_RETURN(Scm_Values2(z, Scm_MakeFlonum(0.0))); } SCM_FLONUMP 896 src/system.c } else if (SCM_FLONUMP(t)) { SCM_FLONUMP 1343 src/system.c } else if (SCM_FLONUMP(timeout)) { SCM_FLONUMP 689 src/vm.c } else if (SCM_FLONUMP(y_) && SCM_FLONUMP(x_)) { \ SCM_FLONUMP 1471 src/vm.c || (SCM_FLONUMP(v0) && SCM_FLONUM_VALUE(v0) == imm)) { SCM_FLONUMP 2094 src/vm.c } else if (SCM_FLONUMP(VAL0) && SCM_FLONUMP(arg)) { SCM_FLONUMP 2172 src/vm.c if ((SCM_FLONUMP(arg) && SCM_REALP(VAL0)) SCM_FLONUMP 2173 src/vm.c ||(SCM_FLONUMP(VAL0) && SCM_REALP(arg))) { SCM_FLONUMP 2187 src/vm.c if ((SCM_FLONUMP(arg) && SCM_REALP(VAL0)) SCM_FLONUMP 2188 src/vm.c ||(SCM_FLONUMP(VAL0) && SCM_REALP(arg))) { SCM_FLONUMP 2206 src/vm.c } else if (SCM_FLONUMP(v)) { SCM_FLONUMP 682 src/write.c if (SCM_FLONUMP(arg)) arg = Scm_InexactToExact(arg); SCM_FLONUMP 1044 src/write.c SCM_ASSERT(SCM_FLONUMP(val));