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)));