Searched refs:SG_CLASS_OF (Results 1 – 5 of 5) sorted by relevance
86 (let ((compare::SgClassCompareProc (-> (SG_CLASS_OF x) compare)))90 (let ((compare::SgClassCompareProc (-> (SG_CLASS_OF x) compare)))94 (let ((compare::SgClassCompareProc (-> (SG_CLASS_OF x) compare)))98 (let ((compare::SgClassCompareProc (-> (SG_CLASS_OF x) compare)))102 (let ((compare::SgClassCompareProc (-> (SG_CLASS_OF x) compare)))
84 if (SG_CLASS_OF(x)->compare(x, y, FALSE) == 0) { in Sg_TimeDifference()
98 (SG_HOBJP(obj)&&SG_CLASS_APPLICABLE_P(SG_CLASS_OF(obj)))
411 #define SG_CLASS_OF(obj) SG_CLASS((SG_HDR(obj)->tag- 7)) macro
1372 return SG_CLASS_OF(obj); in Sg_ClassOf()2320 if (SG_CLASS_OF(*parent) != SG_CLASS_CLASS) { in make_implicit_meta()2327 if (SG_CLASS_OF(*parent) != SG_CLASS_CLASS) { in make_implicit_meta()2328 metas[i++] = SG_CLASS_OF(*parent); in make_implicit_meta()2421 tmp = SG_CLASS_OF(oldInstance); in Sg_SwapClassAndSlots()2422 SG_SET_CLASS(oldInstance, SG_CLASS_OF(newInstance)); in Sg_SwapClassAndSlots()