X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=win32%2Fwin32.h;h=4c5dee681c0c29c7580fff44cab4acdbe6237215;hb=53273a086103cdbbf7ebdd5f1a18b2c0777cbc1b;hp=849f13b31c70ba5150b3b28d45806d4b05f6d23d;hpb=479b2847c3fbb8fe8ee4a5811514a771839458c4;p=p5sagit%2Fp5-mst-13.2.git diff --git a/win32/win32.h b/win32/win32.h index 849f13b..4c5dee6 100644 --- a/win32/win32.h +++ b/win32/win32.h @@ -275,6 +275,7 @@ extern int mkstemp(const char *path); #define init_os_extras Perl_init_os_extras DllExport void Perl_win32_init(int *argcp, char ***argvp); +DllExport void Perl_win32_term(void); DllExport void Perl_init_os_extras(void); DllExport void win32_str_os_error(void *sv, DWORD err); DllExport int RunPerl(int argc, char **argv, char **env); @@ -357,9 +358,6 @@ struct thread_intern { char Wstrerror_buffer[512]; struct servent Wservent; char Wgetlogin_buffer[128]; -# ifdef USE_SOCKETS_AS_HANDLES - int Winit_socktype; -# endif # ifdef HAVE_DES_FCRYPT char Wcrypt_buffer[30]; # endif @@ -426,7 +424,6 @@ DllExport int win32_async_check(pTHX); #define w32_getlogin_buffer (PL_sys_intern.thr_intern.Wgetlogin_buffer) #define w32_crypt_buffer (PL_sys_intern.thr_intern.Wcrypt_buffer) #define w32_servent (PL_sys_intern.thr_intern.Wservent) -#define w32_init_socktype (PL_sys_intern.thr_intern.Winit_socktype) #define w32_use_showwindow (PL_sys_intern.thr_intern.Wuse_showwindow) #define w32_showwindow (PL_sys_intern.thr_intern.Wshowwindow) @@ -444,7 +441,7 @@ DllExport int win32_async_check(pTHX); lpw, wlen, (LPSTR)lpa, nChars,NULL,NULL)) #define W2AHELPER(lpw, lpa, nChars) W2AHELPER_LEN(lpw, -1, lpa, nChars) -#define USING_WIDE() (PL_widesyscalls && PerlEnv_os_id() == VER_PLATFORM_WIN32_NT) +#define USING_WIDE() (0) #ifdef USE_ITHREADS # define PERL_WAIT_FOR_CHILDREN \ @@ -464,6 +461,9 @@ DllExport int win32_async_check(pTHX); #ifdef PERL_CORE /* C doesn't like repeat struct definitions */ +#if defined(__MINGW32__) && (__MINGW32_MAJOR_VERSION>=3) +#undef _CRTIMP +#endif #ifndef _CRTIMP #define _CRTIMP __declspec(dllimport) #endif @@ -529,9 +529,13 @@ EXTERN_C _CRTIMP ioinfo* __pioinfo[]; #if !defined(ECONNABORTED) && defined(WSAECONNABORTED) #define ECONNABORTED WSAECONNABORTED #endif +#if !defined(ECONNRESET) && defined(WSAECONNRESET) +#define ECONNRESET WSAECONNRESET +#endif #if !defined(EAFNOSUPPORT) && defined(WSAEAFNOSUPPORT) #define EAFNOSUPPORT WSAEAFNOSUPPORT #endif +/* Why not needed for ECONNREFUSED? --abe */ DllExport void *win32_signal_context(void); #define PERL_GET_SIG_CONTEXT win32_signal_context()