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

add more inst.mlish tests

Browse Source
This commit is contained in:
Stephen Chang 2016-03-17 19:22:05 -04:00
parent b65c4adc94
commit 7f593b52c8
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
tapl/tests/mlish/inst.mlish
View File

@ -22,3 +22,13 @@
(Ok 1))
(check-type g : (→/test (Result Int String)))
(define (h -> (Result Int Y))
(Ok 1))
(check-type h : (→/test (Result Int Y)))
(define (i -> (Result Int String))
(h))
(check-type i : (→/test (Result Int String)))