読み取り時のデフォルトの浮動小数点の精度を指定する


Tag: 数値

*read-default-float-format* に型を指定することにより可能です

(let ((*read-default-float-format* 'double-float))
  (read-from-string "(1.0 1.0s0)"))
;=>  (1.0d0 1.0)
;    11


(let ((*read-default-float-format* 'single-float))
  (read-from-string "(1.0 1.0d0)"))
;=>  (1.0 1.0d0)
;    11