diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-19 07:34:29 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-19 07:34:29 +0000 |
| commit | 2a4bf7730d252fcadf5e50c3a9c740b5c94acfe3 (patch) | |
| tree | 9a7597178791661d866752380767b1406cb2c96a /op.c | |
| parent | 17cab1b848e4960c008b73548ee8e62a9e9735ec (diff) | |
| parent | 41d6edb2c1acac32a0296d594f0943752d23f077 (diff) | |
| download | perl-2a4bf7730d252fcadf5e50c3a9c740b5c94acfe3.tar.gz | |
integrate cfgperl contents into mainline
p4raw-id: //depot/perl@5822
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -2746,7 +2746,8 @@ Perl_pmtrans(pTHX_ OP *o, OP *expr, OP *repl) SvREFCNT_dec(transv); if (!del && havefinal) - (void)hv_store((HV*)SvRV((cSVOPo->op_sv)), "FINAL", 5, newSViv((IV)final), 0); + (void)hv_store((HV*)SvRV((cSVOPo->op_sv)), "FINAL", 5, + newSVuv((UV)final), 0); if (grows && to_utf) o->op_private |= OPpTRANS_GROWS; |