X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=win32%2Fwin32.h;h=93b74efd3f459802150cced7d33c5d38dd6e183f;hb=c69f112c145fabe210a7e2c5c2406baeea71af2f;hp=9086f31701045d4920ed472e692afd6e21ff2364;hpb=a868473fb9213692497e27ae968094b32a41c501;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/win32/win32.h b/win32/win32.h
index 9086f31..93b74ef 100644
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -9,6 +9,14 @@
 #ifndef  _INC_WIN32_PERL5
 #define  _INC_WIN32_PERL5
 
+#ifdef __GNUC__
+#define __declspec(x)
+typedef long long __int64;
+#define Win32_Winsock
+#endif
+
+
+
 #define  WIN32_LEAN_AND_MEAN
 #include <windows.h>
 
@@ -27,6 +35,13 @@
 #include "EXTERN.h"
 #endif
 
+struct tms {
+	long	tms_utime;
+	long	tms_stime;
+	long	tms_cutime;
+	long	tms_cstime;
+};
+
 #ifndef START_EXTERN_C
 #ifdef __cplusplus
 #  define START_EXTERN_C extern "C" {
@@ -111,6 +126,7 @@ extern  gid_t	getegid(void);
 extern  int	setuid(uid_t uid);
 extern  int	setgid(gid_t gid);
 extern  int	kill(int pid, int sig);
+extern  void	*sbrk(int need);
 
 #undef	 Stat
 #define  Stat		win32_stat
@@ -128,8 +144,7 @@ extern int		my_fclose(FILE *);
 extern int		do_aspawn(void* really, void ** mark, void ** arglast);
 extern int		do_spawn(char *cmd);
 extern char		do_exec(char *cmd);
-extern char *		win32PerlLibPath(void);
-extern char *		win32SiteLibPath(void);
+extern char *		win32PerlLibPath(char *sfx,...);
 extern int		IsWin95(void);
 extern int		IsWinNT(void);
 
@@ -151,7 +166,7 @@ typedef  char *		caddr_t;	/* In malloc.c (core address). */
 /* #define PERL_SBRK_VIA_MALLOC	/**/
 #endif
 
-#ifdef PERLDLL
+#if defined(PERLDLL) && !defined(PERL_CORE)
 #define PERL_CORE
 #endif