0.8.3.82: Make the runtime compile (not necessarily run) on x86/bsd again
[sbcl.git] / src / code / target-random.lisp
index 28c4db4..e7a65a7 100644 (file)
 
 (defun random (arg &optional (state *random-state*))
   (declare (inline %random-single-float %random-double-float
-                  #!+long-float %long-float))
+                  #!+long-float %random-long-float))
   (cond
     ((and (fixnump arg) (<= arg random-fixnum-max) (> arg 0))
      (rem (random-chunk state) arg))