projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
lexer: New functions for parsing real numbers in specified ranges.
[pspp]
/
src
/
language
/
stats
/
examine.c
diff --git
a/src/language/stats/examine.c
b/src/language/stats/examine.c
index ad8a4126ffa4bef1f9ac70c8ff393e1d41556cad..4dbafce320ba41d0e1d892034b310ccd22626bb7 100644
(file)
--- a/
src/language/stats/examine.c
+++ b/
src/language/stats/examine.c
@@
-1568,15
+1568,10
@@
cmd_examine (struct lexer *lexer, struct dataset *ds)
{
while (lex_is_number (lexer))
{
{
while (lex_is_number (lexer))
{
+ if (!lex_force_num_range_open (lexer, "PERCENTILES", 0, 100))
+ goto error;
double p = lex_number (lexer);
double p = lex_number (lexer);
- if (p <= 0 || p >= 100.0)
- {
- lex_error (lexer,
- _("Percentiles must lie in the range (0, 100)"));
- goto error;
- }
-
examine.n_percentiles++;
examine.ptiles =
xrealloc (examine.ptiles,
examine.n_percentiles++;
examine.ptiles =
xrealloc (examine.ptiles,