p5-Tk crashes

[Carsten Kunze <carsten.kunze%arcor.de@localhost>]

Hello,

I have very often crashes on using p5-Tk.  On error message is "Memory fault" a 
others is:

7f7ff5340a98 is not a hash at 
/usr/pkg/lib/perl5/vendor_perl/5.20.0/x86_64-netbsd-thread-multi/Tk/MainWindow.pm
 line 53.
Abort

(The address changes, but it is always MainWindow.pm line 53)

ktrace on the Memory fault crash says:

...
  1429      1 perl     CALL  read(4,0x7f7ff4fab000,0x4000)
  1429      1 perl     GIO   fd 4 read 1723 bytes
       "/*\n * (c) Copyright 1990 1991 Tektronix Inc.\n *       All Rights 
Reserved\n *\n * Permission to use, copy, modify, and distribute this software 
and its\n * docum\
        entation for any purpose and without fee is hereby granted,\n * 
provided that the above copyright notice appear in all copies and that\n * both 
that copyright noti\
        ce and this permission notice appear in\n * supporting documentation, 
and that the name of Tektronix not be used\n * in advertising or publicity 
pertaining to dist\
        ribution of the software\n * without specific, written prior 
permission.\n *\n * Tektronix disclaims all warranties with regard to this 
software, including\n * all\
         implied warranties of merchantability and fitness, in no event shall\n 
* Tektronix be liable for any special, indirect or consequential damages or\n * 
any damages\
         whatsoever resulting from loss of use, data or profits,\n * whether in 
an action of contract, negligence or other tortious action,\n * arising out of 
or in connec\
        tion with the use or performance of this\n * software.\n *\n *\n *      
NAME\n *                Xcms.txt\n *\n *        DESCRIPTION\n *         Sample 
Color Name D\
        atabase\n *\n */\n\n\nThis device-independent color name database is 
provided just as an example.\nThere are no claims that these color 
specifications are or shoul\
        d be bound\nto the corresponding color name.\n\nAs you can see, the 
start of the database is indicated by \"XCMS_COLORDB_START\".\nAnything before 
this is assumed \
        to be comments.  The \"0.1\" indicates the\nversion number of the 
format/syntax used in this file.  The color name is\ndelimited from the color 
specification by on\
        e or more tabs.\n\nXCMS_COLORDB_START 0.1\ncms red                      
CIEXYZ:0.3811/0.2073/0.0213\ncms green          
CIEXYZ:0.3203/0.6805/0.1430\ncms blue   \
                CIEXYZ:0.2483/0.1122/1.2417\nXCMS_COLORDB_END\n"
  1429      1 perl     RET   read 1723/0x6bb
  1429      1 perl     CALL  lseek(4,0,0,1)
  1429      1 perl     RET   lseek 1723/0x6bb
  1429      1 perl     CALL  close(4)
  1429      1 perl     RET   close 0
  1429      1 perl     CALL  poll(0x7f7fffffd280,1,0xffffffff)
  1429      1 perl     RET   poll 1
  1429      1 perl     CALL  writev(3,0x7f7fffffd350,3)
  1429      1 perl     GIO   fd 3 wrote 20 bytes
       "U\^A\^E\0 \0\0\0\^E\0CCBlack\0\0\0"
  1429      1 perl     RET   writev 20/0x14
  1429      1 perl     CALL  poll(0x7f7fffffd260,1,0xffffffff)
  1429      1 perl     RET   poll 1
  1429      1 perl     CALL  read(3,0x7f7ff4f60074,0x1000)
  1429      1 perl     GIO   fd 3 read 32 bytes
       "\^A\0\^U\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\^?\^?\0\0"
  1429      1 perl     RET   read 32/0x20
  1429      1 perl     CALL  read(3,0x7f7ff4f60074,0x1000)
  1429      1 perl     RET   read -1 errno 35 Resource temporarily unavailable
  1429      1 perl     CALL  read(3,0x7f7ff4f60074,0x1000)
  1429      1 perl     RET   read -1 errno 35 Resource temporarily unavailable
  1429      1 perl     PSIG  SIGSEGV SIG_DFL: code=SEGV_MAPERR, addr=0xc, 
trap=6)

File descriptor 3 could be something like "/tmp/.X11-unix/X0".

Does anyone has an idea?

--Carsten