diff --git a/ChangeLog b/ChangeLog
index afca4bb9..37faad28 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2001-12-29  Akim Demaille  <akim@epita.fr>
+
+	Memory leak.
+
+	* src/reader.c (reader): Free grammar.
+
 2001-12-29  Akim Demaille  <akim@epita.fr>
 
 	Memory leak.
diff --git a/src/reader.c b/src/reader.c
index d76bd6fe..93bbe827 100644
--- a/src/reader.c
+++ b/src/reader.c
@@ -1867,4 +1867,7 @@ reader (void)
 
   /* Convert the grammar into the format described in gram.h.  */
   packgram ();
+
+  /* The grammar as a symbol_list is no longer needed. */
+  LIST_FREE (symbol_list, grammar);
 }