@@ -167,7 +167,11 @@ compileJS' indent (JSType ty)
167 | JSForgotTy <- ty = idrRTNamespace ++ "Forgot"
167 | JSForgotTy <- ty = idrRTNamespace ++ "Forgot"
169compileJS' indent (JSSeq seq) =
169compileJS' indent (JSSeq seq) =
170− intercalate ";\n" (map (((replicate indent ' ') ++) . (compileJS' indent)) $ filter (/= JSNoop) seq) ++ ";"
172+ ((replicate indent ' ') ++) . (compileJS' indent)
173+ ) $ filter (/= JSNoop) seq
172compileJS' indent (JSReturn val) =
176compileJS' indent (JSReturn val) =
173 "return " ++ compileJS' indent val
177 "return " ++ compileJS' indent val