diff --git a/collects/tests/typed-scheme/succeed/match.ss b/collects/tests/typed-scheme/succeed/match.ss
new file mode 100644
index 00000000..74102759
--- /dev/null
+++ b/collects/tests/typed-scheme/succeed/match.ss
@@ -0,0 +1,7 @@
+#lang typed-scheme
+
+(require scheme/match)
+
+(match 1
+  [2 3]
+  [x 4])
\ No newline at end of file
diff --git a/collects/tests/typed-scheme/succeed/string-const.ss b/collects/tests/typed-scheme/succeed/string-const.ss
new file mode 100644
index 00000000..39354bc7
--- /dev/null
+++ b/collects/tests/typed-scheme/succeed/string-const.ss
@@ -0,0 +1,5 @@
+#lang typed-scheme
+
+(require string-constants/string-constant)
+
+(string-constant cancel)
\ No newline at end of file