Commit 65d320e7 authored by Tom Lane's avatar Tom Lane

Fix bracketing error in CaseExpr code

parent 65decc34
......@@ -7,7 +7,7 @@
*
*
* IDENTIFICATION
* $Header: /cvsroot/pgsql/src/backend/optimizer/util/tlist.c,v 1.23 1999/02/03 21:16:54 momjian Exp $
* $Header: /cvsroot/pgsql/src/backend/optimizer/util/tlist.c,v 1.24 1999/02/07 03:02:21 tgl Exp $
*
*-------------------------------------------------------------------------
*/
......@@ -509,12 +509,13 @@ flatten_tlistentry(Node *tlistentry, List *flat_tlist)
else if (case_clause(tlistentry))
{
CaseExpr *cexpr = (CaseExpr *) tlistentry;
CaseWhen *cwhen;
List *elt = NIL;
foreach(elt, cexpr->args)
cwhen = (CaseWhen *)lfirst(elt);
{
CaseWhen *cwhen = (CaseWhen *)lfirst(elt);
cwhen->result = flatten_tlistentry(cwhen->result, flat_tlist);
}
cexpr->defresult = flatten_tlistentry(cexpr->defresult, flat_tlist);
return ((Node *) cexpr);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment