Changes in tests/PRNG.cfa [ee4b77b:5910fc0]

File:

• tests/PRNG.cfa (modified) (4 diffs)

tests/PRNG.cfa

@@ -8 +8 @@
 // Created On       : Wed Dec 29 09:38:12 2021
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sat Apr  9 15:21:14 2022
-// Update Count     : 344
+// Last Modified On : Fri Feb 11 08:16:43 2022
+// Update Count     : 328
 // 
 
@@ -20 +20 @@
 #include <malloc.h>                                                                             // malloc_stats
 #include <locale.h>                                                                             // setlocale
-#include <mutex_stmt.hfa>
+
+// FIX ME: spurious characters appear in output
+Duration default_preemption() { return 0; }
 
 #ifdef TIME                                                                                             // use -O2 -nodebug
@@ -48 +50 @@
         } // for
         double std = sqrt( sum / BUCKETS );
-        mutex( sout ) sout | "trials"  | TRIALS | "buckets" | BUCKETS
-                | "min" | min | "max" | max
-                | "avg" | wd(0,1, avg) | "std" | wd(0,1, std) | "rstd" | wd(0,1, (avg == 0 ? 0.0 : std / avg * 100)) | "%";
+        sout | "trials"  | TRIALS | "buckets" | BUCKETS
+                 | "min" | min | "max" | max
+                 | "avg" | wd(0,1, avg) | "std" | wd(0,1, std) | "rstd" | wd(0,1, (avg == 0 ? 0.0 : std / avg * 100)) | "%";
 } // avgstd
 
-
 uint32_t seed = 1009;
+
 
 thread T1 {};
@@ -92 +94 @@
         unsigned int * buckets = calloc( BUCKETS );                     // too big for task stack
         for ( TRIALS ) {
-                buckets[prng( th ) % BUCKETS] += 1;     // concurrent
+                buckets[prng( (thread$ &)th ) % BUCKETS] += 1;  // concurrent
         } // for
         avgstd( buckets );