[Firebird-checkins] CVS: firebird2/src/jrd rse.cpp,1.133,1.134

[Vlad H. <hv...@us...>]

Build Version :  T2.1.0.16122 Firebird 2.1 Beta 1

(writeBuildNum.sh,v 1.16279 2007/07/21 20:47:07 hvlad Exp $ )

Update of /cvsroot/firebird/firebird2/src/jrd
In directory sc8-pr-cvs17:/tmp/cvs-serv11788/jrd

Modified Files:
	rse.cpp 
Log Message:
Fixed bug CORE-1370 : Memory leak when using CTE within procedure

Index: rse.cpp
===================================================================
RCS file: /cvsroot/firebird/firebird2/src/jrd/rse.cpp,v
retrieving revision 1.133
retrieving revision 1.134
diff -b -U3 -r1.133 -r1.134
--- rse.cpp	3 Apr 2007 13:06:08 -0000	1.133
+++ rse.cpp	21 Jul 2007 20:47:02 -0000	1.134
@@ -3707,8 +3707,14 @@
 			for (; ptr < end; ptr++) 
 			{
 				record_param* rpb = request->req_rpb + (USHORT)(U_IPTR) *ptr;
+				Record* rec = rpb->rpb_record;
 				memmove(rpb, p, sizeof(record_param));
 				p += sizeof(record_param);
+
+				if (!rpb->rpb_record) {
+					rpb->rpb_record = rec;
+				}
+				fb_assert(rpb->rpb_record == rec);
 			}
 			delete[] tmp;
 		}