@@ -56,7 +56,7 @@ module Prelude where
56 read _ = false
56 read _ = false
58 foreign import readNumber "function readNumber(n) {\
58 foreign import readNumber "function readNumber(n) {\
59− \ return parseInt(n, 10);\
59+ \ return parseFloat(n);\
60 \}" :: String -> Number
60 \}" :: String -> Number
62 instance Read Number where
62 instance Read Number where