#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