Tcl Dev Kit: не могу найти пакет старкит - PullRequest
1 голос
/ 28 октября 2010

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

Я на 64 битной CentOS, а вот wat 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?

Я использую пробную версию TclDevKit на 21 день, и вот журнал, который он сообщил при генерации ./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

1 Ответ

1 голос
/ 03 ноября 2010

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

-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 без каких-либо аргументов (примечание: вам понадобится графический элемент)

...