@@ -387,7 +387,7 @@ cgBody rt (LOp op args) =
387387 res <- cgOp op (map snd z)
388388 pure $ (concat $ map fst z, addRT rt $ res)
389389cgBody rt LNothing = pure ([], addRT rt JsNull)
390−cgBody rt (LError x) = pure ([JsError $ JsStr x], addRT rt JsNull)
390+cgBody rt (LError x) = pure ([], JsError $ JsStr x)
391391cgBody rt x@(LForeign dres (FStr code) args ) =
392392 do
393393 z <- mapM (cgBody GetExpBT) (map snd args)