git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix float parsing
a094228Gary Burgess
examples/passing/Math.purs+5−3
compare with golang
unifiedsplit
@@ -1,7 +1,9 @@
1module Main where
1module Main where
2
2
3 import Prelude
3 import Prelude
4− import Math
4+ import Trace
5−
5+ import Eff
6− main = Trace.print $ sin 1
7
6
7+ main = do
8+ print $ Math.sin 0
9+ print $ Math.sin 0.5
src/Language/PureScript/Parser/Common.hs+2−2
@@ -217,8 +217,8 @@ parseQualified parser = qual
217-- Parse an integer or floating point value
217-- Parse an integer or floating point value
218--
218--
219integerOrFloat :: P.Parsec String u (Either Integer Double)
219integerOrFloat :: P.Parsec String u (Either Integer Double)
220−integerOrFloat = (Left <$> P.try (PT.natural tokenParser) <|>
220+integerOrFloat = (Right <$> P.try (PT.float tokenParser) <|>
221− Right <$> P.try (PT.float tokenParser)) P.<?> "number"
221+ Left <$> P.try (PT.natural tokenParser)) P.<?> "number"
222
222
223-- |
223-- |
224-- Parse an identifier or parenthesized operator
224-- Parse an identifier or parenthesized operator