| Subject: | Tcl-Tk cause segfault |
| Date: | Thu, 18 Mar 2010 02:21:46 +0300 |
| To: | bug-Tcl-Tk [...] rt.cpan.org |
| From: | Vladimir Gusev <veguss [...] gmail.com> |
Dear maintainer,
a single 'use Tcl::Tk;' script causes segmentation fault running on FreeBSD:
#####################
[vegus@daemon ~/tmp]$ perl -de 'use Tcl::Tk;'
Loading DB routines from perl5db.pl version 1.32
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
Signal SEGV at /usr/local/lib/perl5/site_perl/5.10.1/mach/Tcl.pm line 420
require Tcl.pm called at
/usr/local/lib/perl5/site_perl/5.10.1/Tcl/Tk.pm line 4
Tcl::Tk::BEGIN() called at
/usr/local/lib/perl5/site_perl/5.10.1/mach/Tcl.pm line 0
eval {...} called at
/usr/local/lib/perl5/site_perl/5.10.1/mach/Tcl.pm line 0
require Tcl/Tk.pm called at -e line 1
main::BEGIN() called at
/usr/local/lib/perl5/site_perl/5.10.1/mach/Tcl.pm line 0
eval {...} called at
/usr/local/lib/perl5/site_perl/5.10.1/mach/Tcl.pm line 0
Abort trap: 6 (core dumped)
[vegus@daemon ~/tmp]$ perl -v
This is perl, v5.10.1 (*) built for amd64-freebsd-thread-multi
Copyright 1987-2009, Larry Wall
Perl may be copied only under the terms of either the Artistic License or
the
GNU General Public License, which may be found in the Perl 5 source kit.
Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl". If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.
[vegus@daemon ~/tmp]$ uname -a
FreeBSD daemon 8.0-RELEASE-p2 FreeBSD 8.0-RELEASE-p2 #9: Tue Mar 2 23:15:00
MSK 2010 root@daemon:/usr/obj/usr/src/sys/FIRST amd64
[vegus@daemon ~/tmp]$ pkg_info | grep Tcl
p5-Tcl-0.98 A Tcl extension module for Perl5
p5-Tcl-Tk-0.97 Perl5 module to access to Tk via the Tcl extension
tcl-modules-8.5.8 Tcl common modules
tk-8.4.19_2,2 Graphical toolkit for Tcl
#####################
please let me know if i can provide some extra debugging output in
assistance to resolve the issue.
Many thanks.
vg.