javascript: optimize assignments
commit8529f874e8a6f6b85be16b6dcab7c6583da40efe
authorraichoo <raichoo@googlemail.com>
dateTue 8 Oct 2013, 10:17 (13 years ago)
parent0e9d165
src/IRTS/CodegenJavaScript.hs+3
@@ -256,6 +256,9 @@ optimizeJS (JSApp (JSFunction [arg] (JSReturn ret)) [val])
256256 ) field
257257 ) (head $ jsSubst arg [idx] (optimizeJS val))
258258
259+optimizeJS (JSAssign lhs rhs) =
260+ JSAssign lhs (optimizeJS rhs)
261+
259262optimizeJS (JSSeq seq) =
260263 JSSeq (map optimizeJS seq)
261264