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

pulling from sk's cs019 language

Browse Source
This commit is contained in:
Danny Yoo 2011-11-09 21:44:54 -05:00
parent d7269558ed
commit 8962a9f79e
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tests/more-tests/sigs-cs019.rkt
View File

@ -25,6 +25,9 @@
(list "Number$") (list "Number$")
(list 17)) (list 17))
(define smallvec (vector 0))
(define: vd : Void$ (vector-set! smallvec 0 1))
(check-expect (vector-ref smallvec 0) 1)
(define: (g2 [x : Number$]) -> String$ 'not-a-string) (define: (g2 [x : Number$]) -> String$ 'not-a-string)
#;(check-error (g2 "10")) #;(check-error (g2 "10"))