~ chicken-core (chicken-5) fe7e02b36e312505cf15c7e486fbc9a95aa55fb5
commit fe7e02b36e312505cf15c7e486fbc9a95aa55fb5 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Sun Nov 8 16:14:54 2015 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Sun Nov 8 16:35:27 2015 +0100 Disable getc_unlocked on MinGW (by Evhan Hanson) The platform doesn't provide this function. Thanks to Matt Gushee for raising this. Signed-off-by: felix <felix@call-with-current-continuation.org> diff --git a/chicken.h b/chicken.h index 701881db..b504883e 100644 --- a/chicken.h +++ b/chicken.h @@ -954,7 +954,7 @@ typedef void (C_ccall *C_proc)(C_word, C_word *) C_noret; # define C_fputs fputs # define C_fputc fputc # define C_putchar putchar -# if (defined getc_unlocked || _POSIX_C_SOURCE >= 199506L) +# if (defined getc_unlocked || _POSIX_C_SOURCE >= 199506L) && !defined(__MINGW32__) # define C_getc getc_unlocked # else # define C_getc getcTrap