X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Fmath%2Fsort.c;h=01e955334c9480cccc47f385519367d490e41d5e;hb=a6df7a4863f51dd4121a067f947335fba197617b;hp=310fae9c1b26c24781b5b9f22d18d2671df86a03;hpb=38006c9843177b65a2ce9bee47c1a8eeb6243973;p=pspp-builds.git

diff --git a/src/math/sort.c b/src/math/sort.c
index 310fae9c..01e95533 100644
--- a/src/math/sort.c
+++ b/src/math/sort.c
@@ -112,8 +112,11 @@ sort_active_file_to_casefile (const struct sort_criteria *criteria)
 
   cb_data.criteria = criteria;
   cb_data.output = NULL;
-  multipass_procedure (sort_to_casefile_callback, &cb_data);
-
+  if (!multipass_procedure (sort_to_casefile_callback, &cb_data)) 
+    {
+      casefile_destroy (cb_data.output);
+      return NULL;
+    }
   return cb_data.output;
 }