X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fglm.c;h=2766279f2ed9fbcaad9c80531a7c0752fb63ccde;hb=50d37e46e023dd5cda55eac32c5e37554489db3b;hp=d0dc4bc83ca9d2a926593c233cabdba58755070f;hpb=cd221d80fafb54e550398c6de105d4c1b7f02ba0;p=pspp diff --git a/src/language/stats/glm.c b/src/language/stats/glm.c index d0dc4bc83c..2766279f2e 100644 --- a/src/language/stats/glm.c +++ b/src/language/stats/glm.c @@ -618,8 +618,7 @@ run_glm (struct glm_spec *cmd, struct casereader *input, double weight = dict_get_case_weight (dict, c, &warn_bad_weight); for (v = 0; v < cmd->n_dep_vars; ++v) - moments_pass_one (ws.totals, case_data (c, cmd->dep_vars[v])->f, - weight); + moments_pass_one (ws.totals, case_num (c, cmd->dep_vars[v]), weight); covariance_accumulate_pass1 (cov, c); } @@ -636,8 +635,7 @@ run_glm (struct glm_spec *cmd, struct casereader *input, double weight = dict_get_case_weight (dict, c, &warn_bad_weight); for (v = 0; v < cmd->n_dep_vars; ++v) - moments_pass_two (ws.totals, case_data (c, cmd->dep_vars[v])->f, - weight); + moments_pass_two (ws.totals, case_num (c, cmd->dep_vars[v]), weight); covariance_accumulate_pass2 (cov, c); } @@ -854,8 +852,8 @@ parse_nested_variable (struct lexer *lexer, struct glm_spec *glm) return false; } - lex_error (lexer, "Nested variables are not yet implemented"); return false; - return true; + lex_error (lexer, "Nested variables are not yet implemented"); + return false; } /* A design term is an interaction OR a nested variable */ @@ -866,7 +864,7 @@ parse_design_term (struct lexer *lexer, struct glm_spec *glm) if (parse_design_interaction (lexer, glm->dict, &iact)) { /* Interaction parsing successful. Add to list of interactions */ - glm->interactions = xrealloc (glm->interactions, sizeof *glm->interactions * ++glm->n_interactions); + glm->interactions = xrealloc (glm->interactions, sizeof (*glm->interactions) * ++glm->n_interactions); glm->interactions[glm->n_interactions - 1] = iact; return true; } @@ -896,4 +894,3 @@ parse_design_spec (struct lexer *lexer, struct glm_spec *glm) return parse_design_spec (lexer, glm); } -