comps             461 src/system.c           ScmObj comps = SCM_NIL; /* reverse list of components */
comps             478 src/system.c                       SCM_ASSERT(SCM_PAIRP(comps));
comps             479 src/system.c                       comps = SCM_CDR(comps);
comps             483 src/system.c                       comps = Scm_Cons(SCM_MAKE_STR(".."), comps);
comps             487 src/system.c                   comps = Scm_Cons(Scm_MakeString(srcp, p-srcp, -1, 0), comps);
comps             495 src/system.c                   if (wentup) comps = Scm_Cons(SCM_MAKE_STR(""), comps);
comps             500 src/system.c           if (SCM_PAIRP(comps)) {
comps             501 src/system.c               comps = Scm_ReverseX(comps);
comps             502 src/system.c               Scm_DStringAdd(&buf, SCM_STRING(SCM_CAR(comps)));
comps             503 src/system.c               SCM_FOR_EACH(comps, SCM_CDR(comps)) {
comps             505 src/system.c                   Scm_DStringAdd(&buf, SCM_STRING(SCM_CAR(comps)));