Commit ba7fbd55 by Zachary Snow

allow escaped newline in macro arguments

parent 9524f002
...@@ -755,7 +755,11 @@ takeMacroArguments = do ...@@ -755,7 +755,11 @@ takeMacroArguments = do
case (stack, ch) of case (stack, ch) of
( s,'\\') -> do ( s,'\\') -> do
ch2 <- takeChar ch2 <- takeChar
loop (curr ++ [ch, ch2]) s if ch2 == '\n'
then do
dropWhitespace
loop curr s
else loop (curr ++ [ch, ch2]) s
([ ], ',') -> return (curr, False) ([ ], ',') -> return (curr, False)
([ ], ')') -> return (curr, True) ([ ], ')') -> return (curr, True)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment