avoid unused variable
This commit is contained in:
parent
3879bca336
commit
799dc8d329
1 changed files with 1 additions and 1 deletions
|
@ -616,7 +616,7 @@ mangleCode = flip_colon
|
||||||
let_do = parsecAndReplace $ do
|
let_do = parsecAndReplace $ do
|
||||||
void $ string "= do { let "
|
void $ string "= do { let "
|
||||||
x <- many $ noneOf "=\r\n"
|
x <- many $ noneOf "=\r\n"
|
||||||
ws <- many1 $ oneOf " \t\r\n"
|
_ <- many1 $ oneOf " \t\r\n"
|
||||||
void $ string "= "
|
void $ string "= "
|
||||||
return $ "= do { " ++ x ++ " <- return $ "
|
return $ "= do { " ++ x ++ " <- return $ "
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue