6 May
2013
6 May
'13
1:59 a.m.
Double floats cause issues with the compiler md> (setf *read-default-float-format* 'double-float) double-float md> (ps '(1.0 2.0 3.0)) "[1.0D0, 2.0D0, 3.0D0];" since 1.0D0 isn't javascript This is a simpler example: md> (ps 1.0D0) "1.0D0;" Adding... (defmethod ps-print ((x double-float)) (format *psw-stream* "~F" (coerce x 'single-float))) to printer.lisp resolves the problem. At which point it's tempting to rework the ps-print method on number with: (defmethod ps-print ((x double-float)) (format *psw-stream* "~F" (coerce x 'single-float))) (defmethod ps-print ((x integer)) (format *psw-stream* "~D" x)) (defmethod ps-print ((x number)) (format *psw-stream* "~F" x)) Thanks for this awesome tool! - ben
4293
Age (days ago)
4293
Last active (days ago)
0 comments
1 participants
participants (1)
-
Ben Hyde