* boot-9.scm, rdelim.scm: Use "'()" instead of "()" in all places

where the empty list is meant.

diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index efd3308..2ba3878 100644 (file)
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -2745,5 +2745,5 @@
 \f
 (define-module (guile))
 
-(append! %load-path (cons "." ()))
+(append! %load-path (cons "." '()))
 

diff --git a/ice-9/rdelim.scm b/ice-9/rdelim.scm
index 9d961a0..732163e 100644 (file)
--- a/ice-9/rdelim.scm
+++ b/ice-9/rdelim.scm
@@ -95,7 +95,7 @@
         (handle-delim (if (pair? args)
                           (car args)
                           'trim)))
-    (let loop ((substrings ())
+    (let loop ((substrings '())
               (total-chars 0)
               (buf-size 100))          ; doubled each time through.
       (let* ((buf (make-string buf-size))