Package: itcl3-dev
Version: 3.2.1-3.1
Severity: important
Now, I admit that this bug report may be bogus, as I am no expert on
Tcl and can't really tell if I'm mistaken myself somehow.
That being said, here's a little program I wrote (to test iwidgets
really, but I didn't get quite that far with it):
// conftest.c
#include <tcl.h>
#include <stdio.h>
int main() {
Tcl_Interp *interp;
const char *cmd = "package require Iwidgets";
interp = Tcl_CreateInterp();
// Why do I get an error (too) if I remove this?
Tcl_Eval(interp, "lappend tcl_library /usr/lib/tcl8.4");
if (Itcl_Init(interp) == TCL_ERROR) {
printf("Itcl_Init call failed, error:\n%s\n", interp->result);
return 1;
}
if (Tcl_Eval(interp, cmd) != TCL_OK || interp->result[0] == '\0') {
printf("Tcl_Eval failed\n");
return 1;
}
return 0;
}
I compiled it with gcc -o conftest -g -I/usr/include/tcl8.4 conftest.c -ltcl8.4
-litcl3.2
The output I get from that is:
Itcl_Init call failed, error:
Can't find a usable itcl.tcl in the following directories:
/usr/lib/itcl3.2 ./../lib/itcl3.2 ./../library ./../../library
./../../itcl/library ./../../../itcl/library
This probably means that Itcl/Tcl weren't installed properly.
If you know where the Itcl library directory was installed,
you can set the environment variable ITCL_LIBRARY to point
to the library directory.
The relevant parts of a strace dump:
lstat64("/usr", {st_mode=S_IFDIR|0755, st_size=131, ...}) = 0
lstat64("/usr/lib", {st_mode=S_IFDIR|0755, st_size=81920, ...}) = 0
lstat64("/usr/lib/itcl3.2", {st_mode=S_IFDIR|0755, st_size=60, ...}) = 0
stat64("/usr/lib/itcl3.2/itcl.tcl", {st_mode=S_IFREG|0644, st_size=5000, ...})
= 0
open("/usr/lib/itcl3.2/itcl.tcl", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_SETFD, FD_CLOEXEC) = 0
ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbff73878) = -1 ENOTTY (Inappropriate
ioctl for device)
brk(0x808f000) = 0x808f000
read(6, "#\n# itcl.tcl\n# -----------------"..., 4096) = 4096
read(6, "--------------------------------"..., 4096) = 904
read(6, "", 4096) = 0
close(6) = 0
After which it tries to open itcl.tcl from the places listed above.
This is not supposed to happen, right?
Also, if I comment out the first Tcl_Eval call, I get:
Itcl_Init call failed, error:
can't read "tcl_library": no such variable
-- System Information:
Debian Release: testing/unstable
APT prefers unstable
APT policy: (500, 'unstable')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.14
Locale: LANG=C, [EMAIL PROTECTED] (charmap=ISO-8859-15)
Versions of packages itcl3-dev depends on:
ii itcl3 3.2.1-3.1 [incr Tcl] OOP extension for Tcl -
ii libc6-dev 2.3.5-12 GNU C Library: Development Librari
ii tcl8.4-dev 8.4.11-1.1 Tcl (the Tool Command Language) v8
Versions of packages itcl3-dev recommends:
ii itcl3-doc 3.2.1-3.1 [incr Tcl] OOP extension for Tcl -
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
