diff -Naur guile-core/libguile/posix.c guile-core.nd/libguile/posix.c
--- guile-core/libguile/posix.c	Sun Jun 18 00:05:46 2006
+++ guile-core.nd/libguile/posix.c	Tue Aug 22 13:42:17 2006
@@ -942,7 +942,11 @@
   scm_dynwind_unwind_handler (free_string_pointers, exec_argv, 
 			    SCM_F_WIND_EXPLICITLY);
 
-  execv (exec_file, exec_argv);
+  execv (exec_file,
+#ifdef __MINGW32__
+	(const char * const *)
+#endif
+	exec_argv);
   SCM_SYSERROR;
 
   /* not reached.  */
@@ -973,7 +977,11 @@
   scm_dynwind_unwind_handler (free_string_pointers, exec_argv, 
 			    SCM_F_WIND_EXPLICITLY);
 
-  execvp (exec_file, exec_argv);
+  execvp (exec_file,
+#ifdef __MINGW32__
+	(const char * const *)
+#endif
+	exec_argv);
   SCM_SYSERROR;
 
   /* not reached.  */
@@ -1012,7 +1020,15 @@
   scm_dynwind_unwind_handler (free_string_pointers, exec_env,
 			    SCM_F_WIND_EXPLICITLY);
 
-  execve (exec_file, exec_argv, exec_env);
+  execve (exec_file,
+#ifdef __MINGW32__
+	(const char * const *)
+#endif
+	exec_argv,
+#ifdef __MINGW32__
+	(const char * const *)
+#endif
+	exec_env);
   SCM_SYSERROR;
 
   /* not reached.  */