Haskell-Things/ImplicitCAD
1
1
Fork 0
mirror of https://github.com/Haskell-Things/ImplicitCAD.git synced 2024-11-04 01:26:48 +03:00
Code Issues Projects Releases Wiki Activity

do not try to match spaces before a pattern.

Browse Source
This commit is contained in:
Julia Longtin 2019-07-15 22:55:48 +01:00
parent c2c5a7428c
commit fd1ccd17d1
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Graphics/Implicit/ExtOpenScad/Parser/Statement.hs
View File

@ -97,10 +97,11 @@ suite = (fmap return computation <|> do
stmts <- many (try computation)
_ <- whiteSpace
_ <- char '}'
_ <- whiteSpace
return stmts
) <?> " suite"
-- | commenting out a comuptation: use % or * before the statement, and it will not be run.
-- | commenting out a computation: use % or * before the statement, and it will not be run.
throwAway :: GenParser Char st StatementI
throwAway = do
pos <- sourcePos