Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Cursormask in Tk8.5b1 Linux (Bug?)

4 views
Skip to first unread message

Jens Poenisch

unread,
Oct 6, 2007, 5:02:13 AM10/6/07
to
Hello,

I have tried to create an selfdefined cursor for a canvas in
Tcl/Tk8.5b (static build, wish):

canvas .c
pack .c
.c configure -cursor "@crosscursor.xbm crosscursor_mask.xbm black white"

-> Segmentation fault

set tk_patchLevel
-> 8.5b1

Here my cursor data

#define crosscursor_width 32
#define crosscursor_height 32
#define crosscursor_x_hot 15
#define crosscursor_y_hot 15
static unsigned char crosscursor_bits[] = {
0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00,
0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00,
0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00, 0x00, 0x80, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0xff,
0xff, 0x9f, 0xfc, 0xff, 0xff, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0xc0, 0x01, 0x00,
0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00,
0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00,
0x00, 0xc0, 0x01, 0x00, 0x00, 0xc0, 0x01, 0x00};

#define crosscursor_mask_width 32
#define crosscursor_mask_height 32
static unsigned char crosscursor_mask_bits[] = {
0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00,
0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00,
0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00, 0x00, 0x80, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0xff, 0x00, 0x00, 0xff, 0xff, 0x00, 0x00, 0xff,
0xff, 0x9f, 0xfc, 0xff, 0xff, 0x00, 0x00, 0xff, 0xff, 0x00, 0x00, 0xff,
0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00,
0x00, 0x80, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0xe0, 0x03, 0x00,
0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00,
0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00,
0x00, 0xe0, 0x03, 0x00, 0x00, 0xe0, 0x03, 0x00};


Is this a bug, or has Tcl/Tk 8.5b1 a new interface? In the man pages
I haven't found anything.

Thanks,
Jens

--
Jens Pönisch, TU Chemnitz, Fak. Wirtschaftswissenschaften, 09107 Chemnitz
Tel.: 0371 531 34311, eMail: j.poe...@isym.tu-chemnitz.de
WWW: http://www-user.tu-chemnitz.de/~poenisch/
Chemnitzer Linux-Tage: http://chemnitzer.linux-tage.de

0 new messages