diff --git a/src/interfaces/ecpg/ChangeLog b/src/interfaces/ecpg/ChangeLog
index 2b05d3de38e25dc59d2acf111820db746ab45e26..686114b5ae2694494976d565f3e67e738e1f1629 100644
--- a/src/interfaces/ecpg/ChangeLog
+++ b/src/interfaces/ecpg/ChangeLog
@@ -1260,6 +1260,11 @@ Mon May 20 10:58:36 CEST 2002
 	- Fixed some parser bugs.
 	- Removed some simple rules to work arounf bison limit for now.
 	- Update c_keywords.c to reflect changes in keywords.c.
+
+Wed Jun 12 14:04:11 CEST 2002
+
+	- Applied Lee Kindness' patch to fix one of memory allocation with
+	  floating point numbers.
 	- Set ecpg version to 2.10.0.
 	- Set library version to 3.4.0.
 
diff --git a/src/interfaces/ecpg/lib/execute.c b/src/interfaces/ecpg/lib/execute.c
index 33941a7f89b3a19d3e28c4eba04317e825d1284c..4723d09a8bb5a6d2c0884699b69c9c07dd202935 100644
--- a/src/interfaces/ecpg/lib/execute.c
+++ b/src/interfaces/ecpg/lib/execute.c
@@ -1,4 +1,4 @@
-/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/lib/Attic/execute.c,v 1.36 2002/01/13 08:52:08 meskes Exp $ */
+/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/lib/Attic/execute.c,v 1.37 2002/06/12 12:06:53 meskes Exp $ */
 
 /*
  * The aim is to get a simpler inteface to the database routines.
@@ -700,7 +700,7 @@ ECPGstore_input(const struct statement * stmt, const struct variable * var,
 				break;
 #endif   /* HAVE_LONG_LONG_INT_64 */
 			case ECPGt_float:
-				if (!(mallocedval = ECPGalloc(var->arrsize * 20, stmt->lineno)))
+				if (!(mallocedval = ECPGalloc(var->arrsize * 21, stmt->lineno)))
 					return false;
 
 				if (var->arrsize > 1)
@@ -720,7 +720,7 @@ ECPGstore_input(const struct statement * stmt, const struct variable * var,
 				break;
 
 			case ECPGt_double:
-				if (!(mallocedval = ECPGalloc(var->arrsize * 20, stmt->lineno)))
+				if (!(mallocedval = ECPGalloc(var->arrsize * 21, stmt->lineno)))
 					return false;
 
 				if (var->arrsize > 1)
@@ -740,7 +740,7 @@ ECPGstore_input(const struct statement * stmt, const struct variable * var,
 				break;
 
 			case ECPGt_bool:
-				if (!(mallocedval = ECPGalloc(var->arrsize * 20, stmt->lineno)))
+				if (!(mallocedval = ECPGalloc(var->arrsize * 2, stmt->lineno)))
 					return false;
 
 				if (var->arrsize > 1)