X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fexamine.c;fp=src%2Flanguage%2Fstats%2Fexamine.c;h=20cd2f45189cd32a341f15c7b2e74e8c7367d51d;hb=6363022343d69fa3662e5043aad2dd0e33eb790f;hp=dc0d6c5beecfe4a160105e3fbbf2729631c5c7bd;hpb=af34772f88fab127edb77d4a15bc5e6d5848d84e;p=pspp

diff --git a/src/language/stats/examine.c b/src/language/stats/examine.c
index dc0d6c5bee..20cd2f4518 100644
--- a/src/language/stats/examine.c
+++ b/src/language/stats/examine.c
@@ -1999,6 +1999,8 @@ cmd_examine (struct lexer *lexer, struct dataset *ds)
                   int extr = 5;
                   if (lex_match (lexer, T_LPAREN))
                     {
+                      if (!lex_force_int (lexer))
+                        goto error;
                       extr = lex_integer (lexer);
 
                       if (extr < 0)