Remove unnecessary lookahead in readDollarLonely
This commit is contained in:
parent
eeb7ea01c9
commit
c381c5746f
|
@ -1698,7 +1698,6 @@ readDollarLonely = do
|
||||||
start <- startSpan
|
start <- startSpan
|
||||||
char '$'
|
char '$'
|
||||||
id <- endSpan start
|
id <- endSpan start
|
||||||
n <- lookAhead (anyChar <|> (eof >> return '_'))
|
|
||||||
return $ T_Literal id "$"
|
return $ T_Literal id "$"
|
||||||
|
|
||||||
prop_readHereDoc = isOk readScript "cat << foo\nlol\ncow\nfoo"
|
prop_readHereDoc = isOk readScript "cat << foo\nlol\ncow\nfoo"
|
||||||
|
|
Loading…
Reference in New Issue