diff options
| author | Gurusamy Sarathy <gsar@engin.umich.edu> | 1997-06-24 11:07:34 +1200 |
|---|---|---|
| committer | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-08-07 00:00:00 +1200 |
| commit | 2bc71ef813f5d9e1635af64220cf742859485b38 (patch) | |
| tree | 83b072cd68ac56b63e975606dab41e71aaeec70b | |
| parent | ad2e33dc060dc2ccf73a5ff1557a69a9b09c30c8 (diff) | |
| download | perl-2bc71ef813f5d9e1635af64220cf742859485b38.tar.gz | |
win32 tweaks
One of my earlier patches used the unportable MAXPATH
instead of MAX_PATH. The getenv() fix produced linker
warnings because of a missing declaration. This fixes
both problems.
p5p-msgid: 199707042150.RAA01065@aatma.engin.umich.edu
| -rw-r--r-- | win32/win32.c | 2 | ||||
| -rw-r--r-- | win32/win32.h | 5 |
2 files changed, 6 insertions, 1 deletions
diff --git a/win32/win32.c b/win32/win32.c index 45f9e46c6c..8ec1f9e1b9 100644 --- a/win32/win32.c +++ b/win32/win32.c @@ -97,7 +97,7 @@ win32PerlLibPath(void) char * win32SiteLibPath(void) { - static char szPerlSiteLib[MAXPATH+1]; + static char szPerlSiteLib[MAX_PATH+1]; strcpy(szPerlSiteLib, win32PerlLibPath()); strcat(szPerlSiteLib, "\\site"); return (szPerlSiteLib); diff --git a/win32/win32.h b/win32/win32.h index f683938a8f..8cf8b7c01c 100644 --- a/win32/win32.h +++ b/win32/win32.h @@ -66,8 +66,13 @@ extern char *staticlinkmodules[]; /*#define USE_WIN32_RTL_ENV */ #ifndef USE_WIN32_RTL_ENV +#include <stdlib.h> +#ifndef EXT +#include "EXTERN.h" +#endif #undef getenv #define getenv win32_getenv +EXT char *win32_getenv(const char *name); #endif #define USE_SOCKETS_AS_HANDLES |