summaryrefslogtreecommitdiff
path: root/objXSUB.h
diff options
context:
space:
mode:
authorJan Dubois <jand@activestate.com>1999-01-24 03:45:32 +0100
committerGurusamy Sarathy <gsar@cpan.org>1999-02-14 09:57:29 +0000
commit1fa8b10d8c0f0780dab42b408cc071b5f7ee992b (patch)
tree79dec658b5a91fedbc68e28af30e38f5bb86f7a5 /objXSUB.h
parent4afa425f54235784726a05dc06169d071f280d7a (diff)
downloadperl-1fa8b10d8c0f0780dab42b408cc071b5f7ee992b.tar.gz
provide SvPV_nolen(sv) to avoid use of PL_na
Message-ID: <36bb7ada.68485547@smtp1.ibm.net> Subject: [PATCH 5.005_54] _54 version of SvPV_nolen patch p4raw-id: //depot/perl@2912
Diffstat (limited to 'objXSUB.h')
-rw-r--r--objXSUB.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/objXSUB.h b/objXSUB.h
index 8138d0df00..b478a9e055 100644
--- a/objXSUB.h
+++ b/objXSUB.h
@@ -2919,6 +2919,8 @@
#define sv_2nv pPerl->Perl_sv_2nv
#undef sv_2pv
#define sv_2pv pPerl->Perl_sv_2pv
+#undef sv_2pv_nolen
+#define sv_2pv_nolen pPerl->Perl_sv_2pv_nolen
#undef sv_2uv
#define sv_2uv pPerl->Perl_sv_2uv
#undef sv_add_arena
@@ -3013,6 +3015,8 @@
#define sv_pos_b2u pPerl->Perl_sv_pos_b2u
#undef sv_pos_u2b
#define sv_pos_u2b pPerl->Perl_sv_pos_u2b
+#undef sv_pv
+#define sv_pv pPerl->Perl_sv_pv
#undef sv_pvn
#define sv_pvn pPerl->Perl_sv_pvn
#undef sv_pvn_force