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

diff --git a/src/language/stats/aggregate.c b/src/language/stats/aggregate.c
index 721dba73d3..640746991c 100644
--- a/src/language/stats/aggregate.c
+++ b/src/language/stats/aggregate.c
@@ -708,7 +708,7 @@ agr_destroy (struct agr_proc *agr)
 {
   struct agr_var *iter, *next;
 
-  subcase_destroy (&agr->sort);
+  subcase_uninit (&agr->sort);
   free (agr->break_vars);
   for (iter = agr->agr_vars; iter; iter = next)
     {
@@ -1119,7 +1119,7 @@ initialize_aggregate_info (struct agr_proc *agr)
 
             subcase_init_var (&ordering, iter->subject, SC_ASCEND);
 	    iter->writer = sort_create_writer (&ordering, proto);
-            subcase_destroy (&ordering);
+            subcase_uninit (&ordering);
             caseproto_unref (proto);
 
 	    iter->cc = 0;