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.