X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fmips%2Fparms.lisp;h=4989172f1461306c8b964abb0fcd7b61d8587f41;hb=304c44d731bea3b9ce3c47d864d90eac92ba604e;hp=2db49109e20a7bb1254816c0a509f668ba30c8ee;hpb=c5759c03562c984984e368c2ab85a21dceb719ab;p=sbcl.git

diff --git a/src/compiler/mips/parms.lisp b/src/compiler/mips/parms.lisp
index 2db4910..4989172 100644
--- a/src/compiler/mips/parms.lisp
+++ b/src/compiler/mips/parms.lisp
@@ -3,6 +3,10 @@
 (def!constant n-word-bits 32
   "Number of bits per word where a word holds one lisp descriptor.")
 
+;;; the natural width of a machine word (as seen in e.g. register width,
+;;; address space)
+(def!constant n-machine-word-bits 32)
+
 (def!constant n-byte-bits 8
   "Number of bits per byte where a byte is the smallest addressable object.")