diff options
author | Karl Williamson <khw@cpan.org> | 2022-12-12 19:51:40 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2023-01-12 17:42:00 -0700 |
commit | 65be4a0ded9e67be17d2c559c1c0dc8d3d746ed6 (patch) | |
tree | 838d3a8923554b997c8b033d79c64170a11007f1 /proto.h | |
parent | 2dc676e9ce23feb0ae948ea62f7e4301931d2188 (diff) | |
download | perl-65be4a0ded9e67be17d2c559c1c0dc8d3d746ed6.tar.gz |
Fix PerlEnv_putenv threaded compilation on Windows
A second compilation of a workspace would fail. The first one would
succeed because miniperl was being used, which isn't threaded.
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 7 |
1 files changed, 7 insertions, 0 deletions
@@ -6195,6 +6195,13 @@ Perl_my_popen(pTHX_ const char *cmd, const char *mode); # define PERL_ARGS_ASSERT_MY_POPEN \ assert(cmd); assert(mode) +# if defined(USE_ITHREADS) +STATIC bool +Perl_PerlEnv_putenv(pTHX_ char *str); +# define PERL_ARGS_ASSERT_PERLENV_PUTENV \ + assert(str) + +# endif /* defined(USE_ITHREADS) */ #endif /* !defined(PERL_IMPLICIT_SYS) */ #if defined(PERL_IN_AV_C) STATIC MAGIC * |