mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-30 08:50:23 +02:00
Code Activity

(fcntl.h): Can include this unconditionally, no need for __MINGW32__.

Browse source
This commit is contained in:
Kevin Ryde 2006-09-28 01:01:23 +00:00
parent 1701d8ed3f
commit 423b201902
1 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/ports.c
View file

@ -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.