Nobody has used SvPVbyte_force?
SADAHIRO Tomoyuki [Sun, 21 Mar 2004 21:49:53 +0000 (06:49 +0900)]
Message-Id: <20040321213628.2461.BQW10602@nifty.com>

p4raw-id: //depot/perl@22548

sv.h

diff --git a/sv.h b/sv.h
index 11927cd..fab44eb 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -1006,7 +1006,7 @@ scalar.
 
 #define SvPVbyte_force(sv, lp) \
     ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_THINKFIRST)) == (SVf_POK) \
-     ? ((lp = SvCUR(sv)), SvPVX(sv)) : sv_pvbyte_force(sv, &lp))
+     ? ((lp = SvCUR(sv)), SvPVX(sv)) : sv_pvbyten_force(sv, &lp))
 
 #define SvPVbyte_nolen(sv) \
     ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK)\