diff options
Diffstat (limited to 'src/Obs/Abstract.idr')
| -rw-r--r-- | src/Obs/Abstract.idr | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Obs/Abstract.idr b/src/Obs/Abstract.idr index b32af2d..a9ef411 100644 --- a/src/Obs/Abstract.idr +++ b/src/Obs/Abstract.idr @@ -25,7 +25,7 @@ abstractSyntax ctx (Var var) = do let Just i = lookup var ctx | Nothing => inScope "unbound variable" $ fatal var pure (Var var i) -abstractSyntax ctx (Sort s) = pure (Sort s) +abstractSyntax ctx (Universe s) = pure (Universe s) abstractSyntax ctx (Pi var a b) = do a <- abstractSyntaxBounds ctx a b <- abstractSyntaxBounds (bind ctx var.val) b |