diff options
Diffstat (limited to 'src/Obs/Typing.idr')
| -rw-r--r-- | src/Obs/Typing.idr | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Obs/Typing.idr b/src/Obs/Typing.idr index 2a6aeaa..4183525 100644 --- a/src/Obs/Typing.idr +++ b/src/Obs/Typing.idr @@ -462,8 +462,8 @@ infer' ctx False = do infer' ctx (If {returnType = MkLambda var returnType, discriminant, true, false}) = do info "encountered if" - trace "checking discriminant is bool" + trace "checking discriminant is bool" discriminant <- check ctx (Set 0) (Cnstr Bool) discriminant trace "discriminant is well typed" |