fix iteration over row type

okbob · okbob · commit abbfe6498b29 · 2024-03-12T19:58:17.000+01:00
diff --git a/src/check_expr.c b/src/check_expr.c
@@ -1179,7 +1179,7 @@ free_string_constant(PLpgSQL_checkstate *cstate, PLpgSQL_row *row)
 			cstate->strconstvars[varno] = NULL;
 		}
 
-		field = cstate->estate->datums[fnum];
+		field = cstate->estate->datums[varno];
 
 		if (field->dtype == PLPGSQL_DTYPE_ROW)
 			free_string_constant(cstate, (PLpgSQL_row *) field);

Original file line number	Diff line number	Diff line change
`@@ -1179,7 +1179,7 @@ free_string_constant(PLpgSQL_checkstate cstate, PLpgSQL_row row)`
`1179`	`1179`	`cstate->strconstvars[varno] = NULL;`
`1180`	`1180`	`}`
`1181`	`1181`
`1182`		`- field = cstate->estate->datums[fnum];`
	`1182`	`+ field = cstate->estate->datums[varno];`
`1183`	`1183`
`1184`	`1184`	`if (field->dtype == PLPGSQL_DTYPE_ROW)`
`1185`	`1185`	`free_string_constant(cstate, (PLpgSQL_row *) field);`