diff --git a/ChangeLog b/ChangeLog
index d2b8c5392..6f3cd52df 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2010-07-13  Robert Larice
+ * src/frontend/gens.c ,
+ * src/frontend/gens.h :
+        fix the type of the function pointer argument of wl_forall()
+
 2010-07-11  Robert Larice
  * src/frontend/parse.c ,
  * src/include/fteparse.h :
diff --git a/src/frontend/gens.c b/src/frontend/gens.c
index 7f51c731d..90183f1a5 100644
--- a/src/frontend/gens.c
+++ b/src/frontend/gens.c
@@ -16,7 +16,7 @@ static void dgen_next(dgen **dgx);
 
 
 void
-wl_forall(wordlist *wl, void (*fn) (/* ??? */), void *data)
+wl_forall(wordlist *wl, void (*fn)(wordlist*, dgen*), dgen *data)
 {
 	while (wl) {
 		(*fn)(wl, data);
diff --git a/src/frontend/gens.h b/src/frontend/gens.h
index d759c9f71..61767863c 100644
--- a/src/frontend/gens.h
+++ b/src/frontend/gens.h
@@ -8,7 +8,7 @@
 
 #include "dgen.h"
 
-void wl_forall(wordlist *wl, void (*fn)(/* ??? */), void *data);
+void wl_forall(wordlist *wl, void (*fn)(wordlist*, dgen*), dgen *data);
 dgen * dgen_init(GENcircuit *ckt, wordlist *wl, int nomix, int flag, int model);
 int dgen_for_n(dgen *dg, int n, int (*fn) (/* ??? */), void *data, int subindex);
 void dgen_nth_next(dgen **dg, int n);