Lines Matching refs:l1
890 function sc_reverseAppendBang(l1, l2) {
892 while (l1 !== null) {
894 res = l1;
895 l1 = l1.cdr;
901 function sc_dualAppend(l1, l2) {
902 if (l1 === null) return l2;
903 if (l2 === null) return l1;
904 var rev = sc_reverse(l1);
918 function sc_dualAppendBang(l1, l2) {
919 if (l1 === null) return l2;
920 if (l2 === null) return l1;
921 var tmp = l1;
924 return l1;
936 function sc_reverse(l1) {
938 while (l1 !== null) {
939 res = sc_cons(l1.car, res);
940 l1 = l1.cdr;
1501 function sc_map(proc, l1) {
1502 if (l1 === undefined)
1508 while (l1 !== null) {
1519 function sc_mapBang(proc, l1) {
1520 if (l1 === undefined)
1523 var l1_orig = l1;
1526 while (l1 !== null) {
1527 var tmp = l1;
1538 function sc_forEach(proc, l1) {
1539 if (l1 === undefined)
1544 while (l1 !== null) {
1556 function sc_filter(proc, l1) {
1559 while (l1 !== null) {
1560 if (proc(l1.car) !== false) {
1561 tail.cdr = sc_cons(l1.car, null);
1564 l1 = l1.cdr;
1570 function sc_filterBang(proc, l1) {
1571 var head = sc_cons("dummy", l1);
1573 var next = l1;
1585 function sc_filterMap1(proc, l1) {
1587 while (l1 !== null) {
1588 var tmp = proc(l1.car)
1590 l1 = l1.cdr;
1594 function sc_filterMap2(proc, l1, l2) {
1596 while (l1 !== null) {
1597 var tmp = proc(l1.car, l2.car);
1599 l1 = l1.cdr;
1606 function sc_filterMap(proc, l1, l2, l3) {
1608 return sc_filterMap1(proc, l1);
1610 return sc_filterMap2(proc, l1, l2);
1615 while (l1 !== null) {
3985 var l1;
4071 var l1;
4075 (l1 = l);
4076 while ((l1 instanceof sc_Pair)) {
4078 (sc_conf_59 = (l1.car));
4083 (l1 = (l1.cdr));
4086 (l1 = (l1.cdr));
4258 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) {
4263 var l1;
4266 if ((l1 instanceof sc_Pair))
4268 (ender = (l1.car));
4311 return (sc_loop1_98((l1.cdr), l2));
4317 (l1 = (l1.cdr));
4449 (l1 = (tok.cdr));
4451 while ((l1 instanceof sc_Pair)) {
4453 (sc_i_29 = (sc_ind_43((l1.car), sc_nts_42)));
4456 (l1 = (l1.cdr));
4460 (l1 = (l1.cdr));
