mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-05 07:26:47 +08:00
Code Issues Packages Projects Releases Wiki Activity

re PR libfortran/23802 ([mingw32] sleep malfunction)

Browse Source 
PR libfortran/23802
	* intrinsics/sleep.c: Add correct sleep macro for MinGW.

From-SVN: r104599
This commit is contained in:
Francois-Xavier Coudert 2005-09-24 10:55:37 +02:00 committed by François-Xavier Coudert
parent 399a39c720
commit 26b7ebf6bf
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
libgfortran/ChangeLog
View File

@ -1,3 +1,8 @@
2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/23802
* intrinsics/sleep.c: Add correct sleep macro for MinGW.
2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/23380

7
libgfortran/intrinsics/sleep.c
View File

@ -39,6 +39,13 @@ Boston, MA 02110-1301, USA. */
#include <unistd.h>
#endif
#ifdef __MINGW32__
# include <windows.h>
# undef sleep
# define sleep(x) Sleep(1000*(x))
# define HAVE_SLEEP
#endif
/* SUBROUTINE SLEEP(SECONDS)
INTEGER, INTENT(IN) :: SECONDS