包用于创建代码的可重用单元。

程序包提供特定功能的文件集合。

 

1.创建代码

    

2.创建包index

    打开tclsh,切换到HelloWorld目录,并使用pkg_mkindex 命令创建索引文件。

    %cd   /User/helloword

    %pkg_mkIndex  .  *.tcl

    结果:

    pkgIndex.tcl   

    package ifneeded HelloWorld 1.0 [list source [file join $dir HelloWord.tcl]]

3. 添加到目录AUTOPATH

  使用lappend命令添加程序包到全局列表

  % lappend auto_path "/Users/rajkumar/Desktop/helloworld"

 

4. 添加软件包

  接下来添加程序包

  %package require HelloWorld 1.0

 

5.调用过程 

  % puts [HelloWorld::MyProcedure]
  HelloWorld
 
 

 

 

 

posted on 2019-10-25 12:03  春风一郎  阅读(767)  评论(0编辑  收藏  举报