3 (def!constant
+backend-fasl-file-implementation
+ :mips
)
4 (setf *backend-register-save-penalty
* 3)
5 (setf *backend-byte-order
*
6 #!+little-endian
:little-endian
7 #!-little-endian
:big-endian
)
9 (eval-when (:compile-toplevel
:load-toplevel
:execute
)
10 ;; The o32 ABI specifies 4k-64k as page size. We have to pick the
11 ;; maximum since mprotect() works only with page granularity.
12 (setf *backend-page-size
* 65536))