This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Variables possibly clobbered by longjmp/vfork.
authorJarkko Hietaniemi <jhi@iki.fi>
Sat, 6 Dec 2014 14:04:49 +0000 (09:04 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 6 Dec 2014 19:30:55 +0000 (14:30 -0500)
(my_perl in the line 480 has the same problem, but messier to fix.)

dist/threads/threads.xs

index 5b44a38..3bbca65 100644 (file)
@@ -470,10 +470,10 @@ S_ithread_run(void * arg)
 {
     ithread *thread = (ithread *)arg;
     int jmp_rc = 0;
-    I32 oldscope;
+    volatile I32 oldscope;
     volatile int exit_app = 0;   /* Thread terminated using 'exit' */
     volatile int exit_code = 0;
-    int died = 0;       /* Thread terminated abnormally */
+    volatile int died = 0;       /* Thread terminated abnormally */
 
     dJMPENV;