added testcases for evaluation with suspension

This commit is contained in:
krasimir
2009-07-07 11:40:14 +00:00
parent fd03f9fa0f
commit 5abc99b291
3 changed files with 28 additions and 0 deletions

View File

@@ -27,3 +27,8 @@ pt -compute dec (succ (succ zero))
pt -compute dec (succ ?)
pt -compute \x -> dec x
pt -compute dec ?
pt -compute (\f -> f 0) (g3 ?)
pt -compute g (g2 ? 0)
pt -compute plus (succ zero) (succ zero)
pt -compute dec2 0 (succ zero)
pt -compute plus err (succ zero)