Signal floating-point-overflow from bignum-to-float.
[sbcl.git] / tests / bug-943953.lisp
blob933e842f0203a738631344fe5ea86a31efb812ab
1 (defun foo (&optional count)
2 (declare (fixnum count))
3 count)