[project @ 1996-01-11 14:06:51 by partain]

[ghc-hetmet.git] / ghc / runtime / io / getDirectoryContents.lc

diff --git a/ghc/runtime/io/getDirectoryContents.lc b/ghc/runtime/io/getDirectoryContents.lc
index da54d7d..025aae9 100644 (file)
--- a/ghc/runtime/io/getDirectoryContents.lc
+++ b/ghc/runtime/io/getDirectoryContents.lc
@@ -27,9 +27,7 @@
 /* For cleanup of partial answer on error */
 
 static void
-freeEntries(entries, count)
-  char **entries;
-  int count;
+freeEntries(char **entries, int count)
 {
     int i;