diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 6b86b098b..0822b2dcd 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,10 @@
+2006-03-11  Neil Jerram  <neil@ossau.uklinux.net>
+
+	* srfi-4.c (scm_uniform_vector_read_x): Declare base as char*
+	rather than void*, so we can do pointer arithmetic on it.
+	(Reported by Mike Gran.)
+	(s_scm_uniform_vector_write): Ditto.
+
 2006-03-10  Neil Jerram  <neil@ossau.uklinux.net>
 
 	* unif.c (scm_make_shared_array): Don't use SCM_I_ARRAY_BASE when
diff --git a/libguile/srfi-4.c b/libguile/srfi-4.c
index 0a5fd84b6..fc5da1513 100644
--- a/libguile/srfi-4.c
+++ b/libguile/srfi-4.c
@@ -850,7 +850,7 @@ SCM_DEFINE (scm_uniform_vector_read_x, "uniform-vector-read!", 1, 3, 0,
   ssize_t inc;
   size_t cstart, cend;
   size_t remaining, off;
-  void *base;
+  char *base;
 
   if (SCM_UNBNDP (port_or_fd))
     port_or_fd = scm_current_input_port ();
@@ -963,7 +963,7 @@ SCM_DEFINE (scm_uniform_vector_write, "uniform-vector-write", 1, 3, 0,
   ssize_t inc;
   size_t cstart, cend;
   size_t amount, off;
-  const void *base;
+  const char *base;
 
   port_or_fd = SCM_COERCE_OUTPORT (port_or_fd);