From: Steve Hay <SteveHay@planit.com>
Date: Wed, 6 May 2009 09:25:00 +0000 (+0100)
Subject: Export two more PerlIO symbols.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4dcdb34ab7673f92a45785ff83aaec90cce7bfd6;p=p5sagit%2Fp5-mst-13.2.git

Export two more PerlIO symbols.

Ben Morrow noticed that:

PerlIO_push is exported, but PerlIO_find_layer is not, so getting a
PerlIO_funcs* to pass to it is difficult.

Several exported functions (PerlIO_parse_layers, PerlIO_layer_fetch,
PerlIO_list_free, ...) take a PerlIO_list_t* argument, but
PerlIO_list_alloc is not exported, so these are effectively useless.
---

diff --git a/makedef.pl b/makedef.pl
index 4456dd6..354b82a 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -1013,8 +1013,10 @@ my @layer_syms = qw(
 		    PerlIO_arg_fetch
 		    PerlIO_debug
 		    PerlIO_define_layer
+		    PerlIO_find_layer
 		    PerlIO_isutf8
 		    PerlIO_layer_fetch
+		    PerlIO_list_alloc
 		    PerlIO_list_free
 		    PerlIO_modestr
 		    PerlIO_parse_layers