From 46b7f60f9fa32fd2a8c2162cf108dc89d3d95196 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Mon, 7 Jul 2014 20:15:40 -0700 Subject: * lib.c (replace_list, sel): fix use of unused variable. --- lib.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib.c') diff --git a/lib.c b/lib.c index d8ac95e3..d6f4f080 100644 --- a/lib.c +++ b/lib.c @@ -777,7 +777,7 @@ val replace_list(val list, val items, val from, val to) nao); for (; seq && where && items; seq = cdr(seq), idx = plus(idx, one)) { - val wh; + val wh = nil; for (; where && lt(wh = car(where), idx); where = cdr(where)) ; /* empty */ @@ -5629,7 +5629,7 @@ val sel(val seq_in, val where_in) val idx = zero; for (; seq && where; seq = cdr(seq), idx = plus(idx, one)) { - val wh; + val wh = nil; for (; where && lt(wh = car(where), idx); where = cdr(where)) ; /* empty */ -- cgit v1.2.3