X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fwilcoxon.c;h=e1fb14f01506035d40bcee4f37a9afd17f4788c9;hb=577812dc389ab344cc7ad83cc826f7066786b99b;hp=775e63ef4adbe582c517a26da453d4d1a15c334b;hpb=cbab34f8cd28876f9b1d67d2ad10b312181bf2f6;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))
 	{