[cmucl-cvs] CMUCL commit: src (compiler/fndb.lisp general-info/release-20c.txt)

Raymond Toy rtoy at common-lisp.net
Thu Feb 17 02:47:22 UTC 2011


    Date: Wednesday, February 16, 2011 @ 21:47:22
  Author: rtoy
    Path: /project/cmucl/cvsroot/src

Modified: compiler/fndb.lisp general-info/release-20c.txt

The :OUTPUT-FILE for COMPILE-FILE can be a stream.
This fixes ansi-test COMPILE-FILE.14.

compiler/fndb.lisp:
o Tell compiler that :OUTPUT-FILE can also be a stream.

general-info/release-20c.txt:
o Update.


------------------------------+
 compiler/fndb.lisp           |    4 ++--
 general-info/release-20c.txt |    1 +
 2 files changed, 3 insertions(+), 2 deletions(-)


Index: src/compiler/fndb.lisp
diff -u src/compiler/fndb.lisp:1.147 src/compiler/fndb.lisp:1.148
--- src/compiler/fndb.lisp:1.147	Fri Sep 24 08:12:05 2010
+++ src/compiler/fndb.lisp	Wed Feb 16 21:47:21 2011
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /project/cmucl/cvsroot/src/compiler/fndb.lisp,v 1.147 2010-09-24 12:12:05 rtoy Rel $")
+  "$Header: /project/cmucl/cvsroot/src/compiler/fndb.lisp,v 1.148 2011-02-17 02:47:21 rtoy Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -1144,7 +1144,7 @@
 (deftype optional-filename () '(or filename (member t nil)))
 
 (defknown compile-file
-  ((or optional-filename stream list) &key (:output-file optional-filename)
+  ((or optional-filename stream list) &key (:output-file (or optional-filename stream))
    (:error-file optional-filename)
    (:trace-file optional-filename) (:error-output t) (:load t) (:verbose t)
    (:print t) (:progress t)
Index: src/general-info/release-20c.txt
diff -u src/general-info/release-20c.txt:1.16 src/general-info/release-20c.txt:1.17
--- src/general-info/release-20c.txt:1.16	Wed Feb  2 08:08:25 2011
+++ src/general-info/release-20c.txt	Wed Feb 16 21:47:22 2011
@@ -70,6 +70,7 @@
       it should not.
     - DEFSTRUCT allows multiple keyword constructors as required by
       the spec..
+    - In COMPILE-FILE, the :OUTPUT-FILE can also be a stream.
 
   * Bugfixes:
     - The pairwise composition table is now correctly built.




More information about the cmucl-cvs mailing list