X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fexamine.c;h=446f9058e9e1c285289f57db7c3a7fef9940b8c2;hb=72c9c6a2f92e94779b2e55d0726568090411871c;hp=ad8a4126ffa4bef1f9ac70c8ff393e1d41556cad;hpb=f4491cda2715c59495d963d0a3d8ae4518c1c13d;p=pspp

diff --git a/src/language/stats/examine.c b/src/language/stats/examine.c
index ad8a4126ff..446f9058e9 100644
--- a/src/language/stats/examine.c
+++ b/src/language/stats/examine.c
@@ -1033,7 +1033,7 @@ create_n (const void *aux1, void *aux2 UNUSED)
       es[v].minimum =  DBL_MAX;
     }
 
-  subcase_destroy (&ordering);
+  subcase_uninit (&ordering);
   return es;
 }
 
@@ -1568,15 +1568,10 @@ cmd_examine (struct lexer *lexer, struct dataset *ds)
             {
               while (lex_is_number (lexer))
                 {
+                  if (!lex_force_num_range_open (lexer, "PERCENTILES", 0, 100))
+                    goto error;
                   double p = lex_number (lexer);
 
-                  if (p <= 0 || p >= 100.0)
-                    {
-                      lex_error (lexer,
-                                 _("Percentiles must lie in the range (0, 100)"));
-                      goto error;
-                    }
-
                   examine.n_percentiles++;
                   examine.ptiles =
                     xrealloc (examine.ptiles,
@@ -1763,7 +1758,7 @@ cmd_examine (struct lexer *lexer, struct dataset *ds)
 
   if (totals_seen && nototals_seen)
     {
-      msg (SE, _("%s and %s are mutually exclusive"), "TOTAL", "NOTOTAL");
+      msg (SE, _("%s and %s are mutually exclusive."), "TOTAL", "NOTOTAL");
       goto error;
     }