Skip to content
Browse files

And I'd forgotten to add newlines to whitespace too.

Everything should work now.
  • Loading branch information...
1 parent 4661177 commit 59d4c4814b862cd9f0de40d7f993cbbd491b5dd5 @colah committed Sep 11, 2012
Showing with 2 additions and 5 deletions.
  1. +2 −5 Graphics/Implicit/ExtOpenScad/Util.hs
View
7 Graphics/Implicit/ExtOpenScad/Util.hs
@@ -44,11 +44,8 @@ infixr 2 <||>
-- white space, including tabs and comments
genSpace = many $
- ( try $
- space
- ) <|> ( try $
- char '\t'
- ) <|> (try $ do
+ oneOf " \t\n"
+ <|> (try $ do
string "//"
many ( noneOf "\n")
string "\n"

0 comments on commit 59d4c48

Please sign in to comment.
Something went wrong with that request. Please try again.