To be honnest I do not call any Tk lib. I even do not know why it appears in 
the stack ...

My C code uses wxWidgets lib for the GUI, hence the Perl side is used only for 
computation or some lowlevel accesses...

Thanks for your help,
Any other hint or idea will be welcome,

Jean-Philippe

 

-----Original Message-----
From: perl-win32-users-boun...@listserv.activestate.com 
[mailto:perl-win32-users-boun...@listserv.activestate.com] On Behalf Of Brian 
Raven
Sent: Wednesday, June 03, 2009 4:05 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: RE: Activeperl 5.10 + thread + join = random crashes

jean-philippe.ulpi...@infineon.com
<mailto:jean-philippe.ulpi...@infineon.com> wrote: 
> Hi Brian,
> 
> Thanks for your reply,
> 
> Sorry, I should have specified that these crashes are sporadic.
> Sometimes it does not crash at all but when it crashes, it is usually 
> maximum after 15 join.
> 
> Hence it is hard to provide a piece of code to reproduce the problem.
> 
> Another thing I should have mentioned is that I am using embedded 
> perl. A C function performs a call in perl which starts a new thread.
> 
> Do you know if such behaviour is known by perl ?
> 
> FYI, here is a stack that I could get after one crash:
> I print a debug info specifying how many join were already done + that 
> a join is being done.
> Right after the join I print another info to specify that the join is 
> done.
> 
> 
> Join trial= 4
> Trying to join thread threadedRunRegressionTest0 $VAR1 = bless( 
> do{\(my $o = '83144192')}, 'Thread' );
> 
> [New LWP 8]
> [LWP 8 exited]
> [New LWP 8]
> [New LWP 9]
> [LWP 9 exited]
> [New LWP 9]
> 
> Program received signal SIGSEGV, Segmentation fault.
> [Switching to LWP 3]
> 0x0000000c in ?? ()
> (gdb) #0  0x0000000c in ?? ()
> #1  0xfb5b2648 in TclObj_free ()
>    from
>
/home/swmdev/perl/ActivePerl-5.10.0.1004-sun4-solaris-2.8-cc-287188/site
/lib/auto/Tk/Tk.so

Interesting that this is at the top of your stack. You are aware that Tk is not 
thread safe?

Of course that may not be your problem, but it is a pretty good candidate. In 
fact Tk can be used in a threaded Perl program, but it must be done with great 
care.

HTH

--
Brian Raven
This e-mail may contain confidential and/or privileged information. If you are 
not the intended recipient or have received this e-mail in error, please advise 
the sender immediately by reply e-mail and delete this message and any 
attachments without retaining a copy.

Any unauthorised copying, disclosure or distribution of the material in this 
e-mail is strictly forbidden.

_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to