From bf4aaed27ca93adc575e9f6f2647ecb4dd3e4f45 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Sat, 3 Mar 2001 14:58:22 +0000 Subject: [PATCH] * boot-9.scm, rdelim.scm: Use "'()" instead of "()" in all places where the empty list is meant. --- ice-9/boot-9.scm | 2 +- ice-9/rdelim.scm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm index efd330815..2ba387843 100644 --- a/ice-9/boot-9.scm +++ b/ice-9/boot-9.scm @@ -2745,5 +2745,5 @@ (define-module (guile)) -(append! %load-path (cons "." ())) +(append! %load-path (cons "." '())) diff --git a/ice-9/rdelim.scm b/ice-9/rdelim.scm index 9d961a0af..732163e5d 100644 --- 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))