Tcl panic with Perl/Tk

From: Kevin Dea <kdea_at_alpine-la.com>
Date: Wed, 26 Jul 2000 11:58:59 -0700

Hello Managers,

We are having a problem running Perl/Tk programs on a couple of
machines. Even with the simplest of programs, including a 'hello world'
I will get the following error.

GC already registered in Tk_GetGC
Tcl_Panic at /usr/local/lib/perl5/site_perl/Tk/Widget.pm line 188.
at ./hello_world.pl line 5
Tk::Widget::new('Tk::Button', 'MainWindow=HASH(0x14000adf8)', '-text',
'Done', '-command',
'CODE(0x140112d98)') called at
/usr/local/lib/perl5/site_perl/Tk/Widget.pm line 247
Tk::Widget::__ANON__('MainWindow=HASH(0x14000adf8)', '-text', 'Done',
'-command',
'CODE(0x140112d98)') called at ./hello_world.pl line 5
at /usr/local/lib/perl5/site_perl/Tk/Widget.pm line 189

I noticed on the README.OSF of Tk800.022 there is the folowing note:
On Alpha if you get something like:

> GC already registered in Tk_GetGC
> Tcl_Panic at ...
>
> Then it has been reported that reducing the optimize from -04 to -03 fixes the problem.

I've tried it by doing 'perl Makefile.PL OPTIMIZE=-03', it gets into the
Makefile, and looks like it is using the correct Optimization during the
make. But it doesn't fix the problem.

Here are the particulars:
It is happening on a DS20 and ES40 both running Tru64 4.0f with no
patches. The DS20 has Perl 5.004_04 and the ES40 was upgraded to
5.004_05. The problem was when it was using Tk400.202 and wasn't fixed
when I tried to upgrade it to Tk800.022. I tried using Perl 5.6.0, but
that dosen't help either. The problem dosen't exist on our other DS20's
with Perl 5.004_04 with Tk400.202. My Hello_world.pl works on these
machines and gets the above error on the problematic machines.

If anyone can help, I would really appreciate it.

Kevin

-- 
Kevin Dea
System Administrator
Alpine Electronics Research of America
Received on Wed Jul 26 2000 - 19:00:34 NZST

This archive was generated by hypermail 2.4.0 : Wed Nov 08 2023 - 11:53:41 NZDT