We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 2aad875 commit ffe1260Copy full SHA for ffe1260
src/Parsing/String/Basic.purs
@@ -120,7 +120,7 @@ number =
120
numberRegex :: forall m. ParserT String m String
121
numberRegex = either unsafeCrashWith identity $ regex pattern mempty
122
where
123
- pattern = "[+-]?[0-9]*(\\.[0-9]*)?([eE][+-]?[0-9]*(\\.[0-9]*))?"
+ pattern = "[+-]?[0-9]*(\\.[0-9]*)?([eE][+-]?[0-9]*(\\.[0-9]*)?)?"
124
125
-- | Parser based on the __Data.Int.fromString__ function.
126
-- |
test/Main.purs
@@ -726,6 +726,11 @@ main = do
726
, expected: Right (-0.3)
727
}
728
729
+ assertEqual' "number xEy"
730
+ { actual: runParser "2e1" number
731
+ , expected: Right 20.0
732
+ }
733
+
734
-- test from issue #73
735
assertEqual' "number 2"
736
{ actual: runParser "0.7531531167929774" number
0 commit comments