Lines Matching refs:SCM_FLONUMP

290                 [(and (SCM_FLONUMP ,x) (SCM_FLONUMP ,y))
672                 (and (SCM_FLONUMP v0) (== (SCM_FLONUM_VALUE v0) imm))))))))
1213      [(and (SCM_FLONUMP VAL0) (SCM_FLONUMP arg))
1227      [(and (SCM_FLONUMP arg) (SCM_FLONUMP VAL0))
1236      [(and (SCM_FLONUMP arg) (SCM_FLONUMP VAL0))
1247     (if (SCM_FLONUMP arg)
1255       (if (SCM_FLONUMP VAL0)
1267     (if (or (and (SCM_FLONUMP arg) (SCM_REALP VAL0))
1268             (and (SCM_FLONUMP VAL0) (SCM_REALP arg)))
1278      [(SCM_FLONUMP v) ($result:f (- (Scm_GetDouble v)))]
1302     (if (and (SCM_FLONUMP arg) (SCM_FLONUMP VAL0))
1310             [(SCM_FLONUMP arg)
1321             [(SCM_FLONUMP arg)