This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
PPPort_pm.PL: Add __UNDEF_NOT_PROVIDED__
authorKarl Williamson <khw@cpan.org>
Thu, 8 Aug 2019 20:44:15 +0000 (14:44 -0600)
committerNicolas R <atoomic@cpan.org>
Fri, 27 Sep 2019 22:51:27 +0000 (16:51 -0600)
This is like __UNDEFINED__, but does make "provided" the macro it
targets

(cherry picked from commit 63a8d75f3253d340ded4bbbc4246d68fdf7ed0e7)
Signed-off-by: Nicolas R <atoomic@cpan.org>
dist/Devel-PPPort/PPPort_pm.PL

index a4e3afa..e6421ed 100644 (file)
@@ -289,7 +289,7 @@ sub expand
   my $code = shift;
   $code =~ s{^(\s*#\s*(?:el)?if\s+)(.*)$}{$1.expand_pp_expressions($2)}gem;
   $code =~ s{^\s*
-              __UNDEFINED__
+              __(?:UNDEFINED|UNDEF_NOT_PROVIDED)__
               \s+
               (
                 ( \w+ )