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;
        }
 

Reply via email to