diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-04-18 14:15:52 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-04-18 14:15:52 +0000 |
commit | a6f787ca70fe8281557cb1a6f45d147f91cb88bb (patch) | |
tree | bfd0acebbf6dd24f133b1c6af96ad10438de2177 /lib/ExtUtils | |
parent | f880fe2f705a50a69328065c7b46fe16e2c252e8 (diff) | |
download | perl-a6f787ca70fe8281557cb1a6f45d147f91cb88bb.tar.gz |
Two more uses of lvalue SvIVX()
p4raw-id: //depot/perl@24240
Diffstat (limited to 'lib/ExtUtils')
-rw-r--r-- | lib/ExtUtils/t/Constant.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/t/Constant.t b/lib/ExtUtils/t/Constant.t index 4a1657ccb7..0ef797a2b0 100644 --- a/lib/ExtUtils/t/Constant.t +++ b/lib/ExtUtils/t/Constant.t @@ -508,7 +508,7 @@ EOT {name=>"RFC1149", type=>"SV", value=>"sv_2mortal(temp_sv)", pre=>"SV *temp_sv = newSVpv(RFC1149, 0); " . "(void) SvUPGRADE(temp_sv,SVt_PVIV); SvIOK_on(temp_sv); " - . "SvIVX(temp_sv) = 1149;"}, + . "SvIV_set(temp_sv, 1149);"}, ); push @items, $_ foreach keys %compass; |