-/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/ecpglib/data.c,v 1.20.2.2 2005/08/24 10:35:54 meskes Exp $ */
+/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/ecpglib/data.c,v 1.20.2.3 2006/06/06 11:36:00 meskes Exp $ */
 
 #define POSTGRES_ECPG_INTERNAL
 #include "postgres_fe.h"
 
                        if (garbage_left(isarray, scan_length, compat))
                        {
+                           free(nres);
                            ECPGraise(lineno, ECPG_NUMERIC_FORMAT, ECPG_SQLSTATE_DATATYPE_MISMATCH, pval);
                            return (false);
                        }
                    PGTYPESnumeric_copy(nres, (numeric *) (var + offset * act_tuple));
                else
                    PGTYPESnumeric_to_decimal(nres, (decimal *) (var + offset * act_tuple));
+
+               free(nres);
                break;
 
            case ECPGt_interval:
 
                        if (garbage_left(isarray, scan_length, compat))
                        {
+                           free(ires);
                            ECPGraise(lineno, ECPG_INTERVAL_FORMAT, ECPG_SQLSTATE_DATATYPE_MISMATCH, pval);
                            return (false);
                        }
                    ires = PGTYPESinterval_from_asc("0 seconds", NULL);
 
                PGTYPESinterval_copy(ires, (interval *) (var + offset * act_tuple));
+               free(ires);
                break;
            case ECPGt_date:
                if (pval)