postgres
diff --git a/‎src/backend/nodes/gen_node_support.pl
Copy file name to clipboardExpand all lines: src/backend/nodes/gen_node_support.pl
+3-3Lines changed: 3 additions & 3 deletions b/‎src/backend/nodes/gen_node_support.pl
Copy file name to clipboardExpand all lines: src/backend/nodes/gen_node_support.pl
+3-3Lines changed: 3 additions & 3 deletions
diff --git a/‎src/include/nodes/nodes.h
Copy file name to clipboardExpand all lines: src/include/nodes/nodes.h
+9Lines changed: 9 additions & 0 deletions b/‎src/include/nodes/nodes.h
Copy file name to clipboardExpand all lines: src/include/nodes/nodes.h
+9Lines changed: 9 additions & 0 deletions
@@ -777,7 +777,7 @@ sub elem
 			print $eff "\tCOMPARE_BITMAPSET_FIELD($f);\n"
 			  unless $equal_ignore;
 		}
-		elsif ($t eq 'int' && $f =~ 'location$')
+		elsif ($t eq 'ParseLoc')
 		{
 			print $cff "\tCOPY_LOCATION_FIELD($f);\n" unless $copy_ignore;
 			print $eff "\tCOMPARE_LOCATION_FIELD($f);\n" unless $equal_ignore;
@@ -1010,7 +1010,7 @@ sub elem
 			print $off "\tWRITE_BOOL_FIELD($f);\n";
 			print $rff "\tREAD_BOOL_FIELD($f);\n" unless $no_read;
 		}
-		elsif ($t eq 'int' && $f =~ 'location$')
+		elsif ($t eq 'ParseLoc')
 		{
 			print $off "\tWRITE_LOCATION_FIELD($f);\n";
 			print $rff "\tREAD_LOCATION_FIELD($f);\n" unless $no_read;
@@ -1303,7 +1303,7 @@ sub elem
 			print $jff "\tJUMBLE_NODE($f);\n"
 			  unless $query_jumble_ignore;
 		}
-		elsif ($t eq 'int' && $f =~ 'location$')
+		elsif ($t eq 'ParseLoc')
 		{
 			# Track the node's location only if directly requested.
 			if ($query_jumble_location)
 
@@ -229,6 +229,15 @@ extern void *copyObjectImpl(const void *from);
 extern bool equal(const void *a, const void *b);
 
 
+/*
+ * Typedef for parse location.  This is just an int, but this way
+ * gen_node_support.pl knows which fields should get special treatment for
+ * location values.
+ *
+ * -1 is used for unknown.
+ */
+typedef int ParseLoc;
+
 /*
  * Typedefs for identifying qualifier selectivities, plan costs, and row
  * counts as such.  These are just plain "double"s, but declaring a variable
Original file line number	Diff line number	Diff line change
`@@ -777,7 +777,7 @@ sub elem`
`777`	`777`	`print $eff "\tCOMPARE_BITMAPSET_FIELD($f);\n"`
`778`	`778`	`unless $equal_ignore;`
`779`	`779`	`}`
`780`		`- elsif ($t eq 'int' && $f =~ 'location$')`
	`780`	`+ elsif ($t eq 'ParseLoc')`
`781`	`781`	`{`
`782`	`782`	`print $cff "\tCOPY_LOCATION_FIELD($f);\n" unless $copy_ignore;`
`783`	`783`	`print $eff "\tCOMPARE_LOCATION_FIELD($f);\n" unless $equal_ignore;`
`@@ -1010,7 +1010,7 @@ sub elem`
`1010`	`1010`	`print $off "\tWRITE_BOOL_FIELD($f);\n";`
`1011`	`1011`	`print $rff "\tREAD_BOOL_FIELD($f);\n" unless $no_read;`
`1012`	`1012`	`}`
`1013`		`- elsif ($t eq 'int' && $f =~ 'location$')`
	`1013`	`+ elsif ($t eq 'ParseLoc')`
`1014`	`1014`	`{`
`1015`	`1015`	`print $off "\tWRITE_LOCATION_FIELD($f);\n";`
`1016`	`1016`	`print $rff "\tREAD_LOCATION_FIELD($f);\n" unless $no_read;`
`@@ -1303,7 +1303,7 @@ sub elem`
`1303`	`1303`	`print $jff "\tJUMBLE_NODE($f);\n"`
`1304`	`1304`	`unless $query_jumble_ignore;`
`1305`	`1305`	`}`
`1306`		`- elsif ($t eq 'int' && $f =~ 'location$')`
	`1306`	`+ elsif ($t eq 'ParseLoc')`
`1307`	`1307`	`{`
`1308`	`1308`	`# Track the node's location only if directly requested.`
`1309`	`1309`	`if ($query_jumble_location)`