#409: CL:FORMAT ~$ buglet -------------------------------+---------------------------- Reporter: mevenson | Owner: Type: defect | Status: new Priority: minor | Milestone: 1.3.4 Component: (A)MOP | Version: 1.4.0-dev Keywords: low-hanging-fruit | Parent Tickets: -------------------------------+---------------------------- Scott notes in the mailing list {{{
In 1.3.2,
(format nil "~$" -32.17)
--32.17
Negative values are getting a double minus sign.
The right fix seems to be, in 'format-dollars', to pass '(abs number)' rather than 'number' to 'sys::flonum-to-string'. }}}
-- Ticket URL: http://abcl.org/trac/ticket/409 armedbear http://abcl.org armedbear