Tcl Dev Kit: не удается найти пакет starkit

Question

Я не могу обернуть самое простое приложение TCL, используя TclDevKit5.2.

Я на 64-битных CentOS, и здесь ВАТ uname -a возвращается:

Linux hp1 2.6.18-194.11.1.el5 #1 SMP Tue Aug 10 19:05:06 EDT 2010 x86_64 x86_64 x86_64 GNU/Linux 

При наборе:

/opt/TclDevKit-5.2/bin/tclapp -out wrap empty.tcl 

(здесь empty.tcl пустой файл) он генерирует исполняемый ./wrap, однако при попытке запустить ./wrap он сообщает об этом:

can't find package starkit 
    while executing 
"package require starkit" 
    (file "./wrap" line 5) 

Вот первые строки ./wrap:

#!/bin/sh 
# \ 
exec tclsh "$0" ${1+"$@"} 
## 
package require starkit 
starkit::header mk4 -readonly 
## 
# here goes the binary executable .... 

Что я делаю не так? Где находится пакет starkit? Может быть, мне нужно что-то добавить к add_path?

Я использую 21 дней пробную версию TclDevKit, а вот журнал, он сообщил, генерируя ./wrap:

info  | Tcl Dev Kit TclApp 
info  | Copyright (C) 2001-2010 ActiveState Software Inc. All rights reserved. 
info  | Licensed to Trial User (Trial license, serial number *6928738*). 
info  | 
info  | Embedding license information into wrap result as comments. 
info  | 
info  | Expires: 18-11-2010. 
info  | 
info  | WARNING: All applications generated by this trial version 
info  |   will also stop working on 18-11-2010. 
info  Expanding... 
info   Following only profile dependencies 
info  
info  Issues... 
info  
notice Packages ... 
notice * No packages 
info  Inserting "tclsh" into starkit header. 
info  Inserting "-readonly" into starkit header. 
info  Inserting TEApot metadata 
info  Nothing to insert 
info  
notice  Extending the list of provided packages 
info  
info  F  0B /home/vminasyan/workspace/tests/TclDevKit/empty.tcl 
info  
info  Generated wrap 

Answer 1

Я не проверял, но я думаю, что вам не хватает префикс аргумент

-prefix /TclDevKit/bin/base-tk-<whatever-your-platform> 

так что ваша команда должна быть что-то вроде этого:

/opt/TclDevKit-5.2/bin/tclapp -prefix /TclDevKit/bin/base-tk-<whatever-your-platform> -out wrap empty.tcl 

В любом случае я рекомендую вам использовать файл проекта. Вы можете создать его, выполнив tclapp без каких-либо аргументов (обратите внимание: вам понадобится Графическое дополнение)