TR test for racket/function

2011-06-22 14:30:01 -04:00 · 2011-06-22 14:30:01 -04:00 · cee2509476
commit cee2509476
parent 05a5c16231
1 changed files with 10 additions and 0 deletions
--- a/collects/tests/typed-scheme/succeed/function.rkt
+++ b/collects/tests/typed-scheme/succeed/function.rkt
@ -0,0 +1,10 @@
+#lang typed/racket
+
+;; Test imports from racket/function
+
+(identity 5)
+(identity (lambda (x) "test"))
+
+((const 'foo) 1 2 3)
+
+((curry (lambda (x y) (cons x y)) 5) '())