Re: info '(latex2e)\indent & \noindent' doesn't work with Msys2

[Eli Zaretskii]

> From: Arash Esbati <arash@gnu.org>
> Cc: bug-texinfo@gnu.org
> 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.