commit 95e4532c2c50d970dff178391f5d0222e8e89acf parent c3de336a5b48ec471cd547a656ee43bf1f1c65d8 Author: NunoSempere <nuno.sempere@protonmail.com> Date: Thu, 14 Dec 2023 13:02:27 +0000 don't make quickselect "destructive"; recompile Diffstat:
23 files changed, 13 insertions(+), 3 deletions(-)
diff --git a/examples/core/00_example_template/example b/examples/core/00_example_template/example Binary files differ. diff --git a/examples/core/01_one_sample/example b/examples/core/01_one_sample/example Binary files differ. diff --git a/examples/core/02_time_to_botec/example b/examples/core/02_time_to_botec/example Binary files differ. diff --git a/examples/core/03_gcc_nested_function/example b/examples/core/03_gcc_nested_function/example Binary files differ. diff --git a/examples/core/04_gamma_beta/example b/examples/core/04_gamma_beta/example Binary files differ. diff --git a/examples/core/05_hundred_lognormals/example b/examples/core/05_hundred_lognormals/example Binary files differ. diff --git a/examples/more/00_example_template/example b/examples/more/00_example_template/example Binary files differ. diff --git a/examples/more/01_sample_from_cdf/example b/examples/more/01_sample_from_cdf/example Binary files differ. diff --git a/examples/more/02_sample_from_cdf_beta/example b/examples/more/02_sample_from_cdf_beta/example Binary files differ. diff --git a/examples/more/03_ci_beta/example b/examples/more/03_ci_beta/example Binary files differ. diff --git a/examples/more/04_nuclear_war/example b/examples/more/04_nuclear_war/example Binary files differ. diff --git a/examples/more/05_burn_10kg_fat/example b/examples/more/05_burn_10kg_fat/example Binary files differ. diff --git a/examples/more/06_nuclear_recovery/example b/examples/more/06_nuclear_recovery/example Binary files differ. diff --git a/examples/more/07_algebra/example b/examples/more/07_algebra/example Binary files differ. diff --git a/examples/more/08_algebra_and_conversion/example b/examples/more/08_algebra_and_conversion/example Binary files differ. diff --git a/examples/more/09_ergonomic_algebra/example b/examples/more/09_ergonomic_algebra/example Binary files differ. diff --git a/examples/more/10_twitter_thread_example/example b/examples/more/10_twitter_thread_example/example Binary files differ. diff --git a/examples/more/11_billion_lognormals_paralell/example b/examples/more/11_billion_lognormals_paralell/example Binary files differ. diff --git a/examples/more/12_time_to_botec_parallel/example b/examples/more/12_time_to_botec_parallel/example Binary files differ. diff --git a/examples/more/13_parallelize_min/example b/examples/more/13_parallelize_min/example Binary files differ. diff --git a/examples/more/14_check_confidence_interval/example b/examples/more/14_check_confidence_interval/example Binary files differ. diff --git a/squiggle_more.c b/squiggle_more.c @@ -6,6 +6,7 @@ #include <stdint.h> #include <stdio.h> #include <stdlib.h> +#include <string.h> // memcpy /* Parallel sampler */ void sampler_parallel(double (*sampler)(uint64_t* seed), double* results, int n_threads, int n_samples) @@ -105,15 +106,24 @@ static int partition(int low, int high, double xs[], int length) static double quickselect(int k, double xs[], int n) { // https://en.wikipedia.org/wiki/Quickselect + + double *ys = malloc((size_t)n * sizeof(double)); + memcpy(ys, xs, (size_t)n * sizeof(double)); + // ^: don't make this operation "destructive" + int low = 0; int high = n - 1; for (;;) { if (low == high) { - return xs[low]; + double result = ys[low]; + free(ys); + return result; } - int pivot = partition(low, high, xs, n); + int pivot = partition(low, high, ys, n); if (pivot == k) { - return xs[pivot]; + double result = ys[pivot]; + free(ys); + return result; } else if (k < pivot) { high = pivot - 1; } else { diff --git a/test/test b/test/test Binary files differ.