X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fregression.c;fp=src%2Flanguage%2Fstats%2Fregression.c;h=66a5abaf7c8aa7011d071bc5a9837c06904451e5;hb=912833f9331784d692ade66c76bffb5497b890e0;hp=a6c6cbacc66183b646aee12e36a63a3649314cc6;hpb=983dc88647eb2826dd866c8109cf3968ce1e79a9;p=pspp

diff --git a/src/language/stats/regression.c b/src/language/stats/regression.c
index a6c6cbacc6..66a5abaf7c 100644
--- a/src/language/stats/regression.c
+++ b/src/language/stats/regression.c
@@ -281,7 +281,8 @@ cmd_regression (struct lexer *lexer, struct dataset *ds)
                 {
 		  statistics |= STATS_CI;
 
-		  if (lex_match (lexer, T_LPAREN))
+		  if (lex_match (lexer, T_LPAREN) &&
+		      lex_force_num (lexer))
 		    {
 		      regression.ci = lex_number (lexer) / 100.0;
 		      lex_get (lexer);