projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
AUTORECODE now optionally accepts / before INTO
[pspp]
/
src
/
language
/
stats
/
reliability.c
diff --git
a/src/language/stats/reliability.c
b/src/language/stats/reliability.c
index 8975e4f9082d780bc18704a55ffccfba7ac6ca61..fd6af69448a59200195994aa7ebfc208c43a10a7 100644
(file)
--- a/
src/language/stats/reliability.c
+++ b/
src/language/stats/reliability.c
@@
-1,5
+1,5
@@
/* PSPP - a program for statistical analysis.
/* PSPP - a program for statistical analysis.
- Copyright (C) 2009, 2010, 2011, 2013 Free Software Foundation, Inc.
+ Copyright (C) 2009, 2010, 2011, 2013
, 2015
Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@@
-229,12
+229,13
@@
cmd_reliability (struct lexer *lexer, struct dataset *ds)
reliability.model = MODEL_SPLIT;
reliability.split_point = -1;
reliability.model = MODEL_SPLIT;
reliability.split_point = -1;
- if ( lex_match (lexer, T_LPAREN))
+ if ( lex_match (lexer, T_LPAREN)
+ && lex_force_num (lexer))
{
{
- lex_force_num (lexer);
reliability.split_point = lex_number (lexer);
lex_get (lexer);
reliability.split_point = lex_number (lexer);
lex_get (lexer);
- lex_force_match (lexer, T_RPAREN);
+ if (! lex_force_match (lexer, T_RPAREN))
+ goto error;
}
}
else
}
}
else
@@
-274,6
+275,14
@@
cmd_reliability (struct lexer *lexer, struct dataset *ds)
}
}
}
}
}
}
+ else if (lex_match_id (lexer, "STATISTICS"))
+ {
+ lex_match (lexer, T_EQUALS);
+ msg (SW, _("The STATISTICS subcommand is not yet implemented. "
+ "No statistics will be produced."));
+ while (lex_match (lexer, T_ID))
+ continue;
+ }
else
{
lex_error (lexer, NULL);
else
{
lex_error (lexer, NULL);