fix corner case

teuben · Dec 26, 2024 · 7768489 · 7768489
1 parent 48e8f6b
commit 7768489
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/kernel/misc/xrandom.c b/src/kernel/misc/xrandom.c
@@ -190,6 +190,8 @@ double xrandom(double xl, double xh)
 {
     double retval;
 
+    if (xl==xh) return xl;
+
     for(;;) {
 #if defined(HAVE_GSL)
         if (my_r == NULL) error("GSL init_xrandom was never called");
@@ -237,6 +239,8 @@ double grandom(double mean, double sdev)
     static double v1, v2, s;
     static int gcount = 0;
 
+    if (sdev <= 0) return mean;
+
     if (gcount) {
         gcount = 0;
         return mean + sdev * v2 * s;