#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. -- Ticket URL: <http://trac.common-lisp.net/cmucl/ticket/12> cmucl <http://common-lisp.net/project/cmucl> cmucl