X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fwilcoxon.c;fp=src%2Flanguage%2Fstats%2Fwilcoxon.c;h=e1fb14f01506035d40bcee4f37a9afd17f4788c9;hb=2a76184b55a8c229adc0b31d3436d29076de0ef8;hp=775e63ef4adbe582c517a26da453d4d1a15c334b;hpb=71f9b6d6c14525cd41ba77c9fd50aa13d0da830c;p=pspp

diff --git a/src/language/stats/wilcoxon.c b/src/language/stats/wilcoxon.c
index 775e63ef4a..e1fb14f015 100644
--- a/src/language/stats/wilcoxon.c
+++ b/src/language/stats/wilcoxon.c
@@ -116,7 +116,7 @@ wilcoxon_execute (const struct dataset *ds,
 
       subcase_init_var (&ordering, ws[i].absdiff, SC_ASCEND);
       writer = sort_create_writer (&ordering, proto);
-      subcase_destroy (&ordering);
+      subcase_uninit (&ordering);
 
       for (; (c = casereader_read (r)) != NULL; case_unref (c))
 	{