lexer: New function lex_force_int_range().

[pspp] / src / language / stats / sort-cases.c

diff --git a/src/language/stats/sort-cases.c b/src/language/stats/sort-cases.c
index 603a341d6ef53c23a6e87c50bd53a0010f12e08f..069451510d532ad5b76a3b771dbef500d370d90e 100644 (file)
--- a/src/language/stats/sort-cases.c
+++ b/src/language/stats/sort-cases.c
@@ -54,15 +54,10 @@ cmd_sort_cases (struct lexer *lexer, struct dataset *ds)
   if (settings_get_testing_mode () && lex_match (lexer, T_SLASH))
     {
       if (!lex_force_match_id (lexer, "BUFFERS") || !lex_match (lexer, T_EQUALS)
-          || !lex_force_int (lexer))
+          || !lex_force_int_range (lexer, "BUFFERS", 2, INT_MAX))
         goto done;
 
       min_buffers = max_buffers = lex_integer (lexer);
-      if (max_buffers < 2)
-        {
-          msg (SE, _("Buffer limit must be at least 2."));
-          goto done;
-        }
 
       lex_get (lexer);
     }