From: Jarkko Hietaniemi 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: 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)