SCM_CLASS_FOREIGN_POINTER 2570 src/class.c static ScmClass *fpcpa[] = { SCM_CLASS_FOREIGN_POINTER, SCM_CLASS_TOP, NULL }; SCM_CLASS_FOREIGN_POINTER 2620 src/class.c if (!Scm_SubtypeP(klass, SCM_CLASS_FOREIGN_POINTER)) { SCM_CLASS_FOREIGN_POINTER 2988 src/class.c BINIT(SCM_CLASS_FOREIGN_POINTER, "<foreign-pointer>", NULL); SCM_CLASS_FOREIGN_POINTER 680 src/gauche.h #define SCM_FOREIGN_POINTER_P(obj) SCM_ISA(obj, SCM_CLASS_FOREIGN_POINTER)