[Pspp-cvs] Changes to pspp/src/expressions/operations.def

[Ben Pfaff]

Index: pspp/src/expressions/operations.def
diff -u pspp/src/expressions/operations.def:1.2 
pspp/src/expressions/operations.def:1.3
--- pspp/src/expressions/operations.def:1.2     Sun Mar  6 19:06:30 2005
+++ pspp/src/expressions/operations.def Mon Mar  7 03:34:47 2005
@@ -888,8 +888,12 @@
      vector v;
      case c;
 {
-  if (idx >= 1 && idx <= v->cnt)
-    return case_num (c, v->var[(int) idx - 1]->fv);
+  if (idx >= 1 && idx <= v->cnt) 
+    {
+      const struct variable *var = v->var[(int) idx - 1];
+      double value = case_num (c, var->fv);
+      return !is_num_user_missing (value, var) ? value : SYSMIS; 
+    }
   else
     {
       if (idx == SYSMIS)