Skip to content
Snippets Groups Projects
Commit 75de5422 authored by rtoy's avatar rtoy
Browse files

Was failing to print enough digits for things like (format nil

"~9,,,-2E" 1.2345689d-3).   This change also allows us to get rid of
one other call to flonum-to-string, so printing should be faster now.

Some additional tests:

(assert (string= (format nil "~9,,,-2E" 1.2345689d3) ".00123d+6"))
(assert (string= (format nil "~9,,,-2E" -1.2345689d3) "-.0012d+6"))
(assert (string= (format nil "~9,,,-2E" 1.2345689d-3) ".00123d+0"))
(assert (string= (format nil "~9,,,-2E" -1.2345689d-3) "-.0012d+0"))
parent 9e71e519
No related branches found
No related tags found
No related merge requests found
Loading
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment