> From: Arash Esbati <[email protected]> > Cc: [email protected] > Date: Sun, 02 Apr 2023 18:58:52 +0200 > > In file included from MiscXS.xs:8: > C:/pathto/msys64/mingw64/lib/perl5/core_perl/CORE/XSUB.h:618: warning: "free" > redefined > 618 | # define free PerlMem_free > | > In file included from C:/pathto/msys64/mingw64/include/sec_api/stdlib_s.h:9, > from C:/pathto/msys64/mingw64/include/stdlib.h:768, > from ./gnulib/lib/stdlib.h:36, > from > C:/pathto/msys64/mingw64/lib/perl5/core_perl/CORE/perl.h:980, > from MiscXS.xs:7: > ./gnulib/lib/stdlib.h:737: note: this is the location of the previous > definition > 737 | # define free rpl_free > | > In file included from In file included from : > : > > C:/pathto/msys64/mingw64/lib/perl5/core_perl/CORE/XSUB.h:618: > "free" redefined > 618 | # define free PerlMem_free > | > "free" redefined > 618 | # define free PerlMem_free > | > In file included from In file included from > C:/pathto/msys64/mingw64/include/sec_api/stdlib_s.h:9C:/pathto/msys64/mingw64/include/sec_api/stdlib_s.h:9, > from , > from > C:/pathto/msys64/mingw64/include/stdlib.h:768C:/pathto/msys64/mingw64/include/stdlib.h:768, > from , > from ./gnulib/lib/stdlib.h:36./gnulib/lib/stdlib.h:36, > from , > from xspara.c:19misc.c:19: > : > ./gnulib/lib/stdlib.h:737:./gnulib/lib/stdlib.h:737: note: note: this is the > location of the previous definition > 737 | # define free rpl_free > | > this is the location of the previous definition > 737 | # define free rpl_free > | > In file included from parsetexi/Parsetexi.xs:9: > C:/pathto/msys64/mingw64/lib/perl5/core_perl/CORE/XSUB.h:618: warning: "free" > redefined > 618 | # define free PerlMem_free > | > In file included from C:/pathto/msys64/mingw64/include/sec_api/stdlib_s.h:9, > from C:/pathto/msys64/mingw64/include/stdlib.h:768, > from ./gnulib/lib/stdlib.h:36, > from > C:/pathto/msys64/mingw64/lib/perl5/core_perl/CORE/perl.h:980, > from parsetexi/Parsetexi.xs:8: > ./gnulib/lib/stdlib.h:737: note: this is the location of the previous > definition > 737 | # define free rpl_free > | > --8<---------------cut here---------------end--------------->8---
This is known, see https://lists.gnu.org/archive/html/bug-texinfo/2022-10/msg00365.html In my port I did this: --- tp/Texinfo/XS/misc.c.~1~ 2022-11-30 19:06:28.000000000 +0 200 +++ tp/Texinfo/XS/misc.c 2022-12-03 14:05:33.735000000 +0 200 @@ -37,6 +37,9 @@ #include "EXTERN.h" #include "perl.h" +#if defined _WIN32 && !defined __CYGWIN__ +# undef free +#endif #include "XSUB.h" #include "ppport.h" > --8<---------------cut here---------------start------------->8--- > In function 'mv -f parsetexi/.deps/Parsetexi_la-separator.Tpo > parsetexi/.deps/Parsetexi_la-separator.Plo > handle_line_command': > parsetexi/handle_commands.c:522:29: warning: cast from pointer to integer of > different size [/bin/sh ./libtool --tag=CC --mode=compile gcc > -DHAVE_CONFIG_H -I. -I./parsetexi -I. -I./gnulib/lib -I./gnulib/lib > -DDATADIR=\"/c/pathto/msys64/opt/mingw64/texinfo/share\" -DWIN32 -DWIN64 > -DPERL_TEXTMODE_SCRIPTS -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS > -DUSE_PERLIO -D__USE_MINGW_ANSI_STDIO -fno-strict-aliasing -mms-bitfields -O2 > -DVERSION=\"0\" -DXS_VERSION=\"0\" > -IC:/pathto/msys64/mingw64/lib/perl5/core_perl/CORE -MT > parsetexi/Parsetexi_la-errors.lo -MD -MP -MF > parsetexi/.deps/Parsetexi_la-errors.Tpo -c -o > parsetexi/Parsetexi_la-errors.lo `test -f 'parsetexi/errors.c' || echo > './'`parsetexi/errors.c > -Wpointer-to-int-cast] > 522 | level = (long) k->value + 1; > | ^ > --8<---------------cut here---------------end--------------->8--- This is a real bug: the code should cast to intptr_t, not to long.
