6 files changed, 37 insertions, 4 deletions

diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog
index a38c0cb6770..2e8581a6f57 100644
--- a/lib-src/ChangeLog
+++ b/lib-src/ChangeLog
@@ -1,3 +1,23 @@
+2006-05-02  Francesco Potort,Al(B  <pot@gnu.org>
+
+        * etags.c (Perl_functions): Free space allocated for var package.
+        (Erlang_functions): Possibly free space allocated for var last.
+        (Prolog_functions): Possibly free space allocated for var last.
+
+2006-04-29  Dan Nicolaescu  <dann@ics.uci.edu>
+
+        * sorted-doc.c (main): Initialize docs to NULL.
+
+        * yow.c (yow): Free buf.
+
+        * etags.c: Delete c-indentation-style local variable.
+
+2006-04-29  Richard Stallman  <rms@gnu.org>
+
+        * movemail.c (main): Check for negative value from `read'.
+
+        * fakemail.c (read_header): Give fatal error if input has no header.
+
 2006-04-02  Paul Eggert  <eggert@cs.ucla.edu>
 
         * b2m.c (main): Don't include <limits.h>.
diff --git a/lib-src/etags.c b/lib-src/etags.c
index a073acb92d6..e206443f39b 100644
--- a/lib-src/etags.c
+++ b/lib-src/etags.c
@@ -41,7 +41,7 @@
  * configuration file containing regexp definitions for etags.
  */
 
-char pot_etags_version[] = "@(#) pot revision number is 17.15";
+char pot_etags_version[] = "@(#) pot revision number is 17.17";
 
 #define TRUE    1
 #define FALSE   0
@@ -4543,6 +4543,7 @@ Perl_functions (inf)
                     lb.buffer, cp - lb.buffer + 1, lineno, linecharno);
         }
     }
+  free (package);
 }
 
 
@@ -5441,6 +5442,8 @@ Prolog_functions (inf)
           last[len] = '\0';
         }
     }
+  if (last != NULL)
+    free (last);
 }
 
 
@@ -5597,7 +5600,11 @@ Erlang_functions (inf)
       else if (cp[0] == '-')    /* attribute, e.g. "-define" */
         {
           erlang_attribute (cp);
-          last = NULL;
+          if (last != NULL)
+            {
+              free (last);
+              last = NULL;
+            }
         }
       else if ((len = erlang_func (cp, last)) > 0)
         {
@@ -5614,6 +5621,8 @@ Erlang_functions (inf)
           last[len] = '\0';
         }
     }
+  if (last != NULL)
+    free (last);
 }
 
 
@@ -6887,7 +6896,6 @@ xrealloc (ptr, size)
 
 /*
  * Local Variables:
- * c-indentation-style: gnu
  * indent-tabs-mode: t
  * tab-width: 8
  * fill-column: 79
diff --git a/lib-src/fakemail.c b/lib-src/fakemail.c
index 6b8634f34ab..30d39db533e 100644
--- a/lib-src/fakemail.c
+++ b/lib-src/fakemail.c
@@ -694,6 +694,8 @@ read_header ()
 
     } while (true);
 
+  if (! the_header)
+    fatal ("input message has no header");
   return the_header->next;
 }
 
diff --git a/lib-src/movemail.c b/lib-src/movemail.c
index d3ec1fcd178..1f73ee88ba8 100644
--- a/lib-src/movemail.c
+++ b/lib-src/movemail.c
@@ -466,6 +466,8 @@ main (argc, argv)
         while (1)
           {
             nread = read (indesc, buf, sizeof buf);
+            if (nread < 0)
+              pfatal_with_name (inname);
             if (nread != write (outdesc, buf, nread))
               {
                 int saved_errno = errno;
diff --git a/lib-src/sorted-doc.c b/lib-src/sorted-doc.c
index a2416993a1b..0a06aa2c984 100644
--- a/lib-src/sorted-doc.c
+++ b/lib-src/sorted-doc.c
@@ -131,7 +131,7 @@ main ()
   register enum state state = WAITING; /* state at start */
   int cnt = 0;                  /* number of DOCSTRs read */
 
-  DOCSTR *docs;                 /* chain of allocated DOCSTRS */
+  DOCSTR *docs = NULL;          /* chain of allocated DOCSTRS */
   char buf[512];                /* line buffer */
 
   while (1)                     /* process one char at a time */
diff --git a/lib-src/yow.c b/lib-src/yow.c
index 1356ac6db18..18f0f7b2e13 100644
--- a/lib-src/yow.c
+++ b/lib-src/yow.c
@@ -176,6 +176,7 @@ yow (fp)
   }
   buf[i++] = 0;
   printf("%s\n", buf);
+  free (buf);
 }
 
 /* arch-tag: e40fc0df-bafb-4001-af24-5c883d1c685e