Fix memory leaks in hdoc.

src/HeaderParser.c

@@ -417,6 +417,7 @@ HeaderParse(Stream * stream, HeaderExpr * expr)
                  StrEquals(word, "endif"))
         {
             /* Read no more words, that's the whole directive */
+            Free(word);
         }
         else
         {

src/RtStub.c

@@ -154,7 +154,7 @@ finish:
     StreamClose(StreamStdin());
     StreamClose(StreamStderr());
 
-    GenerateMemoryReport(argv[0]);
+    GenerateMemoryReport(argc, argv);
 
     MemoryFreeAll();
 

src/Runtime.c

@@ -62,7 +62,7 @@ MemoryIterator(MemoryInfo * i, void *args)
 }
 
 void
-GenerateMemoryReport(const char *prog)
+GenerateMemoryReport(int argc, char **argv)
 {
     char reportName[128];
     char *namePtr;
@@ -77,6 +77,7 @@ GenerateMemoryReport(const char *prog)
     time_t currentTime;
     struct tm *timeInfo;
     char tsBuffer[1024];
+    size_t i;
 
     if (!MemoryAllocated())
     {
@@ -86,7 +87,7 @@ GenerateMemoryReport(const char *prog)
         return;
     }
 
-    snprintf(reportName, sizeof(reportName), "%s-leaked.txt", prog);
+    snprintf(reportName, sizeof(reportName), "%s-leaked.txt", argv[0]);
     /* Make sure the report goes in the current working directory. */
     namePtr = basename(reportName);
     report = fopen(namePtr, "a");
@@ -100,8 +101,12 @@ GenerateMemoryReport(const char *prog)
     strftime(tsBuffer, sizeof(tsBuffer), "%c", timeInfo);
 
     fprintf(report, "---------- Memory Report ----------\n");
-    fprintf(report, "Program: %s\n", prog);
-    fprintf(report, "Date: %s\n", tsBuffer);
+    fprintf(report, "Program:");
+    for (i = 0; i < argc; i++)
+    {
+        fprintf(report, " '%s'", argv[i]);
+    }
+    fprintf(report, "\nDate: %s\n", tsBuffer);
     fprintf(report, "Total Bytes: %lu\n", MemoryAllocated());
     fprintf(report, "\n");
 

src/include/Runtime.h

@@ -41,13 +41,13 @@
 
 /**
  * Write a memory report to a file in the current directory, using
- * the provided string as the name of the program currently being
+ * the provided program arguments, including the program name that
  * executed. This function is to be called after all memory is
  * supposed to have been freed. It iterates over all remaining
  * memory and generates a text file containing all of the
  * recorded information about each block, including a hex dump of
  * the data stored in them.
  */
-extern void GenerateMemoryReport(const char *);
+extern void GenerateMemoryReport(int argc, char **argv);
 
 #endif /* CYTOPLASM_RUNTIME_H */

tools/hdoc.c

@@ -527,23 +527,35 @@ finish:
 
     for (i = 0; i < ArraySize(declarations); i++)
     {
-        Free(ArrayGet(declarations, i));
+        size_t j;
+
+        decl = ArrayGet(declarations, i);
+        for (j = 0; j < ArraySize(decl->decl.args); j++)
+        {
+            Free(ArrayGet(decl->decl.args, j));
         }
+        ArrayFree(decl->decl.args);
+        Free(decl);
+    }
+    ArrayFree(declarations);
 
     for (i = 0; i < ArraySize(typedefs); i++)
     {
         Free(ArrayGet(typedefs, i));
     }
+    ArrayFree(typedefs);
 
     for (i = 0; i < ArraySize(globals); i++)
     {
         Free(ArrayGet(globals, i));
     }
+    ArrayFree(globals);
 
     for (i = 0; i < ArraySize(descr); i++)
     {
         Free(ArrayGet(descr, i));
     }
+    ArrayFree(descr);
 
     while (HashMapIterate(registers, &key, (void **) &val))
     {