home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 December / PCWorld_2000-12_cd.bin / Komunikace / Comanche / comanche.exe / lib / _staticPackage_ / pkgIndex.tcl
Text File  |  1999-04-05  |  1KB  |  53 lines
  1.  
  2.         package ifneeded Itcl 3.0 {
  3.         namespace eval ::itcl {variable library {lib/itcl3.0}}
  4.         load {} Itcl
  5.         }
  6.     
  7.  
  8.         package ifneeded Itk 3.0 {
  9.         namespace eval ::itk {variable library {lib/itk3.0}}
  10.         load {} Itk
  11.         }
  12.     
  13.  
  14.         if {$tcl_platform(platform) == "unix"} {
  15.         set expect_library {}
  16.         set exp_library {}
  17.         set exp_exec_library {}
  18.         package ifneeded Expect 5.29 {
  19.             load {} Expect
  20.         }
  21.         }
  22.     
  23.  
  24.         package ifneeded Tclx 8.0.5 {
  25.         set tclx_library {lib/tclX8.0.5}
  26.         load {} Tclx
  27.         foreach __cmd {
  28.             abs acos apropos asin assign_fields atan atan2
  29.             auto_commands auto_load_file auto_packages buildhelp
  30.             ceil cexpand convert_lib convertclock copyfile cos cosh
  31.             dirs double edprocs exp fabs floor fmod fmtclock
  32.             for_array_keys for_file for_recursive_glob frename
  33.             etclock help helpcd helppwd int intersect intersect3
  34.             log log10 lrmdups mainloop mkdir popd pow profrep pushd
  35.             read_file recursive_glob rmdir round saveprocs searchpath
  36.             server_cntl server_connect server_info server_open
  37.             server_send showproc sin sinh sqrt tan tanh union unlink
  38.             write_file
  39.         } {
  40.             set auto_index($__cmd) {
  41.             source [file join $tclx_library tcl.tlib]
  42.             }
  43.         }
  44.         unset __cmd
  45.         }
  46.     
  47.  
  48.         package ifneeded Tkx 8.0.5 {
  49.         set tkx_library {lib/tkX8.0.5}
  50.         load {} Tkx
  51.         }
  52.     
  53.