0.8.5.3:
[sbcl.git] / src / compiler / alpha / parms.lisp
index cb7da46..b13e2de 100644 (file)
   #!+sb-doc
   "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 64)
+
 (def!constant n-byte-bits 8
   #!+sb-doc
   "Number of bits per byte where a byte is the smallest addressable object.")
     sb!kernel:two-arg-and
     sb!kernel:two-arg-ior
     sb!kernel:two-arg-xor
+    sb!kernel:two-arg-eqv
     sb!kernel:two-arg-gcd
     sb!kernel:two-arg-lcm))