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 | |
| parent | f880fe2f705a50a69328065c7b46fe16e2c252e8 (diff) | |
| download | perl-a6f787ca70fe8281557cb1a6f45d147f91cb88bb.tar.gz | |
Two more uses of lvalue SvIVX()
p4raw-id: //depot/perl@24240
Diffstat (limited to 'lib')
| -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; |