test(tests/compiler): add simple test for expr

This commit is contained in:
Leonardo de Moura 2019-02-13 16:22:01 -08:00
parent 9cb2005e8e
commit 06bb9b7ea8
2 changed files with 10 additions and 0 deletions

8
tests/compiler/expr.lean Normal file
View file

@ -0,0 +1,8 @@
import init.lean.expr
open lean
def main (xs : list string) : io uint32 :=
let e := expr.app (expr.const `f []) (expr.const `a []) in
io.println' e.dbg_to_string *>
io.println' ("hash: " ++ to_string e.hash) *>
pure 0

View file

@ -0,0 +1,2 @@
f a
hash: 938464039