If PERL_DISABLE_PMC is defined, doopen_pm() is just a direct call to

check_type_and_open(). So for this case make it a macro, to save a
level of function call.

p4raw-id: //depot/perl@32088

1 files changed, 2 insertions, 0 deletions

diff --git a/proto.h b/proto.h
index c96c1d3f05..0bb7220d06 100644
--- a/proto.h
+++ b/proto.h
@@ -3542,10 +3542,12 @@ STATIC PerlIO *	S_check_type_and_open(pTHX_ const char *name)
 			__attribute__warn_unused_result__
 			__attribute__nonnull__(pTHX_1);
 
+#ifndef PERL_DISABLE_PMC
 STATIC PerlIO *	S_doopen_pm(pTHX_ const char *name, const STRLEN namelen)
 			__attribute__warn_unused_result__
 			__attribute__nonnull__(pTHX_1);
 
+#endif
 STATIC bool	S_path_is_absolute(const char *name)
 			__attribute__warn_unused_result__
 			__attribute__nonnull__(1);