summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-11-01 16:43:22 +0000
committerNicholas Clark <nick@ccl4.org>2009-11-01 16:47:07 +0000
commit879d0c7269cae2ffd414e7e03bcd3bc03ba587d3 (patch)
treedd2ef9b59739f8a8dca35e041a72286886d57ac2 /perl.h
parente4eea5780a2bbeecb73ada4fbd62b3616735d968 (diff)
downloadperl-879d0c7269cae2ffd414e7e03bcd3bc03ba587d3.tar.gz
Remove Perl_pmflag() from the public API, and mark it as deprecated.
regcomp.c stopped using it before 5.10, leaving only toke.c. The only code on CPAN that uses it is copies of regcomp.c. Replace it with a static function, with a cleaner interface.
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h8
1 files changed, 8 insertions, 0 deletions
diff --git a/perl.h b/perl.h
index c4521aa156..9f80c5b4c3 100644
--- a/perl.h
+++ b/perl.h
@@ -3179,6 +3179,14 @@ typedef pthread_key_t perl_key;
# endif
#endif
+#if !defined(PERL_CORE) && !defined(PERL_NO_SHORT_NAMES)
+# if defined(PERL_IMPLICIT_CONTEXT)
+# define pmflag(a,b) Perl_pmflag(aTHX_ a,b)
+# else
+# define pmflag Perl_pmflag
+# endif
+#endif
+
#ifdef HASATTRIBUTE_DEPRECATED
# define __attribute__deprecated__ __attribute__((deprecated))
#endif