[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
guile/guile-core/ice-9 ChangeLog boot-9.scm
From: |
Martin Grabmueller |
Subject: |
guile/guile-core/ice-9 ChangeLog boot-9.scm |
Date: |
Mon, 14 May 2001 12:09:51 -0700 |
CVSROOT: /cvs
Module name: guile
Changes by: Martin Grabmueller <address@hidden> 01/05/14 12:09:50
Modified files:
guile-core/ice-9: ChangeLog boot-9.scm
Log message:
* boot-9.scm (cond-expand): Reduce feature list to built-in
features.
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/ice-9/ChangeLog.diff?cvsroot=OldCVS&tr1=1.422&tr2=1.423&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/ice-9/boot-9.scm.diff?cvsroot=OldCVS&tr1=1.243&tr2=1.244&r1=text&r2=text
Patches:
Index: guile/guile-core/ice-9/ChangeLog
diff -u guile/guile-core/ice-9/ChangeLog:1.422
guile/guile-core/ice-9/ChangeLog:1.423
--- guile/guile-core/ice-9/ChangeLog:1.422 Mon May 14 09:38:08 2001
+++ guile/guile-core/ice-9/ChangeLog Mon May 14 12:09:50 2001
@@ -1,3 +1,8 @@
+2001-05-14 Martin Grabmueller <address@hidden>
+
+ * boot-9.scm (cond-expand): Reduce feature list to built-in
+ features.
+
2001-05-14 Dirk Herrmann <address@hidden>
* boot-9.scm (-1+, return-it, string-character-length, flags):
Index: guile/guile-core/ice-9/boot-9.scm
diff -u guile/guile-core/ice-9/boot-9.scm:1.243
guile/guile-core/ice-9/boot-9.scm:1.244
--- guile/guile-core/ice-9/boot-9.scm:1.243 Mon May 14 09:38:08 2001
+++ guile/guile-core/ice-9/boot-9.scm Mon May 14 12:09:50 2001
@@ -2715,15 +2715,16 @@
;;;
;;; Currently, the following feature identifiers are supported:
;;;
-;;; guile r5rs srfi-0 srfi-2 srfi-6 srfi-8 srfi-9 srfi-10 srfi-11 srfi-13
-;;; srfi-14 srfi-17 srfi-19
+;;; guile r5rs srfi-0 srfi-6
;;;
;;; Remember to update the features list when adding more SRFIs.
(define-macro (cond-expand clause . clauses)
+
(define features
- '(guile r5rs srfi-0 srfi-2 srfi-6 srfi-8 srfi-9 srfi-10 srfi-11 srfi-13
- srfi-14 srfi-17 srfi-19))
+ ;; Adjust the above comment when changing this.
+ '(guile r5rs srfi-0 srfi-6))
+
(let ((clauses (cons clause clauses))
(syntax-error (lambda (cl)
(error "invalid clause in `cond-expand'" cl))))