Add kw test

svn: r11850
2008-09-24 14:03:25 +00:00 · 2008-09-24 14:03:25 +00:00 · 9c08df4789
commit 9c08df4789
parent 81b9f63852
1 changed files with 8 additions and 0 deletions
--- a/collects/tests/typed-scheme/succeed/kw.ss
+++ b/collects/tests/typed-scheme/succeed/kw.ss
@ -0,0 +1,8 @@
+#lang typed-scheme
+
+
+
+(lambda () 
+  (open-input-file "foo" #:mode 'binary)
+  (open-input-file "foo" #:mode 'text)
+  (open-input-file "foo"))