[cmucl-ticket] Re: #12: (format t "~10, 1, 2, 0, '*, , 'DE" 1d-6) -> 1.0d-6

#12: (format t "~10,1,2,0,'*,,'DE" 1d-6) -> 1.0d-6 ---------------------+------------------------------------------------------ Reporter: rtoy | Owner: rtoy Type: defect | Status: assigned Priority: minor | Milestone: Component: Core | Version: 19d Resolution: | Keywords: ---------------------+------------------------------------------------------ Changes (by rtoy):

* status: new => assigned * owner: somebody => rtoy

Comment:

This is caused by lisp::scale-exponent. For 1d-6, it returns 0.99999999999...d0 and -6. And the .9999999... gets printed as 1.0 with an exponent of -6.