Fix warning "implicit declaration of function '_setjmpex'" using MinGW-w64

twata1 · demerphq · commit d9e3c8ddec36 · 2022-12-10T09:05:34.000+01:00
diff --git a/AUTHORS b/AUTHORS
@@ -1384,6 +1384,7 @@ Torsten Foertsch               <torsten.foertsch@gmx.net>
 Torsten Schönfeld              <kaffeetisch@gmx.de>
 Trevor Blackwell               <tlb@viaweb.com>
 Tsutomu IKEGAMI                <t-ikegami@aist.go.jp>
+Tsuyoshi Watanabe              <twata_1@yahoo.co.jp>
 Tuomas J. Lukka                <tjl@lukka.student.harvard.edu>
 Tye McQueen                    <tye@metronet.com>
 Ulrich Habel                   <rhaen@NetBSD.org>
diff --git a/dist/threads/lib/threads.pm b/dist/threads/lib/threads.pm
@@ -5,7 +5,7 @@ use 5.008;
 use strict;
 use warnings;
 
-our $VERSION = '2.32';      # remember to update version in POD!
+our $VERSION = '2.33';      # remember to update version in POD!
 my $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 
@@ -134,7 +134,7 @@ threads - Perl interpreter-based threads
 
 =head1 VERSION
 
-This document describes threads version 2.32
+This document describes threads version 2.33
 
 =head1 WARNING
 
diff --git a/dist/threads/threads.xs b/dist/threads/threads.xs
@@ -15,6 +15,7 @@
 #    define setjmp(x) _setjmp(x)
 #  endif
 #  if defined(__MINGW64__)
+#    include <intrin.h>
 #    define setjmp(x) _setjmpex((x), mingw_getsp())
 #  endif
 #endif

-Original file line number
+Diff line change
 Torsten Schönfeld              <[email protected]>
 Trevor Blackwell               <[email protected]>
 Tsutomu IKEGAMI                <[email protected]>
 +Tsuyoshi Watanabe              <[email protected]>
 Tuomas J. Lukka                <[email protected]>
 Tye McQueen                    <[email protected]>
 Ulrich Habel                   <[email protected]>