Mercurial > gub

view patches/guile-2.0.0-mingw-fchmod.patch @ 6493:a753f2b56688

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
guile: bump to 2.0
author Jan Nieuwenhuizen <janneke@gnu.org>
date Tue, 15 Mar 2011 14:13:15 +0100
parents
children
line wrap: on
line source

--- guile-1.9.15/libguile/filesys.c~	2011-03-04 10:36:13.417981644 +0100
+++ guile-1.9.15/libguile/filesys.c	2011-03-04 13:23:41.182832400 +0100
@@ -121,7 +121,7 @@
 #ifdef __MINGW32__
 # define mkdir(path, mode) mkdir (path)
 # define fsync(fd) _commit (fd)
-# define fchmod(fd, mode) (-1)
+# define fchmod(fd, mode) (0)
 #endif /* __MINGW32__ */
 
 /* dirfd() returns the file descriptor underlying a "DIR*" directory stream.