@@ -256,8 +256,6 @@ jsSubst var new (JSReturn ret) =
257jsSubst _ _ js = js
257jsSubst _ _ js = js
259−inlineAble _ _ _ = True
261inlineJS :: JS -> JS
259inlineJS :: JS -> JS
262inlineJS (JSApp (JSFunction [] (JSSeq ret)) []) =
260inlineJS (JSApp (JSFunction [] (JSSeq ret)) []) =
263 JSApp (JSFunction [] (JSSeq (map inlineJS ret))) []
261 JSApp (JSFunction [] (JSSeq (map inlineJS ret))) []