> (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