2 files changed, 6 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index f833dd21..a6a1c27c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2014-07-07  Kaz Kylheku  <kaz@kylheku.com>
 
+	* lib.c (replace_list, sel): fix use of unused variable.
+
+2014-07-07  Kaz Kylheku  <kaz@kylheku.com>
+
 	* LICENSE: Small wording change. Add pointer to METALICENSE.
 
 	* METALICENSE: New file.
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 */