X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Froc.c;h=8b5cc3d0495e2abc4e16f1541ea1cb40a117a2bf;hb=28d3dbe39fce5b5ccdae8c99b4e00746f4aaad22;hp=031110a046a235f5ab0e72df4837f83a2a3cf636;hpb=417da434cb315f48cd0cca4f9fb9e7938bf52e54;p=pspp

diff --git a/src/language/stats/roc.c b/src/language/stats/roc.c
index 031110a046..8b5cc3d049 100644
--- a/src/language/stats/roc.c
+++ b/src/language/stats/roc.c
@@ -664,7 +664,7 @@ prepare_cutpoints (struct cmd_roc *roc, struct roc_state *rs, struct casereader
       }
 
     caseproto_unref (proto);
-    subcase_destroy (&ordering);
+    subcase_uninit (&ordering);
   }
 
   for (; (c = casereader_read (r)) != NULL; case_unref (c))
@@ -945,8 +945,8 @@ do_roc (struct cmd_roc *roc, struct casereader *reader, struct dictionary *dict)
   casereader_destroy (negatives);
 
   caseproto_unref (n_proto);
-  subcase_destroy (&up_ordering);
-  subcase_destroy (&down_ordering);
+  subcase_uninit (&up_ordering);
+  subcase_uninit (&down_ordering);
 
   output_roc (rs, roc);