diff --git a/ChangeLog b/ChangeLog
index a08ddc9f..ac68e125 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,6 @@
+Thu 09 May 2002 11:19:00 AM PDT Aleksey Sanin <aleksey@aleksey.com>
+	* parser.c: fixed bug #81159 (memory growth in SAX)
+	
 Tue 07 May 2002 09:20:21 AM PDT Aleksey Sanin <aleksey@aleksey.com>
 	* xpath.c: fixed bug #78858 (the real fix)
 
diff --git a/parser.c b/parser.c
index 027643f8..98d14835 100644
--- a/parser.c
+++ b/parser.c
@@ -7985,6 +7985,8 @@ xmlParseTryOrFinish(xmlParserCtxtPtr ctxt, int terminate) {
 #endif
 
     while (1) {
+	SHRINK;
+
 	/*
 	 * Pop-up of finished entities.
 	 */