John, it looks like you deleted the random_shuffle() function.
Is there a reason for that?
John Darrington <[EMAIL PROTECTED]> writes:
> Index: pspp/src/algorithm.c
> diff -u pspp/src/algorithm.c:1.16 pspp/src/algorithm.c:1.17
> --- pspp/src/algorithm.c:1.16 Sun Jul 31 05:35:05 2005
> +++ pspp/src/algorithm.c Mon Oct 24 05:41:45 2005
> @@ -307,32 +307,6 @@
> return 1;
> }
>
> -/* A algo_random_func that uses random.h. */
> -unsigned
> -algo_default_random (unsigned max, void *aux UNUSED)
> -{
> - unsigned long r_min = gsl_rng_min (get_rng ());
> - return (gsl_rng_get (get_rng ()) - r_min) % max;
> -}
> -
> -/* Randomly reorders ARRAY, which contains COUNT elements of SIZE
> - bytes each. Uses RANDOM as a source of random data, passing
> - AUX as the auxiliary data. RANDOM may be null to use a
> - default random source. */
> -void
> -random_shuffle (void *array_, size_t count, size_t size,
> - algo_random_func *random, void *aux)
> -{
> - unsigned char *array = array_;
> - int i;
> -
> - if (random == NULL)
> - random = algo_default_random;
> -
> - for (i = 1; i < count; i++)
> - SWAP (array + i * size, array + random (i + 1, aux) * size, size);
> -}
> -
> /* Copies the COUNT elements of SIZE bytes each from ARRAY to
> RESULT, except that elements for which PREDICATE is false are
> not copied. Returns the number of elements copied. AUX is
>
>
> _______________________________________________
> Pspp-cvs mailing list
> [email protected]
> http://lists.gnu.org/mailman/listinfo/pspp-cvs
--
"I don't want to learn the constitution and the declaration of
independence (marvelous poetry though it be) by heart, and worship the
flag and believe that there is a god and the dollar is its prophet."
--Maarten Wiltink in the Monastery
_______________________________________________
pspp-dev mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/pspp-dev