X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86%2Fbackend-parms.lisp;h=44e063414dbe1dc9d467a9f67d2fc3bf832b817f;hb=94ac5b7c3ff37850210b6fc9a7593cf1c5752993;hp=be2a8f4b1bc67150cbe4357c7460b1987a056cb8;hpb=aa2dc9529460ea0d9c99998dc87283fc1a43e808;p=sbcl.git

diff --git a/src/compiler/x86/backend-parms.lisp b/src/compiler/x86/backend-parms.lisp
index be2a8f4..44e0634 100644
--- a/src/compiler/x86/backend-parms.lisp
+++ b/src/compiler/x86/backend-parms.lisp
@@ -17,8 +17,7 @@
 
 ;;;; compiler constants
 
-(setf *backend-fasl-file-type* "x86f")
-(defconstant +backend-fasl-file-implementation+ :x86)
+(def!constant +backend-fasl-file-implementation+ :x86)
 
 (setf *backend-register-save-penalty* 3)