diff patches/guile-1.9.15-mingw-compile.patch @ 6485:919f33e40679

mingw::guile: fix socket and compiling.
author Jan Nieuwenhuizen <janneke@gnu.org>
date Thu, 03 Feb 2011 23:57:03 +0100
parents
children 2de38498ec75
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/patches/guile-1.9.15-mingw-compile.patch	Thu Feb 03 23:57:03 2011 +0100
@@ -0,0 +1,10 @@
+--- guile-1.9.15/module/system/base/compile.scm~	2011-01-26 23:03:16.000000000 +0100
++++ guile-1.9.15/module/system/base/compile.scm	2011-02-03 23:29:08.090142894 +0100
+@@ -104,6 +104,7 @@
+                  %compile-fallback-path
+                  ;; no need for '/' separator here, canonicalize-path
+                  ;; will give us an absolute path
++		 "/" ;; which does not start with / on MINGW
+                  (canonicalize-path file)
+                  (compiled-extension))))
+          (and (false-if-exception (ensure-writable-dir (dirname f)))