More tests.

svn: r9664 original commit: 914de50133c8128cc9fe4b8a925f74a2c0a35645
2008-05-05 21:20:02 +00:00 · 2008-05-05 21:20:02 +00:00 · b77aba3d6b
commit b77aba3d6b
parent 94cd504b90
2 changed files with 12 additions and 0 deletions
--- a/collects/tests/typed-scheme/succeed/match.ss
+++ b/collects/tests/typed-scheme/succeed/match.ss
@ -0,0 +1,7 @@
+#lang typed-scheme
+
+(require scheme/match)
+
+(match 1
+  [2 3]
+  [x 4])
--- a/collects/tests/typed-scheme/succeed/string-const.ss
+++ b/collects/tests/typed-scheme/succeed/string-const.ss
@ -0,0 +1,5 @@
+#lang typed-scheme
+
+(require string-constants/string-constant)
+
+(string-constant cancel)