diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-11-01 16:38:31 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-11-01 16:38:31 +0000 |
commit | 8c654ff2610478421e870f364dd74578fcc21373 (patch) | |
tree | b63e114081856b9fdb2afab3db3706e644b9c2fa /proto.h | |
parent | c3ff6b3084af5c20dc83804f3f4b6c8579748033 (diff) | |
download | perl-8c654ff2610478421e870f364dd74578fcc21373.tar.gz |
This should clear up 'Perl_do_exec' undefined; warnings on win32
p4raw-id: //depot/perl@25946
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 8 |
1 files changed, 8 insertions, 0 deletions
@@ -386,9 +386,17 @@ PERL_CALLCONV bool Perl_do_close(pTHX_ GV* gv, bool not_implicit) PERL_CALLCONV bool Perl_do_eof(pTHX_ GV* gv) __attribute__nonnull__(pTHX_1); + +#ifdef PERL_DEFAULT_DO_EXEC3_IMPLEMENTATION /* PERL_CALLCONV bool Perl_do_exec(pTHX_ const char* cmd) __attribute__nonnull__(pTHX_1); */ +#else +PERL_CALLCONV bool Perl_do_exec(pTHX_ const char* cmd) + __attribute__nonnull__(pTHX_1); + +#endif + #if defined(WIN32) || defined(__SYMBIAN32__) PERL_CALLCONV int Perl_do_aspawn(pTHX_ SV* really, SV** mark, SV** sp) __attribute__nonnull__(pTHX_1) |