@@ -579,8 +579,6 @@ removeEval js =
579 match (JSApp (JSIdent "__IDR__mEVAL0") [val]) = val
579 match (JSApp (JSIdent "__IDR__mEVAL0") [val]) = val
580 match js = transformJS match js
580 match js = transformJS match js
582− removeEvalApp js = js
584 checkEval :: [JS] -> ([JS], Bool)
582 checkEval :: [JS] -> ([JS], Bool)
585 checkEval js = foldr f ([], False) $ map checkEval' js
583 checkEval js = foldr f ([], False) $ map checkEval' js