Changeset 195 for trunk/kitgen/setupvfs.tcl
- Timestamp:
- May 22, 2014, 1:18:03 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/kitgen/setupvfs.tcl
r175 r195 40 40 exit 1 41 41 } 42 43 set tcl_library ../tcl/library 44 source ../tcl/library/init.tcl ;# for tcl::CopyDirectory 45 46 package require platform 47 48 set platform [lindex [split [platform::generic] -] 0] 42 49 43 50 load {} zlib … … 64 71 csr0@ csr[package require csr]] 65 72 73 if {[string equal $platform win32]} { 74 load {} registry 75 lappend versmap registry1@ registry[package require registry] 76 } 77 66 78 if {$debugOpt} { 67 79 puts "Starting [info script]" … … 74 86 } 75 87 76 set tcl_library ../tcl/library77 source ../tcl/library/init.tcl ;# for tcl::CopyDirectory78 79 88 # Create package index files for the static extensions. 80 set exts {swt csr usb g2lite XOTcl zlib} 89 set exts [list swt csr usb g2lite XOTcl zlib] 90 if {[string equal $platform win32]} { 91 lappend exts registry 92 } 81 93 foreach ext $exts { 82 94 load {} $ext … … 89 101 set clifiles { 90 102 boot.tcl 91 main.tcl92 103 config.tcl 93 104 lib/tcl8@/auto.tcl … … 115 126 lib/csr0@/pkgIndex.tcl 116 127 lib/zlib1@/pkgIndex.tcl 117 lib/tcllib1.14/pkgIndex.tcl 118 lib/tcllib1.14/asn 119 lib/tcllib1.14/base64 120 lib/tcllib1.14/comm 121 lib/tcllib1.14/cmdline 122 lib/tcllib1.14/fileutil 123 lib/tcllib1.14/ldap 124 lib/tcllib1.14/log 125 lib/tcllib1.14/math 126 lib/tcllib1.14/snit 127 lib/tcllib1.14/uri} 128 lib/tcllib1.16/pkgIndex.tcl 129 lib/tcllib1.16/asn 130 lib/tcllib1.16/base64 131 lib/tcllib1.16/comm 132 lib/tcllib1.16/cmdline 133 lib/tcllib1.16/csv 134 lib/tcllib1.16/fileutil 135 lib/tcllib1.16/ldap 136 lib/tcllib1.16/log 137 lib/tcllib1.16/math 138 lib/tcllib1.16/snit 139 lib/tcllib1.16/struct 140 lib/tcllib1.16/uri 141 } 142 143 if {[string equal $platform win32]} { 144 lappend clifiles lib/registry1@/pkgIndex.tcl 145 } 128 146 129 147 set guifiles { … … 168 186 lib/BLT2.4/bltCanvEps.pro 169 187 lib/BLT2.4/bltGraph.pro 188 lib/Tktable2.10/pkgIndex.tcl 189 lib/Tktable2.10/tkTable.tcl 170 190 } 171 191
Note:
See TracChangeset
for help on using the changeset viewer.