Just s/Perl_/S_/ isn't good enough - you also need to add the C<static>

p4raw-id: //depot/perl@34934

1 files changed, 1 insertions, 1 deletions

diff --git a/pad.c b/pad.c
index 715d361acd..568c8df67b 100644
--- a/pad.c
+++ b/pad.c
@@ -1150,7 +1150,7 @@ Mark all the current temporaries for reuse
  * to  a shared TARG.  Such an alias will change randomly and unpredictably.
  * We avoid doing this until we can think of a Better Way.
  * GSAR 97-10-29 */
-void
+static void
 S_pad_reset(pTHX)
 {
     dVAR;