![[LISPWORKS]](/image.pl?url=http%3a%2f%2fwww.lispworks.com%2fdocumentation%2fHyperSpec%2fBody%2f..%2fGraphics%2fLWSmall.gif&f=jpg&w=240)
![[Common Lisp HyperSpec (TM)]](/image.pl?url=http%3a%2f%2fwww.lispworks.com%2fdocumentation%2fHyperSpec%2fBody%2f..%2fGraphics%2fCLHS_Sm.gif&f=jpg&w=240)
Value Type:
one of theatomic type specifiersshort-float,single-float,double-float, orlong-float, or else some othertype specifier defined by theimplementation to be acceptable.
Initial Value:
Description:
Controls the floating-point format that is to be used when reading a floating-point number that has noexponent marker or that hase orE for anexponent marker. Otherexponent markers explicitly prescribe the floating-point format to be used.
The printer uses*read-default-float-format* to guide the choice ofexponent markers when printing floating-point numbers.
Examples:
(let ((*read-default-float-format* 'double-float)) (read-from-string "(1.0 1.0e0 1.0s0 1.0f0 1.0d0 1.0L0)"))=> (1.0 1.0 1.0 1.0 1.0 1.0) ;Implementation has float format F.=> (1.0 1.0 1.0s0 1.0 1.0 1.0) ;Implementation has float formats S and F.=> (1.0d0 1.0d0 1.0 1.0 1.0d0 1.0d0) ;Implementation has float formats F and D.=> (1.0d0 1.0d0 1.0s0 1.0 1.0d0 1.0d0) ;Implementation has float formats S, F, D.=> (1.0d0 1.0d0 1.0 1.0 1.0d0 1.0L0) ;Implementation has float formats F, D, L.=> (1.0d0 1.0d0 1.0s0 1.0 1.0d0 1.0L0) ;Implementation has formats S, F, D, L.
Affected By: None.
See Also: None.
Notes: None.