develooper Front page | perl.perl5.porters | Postings from December 2017

Re: [perl #115814] open ${\$x} leaks

Thread Previous | Thread Next
From:
Zefram
Date:
December 11, 2017 03:55
Subject:
Re: [perl #115814] open ${\$x} leaks
Message ID:
20171211035508.GA13687@fysh.org
Father Chrysostomos wrote:
>Done in 6da090e6cb and 732d3893ab.

You've broken something:

APItest.c: In function 'XS_XS__APItest_PerlIO_exportFILE':
APItest.c:7295:9: warning: assignment from incompatible pointer type
  RETVAL = PerlIO_exportFILE(f, mode);
         ^
APItest.c:7302:34: warning: passing argument 1 of 'PerlIO_importFILE' from incompatible pointer type
   PerlIO *fp = PerlIO_importFILE(RETVAL,0);
                                  ^
In file included from ../../iperlsys.h:51:0,
                 from ../../perl.h:3540,
                 from APItest.xs:10:
../../perlio.h:217:23: note: expected 'struct FILE *' but argument is of type 'struct PerlIOl **'
 PERL_CALLCONV PerlIO *PerlIO_importFILE(FILE *, const char *);
                       ^
../../perlio.h:63:16: error: ISO C90 forbids mixed declarations and code [-Werror=declaration-after-statement]
 #define PerlIO PerlIO
                ^
APItest.c:7302:3: note: in expansion of macro 'PerlIO'
   PerlIO *fp = PerlIO_importFILE(RETVAL,0);
   ^
cc1: some warnings being treated as errors
Makefile:344: recipe for target 'APItest.o' failed

-zefram

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About