diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-02-16 23:03:31 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-02-16 23:03:31 +0000 |
| commit | 3730b96e60864694cf0c222f80e6ed2b3c27335b (patch) | |
| tree | f70acb049af97a2aa37058987b4f89263fd7c9c4 /win32/win32.c | |
| parent | 5684ad5c0ea74ae5ecd32ff6f6122e8335adfd9c (diff) | |
| download | perl-3730b96e60864694cf0c222f80e6ed2b3c27335b.tar.gz | |
[win32] fix mingw32 gcc 2.8.0 build (DLLs generated seem to be broken
in this version of gcc!)
p4raw-id: //depot/win32/perl@529
Diffstat (limited to 'win32/win32.c')
| -rw-r--r-- | win32/win32.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/win32/win32.c b/win32/win32.c index 3eeaa6a988..9d819b518f 100644 --- a/win32/win32.c +++ b/win32/win32.c @@ -36,7 +36,7 @@ #include <stdarg.h> #include <float.h> #include <time.h> -#ifdef _MSC_VER +#if defined(_MSC_VER) || defined(__MINGW32__) #include <sys/utime.h> #else #include <utime.h> @@ -1193,7 +1193,7 @@ win32_strerror(int e) } DllExport void -win32_str_os_error(SV *sv, unsigned long dwErr) +win32_str_os_error(void *sv, DWORD dwErr) { DWORD dwLen; char *sMsg; @@ -1214,7 +1214,7 @@ win32_str_os_error(SV *sv, unsigned long dwErr) "Unknown error #0x%lX (lookup 0x%lX)", dwErr, GetLastError()); } - sv_setpvn(sv, sMsg, dwLen); + sv_setpvn((SV*)sv, sMsg, dwLen); LocalFree(sMsg); } |