git.iko.soy/elk
on master help sign in
Update for rename of `crash` to `todo`
72911f0Evan Czaplicki
compiler/src/Generate/JavaScript/Expression.hs+3−3
compare with master
unifiedsplit
@@ -287,18 +287,18 @@ generateRecord mode fields =
287
287
288generateDebug :: N.Name -> ModuleName.Canonical -> R.Region -> Maybe N.Name -> JS.Expr
288generateDebug :: N.Name -> ModuleName.Canonical -> R.Region -> Maybe N.Name -> JS.Expr
289generateDebug name (ModuleName.Canonical _ home) region unhandledValueName =
289generateDebug name (ModuleName.Canonical _ home) region unhandledValueName =
290− if name /= "crash" then
290+ if name /= "todo" then
291 JS.Ref (Name.fromGlobal ModuleName.debug name)
291 JS.Ref (Name.fromGlobal ModuleName.debug name)
292 else
292 else
293 case unhandledValueName of
293 case unhandledValueName of
294 Nothing ->
294 Nothing ->
295− JS.Call (JS.Ref (Name.fromKernel N.utils "crash")) $
295+ JS.Call (JS.Ref (Name.fromKernel N.debug "todo")) $
296 [ JS.String (N.toBuilder home)
296 [ JS.String (N.toBuilder home)
297 , regionToJsExpr region
297 , regionToJsExpr region
298 ]
298 ]
299
299
300 Just valueName ->
300 Just valueName ->
301− JS.Call (JS.Ref (Name.fromKernel N.utils "crashCase")) $
301+ JS.Call (JS.Ref (Name.fromKernel N.debug "todoCase")) $
302 [ JS.String (N.toBuilder home)
302 [ JS.String (N.toBuilder home)
303 , regionToJsExpr region
303 , regionToJsExpr region
304 , JS.Ref (Name.fromLocal valueName)
304 , JS.Ref (Name.fromLocal valueName)
compiler/src/Reporting/Error/Pattern.hs+1−1
@@ -84,7 +84,7 @@ toReport source err =
84 , H.reflow $
84 , H.reflow $
85 "I would have to crash if I saw one of those. Add branches for them!"
85 "I would have to crash if I saw one of those. Add branches for them!"
86 , H.link "Hint"
86 , H.link "Hint"
87− "If you want to write the code for each branch later, use `Debug.crash` as a placeholder. Read"
87+ "If you want to write the code for each branch later, use `Debug.todo` as a placeholder. Read"
88 "missing-patterns"
88 "missing-patterns"
89 "for more guidance on this workflow."
89 "for more guidance on this workflow."
90 ]
90 ]