SCM_HOBJP 2836 src/class.c SCM_ASSERT(SCM_HOBJP(a)); SCM_HOBJP 2243 src/gauche.h (SCM_HOBJP(obj) && SCM_CLASS_APPLICABLE_P(SCM_CLASS_OF(obj)))