Home
last modified time | relevance | path

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

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dnumber.h111 #define SG_FLONUMP(obj) (SG_IFLONUMP(obj) || SG_XTYPEP(obj, SG_CLASS_REAL))
115 (SG_IFLONUMP(obj) \
H A Dsagittariusdefs.h389 #define SG_IFLONUMP(obj) (SG_TAG4(obj) == SG_IFLONUM_TAG) macro
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dwriter.c795 else if (SG_IFLONUMP(obj)) { in write_noptr()
H A Dclos.c1366 if (SG_IFLONUMP(obj)) return SG_CLASS_REAL; in Sg_ClassOf()
H A Dnumber.c1197 if (SG_IFLONUMP(obj)) { in Sg_FlonumValue()