l 66 examples/spigot/spigot.c int k, i, j, l, b, q, r, *array;
l 99 examples/spigot/spigot.c for (l=i-1, r/=10; r && l>=0; l--, r/=10) {
l 100 examples/spigot/spigot.c r += SCM_INT_VALUE(relts[l]);
l 101 examples/spigot/spigot.c relts[l] = SCM_MAKE_INT(r%10);
l 110 examples/spigot/spigot.c int k, i, j, l, b, q, r, *array;
l 142 examples/spigot/spigot.c for (l=i-1, r/=10; r && l>=0; l--, r/=10) {
l 143 examples/spigot/spigot.c r += SCM_INT_VALUE(relts[l]);
l 144 examples/spigot/spigot.c relts[l] = SCM_MAKE_INT(r%10);
l 737 ext/uvector/uvector.c ScmUInt64 l;
l 741 ext/uvector/uvector.c dd.l = *loc;
l 746 ext/uvector/uvector.c *loc = dd.l;
l 325 ext/uvector/uvlib.c ScmObj l;
l 334 ext/uvector/uvlib.c l = (l_scm);
l 342 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS8Vector(l, clamp_arg(clamp)));
l 774 ext/uvector/uvlib.c ScmObj l;
l 783 ext/uvector/uvlib.c l = (l_scm);
l 791 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU8Vector(l, clamp_arg(clamp)));
l 1223 ext/uvector/uvlib.c ScmObj l;
l 1232 ext/uvector/uvlib.c l = (l_scm);
l 1240 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS16Vector(l, clamp_arg(clamp)));
l 1672 ext/uvector/uvlib.c ScmObj l;
l 1681 ext/uvector/uvlib.c l = (l_scm);
l 1689 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU16Vector(l, clamp_arg(clamp)));
l 2121 ext/uvector/uvlib.c ScmObj l;
l 2130 ext/uvector/uvlib.c l = (l_scm);
l 2138 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS32Vector(l, clamp_arg(clamp)));
l 2570 ext/uvector/uvlib.c ScmObj l;
l 2579 ext/uvector/uvlib.c l = (l_scm);
l 2587 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU32Vector(l, clamp_arg(clamp)));
l 3019 ext/uvector/uvlib.c ScmObj l;
l 3028 ext/uvector/uvlib.c l = (l_scm);
l 3036 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS64Vector(l, clamp_arg(clamp)));
l 3468 ext/uvector/uvlib.c ScmObj l;
l 3477 ext/uvector/uvlib.c l = (l_scm);
l 3485 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU64Vector(l, clamp_arg(clamp)));
l 3917 ext/uvector/uvlib.c ScmObj l;
l 3926 ext/uvector/uvlib.c l = (l_scm);
l 3934 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToF32Vector(l, clamp_arg(clamp)));
l 4366 ext/uvector/uvlib.c ScmObj l;
l 4375 ext/uvector/uvlib.c l = (l_scm);
l 4383 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToF64Vector(l, clamp_arg(clamp)));
l 202 gc/cord/cordtest.c long l;
l 206 gc/cord/cordtest.c if (CORD_sprintf(&result, "%7.2f%ln", 3.14159F, &l) != 7)
l 209 gc/cord/cordtest.c if (l != 7) ABORT("CORD_sprintf goofed 2");
l 383 gc/cord/de.c void set_position(int c, int l)
l 385 gc/cord/de.c line = l + dis_line;
l 316 gc/cord/de_win.c void move_cursor(int c, int l)
l 319 gc/cord/de_win.c last_line = l;
l 35 gc/mach_dep.c move.l a2,(sp)
l 37 gc/mach_dep.c move.l a3,(sp)
l 39 gc/mach_dep.c move.l a4,(sp)
l 43 gc/mach_dep.c move.l a6,(sp)
l 47 gc/mach_dep.c move.l d2,(sp)
l 49 gc/mach_dep.c move.l d3,(sp)
l 51 gc/mach_dep.c move.l d4,(sp)
l 53 gc/mach_dep.c move.l d5,(sp)
l 55 gc/mach_dep.c move.l d6,(sp)
l 57 gc/mach_dep.c move.l d7,(sp)
l 189 gc/mach_dep.c move.l reg,(sp) \
l 102 src/compare.c int l = root+1, maxchild;
l 103 src/compare.c while (l*2 <= nelts) {
l 104 src/compare.c if (l*2 == nelts) {
l 106 src/compare.c } else if (cmp(elts[l*2-1], elts[l*2], data) < 0) {
l 107 src/compare.c maxchild = l*2;
l 109 src/compare.c maxchild = l*2-1;
l 111 src/compare.c if (cmp(elts[l-1], elts[maxchild], data) < 0) {
l 113 src/compare.c elts[maxchild] = elts[l-1];
l 114 src/compare.c elts[l-1] = tmp;
l 115 src/compare.c l = maxchild+1;
l 125 src/compare.c int l, r;
l 126 src/compare.c for (l=nelts/2-1; l>=0; l--) {
l 127 src/compare.c shift_up(elts, l, nelts, cmp, data);
l 146 src/compare.c int l = lo, r = hi;
l 148 src/compare.c while (l <= r) {
l 149 src/compare.c while (l <= r && cmp(elts[l], pivot, data) < 0) l++;
l 150 src/compare.c while (l <= r && cmp(pivot, elts[r], data) < 0) r--;
l 151 src/compare.c if (l > r) break;
l 152 src/compare.c tmp = elts[l]; elts[l] = elts[r]; elts[r] = tmp;
l 153 src/compare.c l++;
l 159 src/compare.c lo = l;
l 1257 src/gauche.h SCM_EXTERN ScmObj Scm_ListToVector(ScmObj l, int start, int end);
l 1557 src/gauche.h #define SCM_PUTZ(s, l, p) Scm_Putz(s, l, SCM_PORT(p))
l 408 src/list.c ScmObj Scm_LastPair(ScmObj l)
l 412 src/list.c if (!SCM_PAIRP(l)) Scm_Error("pair required: %S", l);
l 413 src/list.c SCM_FOR_EACH(cp, l) {
l 425 src/macro.c ScmObj l = Scm_VectorToList(SCM_VECTOR(form), 0, -1);
l 426 src/macro.c return Scm_ListToVector(compile_rule1(l, spat, ctx, patternp), 0, -1);
l 816 src/system.c long l;
l 820 src/system.c if ((l = Scm_GetInteger(val)) >= 1000000000) {
l 821 src/system.c Scm_Error("nanoseconds out of range: %ld", l);
l 823 src/system.c t->nsec = l;
l 79 src/vector.c ScmObj Scm_ListToVector(ScmObj l, int start, int end)
l 86 src/vector.c int size = Scm_Length(l);
l 87 src/vector.c if (size < 0) Scm_Error("bad list: %S", l);
l 94 src/vector.c e = Scm_ListTail(l, start, SCM_UNBOUND);
l 97 src/vector.c Scm_Error("list too short: %S", l);