lis1 1719 src/intlib.c ScmObj lis1; lis1 1724 src/intlib.c lis1 = (lis1_scm); lis1 1729 src/intlib.c while (SCM_PAIRP(lis1) && SCM_PAIRP(lis2)) { lis1 1730 src/intlib.c SCM_APPEND1(h, t, Scm_Cons(SCM_CAR(lis1), SCM_CAR(lis2))); lis1 1731 src/intlib.c lis1 = SCM_CDR(lis1);