From: Hugo van der Sanden <hv@crypt.org>
Date: Wed, 22 Jan 2003 01:37:52 +0000 (+0000)
Subject: #18530 misses a couple of pTHX definitions
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6e5518766f6c556c72edad1ab89d0a3d5fe87590;p=p5sagit%2Fp5-mst-13.2.git

#18530 misses a couple of pTHX definitions

p4raw-id: //depot/perl@18542
---

diff --git a/sv.c b/sv.c
index a1a7753..caa533a 100644
--- a/sv.c
+++ b/sv.c
@@ -5524,7 +5524,7 @@ Perl_sv_len_utf8(pTHX_ register SV *sv)
  *
  */
 STATIC bool
-S_utf8_mg_pos_init(SV *sv, MAGIC **mgp, STRLEN **cachep, I32 i, I32 *offsetp, U8 *s, U8 *start)
+S_utf8_mg_pos_init(pTHX_ SV *sv, MAGIC **mgp, STRLEN **cachep, I32 i, I32 *offsetp, U8 *s, U8 *start)
 {
     bool found = FALSE; 
 
@@ -5559,7 +5559,7 @@ S_utf8_mg_pos_init(SV *sv, MAGIC **mgp, STRLEN **cachep, I32 i, I32 *offsetp, U8
  *
  */
 STATIC bool
-S_utf8_mg_pos(SV *sv, MAGIC **mgp, STRLEN **cachep, I32 i, I32 *offsetp, I32 uoff, U8 **sp, U8 *start, U8 *send)
+S_utf8_mg_pos(pTHX_ SV *sv, MAGIC **mgp, STRLEN **cachep, I32 i, I32 *offsetp, I32 uoff, U8 **sp, U8 *start, U8 *send)
 {
     bool found = FALSE;