1 files changed, 1 insertions, 1 deletions

diff --git a/src/intervals.c b/src/intervals.c
index 33cef35c654..25bc6e3c46b 100644
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -198,7 +198,7 @@ void
 traverse_intervals (tree, position, depth, function, arg)
      INTERVAL tree;
      int position, depth;
-     void (* function) ();
+     void (* function) P_ ((INTERVAL, Lisp_Object));
      Lisp_Object arg;
 {
   if (NULL_INTERVAL_P (tree))