javascript: remove overlapping case
commit3ccbc55f704eb065e8f75d2d733ad58031374571
authorraichoo <raichoo@googlemail.com>
dateTue 4 Mar 2014, 20:51 (13 years ago)
parent2364435
src/IRTS/CodegenJavaScript.hs−2
@@ -579,8 +579,6 @@ removeEval js =
579579 match (JSApp (JSIdent "__IDR__mEVAL0") [val]) = val
580580 match js = transformJS match js
581581
582− removeEvalApp js = js
583−
584582 checkEval :: [JS] -> ([JS], Bool)
585583 checkEval js = foldr f ([], False) $ map checkEval' js
586584 where