From: Ben Pfaff <blp@cs.stanford.edu>
Date: Thu, 30 Dec 2021 22:18:45 +0000 (-0800)
Subject: Skipping missing values.
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?p=pspp;a=commitdiff_plain;h=9c3de5e3c58e3e4619cfe9c07471cbbc8415d2cf

Skipping missing values.
---

diff --git a/src/language/stats/ctables.c b/src/language/stats/ctables.c
index 1729f34f3b..d3ab1a290a 100644
--- a/src/language/stats/ctables.c
+++ b/src/language/stats/ctables.c
@@ -1435,15 +1435,21 @@ ctables_execute (struct dataset *ds, struct ctables *ct)
             {
               struct ctables_freqtab *ft = t->fts[j];
 
-#if 0
               for (size_t k = 0; k < ft->vars.n; k++)
                 {
                   const struct variable *var = ft->vars.vars[k];
-                  if (
-
-
+                  switch (var_is_value_missing (var, case_data (c, var)))
+                    {
+                    case MV_SYSTEM:
+                      goto next_ft;
+
+                    case MV_USER:
+                      if (!t->categories[var_get_dict_index (var)]
+                          || !t->categories[var_get_dict_index (var)]->include_missing)
+                        goto next_ft;
+                      break;
+                    }
                 }
-#endif
               size_t hash = 0;
               for (size_t k = 0; k < ft->vars.n; k++)
                 {