1.0.18.16: many STYLE-WARNING changes.

[sbcl.git] / src / compiler / mips / backend-parms.lisp

diff --git a/src/compiler/mips/backend-parms.lisp b/src/compiler/mips/backend-parms.lisp
index e1c1a1d..48a61ff 100644 (file)
--- a/src/compiler/mips/backend-parms.lisp
+++ b/src/compiler/mips/backend-parms.lisp
@@ -6,7 +6,7 @@
       #!+little-endian :little-endian
       #!-little-endian :big-endian)
 
-(progn ;eval-when (:compile-toplevel :load-toplevel :execute)
+(eval-when (:compile-toplevel :load-toplevel :execute)
   ;; The o32 ABI specifies 4k-64k as page size. We have to pick the
   ;; maximum since mprotect() works only with page granularity.
   (setf *backend-page-size* 65536))