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/util.c b/util.c
index 0287d3422a..06d7bb1716 100644
--- a/util.c
+++ b/util.c
@@ -1362,7 +1362,7 @@ S_vdie_croak_common(pTHX_ const char* pat, va_list* args, STRLEN* msglen,
     return message;
 }
 
-OP *
+static OP *
 S_vdie(pTHX_ const char* pat, va_list *args)
 {
     dVAR;