Fix clay under MinGW

This commit is contained in:
Vicent Marti 2011-09-21 01:14:57 +03:00
parent 9457a36ca0
commit a58881274d

View File

@ -34,10 +34,12 @@
# define chdir(path) _chdir(path)
# define access(path, mode) _access(path, mode)
# define strdup(str) _strdup(str)
# define strncpy(to, from, to_size) strncpy_s(to, to_size, from, _TRUNCATE)
# ifndef __MINGW32__
# define strncpy(to, from, to_size) strncpy_s(to, to_size, from, _TRUNCATE)
# define W_OK 02
# define S_ISDIR(x) ((x & _S_IFDIR) != 0)
# endif
typedef struct _stat STAT_T;
#else
# include <unistd.h>
@ -450,7 +452,7 @@ static int build_sandbox_path(void)
strncpy(_clay_path + len, path_tail, sizeof(_clay_path) - len);
#ifdef _WIN32
#ifdef _MSC_VER
if (_mktemp_s(_clay_path, sizeof(_clay_path)) != 0)
return -1;
#else
@ -756,6 +758,12 @@ static const struct clay_suite _all_suites[] = {
{NULL, NULL, 0},
{NULL, NULL, 0},
&_all_callbacks[15], 2
},
{
"core::vector",
{NULL, NULL, 0},
{NULL, NULL, 0},
&_all_callbacks[17], 3
},
{
"network::remotes",