From 423b201902cd6cb43c3f793e2f5dfa5449a93a3d Mon Sep 17 00:00:00 2001
From: Kevin Ryde <user42@zip.com.au>
Date: Thu, 28 Sep 2006 01:01:23 +0000
Subject: [PATCH] (fcntl.h): Can include this unconditionally, no need for
 __MINGW32__.

---
 libguile/ports.c | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/libguile/ports.c b/libguile/ports.c
index a7646aa42..3d2e746e5 100644
--- a/libguile/ports.c
+++ b/libguile/ports.c
@@ -27,6 +27,7 @@
 
 #include <stdio.h>
 #include <errno.h>
+#include <fcntl.h>  /* for chsize on mingw */
 
 #include "libguile/_scm.h"
 #include "libguile/async.h"
@@ -67,10 +68,6 @@
 #include <sys/ioctl.h>
 #endif
 
-#ifdef __MINGW32__
-#include <fcntl.h>
-#endif
-
 /* Mingw (version 3.4.5, circa 2006) has ftruncate as an alias for chsize
    already, but have this code here in case that wasn't so in past versions,
    or perhaps to help other minimal DOS environments.