max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

test(tests/compiler): add new test

Browse source
This commit is contained in:
Leonardo de Moura 2019-04-05 16:58:47 -07:00
parent 1bb920322d
commit d603baea70
2 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
tests/compiler/strictOrSimp.lean Normal file
View file

@ -0,0 +1,11 @@
partial def spin : Nat → Bool
| n := spin (n)
@[inline] def C : Nat := 0
def f (b : Nat) :=
if strictOr (C == 0) (spin b) then "hello"
else "world"
def main (xs : List String) : IO Unit :=
IO.println (f xs.head.toNat)

1
tests/compiler/strictOrSimp.lean.expected.out Normal file
View file

@ -0,0 +1 @@
hello