projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Actually implement the new procedure code and adapt all of its clients
[pspp-builds.git]
/
src
/
language
/
stats
/
correlations.q
diff --git
a/src/language/stats/correlations.q
b/src/language/stats/correlations.q
index 15d21ecee124cd13fa817e6fb90af2a3ce8d8306..2a1b22ddfb2edfbfed0f6246eef43e2bd27e8fce 100644
(file)
--- a/
src/language/stats/correlations.q
+++ b/
src/language/stats/correlations.q
@@
-1,6
+1,5
@@
/* PSPP - computes sample statistics.
Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
/* PSPP - computes sample statistics.
Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
- Written by Ben Pfaff <blp@gnu.org>.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
@@
-37,7
+36,7
@@
struct cor_set
{
struct cor_set *next;
struct cor_set
{
struct cor_set *next;
- struct variable **v1, **v2;
+
const
struct variable **v1, **v2;
size_t nv1, nv2;
};
size_t nv1, nv2;
};
@@
-89,7
+88,7
@@
internal_cmd_correlations (struct lexer *lexer, struct dataset *ds)
static int
cor_custom_variables (struct lexer *lexer, struct dataset *ds, struct cmd_correlations *cmd UNUSED, void *aux UNUSED)
{
static int
cor_custom_variables (struct lexer *lexer, struct dataset *ds, struct cmd_correlations *cmd UNUSED, void *aux UNUSED)
{
- struct variable **v1, **v2;
+
const
struct variable **v1, **v2;
size_t nv1, nv2;
struct cor_set *cor;
size_t nv1, nv2;
struct cor_set *cor;
@@
-100,13
+99,13
@@
cor_custom_variables (struct lexer *lexer, struct dataset *ds, struct cmd_correl
return 2;
lex_match (lexer, '=');
return 2;
lex_match (lexer, '=');
- if (!parse_variables (lexer, dataset_dict (ds), &v1, &nv1,
+ if (!parse_variables
_const
(lexer, dataset_dict (ds), &v1, &nv1,
PV_NO_DUPLICATE | PV_NUMERIC))
return 0;
if (lex_match (lexer, T_WITH))
{
PV_NO_DUPLICATE | PV_NUMERIC))
return 0;
if (lex_match (lexer, T_WITH))
{
- if (!parse_variables (lexer, dataset_dict (ds), &v2, &nv2,
+ if (!parse_variables
_const
(lexer, dataset_dict (ds), &v2, &nv2,
PV_NO_DUPLICATE | PV_NUMERIC))
{
free (v1);
PV_NO_DUPLICATE | PV_NUMERIC))
{
free (v1);