X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftarget-load.lisp;h=560ba0e0bb451465e8baa3394b5ba818f558dc80;hb=dae76a317682df7472ee85d1a0f6a0248801a6ae;hp=07703d96afeac540f19495577d06d69b7f5168ea;hpb=7646aefa188758e2892fea2ad02be4f29b3938f2;p=sbcl.git

diff --git a/src/code/target-load.lisp b/src/code/target-load.lisp
index 07703d9..560ba0e 100644
--- a/src/code/target-load.lisp
+++ b/src/code/target-load.lisp
@@ -165,7 +165,7 @@
   #!+sb-doc
   "Load the file given by FILESPEC into the Lisp environment, returning
    T on success."
-
+  (declare (ignore external-format))
   (let ((*load-depth* (1+ *load-depth*))
 	;; KLUDGE: I can't find in the ANSI spec where it says that
 	;; DECLAIM/PROCLAIM of optimization policy should have file