sub 34 gc/mach_dep.c sub.w #4,sp // reserve space for one parameter. sub 192 gc/mach_dep.c sub.w #4,sp ; reserve space for one parameter. sub 810 src/class.c int Scm_SubtypeP(ScmClass *sub, ScmClass *type) sub 813 src/class.c if (sub == type) return TRUE; sub 815 src/class.c p = sub->cpa; sub 988 src/class.c void Scm_AddDirectSubclass(ScmClass *super, ScmClass *sub) sub 991 src/class.c ScmObj p = Scm_Cons(SCM_OBJ(sub), SCM_NIL); sub 994 src/class.c if (SCM_FALSEP(Scm_Memq(super->directSubclasses, SCM_OBJ(sub)))) { sub 1003 src/class.c void Scm_DeleteDirectSubclass(ScmClass *super, ScmClass *sub) sub 1008 src/class.c Scm_DeleteX(SCM_OBJ(sub), super->directSubclasses, SCM_CMP_EQ); sub 569 src/gauche.h SCM_EXTERN int Scm_SubtypeP(ScmClass *sub, ScmClass *type); sub 142 src/gauche/class.h SCM_EXTERN void Scm_AddDirectSubclass(ScmClass *super, ScmClass *sub); sub 143 src/gauche/class.h SCM_EXTERN void Scm_RemoveDirectSubclass(ScmClass *super, ScmClass *sub); sub 149 src/gauche/class.h SCM_EXTERN void Scm_DeleteDirectSubclass(ScmClass *super, ScmClass *sub); sub 192 src/moplib.c ScmClass* sub; sub 199 src/moplib.c sub = SCM_CLASS(sub_scm); sub 201 src/moplib.c Scm_AddDirectSubclass(super, sub); sub 214 src/moplib.c ScmClass* sub; sub 221 src/moplib.c sub = SCM_CLASS(sub_scm); sub 223 src/moplib.c Scm_DeleteDirectSubclass(super, sub); sub 2033 src/regexp.c struct ScmRegMatchSub *sub; sub 2036 src/regexp.c sub = &rm->matches[i]; sub 2037 src/regexp.c if (sub->startp == NULL) { sub 2039 src/regexp.c } else if (sub->length >= 0) { sub 2040 src/regexp.c return Scm_MakeString(sub->startp, sub->endp - sub->startp, sub 2041 src/regexp.c sub->length, 0); sub 2043 src/regexp.c ScmObj s = Scm_MakeString(sub->startp, sub->endp - sub->startp, -1, 0); sub 2044 src/regexp.c sub->length = SCM_STRING_BODY_LENGTH(SCM_STRING_BODY(s)); sub 2051 src/regexp.c struct ScmRegMatchSub *sub; sub 2054 src/regexp.c sub = &rm->matches[i]; sub 2055 src/regexp.c if (sub->startp == NULL) { sub 2057 src/regexp.c } else if (sub->start < 0) { sub 2058 src/regexp.c sub->start = Scm_MBLen(rm->input, sub->startp); sub 2060 src/regexp.c return Scm_MakeInteger(sub->start); sub 2065 src/regexp.c struct ScmRegMatchSub *sub; sub 2068 src/regexp.c sub = &rm->matches[i]; sub 2069 src/regexp.c if (sub->startp == NULL) { sub 2071 src/regexp.c } else if (sub->start < 0) { sub 2072 src/regexp.c sub->start = Scm_MBLen(rm->input, sub->startp); sub 2074 src/regexp.c if (sub->length < 0) { sub 2075 src/regexp.c sub->length = Scm_MBLen(sub->startp, sub->endp); sub 2077 src/regexp.c return Scm_MakeInteger(sub->start + sub->length); sub 2082 src/regexp.c struct ScmRegMatchSub *sub; sub 2085 src/regexp.c sub = &rm->matches[i]; sub 2086 src/regexp.c if (sub->startp == NULL) return SCM_FALSE; sub 2087 src/regexp.c return Scm_MakeString(rm->input, sub->startp - rm->input, -1, 0); sub 2092 src/regexp.c struct ScmRegMatchSub *sub; sub 2095 src/regexp.c sub = &rm->matches[i]; sub 2096 src/regexp.c if (sub->startp == NULL) return SCM_FALSE; sub 2097 src/regexp.c return Scm_MakeString(sub->endp, sub 2098 src/regexp.c rm->input + rm->inputSize - sub->endp, -1, 0); sub 2111 src/regexp.c struct ScmRegMatchSub *sub = &rm->matches[i]; sub 2112 src/regexp.c if (sub->startp) { sub 2114 src/regexp.c sub->startp - rm->input, sub 2115 src/regexp.c sub->endp - rm->input, sub 2116 src/regexp.c Scm_MakeString(sub->startp, sub->endp-sub->startp, sub 197 src/write.c ScmObj sub = Scm_Substring(SCM_STRING(Scm_GetOutputString(SCM_PORT(out))), sub 199 src/write.c SCM_PUTS(sub, port); /* this locks port */ sub 235 src/write.c ScmObj sub = Scm_Substring(SCM_STRING(Scm_GetOutputString(SCM_PORT(out))), sub 237 src/write.c SCM_PUTS(sub, port); /* this locks port */