X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/86cb71737ed277fd6cd123008b871f7a00c2944b..08105a92a3e1f0f7ac18e8807e8c0cad635b748a:/op.c

diff --git a/op.c b/op.c
index 7ccfe16..51df803 100644
--- a/op.c
+++ b/op.c
@@ -541,7 +541,7 @@ pad_reset(void)
 #ifdef USE_THREADS
 /* find_threadsv is not reentrant */
 PADOFFSET
-find_threadsv(char *name)
+find_threadsv(const char *name)
 {
     dTHR;
     char *p;