diff options
| author | Alexey Tourbin <at@altlinux.ru> | 2007-02-24 17:47:35 +0300 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-02-24 15:42:45 +0000 |
| commit | b2166d27277cfef31200203f778dabd2056ccbc3 (patch) | |
| tree | a15920eec9f08824323c51dc772d23b32d3a3de9 /perlio.c | |
| parent | 446db2c1db07cb8824d05d0eac9f03ce91e4a749 (diff) | |
| download | perl-b2166d27277cfef31200203f778dabd2056ccbc3.tar.gz | |
perlio.c (PerlIO_tmpfile): fix memory leak
Message-ID: <20070224114735.GA3454@localhost.localdomain>
p4raw-id: //depot/perl@30389
Diffstat (limited to 'perlio.c')
| -rw-r--r-- | perlio.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -5086,8 +5086,8 @@ PerlIO_tmpfile(void) if (f) PerlIOBase(f)->flags |= PERLIO_F_TEMP; PerlLIO_unlink(SvPVX_const(sv)); - SvREFCNT_dec(sv); } + SvREFCNT_dec(sv); # else /* !HAS_MKSTEMP, fallback to stdio tmpfile(). */ FILE * const stdio = PerlSIO_tmpfile(); |