projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fixed a multitude of C89 compatibility warnings.
[pspp-builds.git]
/
src
/
math
/
linreg
/
linreg.c
diff --git
a/src/math/linreg/linreg.c
b/src/math/linreg/linreg.c
index 08d620b8c271d4a90290577dffe507365a3660a7..e3d02345f7776000d6c54fd210f9079b67fbbbea 100644
(file)
--- a/
src/math/linreg/linreg.c
+++ b/
src/math/linreg/linreg.c
@@
-305,6
+305,7
@@
pspp_linreg (const gsl_vector * Y, const gsl_matrix * X,
}
else
{
}
else
{
+ gsl_multifit_linear_workspace *wk ;
/*
Use QR decomposition via GSL.
*/
/*
Use QR decomposition via GSL.
*/
@@
-321,8
+322,8
@@
pspp_linreg (const gsl_vector * Y, const gsl_matrix * X,
gsl_matrix_set (design, j, i + 1, tmp);
}
}
gsl_matrix_set (design, j, i + 1, tmp);
}
}
- gsl_multifit_linear_workspace *wk =
- gsl_multifit_linear_alloc (design->size1, design->size2);
+
+
wk =
gsl_multifit_linear_alloc (design->size1, design->size2);
rc = gsl_multifit_linear (design, Y, param_estimates,
cache->cov, &(cache->sse), wk);
for (i = 0; i < cache->n_coeffs; i++)
rc = gsl_multifit_linear (design, Y, param_estimates,
cache->cov, &(cache->sse), wk);
for (i = 0; i < cache->n_coeffs; i++)