Index: src/backend/utils/adt/xml.c
===================================================================
RCS file: /projects/cvsroot/pgsql/src/backend/utils/adt/xml.c,v
retrieving revision 1.47
diff -c -r1.47 xml.c
*** src/backend/utils/adt/xml.c	23 Sep 2007 21:36:42 -0000	1.47
--- src/backend/utils/adt/xml.c	13 Oct 2007 17:27:17 -0000
***************
*** 3184,3189 ****
--- 3184,3191 ----
  
  		xpathobj = xmlXPathCompiledEval(xpathcomp, xpathctx);
  		xmlXPathFreeCompExpr(xpathcomp);
+ 		xpathcomp = NULL;
+ 
  		if (xpathobj == NULL)
  			ereport(ERROR, (errmsg("could not create XPath object"))); /* TODO: reason? */