Fix a couple of bugs reported by Ben Kujala

[pspp-builds.git] / src / sample.c

diff --git a/src/sample.c b/src/sample.c
index 96c5f4d9070705fadd7cebb297753aaec9ebd91b..11e4ad66e64dd4c536478ba33dc119669ef053fc 100644 (file)
--- a/src/sample.c
+++ b/src/sample.c
@@ -62,7 +62,7 @@ cmd_sample (void)
 
   if (!lex_force_num ())
     return CMD_FAILURE;
-  if (!lex_integer_p ())
+  if (!lex_is_integer ())
     {
       unsigned long min = gsl_rng_min (get_rng ());
       unsigned long max = gsl_rng_max (get_rng ());