*** empty log message ***

diff --git a/srfi/ChangeLog b/srfi/ChangeLog
index 6927b02..da59d94 100644 (file)
--- a/srfi/ChangeLog
+++ b/srfi/ChangeLog
@@ -1,3 +1,9 @@
+2005-02-12  Kevin Ryde  <user42@zip.com.au>
+
+       * srfi-1.scm (reduce, reduce-right): Don't call f with ridentity, use
+       it only if lst is empty, per srfi and intended optimization reduce
+       represents over fold.
+
 2005-02-04  Kevin Ryde  <user42@zip.com.au>
 
        * srfi-1.scm (list=): Correction to arguments passed to given elt=,

diff --git a/test-suite/ChangeLog b/test-suite/ChangeLog
index 34771c8..ed8fa1d 100644 (file)
--- a/test-suite/ChangeLog
+++ b/test-suite/ChangeLog
@@ -1,3 +1,7 @@
+2005-02-12  Kevin Ryde  <user42@zip.com.au>
+
+       * tests/srfi-1.test (reduce, reduce-right): New tests.
+
 2005-02-11  Kevin Ryde  <user42@zip.com.au>
 
        * tests/fractions.test (ash): Remove tests of ash on fractions, not