Author: byterock
Date: Wed Dec 5 12:11:06 2007
New Revision: 10370
Modified:
dbd-oracle/trunk/oci8.c
Log:
fix for memory bleed
Modified: dbd-oracle/trunk/oci8.c
==============================================================================
--- dbd-oracle/trunk/oci8.c (original)
+++ dbd-oracle/trunk/oci8.c Wed Dec 5 12:11:06 2007
@@ -1543,9 +1543,11 @@
/*will return referance to an array of scalars*/
if (!get_object(sth,list,fbh,fbh->obj,fbh->obj->obj_value,null_struct)){
- return 0;
+ return 0;
} else {
sv_setsv(dest_sv, newRV_noinc((SV *) list));
+ list=NULL;
+ fbh->obj->obj_value=NULL;
return 1;
}