Changeset 42089 for trunk/psLib/src/math/psRandom.c

Timestamp:

Feb 28, 2022, 2:43:25 PM (4 years ago)

Author:

eugene

Message:

plug a leak in psFitsTableNew.c; fix implementation of FITS_SCALE_ASINH_MANUAL; add option to reweight the errors in LMM; compile-time option to activate a hard-coded random seed (only needed for psLib testing)

File:

• trunk/psLib/src/math/psRandom.c (modified) (2 diffs)

trunk/psLib/src/math/psRandom.c

@@ -38 +38 @@
 #include "psAssert.h"
 
-
-unsigned long seed = 0;                 // Seed for RNG
-
+// XXX set to non-zero for a test
+# define HARDWIRED_SEED 0
+unsigned long seed = HARDWIRED_SEED;                 // Seed for RNG
 
 psU64 p_psRandomGetSystemSeed(bool log)
@@ -71 +71 @@
 psU64 psRandomSeed(psU64 value)
 {
+    if (HARDWIRED_SEED) {
+        seed = HARDWIRED_SEED;
+        return seed;
+    }
+
     while (value == 0) {
         value = p_psRandomGetSystemSeed(false);