mirror of https://github.com/zachjs/sv2v.git
allow escaped newline in macro arguments
This commit is contained in:
parent
9524f0028b
commit
ba7fbd5506
|
|
@ -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)
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue