Format ~$ buglet

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'. -- Scott