develooper Front page | perl.wxperl.users | Postings from June 2017

[rt.cpan.org #121683]

From:
Kai-Uwe Eckhardt via RT
Date:
June 16, 2017 11:17
Subject:
[rt.cpan.org #121683]
Message ID:
rt-4.0.18-1578-1497611810-1917.121683-15-0@rt.cpan.org
Fri Jun 16 07:16:49 2017: Request 121683 was acted upon.
Transaction: Correspondence added by kuehro@posteo.de
       Queue: Wx
     Subject: [rt.cpan.org #121683]
   Broken in: (no value)
    Severity: (no value)
       Owner: Nobody
  Requestors: kmx@cpan.org
      Status: open
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=121683 >


Wx builds and passes the tests after patching perl.h with the following 
patch (strtoll and strtoul are provided by mingw-w64 and  _stroi64 is 
only needed with Visual C).

Kai-Uwe


--- /c/users/keckhard/Downloads/Perl/perl-5.26.0/perl.h	2017-05-30 
09:58:05 +0000
+++ /c/perl5/perl/lib/CORE/perl.h	2017-06-16 10:02:58 +0000
@@ -6261,7 +6261,7 @@
  #    ifdef __hpux
  #        define strtoll __strtoll	/* secret handshake */
  #    endif
-#    ifdef WIN64
+#    if defined(WIN64) && defined(_MSC_VER)
  #        define strtoll _strtoi64	/* secret handshake */
  #    endif
  #   if !defined(Strtol) && defined(HAS_STRTOLL)
@@ -6295,7 +6295,7 @@
  #    ifdef __hpux
  #        define strtoull __strtoull	/* secret handshake */
  #    endif
-#    ifdef WIN64
+#    if defined(WIN64) && defined(_MSC_VER)
  #        define strtoull _strtoui64	/* secret handshake */
  #    endif
  #    if !defined(Strtoul) && defined(HAS_STRTOULL)



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