X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fmips%2Fbackend-parms.lisp;h=48a61ff6000aa35f466fc06d36e85df7631b6df5;hb=9b1fade83db8453b75b8c7380eb12ce41b5b889c;hp=e1c1a1db79694a9f7436a4e4997012c139b0edcc;hpb=a8a79584f77a1ca0b1f651c27d219678e44c3f4d;p=sbcl.git

diff --git a/src/compiler/mips/backend-parms.lisp b/src/compiler/mips/backend-parms.lisp
index e1c1a1d..48a61ff 100644
--- 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))