From: Christophe Rhodes <csr21@cam.ac.uk>
Date: Wed, 23 Feb 2005 12:43:21 +0000 (+0000)
Subject: 0.8.19.39:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=568802c8a51bf2e2bde448fe73092b1b4dedb474;p=sbcl.git

0.8.19.39:
	Whoops.  NEWS asserts that LOAD copes with :external-format
	arguments.  Better make sure that the compiler is aware of that
	too.
---

diff --git a/src/compiler/fndb.lisp b/src/compiler/fndb.lisp
index 7297776..8a2aed7 100644
--- a/src/compiler/fndb.lisp
+++ b/src/compiler/fndb.lisp
@@ -1215,7 +1215,7 @@
    (:verbose t)
    (:print t)
    (:if-does-not-exist (member :error :create nil))
-   (:external-format (member :default)))
+   (:external-format keyword))
   t)
 
 (defknown directory (pathname-designator &key)
@@ -1267,7 +1267,7 @@
 		     (member t)))
    (:verbose t)
    (:print t)
-   (:external-format t)
+   (:external-format keyword)
 
    ;; extensions
    (:trace-file t)
diff --git a/version.lisp-expr b/version.lisp-expr
index 9effc16..9204c47 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.8.19.38"
+"0.8.19.39"