janneke pushed a commit to branch wip-mingw
in repository guile.
commit fc9ffa7181dfec5bf6f475afa61467e6640af034
Author: Jan (janneke) Nieuwenhuizen <jann...@gnu.org>
AuthorDate: Sat Mar 13 14:27:21 2021 +0100
Fix 'gethostname' prototype for x86_64-MinGW.
* lib/unistd.in.h (gethostname): Avoid 'rpl_gethostname' on x86_64-MinGW.
---
lib/unistd.in.h | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/lib/unistd.in.h b/lib/unistd.in.h
index 5914fd5..ab3ca04 100644
--- a/lib/unistd.in.h
+++ b/lib/unistd.in.h
@@ -1239,6 +1239,12 @@ _GL_FUNCDECL_SYS (gethostname, int, (char *name, size_t
len)
_GL_CXXALIAS_SYS_CAST (gethostname, int, (char *name, size_t len));
# endif
_GL_CXXALIASWARN (gethostname);
+#elif HAVE_WINSOCK2_H
+# include <winsock2.h>
+# undef gethostname
+# if __i386__
+# define gethostname rpl_gethostname
+# endif
#elif @UNISTD_H_HAVE_WINSOCK2_H@
# undef gethostname
# define gethostname
gethostname_used_without_requesting_gnulib_module_gethostname
