cross-compile perl-5.30.3 with perl-cross 1.3.4 to x86_64-w64-mingw32 fails

[geki-yaba]

Gentoo AMD64 system trying to cross-compile perl-5.30.3 with perl-cross 1.3.4 to x86_64-w64-mingw32 results in:

./miniperl_top -MExtUtils::Miniperl -e 'writemain(\"perlmain.c", @ARGV)'  B Devel::Peek Fcntl File::DosGlob File::Glob Hash::Util Hash::Util::FieldHash Opcode POSIX PerlIO::encoding PerlIO::mmap PerlIO::scalar PerlIO::via SDBM_File Sys::Hostname Tie::Hash::NamedCapture attributes mro re Compress::Raw::Bzip2 Compress::Raw::Zlib Digest::MD5 Digest::SHA Encode Filter::Util::Call MIME::Base64 Math::BigInt::FastCalc List::Util Time::Piece Unicode::Collate Data::Dumper Devel::PPPort IO Cwd Storable Time::HiRes Unicode::Normalize threads threads::shared
x86_64-w64-mingw32-gcc -DPERL_CORE -march=x86-64 -mtune=generic -O2 -pipe -fomit-frame-pointer -funswitch-loops -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -march=x86-64 -mtune=generic -O2 -pipe -fomit-frame-pointer -funswitch-loops -fPIC -Wno-unused-function -c -o perlmain.o perlmain.c
In file included from �[01m�[Kperl.h:29�[m�[K,
                 from �[01m�[Kperlmain.c:51�[m�[K:
�[01m�[Kconfig.h:3047:3:�[m�[K �[01;31m�[Kerror: �[m�[Kinvalid preprocessing directive #HAS_NANOSLEEP
 3047 | # �[01;31m�[KHAS_NANOSLEEP�[m�[K  /**/
      |   �[01;31m�[K^~~~~~~~~~~~~�[m�[K
In file included from �[01m�[Kperlmain.c:51�[m�[K:
�[01m�[Kperl.h:2993:12:�[m�[K �[01;31m�[Kfatal error: �[m�[Kwin32.h: No such file or directory
 2993 | #  include �[01;31m�[K"win32.h"�[m�[K
      |            �[01;31m�[K^~~~~~~~~�[m�[K
compilation terminated.
make[1]: *** [Makefile:151: perlmain.o] Error 1
make[1]: Leaving directory '/mnt/data/tmp/portage/x86_64-w64-mingw32/portage/dev-lang/perl-5.30.3-r1/work/perl-5.30.3'
make: *** [Makefile:81: all] Error 2
 �[31;01m*�[0m ERROR: dev-lang/perl-5.30.3-r1::gentoo failed (compile phase):

perl-5.30.3-r1.log

[arsv]

Win32 targets are not supported in perl-cross.