Convert random.c to K&R style.
authorDavid Griffith <dave@661.org>
Sun, 22 Sep 2019 01:16:06 +0000 (18:16 -0700)
committerDavid Griffith <dave@661.org>
Mon, 23 Sep 2019 00:48:04 +0000 (17:48 -0700)
src/common/random.c

index 0c5d16f272cac86b3985b79957aef1ea17d474b7..15d2302ab22ef570f559d28e9efbe4b6df257840 100644 (file)
@@ -32,21 +32,19 @@ static int counter = 0;
  * Set the seed value for the random number generator.
  *
  */
-void seed_random (int value)
+void seed_random(int value)
 {
-
-    if (value == 0) {          /* ask interface for seed value */
-       A = os_random_seed ();
-       interval = 0;
-    } else if (value < 1000) { /* special seed value */
-       counter = 0;
-       interval = value;
-    } else {                   /* standard seed value */
-       A = value;
-       interval = 0;
-    }
-
-}/* seed_random */
+       if (value == 0) {               /* ask interface for seed value */
+               A = os_random_seed();
+               interval = 0;
+       } else if (value < 1000) {      /* special seed value */
+               counter = 0;
+               interval = value;
+       } else {                        /* standard seed value */
+               A = value;
+               interval = 0;
+       }
+} /* seed_random */
 
 
 /*
@@ -55,26 +53,23 @@ void seed_random (int value)
  *     zargs[0] = range (positive) or seed value (negative)
  *
  */
-void z_random ()
+void z_random()
 {
-    if ((short) zargs[0] <= 0) {       /* set random seed */
-
-       seed_random (- (short) zargs[0]);
-       store (0);
+       if ((short)zargs[0] <= 0) {     /* set random seed */
+               seed_random(-(short)zargs[0]);
+               store(0);
 
-    } else {                           /* generate random number */
+       } else {                /* generate random number */
+               zword result;
 
-       zword result;
-
-       if (interval != 0) {            /* ...in special mode */
-           result = counter++;
-           if (counter == interval) counter = 0;
-       } else {                        /* ...in standard mode */
-           A = 0x015a4e35L * A + 1;
-           result = (A >> 16) & 0x7fff;
+               if (interval != 0) {    /* ...in special mode */
+                       result = counter++;
+                       if (counter == interval)
+                               counter = 0;
+               } else {        /* ...in standard mode */
+                       A = 0x015a4e35L * A + 1;
+                       result = (A >> 16) & 0x7fff;
+               }
+               store((zword) (result % zargs[0] + 1));
        }
-
-       store ((zword) (result % zargs[0] + 1));
-    }
-
-}/* z_random */
+} /* z_random */