Changes in tests/PRNG.cfa [470618c0: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 Feb 12 12:23:57 2022
-// Update Count     : 342
+// 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
@@ -51 +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 {};
@@ -95 +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 );