@@ -202,7 +202,11 @@ jsStmt2Text (JsSwitchCase exp l d) =
202202 default2Text Nothing = ""
203203 default2Text (Just z) =
204204 T.concat ["default:\n", indent $ T.concat [jsStmt2Text z, ";\nbreak;\n"]]
205−jsStmt2Text (JsError t) = T.concat ["throw new Error( ", jsAst2Text t, ");"]
205+jsStmt2Text (JsError t) =
206+ T.concat
207+ [ "console.error(", jsAst2Text t, ");\n"
208+ , "process.exit(-1);"
209+ ]
206210jsStmt2Text (JsForever x) =
207211 T.concat ["for(;;) {\n", indent $ jsStmt2Text x, "}\n"]
208212jsStmt2Text JsContinue = "continue;"