[Gd-chatter] r11138 - trunk/libraries/programming-tools/multi-thread-test

[hannes at gwydiondylan.org]

Author: hannes
Date: Thu Jan 18 02:14:53 2007
New Revision: 11138

Modified:
   trunk/libraries/programming-tools/multi-thread-test/multi-thread-test.dylan
Log:
Job: minor
this triggers the bug more often


Modified: trunk/libraries/programming-tools/multi-thread-test/multi-thread-test.dylan
==============================================================================
--- trunk/libraries/programming-tools/multi-thread-test/multi-thread-test.dylan	(original)
+++ trunk/libraries/programming-tools/multi-thread-test/multi-thread-test.dylan	Thu Jan 18 02:14:53 2007
@@ -22,9 +22,9 @@
     add!(ts.threads, count)
   end;
   format-out("Hello from %d\n",count);
-  //collect-garbage();
-  sleep(modulo(random(100000), 5));
-  format-out("Hello from %d\n",count);
+  collect-garbage();
+  //sleep(modulo(random(100000), 5));
+  //format-out("Hello from %d\n",count);
   with-lock (ts.lock)
     remove!(ts.threads, count)
   end;