chore: use LitValue.toExpr instead of duplicating its definition (#8398)
This commit is contained in:
parent
e7b8df0c0e
commit
fbac0d2ddb
1 changed files with 1 additions and 2 deletions
|
|
@ -117,8 +117,7 @@ private unsafe def LetValue.updateArgsImp (e : LetValue) (args' : Array Arg) : L
|
|||
|
||||
def LetValue.toExpr (e : LetValue) : Expr :=
|
||||
match e with
|
||||
| .lit (.nat val) => .lit (.natVal val)
|
||||
| .lit (.str val) => .lit (.strVal val)
|
||||
| .lit v => v.toExpr
|
||||
| .erased => erasedExpr
|
||||
| .proj n i s => .proj n i (.fvar s)
|
||||
| .const n us as => mkAppN (.const n us) (as.map Arg.toExpr)
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue