Hi,

I have hit into a strange "maybe-bug" on Win32 platform.

The problem occurs when a XS modules tries to call function fputs() from XS/C code.

The standard UNIX declaration of fputs looks AFAIK like this: int fputs(const char *s, FILE *stream);

Thus one would expect that also in XS/C code you just use "fputs(string,filehandle);" However if you do this on Win32 perl you will see an warning like this (my example comes from Math::Pari where I revealed the problem).

Pari.xs: In function 'XS_Math__Pari_dumpStack': Pari.xs:3798: warning: passing argument 2 of '(*Perl_IStdIO_ptr ((struct PerlInterpreter *)Perl_get_context()))->pPuts' from incompatible pointer type Pari.xs:3798: note: expected 'struct FILE *' but argument is of type 'char *' Pari.xs:3798: warning: passing argument 3 of '(*Perl_IStdIO_ptr((struct PerlInterpreter *)Perl_get_context())) ->pPuts' from incompatible pointer type Pari.xs:3798: note: expected 'const char *' but argument is of type 'struct FILE *'

Swapping the arguments fixed the warning, so it seems to me than in Win32/perl XS code it is expected to use: fputs(filehandle,string);

whereas on Linux/perl box it is expected to use: fputs(string,filehandle);

I have tracked this issue to iperlsys.h where I lost in a bunch of macros and typedefs.

Note: 5.11.4 used for testing is based on release tarball, gcc compiler, all options left in default.

Thanks for any help.