diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-06-30 17:37:56 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-06-30 17:37:56 +0000 |
commit | 1946a0741a168241d8fbd229705465c825727649 (patch) | |
tree | a10f9f8edc2a108f1f058a042ab71db61be0a57a /universal.c | |
parent | be41e5d9d9cfcfb109a0aa6168e91932d29ac79e (diff) | |
download | perl-1946a0741a168241d8fbd229705465c825727649.tar.gz |
Use sv_setpvn where we know the length.
p4raw-id: //depot/perl@25030
Diffstat (limited to 'universal.c')
-rw-r--r-- | universal.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/universal.c b/universal.c index ad80a21bee..507ab14e3e 100644 --- a/universal.c +++ b/universal.c @@ -418,7 +418,7 @@ XS(XS_version_new) else { /* create empty object */ vs = sv_newmortal(); - sv_setpv(vs,""); + sv_setpvn(vs,"",0); } } else if ( items == 3 ) { |