projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
refactoring
[pspp]
/
src
/
language
/
stats
/
examine.c
diff --git
a/src/language/stats/examine.c
b/src/language/stats/examine.c
index ad8a4126ffa4bef1f9ac70c8ff393e1d41556cad..19c42fcad5aff5bb63d3b61fcd89458f76c7d218 100644
(file)
--- a/
src/language/stats/examine.c
+++ b/
src/language/stats/examine.c
@@
-1033,7
+1033,7
@@
create_n (const void *aux1, void *aux2 UNUSED)
es[v].minimum = DBL_MAX;
}
es[v].minimum = DBL_MAX;
}
- subcase_
destroy
(&ordering);
+ subcase_
uninit
(&ordering);
return es;
}
return es;
}
@@
-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,