path: root/libraries/base/tests/readFloat.hs

import Numeric

main :: IO ()
main = putStrLn $ showFloat (read "" :: Float) ""