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