in reply to Script using Tk and LibXML crashing

Hi

Use Devel::Trace to find out what perl line crashes

  • Comment on Re: Script using Tk and LibXML crashing (Devel::Trace)

Replies are listed 'Best First'.
Re^2: Script using Tk and LibXML crashing (Devel::Trace)
by misczol (Novice) on Aug 06, 2019 at 11:30 UTC
    Thank you for your answer. Here's what I got, but I don't really know what to make of this. Tk library seems to be the problem, and my google searches indicate that this has something to do with threads it's using, but I'm still lost
    >> C:/Strawberry/perl/site/lib/Tk/Button.pm:86: my $w = shift; >> C:/Strawberry/perl/site/lib/Tk/Button.pm:87: $w->configure('-state +'=>'normal') if ($w->cget('-state') ne 'disabled'); >> C:/Strawberry/perl/site/lib/Tk/Button.pm:90: if (exists $w->{__rel +ief__}) >> C:/Strawberry/perl/site/lib/Tk/Button.pm:92: if (exists $w->{__p +relief__} && >> C:/Strawberry/perl/site/lib/Tk/Button.pm:97: delete $w->{__relie +f__}; >> C:/Strawberry/perl/site/lib/Tk/Button.pm:98: delete $w->{__preli +ef__}; >> C:/Strawberry/perl/site/lib/Tk/Button.pm:100: undef $Tk::window; >> C:/Strawberry/perl/site/lib/Tk.pm:424: DoOneEvent(0); >> C:/Strawberry/perl/site/lib/Tk.pm:424: DoOneEvent(0); Free to wrong pool 369f80 not 29dd8a50 at C:/Strawberry/perl/site/lib/ +Tk.pm line 424.

      hmm,

      I'd say kick that up to rt://Tk

      Does it happen if you avoid getOpenFile? Like so

        Yes, the same thing happens. I'm getting the same error.
        >> C:/Strawberry/perl/site/lib/XML/LibXML.pm:790: return $dom; >> test2.pl:27: $$xpc = XML::LibXML::XPathContext->new($dom); >> test2.pl:28: print "XML imported\n"; XML imported >> C:/Strawberry/perl/site/lib/Tk.pm:424: DoOneEvent(0); >> C:/Strawberry/perl/site/lib/Tk.pm:424: DoOneEvent(0); Free to wrong pool 31a960 not 2020202020200a at C:/Strawberry/perl/sit +e/lib/Tk.pm line 424.