[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
guile/guile-core/ice-9 boot-9.scm rdelim.scm
From: |
Marius Vollmer |
Subject: |
guile/guile-core/ice-9 boot-9.scm rdelim.scm |
Date: |
Sat, 03 Mar 2001 06:58:22 -0800 |
CVSROOT: /cvs
Module name: guile
Changes by: Marius Vollmer <address@hidden> 01/03/03 06:58:22
Modified files:
guile-core/ice-9: boot-9.scm rdelim.scm
Log message:
* boot-9.scm, rdelim.scm: Use "'()" instead of "()" in all places
where the empty list is meant.
CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/ice-9/boot-9.scm.diff?r1=1.227&r2=1.228
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/ice-9/rdelim.scm.diff?r1=1.2&r2=1.3
Patches:
Index: guile/guile-core/ice-9/boot-9.scm
diff -u guile/guile-core/ice-9/boot-9.scm:1.227
guile/guile-core/ice-9/boot-9.scm:1.228
--- guile/guile-core/ice-9/boot-9.scm:1.227 Mon Feb 26 19:19:36 2001
+++ guile/guile-core/ice-9/boot-9.scm Sat Mar 3 06:58:22 2001
@@ -2745,5 +2745,5 @@
(define-module (guile))
-(append! %load-path (cons "." ()))
+(append! %load-path (cons "." '()))
Index: guile/guile-core/ice-9/rdelim.scm
diff -u guile/guile-core/ice-9/rdelim.scm:1.2
guile/guile-core/ice-9/rdelim.scm:1.3
--- guile/guile-core/ice-9/rdelim.scm:1.2 Wed Jan 24 13:45:09 2001
+++ guile/guile-core/ice-9/rdelim.scm Sat Mar 3 06:58:22 2001
@@ -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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- guile/guile-core/ice-9 boot-9.scm rdelim.scm,
Marius Vollmer <=