diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-05-17 17:18:18 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-05-17 17:18:18 +0000 |
| commit | 44798d05173226aecbb6247375cc88a9dd809540 (patch) | |
| tree | 2d010284ef25bf840b8a21d4354119f4701fb911 /makedef.pl | |
| parent | ec3f2d8be8ce8cf45558045599c51ca3f4d57e3e (diff) | |
| download | perl-44798d05173226aecbb6247375cc88a9dd809540.tar.gz | |
Fix the crlf.t buffer leak
- actually a generic PerlIOBuf_xxx derived leak-on-pop, but :crlf
flagged it because it is more often popped without stream
being closed.
- Define non-noop PerlIOBuf_popped(), use it and export it.
p4raw-id: //depot/perlio@16657
Diffstat (limited to 'makedef.pl')
| -rw-r--r-- | makedef.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/makedef.pl b/makedef.pl index 1d3510341b..0a1e7edc62 100644 --- a/makedef.pl +++ b/makedef.pl @@ -738,6 +738,7 @@ my @layer_syms = qw( PerlIOBase_error PerlIOBase_fileno PerlIOBase_pushed + PerlIOBase_popped PerlIOBase_read PerlIOBase_setlinebuf PerlIOBase_unread @@ -749,6 +750,7 @@ my @layer_syms = qw( PerlIOBuf_get_ptr PerlIOBuf_open PerlIOBuf_pushed + PerlIOBuf_popped PerlIOBuf_read PerlIOBuf_seek PerlIOBuf_set_ptrcnt @@ -1348,7 +1350,7 @@ perl_destruct perl_free perl_parse perl_run -# Oddities from PerlIO +# Oddities from PerlIO PerlIO_binmode PerlIO_getpos PerlIO_init |