Index: tests/concurrent/park/start_parked.cfa
===================================================================
--- tests/concurrent/park/start_parked.cfa	(revision 0f89d4f6038337e8a92e6d44876066ca3eae85f5)
+++ tests/concurrent/park/start_parked.cfa	(revision 0f89d4f6038337e8a92e6d44876066ca3eae85f5)
@@ -0,0 +1,13 @@
+#include <thread.hfa>
+
+thread Parker {};
+void main( Parker & ) {
+      park( __cfaabi_dbg_ctx );
+}
+
+int main() {
+      for(1000) {
+            Parker parker;
+            unpark( parker __cfaabi_dbg_ctx2 );
+      }
+}