Start work on testing and debugging AGGREGATE.

[pspp-builds.git] / src / examine.q

diff --git a/src/examine.q b/src/examine.q
index 96d8210da59d3341fe176215e65521c23c0bc113..e35c7049c800fc3698db43168ecc50d80afcd50a 100644 (file)
--- a/src/examine.q
+++ b/src/examine.q
@@ -413,9 +413,9 @@ xmn_custom_percentiles(struct cmd_examine *p UNUSED)
 
   lex_match('(');
 
-  while ( lex_double_p() ) 
+  while ( lex_is_number() ) 
     {
-      subc_list_double_push(&percentile_list,lex_double());
+      subc_list_double_push(&percentile_list,lex_number());
 
       lex_get();