diff --git a/src/gc.h b/src/gc.h
index a1c31f7a221c55b3e58949e50e772a439d066fd4..1b2fa7f83570452d82489ce42556de1f4b848893 100644
--- a/src/gc.h
+++ b/src/gc.h
@@ -2,7 +2,7 @@
 || This file is part of Pike. For copyright information see COPYRIGHT.
 || Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 || for more information.
-|| $Id: gc.h,v 1.140 2010/04/16 00:15:17 mast Exp $
+|| $Id: gc.h,v 1.141 2010/04/19 13:50:10 mast Exp $
 */
 
 #ifndef GC_H
@@ -672,7 +672,7 @@ static INLINE void real_visit_short_svalue (const union anything *u, TYPE_T t,
   (real_visit_short_svalue (debug_malloc_pass ((U)->ptr), (T), (REF_TYPE)))
 
 #ifdef DEBUG_MALLOC
-static INLINE void dmalloc_visit_svalue (struct svalue *s,
+static INLINE void dmalloc_visit_svalue (const struct svalue *s,
 					 int ref_type, char *l)
 {
   int t = s->type;
@@ -686,7 +686,7 @@ static INLINE void dmalloc_visit_svalue (struct svalue *s,
 #define visit_svalue(S, REF_TYPE) \
   dmalloc_visit_svalue ((S), (REF_TYPE), DMALLOC_LOCATION())
 #else
-static INLINE void visit_svalue (struct svalue *s, int ref_type)
+static INLINE void visit_svalue (const struct svalue *s, int ref_type)
 {
   int t = s->type;
   check_svalue (s);
diff --git a/src/object.c b/src/object.c
index 240ff2604e30c633ee31bc6ee3c598df86ba31dc..95e436b91b1ba4cb4d4c733351fa38244a10f7e0 100644
--- a/src/object.c
+++ b/src/object.c
@@ -2,7 +2,7 @@
 || This file is part of Pike. For copyright information see COPYRIGHT.
 || Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 || for more information.
-|| $Id: object.c,v 1.307 2010/04/11 17:26:23 mast Exp $
+|| $Id: object.c,v 1.308 2010/04/19 13:50:10 mast Exp $
 */
 
 #include "global.h"
@@ -2020,7 +2020,7 @@ PMOD_EXPORT void visit_object (struct object *o, int action)
   }
 }
 
-PMOD_EXPORT void visit_function (struct svalue *s, int ref_type)
+PMOD_EXPORT void visit_function (const struct svalue *s, int ref_type)
 {
 #ifdef PIKE_DEBUG
   if (s->type != T_FUNCTION)
diff --git a/src/object.h b/src/object.h
index b7460f9a5a16b38328d3ea3c9c08c357dfc99b00..1ed16225691a07344b08b7549484053f2fab9c65 100644
--- a/src/object.h
+++ b/src/object.h
@@ -2,7 +2,7 @@
 || This file is part of Pike. For copyright information see COPYRIGHT.
 || Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 || for more information.
-|| $Id: object.h,v 1.98 2008/06/03 14:52:47 mast Exp $
+|| $Id: object.h,v 1.99 2010/04/19 13:50:11 mast Exp $
 */
 
 #ifndef OBJECT_H
@@ -129,7 +129,7 @@ PMOD_EXPORT int object_equal_p(struct object *a, struct object *b, struct proces
 PMOD_EXPORT struct array *object_indices(struct object *o, int inherit_level);
 PMOD_EXPORT struct array *object_values(struct object *o, int inherit_level);
 PMOD_EXPORT void visit_object (struct object *o, int action);
-PMOD_EXPORT void visit_function (struct svalue *s, int ref_type);
+PMOD_EXPORT void visit_function (const struct svalue *s, int ref_type);
 PMOD_EXPORT void gc_mark_object_as_referenced(struct object *o);
 PMOD_EXPORT void real_gc_cycle_check_object(struct object *o, int weak);
 unsigned gc_touch_all_objects(void);