X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Ffactor.c;h=cfec4a9a40890d7eb09a4c6bbdcc05c98d810bcd;hb=9e01a02f3eb20eed09edc144bb579f2768e18ea4;hp=72a066408bb9f09e95fd863acaf40fe88888a332;hpb=9529d1a99cc7c288d94e5bbdb9f4263bd524da6c;p=pspp-builds.git

diff --git a/src/language/stats/factor.c b/src/language/stats/factor.c
index 72a06640..cfec4a9a 100644
--- a/src/language/stats/factor.c
+++ b/src/language/stats/factor.c
@@ -1467,6 +1467,12 @@ do_factor (const struct cmd_factor *factor, struct casereader *r)
       msg (MW, _("The FACTOR criteria result in zero factors extracted. Therefore no analysis will be performed."));
       goto finish;
     }
+
+  if (idata->n_extractions > factor->n_vars)
+    {
+      msg (MW, _("The FACTOR criteria result in more factors than variables, which is not meaningful. No analysis will be performed."));
+      goto finish;
+    }
     
   {
     const gsl_vector *extracted_eigenvalues = NULL;