From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 29 Apr 2005 11:02:01 +0000 (+0300)
Subject: one cannot "static" exported functions
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5ca1d77ff41a74d34e43fa21ea5727d105ee3601;p=p5sagit%2Fp5-mst-13.2.git

one cannot "static" exported functions
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F2453D705@esebe105.NOE.Nokia.com>

p4raw-id: //depot/perl@24353
---

diff --git a/perlio.c b/perlio.c
index dae7f9b..3f659ca 100644
--- a/perlio.c
+++ b/perlio.c
@@ -861,7 +861,7 @@ PerlIO_tab_sv(pTHX_ PerlIO_funcs *tab)
     return sv;
 }
 
-static XS(XS_PerlIO__Layer__NoWarnings)
+XS(XS_PerlIO__Layer__NoWarnings)
 {
     /* This is used as a %SIG{__WARN__} handler to supress warnings
        during loading of layers.
@@ -872,7 +872,7 @@ static XS(XS_PerlIO__Layer__NoWarnings)
     XSRETURN(0);
 }
 
-static XS(XS_PerlIO__Layer__find)
+XS(XS_PerlIO__Layer__find)
 {
     dXSARGS;
     if (items < 2)