diff options
Diffstat (limited to 'src/modules/perlcore/ppport.h')
-rw-r--r-- | src/modules/perlcore/ppport.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/modules/perlcore/ppport.h b/src/modules/perlcore/ppport.h index 2a80213..611ecf1 100644 --- a/src/modules/perlcore/ppport.h +++ b/src/modules/perlcore/ppport.h @@ -525,7 +525,7 @@ SV *sv; ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK) \ ? ((lp = SvCUR(sv)), SvPVX(sv)) : my_sv_2pvbyte(aTHX_ sv, &lp)) static char * - my_sv_2pvbyte(pTHX_ register SV *sv, STRLEN *lp) + my_sv_2pvbyte(pTHX_ SV *sv, STRLEN *lp) { sv_utf8_downgrade(sv,0); return SvPV(sv,*lp); |