SCM_TAG           187 src/gauche.h   #define SCM_PTRP(obj)    (SCM_TAG(obj) == 0)
SCM_TAG           237 src/gauche.h   #define SCM_INTP(obj)        (SCM_TAG(obj) == 1)
SCM_TAG           292 src/gauche.h   #define SCM_HOBJP(obj)  (SCM_PTRP(obj)&&SCM_TAG(SCM_OBJ(obj)->tag)==3)
SCM_TAG           747 src/gauche.h   #define SCM_PAIRP(obj)  (SCM_PTRP(obj)&&SCM_TAG(SCM_OBJ(obj)->tag)!=0x03)