X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fearly-fasl.lisp;h=24d17c2e7e6d345d7b49f77e7a12fdc823e1ad1b;hb=b624a686af5426145841a597bdb96b27d5bd042e;hp=84ac9dd267adc8241f0236f4ca127bc79a52025e;hpb=9cbb7f9b3a418314ffcd8f2cb0448278d2b6f812;p=sbcl.git

diff --git a/src/code/early-fasl.lisp b/src/code/early-fasl.lisp
index 84ac9dd..24d17c2 100644
--- a/src/code/early-fasl.lisp
+++ b/src/code/early-fasl.lisp
@@ -34,7 +34,7 @@
 (defparameter *fasl-header-string-start-string* "# FASL")
 
 ;;; the code for a character which terminates a fasl file header
-(defconstant +fasl-header-string-stop-char-code+ 255)
+(def!constant +fasl-header-string-stop-char-code+ 255)
 
 ;;; This value should be incremented when the system changes in such a
 ;;; way that it will no longer work reliably with old fasl files. In
@@ -42,7 +42,7 @@
 ;;; versions which break binary compatibility. But it certainly should
 ;;; be incremented for release versions which break binary
 ;;; compatibility.
-(defconstant +fasl-file-version+ 28)
+(def!constant +fasl-file-version+ 30)
 ;;; (record of versions before 0.7.0 deleted in 0.7.1.41)
 ;;; 23 = sbcl-0.7.0.1 deleted no-longer-used EVAL-STACK stuff,
 ;;;      causing changes in *STATIC-SYMBOLS*.
@@ -54,6 +54,10 @@
 ;;; 27: (2002-04-08) added MIGHT-CONTAIN-OTHER-TYPES? slot to CTYPE
 ;;; 28: (2002-05-08) new convention for foreign symbols to support
 ;;;     dynamic loading in OpenBSD
+;;; 29: (2002-06-24) removed *!INITIAL-FDEFN-OBJECTS* from static symbols
+;;; 30: (2002-07-26) deleted all references to %DETECT-STACK-EXHAUSTION, 
+;;;     which was introduced in version 25, since now control stack
+;;;     is checked using mmap() page protection
 
 ;;; the conventional file extension for our fasl files
 (declaim (type simple-string *fasl-file-type*))