Refactor all of the code of the form

SSCHECK(3);
SSPUSHPTR(ptr1);
SSPUSHPTR(ptr2);
SSPUSHINT(type);
into a static function S_save_pushptrptr().
It might be possible to make some of its callers trivial macros, and
so eliminate them as functions. But start with the easy part.

p4raw-id: //depot/perl@34957

(cherry-picked from commit e22024d3cff7db1071a80c1941fd213f9e45cd7c)

1 files changed, 3 insertions, 0 deletions

diff --git a/proto.h b/proto.h
index ae871b9b0a..3df8ea9e56 100644
--- a/proto.h
+++ b/proto.h
@@ -2922,6 +2922,9 @@ PERL_CALLCONV SV*	Perl_save_svref(pTHX_ SV** sptr)
 	assert(sptr)
 
 PERL_CALLCONV void	Perl_save_pushptr(pTHX_ void *const ptr, const int type);
+#if defined(PERL_IN_SCOPE_C)
+STATIC void	S_save_pushptrptr(pTHX_ void *const ptr1, void *const ptr2, const int type);
+#endif
 PERL_CALLCONV OP*	Perl_sawparens(pTHX_ OP* o);
 PERL_CALLCONV OP*	Perl_scalar(pTHX_ OP* o);
 PERL_CALLCONV OP*	Perl_scalarkids(pTHX_ OP* o);