summaryrefslogtreecommitdiff
path: root/inline.h
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2023-01-31 05:01:53 +0100
committerYves Orton <demerphq@gmail.com>2023-02-01 09:53:44 +0800
commit6abce8468c57a533bc8160fc30734708c2452aea (patch)
tree38725074f7446faaa00b0137f0d4b9e610a201e5 /inline.h
parentd404f73baa29d5697ed2cac768de015217d5e819 (diff)
downloadperl-6abce8468c57a533bc8160fc30734708c2452aea.tar.gz
embed.pl - the 's', 'S', 'i' and 'I' flags are mutually exclusive
We had a bug where we processed the first one in the flags definition. Sorting the flags or rearranging them changes the output, which shouldn't happen. This also fixes the handling and specification of PerlEnv_putenv(), which was marked "si" when it should have been marked "i". This required changing its implementation from a Perl_ prefix to a S_ prefix and regenerating. I have run embed.pl in a loop with a local patch to shuffle the flags to see if there were any other order dependencies. No output files changed so I assume with this patch we are free of such bugs.
Diffstat (limited to 'inline.h')
-rw-r--r--inline.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/inline.h b/inline.h
index 06a773d2c3..fce84b4d96 100644
--- a/inline.h
+++ b/inline.h
@@ -287,7 +287,7 @@ S_strip_spaces(pTHX_ const char * orig, STRLEN * const len)
/* Otherwise this function is implemented as macros in iperlsys.h */
PERL_STATIC_INLINE bool
-Perl_PerlEnv_putenv(pTHX_ char * str)
+S_PerlEnv_putenv(pTHX_ char * str)
{
PERL_ARGS_ASSERT_PERLENV_PUTENV;