@@ -287,18 +287,18 @@ generateRecord mode fields =
287287
288288generateDebug :: N.Name -> ModuleName.Canonical -> R.Region -> Maybe N.Name -> JS.Expr
289289generateDebug name (ModuleName.Canonical _ home) region unhandledValueName =
290− if name /= "crash" then
290+ if name /= "todo" then
291291 JS.Ref (Name.fromGlobal ModuleName.debug name)
292292 else
293293 case unhandledValueName of
294294 Nothing ->
295− JS.Call (JS.Ref (Name.fromKernel N.utils "crash")) $
295+ JS.Call (JS.Ref (Name.fromKernel N.debug "todo")) $
296296 [ JS.String (N.toBuilder home)
297297 , regionToJsExpr region
298298 ]
299299
300300 Just valueName ->
301− JS.Call (JS.Ref (Name.fromKernel N.utils "crashCase")) $
301+ JS.Call (JS.Ref (Name.fromKernel N.debug "todoCase")) $
302302 [ JS.String (N.toBuilder home)
303303 , regionToJsExpr region
304304 , JS.Ref (Name.fromLocal valueName)