Changeset: 9ef2cbdac9a7 for MonetDB URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=9ef2cbdac9a7 Modified Files: sql/server/rel_optimizer.c Branch: DVframework Log Message:
Niels' bug fix: remove constants from group by list. diffs (59 lines): diff --git a/sql/server/rel_optimizer.c b/sql/server/rel_optimizer.c --- a/sql/server/rel_optimizer.c +++ b/sql/server/rel_optimizer.c @@ -5240,6 +5240,55 @@ rel_reduce_groupby_exps(int *changes, mv free(tbls); free(scores); } + /* remove constants from group by list */ + if (is_groupby(rel->op) && rel->r && !rel_is_ref(rel)) { + int i; + node *n; + + for (i = 0, n = gbe->h; n; n = n->next) { + sql_exp *e = n->data; + + if (exp_is_atom(e)) + i++; + } + if (i) { + list *ngbe = new_exp_list(sql->sa); + list *dgbe = new_exp_list(sql->sa); + + for (n = gbe->h; n; n = n->next) { + sql_exp *e = n->data; + + if (!exp_is_atom(e)) + append(ngbe, e); + else + append(dgbe, e); + } + rel->r = ngbe; + if (!list_empty(dgbe)) { + /* use atom's directly in the aggr expr list */ + list *nexps = new_exp_list(sql->sa); + + for (n = rel->exps->h; n; n = n->next) { + sql_exp *e = n->data, *ne = NULL; + + if (is_column(e->type)) { + if (e->l) + ne = exps_bind_column2(dgbe, e->l, e->r); + else + ne = exps_bind_column(dgbe, e->r, NULL); + if (ne) { + ne = exp_copy(sql->sa, ne); + exp_setname(sql->sa, ne, e->rname, e->name); + e = ne; + } + } + append(nexps, e); + } + rel->exps = nexps; + } + (*changes)++; + } + } return rel; } _______________________________________________ checkin-list mailing list checkin-list@monetdb.org https://www.monetdb.org/mailman/listinfo/checkin-list