X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fearly-fasl.lisp;h=11b57b43ad079b9d5d2840b59a8a873e9608f442;hb=e801083c864fa8f11d79be53a5d95584c960f2b3;hp=5e331ba096439043cd24a805757031887f712bd5;hpb=224466fab9dc4e8b3faf13a121f827f198811bf6;p=sbcl.git

diff --git a/src/code/early-fasl.lisp b/src/code/early-fasl.lisp
index 5e331ba..11b57b4 100644
--- a/src/code/early-fasl.lisp
+++ b/src/code/early-fasl.lisp
@@ -35,7 +35,7 @@
 
 (macrolet ((define-fasl-format-features ()
              (let (;; master value for *F-P-A-F-F*
-		   (fpaff '(:sb-thread)))
+		   (fpaff '(:sb-thread :sb-package-locks)))
 	       `(progn
 		  ;; a list of *(SHEBANG-)FEATURES* flags which affect
 		  ;; binary compatibility, i.e. which must be the same
@@ -76,7 +76,7 @@
 ;;; versions which break binary compatibility. But it certainly should
 ;;; be incremented for release versions which break binary
 ;;; compatibility.
-(def!constant +fasl-file-version+ 45)
+(def!constant +fasl-file-version+ 50)
 ;;; (record of versions before 2003 deleted in 2003-04-26/0.pre8.107 or so)
 ;;; 38: (2003-01-05) changed names of internal SORT machinery
 ;;; 39: (2003-02-20) in 0.7.12.1 a slot was added to
@@ -100,6 +100,14 @@
 ;;;     .fasl files could never possibly ever refer to the SB-C
 ;;;     CONTINUATION-related data types which were changed 
 ;;;     incompatibly in 0.8.3.62.
+;;; 46: (2003-11-11) Tim Daly, Jr. (and Christophe Rhodes) reported
+;;;     .fasl incompatibility on sbcl-devel 2003-11-09.
+;;; 47: (2003-11-30) Static variables were rearranged in 0.8.6.11.
+;;; 48: (2004-03-01) Renumbered all the widetags to allow for more
+;;;     microefficiency in sbcl-0.8.8.10
+;;; 49: (2004-05-04) Changed implementation of DEFFOO macros and the
+;;;     functions they expand to.
+;;; 50: (2004-05-20) Changed %COMPILER-DEFUN signature again.
 
 ;;; the conventional file extension for our fasl files
 (declaim (type simple-string *fasl-file-type*))
@@ -136,9 +144,6 @@
 	      :initial-element (lambda ()
 				 (error "corrupt fasl file: losing FOP"))))
 
-;;;; other miscellaneous loading-related stuff
-
-
 ;;;; variables
 
 (defvar *load-depth* 0
@@ -150,15 +155,4 @@
 (defvar *fasl-input-stream*)
 (declaim (type ansi-stream *fasl-input-stream*))
 
-(defvar *load-print* nil
-  #!+sb-doc
-  "the default for the :PRINT argument to LOAD")
-(defvar *load-verbose* nil
-  ;; Note that CMU CL's default for this was T, and ANSI says it's
-  ;; implementation-dependent. We choose NIL on the theory that it's
-  ;; a nicer default behavior for Unix programs.
-  #!+sb-doc
-  "the default for the :VERBOSE argument to LOAD")
-
 (defvar *load-code-verbose* nil)
-