diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2001-06-11 16:34:31 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-12 13:27:28 +0000 |
commit | 1de7c2aca01d9e33d916dcec3cd53be0b1f8e101 (patch) | |
tree | 2efc0e17e307ec5906198016eadd03f2180fe518 /perl.h | |
parent | c6c619a96fa11b09bef26d0c724b6cfd0bdbb34b (diff) | |
download | perl-1de7c2aca01d9e33d916dcec3cd53be0b1f8e101.tar.gz |
As suggested in
Subject: Re: ext/ + -Wall
Message-Id: <200106120634.f5C6YVM07246@smtp3.ActiveState.com>
p4raw-id: //depot/perl@10535
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 9 |
1 files changed, 9 insertions, 0 deletions
@@ -258,6 +258,15 @@ struct perl_thread; # define dTHXx dTHX #endif +/* Under PERL_IMPLICIT_SYS (used in Windows for fork emulation) + * PerlIO_foo() expands to PL_StdIO->pFOO(PL_StdIO, ...). + * dTHXs is therefore needed for all functions using PerlIO_foo(). */ +#ifdef PERL_IMPLICIT_SYS +# define dTHXs dTHX +#else +# define dTHXs dNOOP +#endif + #undef START_EXTERN_C #undef END_EXTERN_C #undef EXTERN_C |