From f69006aa54f0251e4db2501810a8e27b8cbf0ca1 Mon Sep 17 00:00:00 2001
From: Michael Ploujnikov <ploujj@gmail.com>
Date: Fri, 29 Jan 2010 22:12:09 -0500
Subject: [PATCH] test spawning a bunch of short sleeping threads

---
 tests/30backend-threadpool.tests |  3 +++
 tests/backend/test-threadpool.c  | 29 ++++++++++++++++++-----------
 2 files changed, 21 insertions(+), 11 deletions(-)

diff --git a/tests/30backend-threadpool.tests b/tests/30backend-threadpool.tests
index 3f8fc773e..23c4d456a 100644
--- a/tests/30backend-threadpool.tests
+++ b/tests/30backend-threadpool.tests
@@ -22,4 +22,7 @@ err: thread 2 state=IDLE
 err: cleaning up
 END
 
+TEST "many sleepy threads" many-sleepy-threads <<END
+END
+
 PLANNED "error cleared on join"
diff --git a/tests/backend/test-threadpool.c b/tests/backend/test-threadpool.c
index 5589935ce..185e85ee6 100644
--- a/tests/backend/test-threadpool.c
+++ b/tests/backend/test-threadpool.c
@@ -44,6 +44,14 @@ void is_prime(void * arg)
   *(unsigned long long *)arg = prime;
 }
 
+void sleep_fn(void * arg)
+{
+  unsigned int usec = *(int *)arg;
+
+  unsigned int result = usleep (usec);
+  *(int *)arg = result;
+}
+
 TESTS_BEGIN
 
 TEST ("threadpool-basic")
@@ -105,13 +113,13 @@ TEST ("two-thread-acquire")
   lumiera_threadpool_destroy();
 }
 
-#if 0
-TEST ("many-acquire-release")
+TEST ("many-sleepy-threads")
 {
 
   const int threads_per_pool_count = 10;
+  unsigned int delay = 13;
 
-  lumiera_threadpool_init(10);
+  lumiera_threadpool_init();
   LumieraThread threads[threads_per_pool_count*LUMIERA_THREADCLASS_COUNT];
   
   for (int kind = 0; kind < LUMIERA_THREADCLASS_COUNT; ++kind)
@@ -119,21 +127,20 @@ TEST ("many-acquire-release")
       for (int i = 0; i < threads_per_pool_count; ++i)
 	{
 	  threads[i+kind*threads_per_pool_count] =
-	    lumiera_threadpool_acquire_thread(kind,
-					      "test purpose",
-					      &NOBUG_FLAG(NOBUG_ON));
+	    lumiera_thread_run(kind,
+			       &sleep_fn,
+			       (void *) &delay,
+			       "just sleep a bit",
+			       &NOBUG_FLAG(NOBUG_ON));
 	}
     }
 
-  for (int i = 0; i < threads_per_pool_count*LUMIERA_THREADCLASS_COUNT; ++i)
-    {
-      lumiera_threadpool_release_thread(threads[i]);
-    }
-
   lumiera_threadpool_destroy();
 
 }
 
+#if 0
+
 TEST ("toomany-acquire-release")
 {