projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Initial version
[pspp]
/
src
/
correlations.q
diff --git
a/src/correlations.q
b/src/correlations.q
index 4c9f74b7f3344f5a5e32fdcbe70045bf679a9c45..d73c3cfff18b2b30a165179fa268882c32e85539 100644
(file)
--- a/
src/correlations.q
+++ b/
src/correlations.q
@@
-14,12
+14,13
@@
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
- Foundation, Inc., 5
9 Temple Place - Suite 330
, Boston, MA
- 0211
1-1307
, USA. */
+ Foundation, Inc., 5
1 Franklin Street, Fifth Floor
, Boston, MA
+ 0211
0-1301
, USA. */
#include <config.h>
#include <stdlib.h>
#include "alloc.h"
#include <config.h>
#include <stdlib.h>
#include "alloc.h"
+#include "dictionary.h"
#include "file-handle.h"
#include "command.h"
#include "lexer.h"
#include "file-handle.h"
#include "command.h"
#include "lexer.h"
@@
-133,12
+134,13
@@
cor_custom_matrix (struct cmd_correlations *cmd UNUSED)
return 0;
if (lex_match ('*'))
return 0;
if (lex_match ('*'))
- matrix_file = inline_file;
- else
- matrix_file = fh_parse_file_handle ();
-
- if (!matrix_file)
- return 0;
+ matrix_file = NULL;
+ else
+ {
+ matrix_file = fh_parse ();
+ if (matrix_file == NULL)
+ return 0;
+ }
if (!lex_force_match (')'))
return 0;
if (!lex_force_match (')'))
return 0;