Remove trailing whitespace.

diff --git a/src/sf/reduct.scm b/src/sf/reduct.scm
index af3a5e1e6c44664ee33ba980e050bab6158ca080..ea3059e664ad72e9d99c7387bc19c5b178d2448a 100644 (file)
--- a/src/sf/reduct.scm
+++ b/src/sf/reduct.scm
@@ -247,7 +247,7 @@ Examples:
      (declare (integrate null))
      (lambda (block value combiner)
        (combiner block value (null block))))))
-  
+
 (define (->mapper-combiner mapper)
   (handle-variable mapper
    (lambda (mapper)