projects
/
pspp-builds.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
b5d60d6
)
Avoid compiler warnings
author
John Darrington
<john@darrington.wattle.id.au>
Mon, 25 Oct 2010 08:23:04 +0000
(10:23 +0200)
committer
John Darrington
<john@darrington.wattle.id.au>
Mon, 25 Oct 2010 08:23:04 +0000
(10:23 +0200)
src/math/levene.c
patch
|
blob
|
history
diff --git
a/src/math/levene.c
b/src/math/levene.c
index b92441b37babbf8505a931176aa00e1fd1ab7f89..d93673b8c9e7e4c6c60e34639686814baa6f3fb2 100644
(file)
--- a/
src/math/levene.c
+++ b/
src/math/levene.c
@@
-113,6
+113,7
@@
levene (struct casereader *rx, const struct variable *gvar,
r = casereader_clone (rx);
for (; (c = casereader_read (r)) != NULL; case_unref (c))
{
r = casereader_clone (rx);
for (; (c = casereader_read (r)) != NULL; case_unref (c))
{
+ struct lev *l = NULL;
const union value *target = case_data (c, gvar);
int width = var_get_width (gvar);
const double x = case_data (c, var)->f;
const union value *target = case_data (c, gvar);
int width = var_get_width (gvar);
const double x = case_data (c, var)->f;
@@
-121,8
+122,7
@@
levene (struct casereader *rx, const struct variable *gvar,
if (var_is_value_missing (var, case_data (c, var), exclude))
continue;
if (var_is_value_missing (var, case_data (c, var), exclude))
continue;
- struct lev *l = find_group (&map, target, width);
-
+ l = find_group (&map, target, width);
assert (l);
l->z_mean += fabs (x - l->t_bar) * weight;
assert (l);
l->z_mean += fabs (x - l->t_bar) * weight;
@@
-144,6
+144,7
@@
levene (struct casereader *rx, const struct variable *gvar,
for (; (c = casereader_read (r)) != NULL; case_unref (c))
{
double z;
for (; (c = casereader_read (r)) != NULL; case_unref (c))
{
double z;
+ struct lev *l;
const union value *target = case_data (c, gvar);
int width = var_get_width (gvar);
const double x = case_data (c, var)->f;
const union value *target = case_data (c, gvar);
int width = var_get_width (gvar);
const double x = case_data (c, var)->f;
@@
-152,10
+153,10
@@
levene (struct casereader *rx, const struct variable *gvar,
if (var_is_value_missing (var, case_data (c, var), exclude))
continue;
if (var_is_value_missing (var, case_data (c, var), exclude))
continue;
-
struct lev *
l = find_group (&map, target, width);
+ l = find_group (&map, target, width);
assert (l);
assert (l);
- z = fabs (x - l->t_bar);
+ z = fabs (x - l->t_bar);
denominator += pow2 (z - l->z_mean) * weight;
}
casereader_destroy (r);
denominator += pow2 (z - l->z_mean) * weight;
}
casereader_destroy (r);
@@
-164,7
+165,7
@@
levene (struct casereader *rx, const struct variable *gvar,
{
double grand_n = 0.0;
{
double grand_n = 0.0;
- struct
hmap_node
*next;
+ struct
lev
*next;
struct lev *l;
HMAP_FOR_EACH_SAFE (l, next, struct lev, node, &map)
{
struct lev *l;
HMAP_FOR_EACH_SAFE (l, next, struct lev, node, &map)
{