[Pspp-cvs] Changes to pspp/src/regression.q

[Jason H Stover]

Index: pspp/src/regression.q
diff -u pspp/src/regression.q:1.3 pspp/src/regression.q:1.4
--- pspp/src/regression.q:1.3   Fri Oct 14 14:47:12 2005
+++ pspp/src/regression.q       Fri Oct 14 15:13:59 2005
@@ -495,18 +495,8 @@
           */
          if (is_depvar (i))
            {
-             if (v->type == NUMERIC)
-               {
-                 gsl_vector_set (Y, row, val->f);
-               }
-             else
-               {
-                 errno = EINVAL;
-                 fprintf (stderr,
-                          "%s:%d: Dependent variable should be numeric: %s\n",
-                          __FILE__, __LINE__, strerror (errno));
-                 err_cond_fail ();
-               }
+             assert(v->type == NUMERIC);
+             gsl_vector_set (Y, row, val->f);
            }
          else
            {