suzanne.soy/macrotypes
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

regression tests for subs?

Browse Source
This commit is contained in:
Ben Greenman 2015-10-15 15:37:48 -04:00
parent 36d568b512
commit 36bec40650
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tapl/tests/stlc+sub-tests.rkt
View File

@ -51,3 +51,7 @@
(typecheck-fail (λ ([x : (→ Int Int)]) (+ x x))) ; x should be Int
(typecheck-fail ((λ ([x : Int] [y : Int]) y) 1)) ; wrong number of args
(check-type ((λ ([x : Int]) (+ x x)) 10) : Num ⇒ 20)
(check-not-type (λ ([x : Int]) x) : Int)
(check-not-type (λ ([x : Int] [y : Int]) x) : (→ Int Int))
(check-not-type (λ ([x : Int]) x) : (→ Int Int Int Int))