diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 1997-11-21 00:54:43 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 1997-11-21 00:54:43 +0000 |
| commit | a868473fb9213692497e27ae968094b32a41c501 (patch) | |
| tree | 625f780ac70afbc6cbb8da353a5b4606b2bc01bf /win32/win32.h | |
| parent | 8d9481945a6b8b7a5f7fda873563149bbb96e4ba (diff) | |
| parent | eb1cfdd6b0a7e7a6918084a3828c98f88804c32d (diff) | |
| download | perl-a868473fb9213692497e27ae968094b32a41c501.tar.gz | |
Basic integrate of lastest perl into ansiperl
p4raw-id: //depot/ansiperl@272
Diffstat (limited to 'win32/win32.h')
| -rw-r--r-- | win32/win32.h | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/win32/win32.h b/win32/win32.h index 54e98551aa..9086f31701 100644 --- a/win32/win32.h +++ b/win32/win32.h @@ -155,4 +155,12 @@ typedef char * caddr_t; /* In malloc.c (core address). */ #define PERL_CORE #endif +#ifdef USE_BINMODE_SCRIPTS +#define PERL_SCRIPT_MODE "rb" +EXT void win32_strip_return(struct sv *sv); +#else +#define PERL_SCRIPT_MODE "r" +#define win32_strip_return(sv) NOOP +#endif + #endif /* _INC_WIN32_PERL5 */ |