diff --git a/compat/arc4random.c b/compat/arc4random.c
index 28e8041d8..bcef0ec90 100644
--- a/compat/arc4random.c
+++ b/compat/arc4random.c
@@ -111,7 +111,9 @@ start:
 		goto nodevrandom;
 	}
 #ifndef O_CLOEXEC
+#  ifdef HAVE_FCNTL
 	fcntl(fd, F_SETFD, fcntl(fd, F_GETFD) | FD_CLOEXEC);
+#  endif
 #endif
 	for (i = 0; i < len; ) {
 		size_t wanted = len - i;
diff --git a/doc/Changelog b/doc/Changelog
index 189e4f9fd..ff05afd92 100644
--- a/doc/Changelog
+++ b/doc/Changelog
@@ -1,6 +1,7 @@
 29 May 2018: Wouter
 	- in compat/arc4random call getentropy_urandom when getentropy fails
 	  with ENOSYS.
+	- Fix that fallback for windows port.
 
 28 May 2018: Wouter
 	- Fix windows tcp and tls spin on events.