Lines Matching refs:l1
884 function sc_reverseAppendBang(l1, l2) {
886 while (l1 !== null) {
888 res = l1;
889 l1 = l1.cdr;
895 function sc_dualAppend(l1, l2) {
896 if (l1 === null) return l2;
897 if (l2 === null) return l1;
898 var rev = sc_reverse(l1);
912 function sc_dualAppendBang(l1, l2) {
913 if (l1 === null) return l2;
914 if (l2 === null) return l1;
915 var tmp = l1;
918 return l1;
930 function sc_reverse(l1) {
932 while (l1 !== null) {
933 res = sc_cons(l1.car, res);
934 l1 = l1.cdr;
1495 function sc_map(proc, l1) {
1496 if (l1 === undefined)
1502 while (l1 !== null) {
1513 function sc_mapBang(proc, l1) {
1514 if (l1 === undefined)
1517 var l1_orig = l1;
1520 while (l1 !== null) {
1521 var tmp = l1;
1532 function sc_forEach(proc, l1) {
1533 if (l1 === undefined)
1538 while (l1 !== null) {
1550 function sc_filter(proc, l1) {
1553 while (l1 !== null) {
1554 if (proc(l1.car) !== false) {
1555 tail.cdr = sc_cons(l1.car, null);
1558 l1 = l1.cdr;
1564 function sc_filterBang(proc, l1) {
1565 var head = sc_cons("dummy", l1);
1567 var next = l1;
1579 function sc_filterMap1(proc, l1) {
1581 while (l1 !== null) {
1582 var tmp = proc(l1.car)
1584 l1 = l1.cdr;
1588 function sc_filterMap2(proc, l1, l2) {
1590 while (l1 !== null) {
1591 var tmp = proc(l1.car, l2.car);
1593 l1 = l1.cdr;
1600 function sc_filterMap(proc, l1, l2, l3) {
1602 return sc_filterMap1(proc, l1);
1604 return sc_filterMap2(proc, l1, l2);
1609 while (l1 !== null) {
3979 var l1;
4065 var l1;
4069 (l1 = l);
4070 while ((l1 instanceof sc_Pair)) {
4072 (sc_conf_59 = (l1.car));
4077 (l1 = (l1.cdr));
4080 (l1 = (l1.cdr));
4252 return ((name = (sc_names_94[sc_conf_91])), ((name!== false)?((sc_conf_91<BgL_sc_nbzd2nts_97zd2)?(sc_list((sc_list(name, ((sc_toks_95[i]).car))))):(sc_list((sc_list(name))))):((prev = (sc_conf_91-(1))), (sc_loop1_98 = function(l1, l2) {
4257 var l1;
4260 if ((l1 instanceof sc_Pair))
4262 (ender = (l1.car));
4305 return (sc_loop1_98((l1.cdr), l2));
4311 (l1 = (l1.cdr));
4443 (l1 = (tok.cdr));
4445 while ((l1 instanceof sc_Pair)) {
4447 (sc_i_29 = (sc_ind_43((l1.car), sc_nts_42)));
4450 (l1 = (l1.cdr));
4454 (l1 = (l1.cdr));
