X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fsort-cases.c;h=cb60901fe64ed3dc8ca03a6df004dedc8608d079;hb=97de936d25fbed47960ac4ebd9a911fdd528f9e4;hp=1134874da5b5034fc54b932cb153ef5818d4aeeb;hpb=81579d9e9f994fb2908f50af41c3eb033d216e58;p=pspp diff --git a/src/language/stats/sort-cases.c b/src/language/stats/sort-cases.c index 1134874da5..cb60901fe6 100644 --- a/src/language/stats/sort-cases.c +++ b/src/language/stats/sort-cases.c @@ -21,7 +21,7 @@ #include #include -#include "data/procedure.h" +#include "data/dataset.h" #include "data/settings.h" #include "data/subcase.h" #include "data/variable.h" @@ -69,15 +69,15 @@ cmd_sort_cases (struct lexer *lexer, struct dataset *ds) } proc_discard_output (ds); - output = sort_execute (proc_open (ds), &ordering); + output = sort_execute (proc_open_filtering (ds, false), &ordering); ok = proc_commit (ds); - ok = proc_set_active_file_data (ds, output) && ok; + ok = dataset_set_source (ds, output) && ok; done: min_buffers = 64; max_buffers = INT_MAX; subcase_destroy (&ordering); - return ok ? lex_end_of_command (lexer) : CMD_CASCADING_FAILURE; + return ok ? CMD_SUCCESS : CMD_CASCADING_FAILURE; }