simple test creating 20 threads...

tests/40components.tests

@@ -332,6 +332,11 @@ return: 0
 END
 
 
+TEST "Create 20 Threads passing context" ThreadWrapper_test  <<END
+return: 0
+END
+
+
 TEST "TestOption_test" TestOption_test <<END
 out: Testing invocation with cmdline: ...
 out: --> Testgroup=ALL

tests/lib/Makefile.am

@@ -63,6 +63,7 @@ test_lib_SOURCES =						\
 	$(testlib_srcdir)/sync-classlock-test.cpp		\
 	$(testlib_srcdir)/sync-locking-test.cpp			\
 	$(testlib_srcdir)/sync-waiting-test.cpp			\
+	$(testlib_srcdir)/thread-wrapper-test.cpp		\
 	$(testlib_srcdir)/test/cmdlinewrappertest.cpp		\
 	$(testlib_srcdir)/test/testoptiontest.cpp		\
 	$(testlib_srcdir)/vectortransfertest.cpp		\

tests/lib/thread-wrapper-test.cpp

@@ -0,0 +1,117 @@
+/*
+  ThreadWrapper(Test)  -  starting threads and passing context
+ 
+  Copyright (C)         Lumiera.org
+    2008,               Hermann Vosseler <Ichthyostega@web.de>
+ 
+  This program is free software; you can redistribute it and/or
+  modify it under the terms of the GNU General Public License as
+  published by the Free Software Foundation; either version 2 of the
+  License, or (at your option) any later version.
+ 
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+ 
+  You should have received a copy of the GNU General Public License
+  along with this program; if not, write to the Free Software
+  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ 
+* *****************************************************/
+
+
+#include "lib/test/run.hpp"
+
+#include "include/symbol.hpp"
+#include "lib/thread-wrapper.hpp"
+#include "lib/sync.hpp"
+
+#include <tr1/functional>
+
+using std::tr1::bind;
+using test::Test;
+
+
+
+namespace lumiera {
+  namespace test  {
+  
+    namespace { // private test classes and data...
+      
+      ulong sum;
+      ulong checksum;
+      
+      const uint NUM_THREADS      = 20;
+      const uint MAX_RAND_SUMMAND = 100;
+      
+      uint
+      createVal()  ///< generating test values, remembering the sum
+      {
+        uint val(rand() % MAX_RAND_SUMMAND);
+        checksum += val;
+        return val;
+      }
+      
+      
+      struct TestThread : Thread
+        {
+          TestThread()
+            : Thread("test Thread creation",
+                     bind (&TestThread::theOperation, this, createVal(), createVal()))
+            { }                         // note the binding (functor object) is passed as anonymous temporary
+          
+           
+          void 
+          theOperation (uint a, uint b) ///< the actual operation running in a separate thread
+            {
+              Lock sync(this);          // *not* a recursive lock, because parent unlocks prior to invoking the operation 
+              sum += (a+b);
+            }
+        };
+      
+    } // (End) test classes and data....
+    
+    
+    
+    
+    
+    
+    
+    
+    
+    
+    /**************************************************************************
+     * @test use the Lumiera backend to create some new threads, utilising the
+     *       lumiera::Thread wrapper for binding to an arbitrary operation
+     *       and passing the appropriate context.
+     * 
+     * @see lumiera::Thread
+     * @see threads.h
+     */
+    class ThreadWrapper_test : public Test
+      {
+        
+        virtual void
+        run (Arg)
+          {
+            sum = checksum = 0;
+            TestThread instances[NUM_THREADS]    SIDEEFFECT;
+            
+            ASSERT (0 < sum);
+            ASSERT (sum==checksum);
+          }
+        
+        
+      };
+    
+    
+    
+    /** Register this test class... */
+    LAUNCHER (ThreadWrapper_test, "function common");
+    
+    
+    
+  } // namespace test
+
+} // namespace lumiera