diff --git a/src/program.c b/src/program.c
index ef8f246921a66951e964c9785685d89bb142bfaf..dfb3758eab68f63779e9be0f107dad6bcea7aeea 100644
--- a/src/program.c
+++ b/src/program.c
@@ -5686,7 +5686,7 @@ PMOD_EXPORT int add_constant(struct pike_string *name,
   if(name!=debug_findstring(name))
     Pike_fatal("define_constant on nonshared string.\n");
   if (c) {
-    check_svalue (c);
+    check_svalue ((struct svalue*)c);
     if (TYPEOF(*c) > MAX_TYPE)
       /* check_svalue allows some things like T_SVALUE_PTR. */
       Pike_fatal ("Invalid type in svalue: %d\n", TYPEOF(*c));
diff --git a/src/stralloc.c b/src/stralloc.c
index 28f1708fb6e09241c83f49aa35b9182538ff3d46..89d5fa9beb6e82e6730d242d911d92d7a3711899 100644
--- a/src/stralloc.c
+++ b/src/stralloc.c
@@ -269,7 +269,7 @@ PMOD_EXPORT struct pike_string *debug_check_size_shift(const struct pike_string
 {
   if(a->size_shift != shift)
     Pike_fatal("Wrong STRX macro used!\n");
-  return a;
+  return (struct pike_string*)a;
 }
 #endif