mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-26 21:20:30 +02:00
Code Activity

WIN32: new internal define %UCRT when compiled with UCRT C library

Browse source 
This variable will help indicate if, on Win32, the C library is
closer to C99 capable.

* libguile/posix.c (scm_init_posix): new define %UCRT
* test-suite/tests/i18n.test (old-ms?): use new define allow UTF-8
    tests on MINGW
This commit is contained in:
Michael Gran 2023-07-04 16:50:31 -07:00
parent 0f748b32aa
commit c8e0454692
2 changed files with 15 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/posix.c
View file

@ -2698,6 +2698,10 @@ scm_init_posix ()
#ifdef AT_EACCESS
scm_c_define ("AT_EACCESS", scm_from_int (AT_EACCESS));
#endif
#ifdef _UCRT
/* When defined, Windows systems are using the UCRT library. */
scm_c_define ("%UCRT", scm_from_int (1));
#endif
#include "cpp-SIG.c"
#include "posix.x"