Overview
Comment: | Updated to load vfs files from initial VFS |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | merge-kitdll-kitsh-common |
Files: | files | file ages | folders |
SHA1: |
0d35af4b220ebdcd92c8764ca227323a |
User & Date: | rkeene on 2011-05-23 17:50:31 |
Other Links: | branch diff | manifest | tags |
Context
2011-05-23
| ||
17:55 | Removed kitdll pre code check-in: 3510b6d25d user: rkeene tags: merge-kitdll-kitsh-common | |
17:50 | Updated to load vfs files from initial VFS check-in: 0d35af4b22 user: rkeene tags: merge-kitdll-kitsh-common | |
17:30 | Updated location to build "tclsh" to coorespond to new location check-in: 3b0581b604 user: rkeene tags: merge-kitdll-kitsh-common | |
Changes
Modified kitsh/buildsrc/kitsh-0.0/boot.tcl from [4987d39e91] to [29ebce96a4].
︙ | ︙ | |||
71 72 73 74 75 76 77 78 79 80 81 82 83 84 | seek $::tclKitStorage_fd 0 set vfsHandler [list ::vfs::zip::handler $::tclKitStorage_fd] unset ::tclKitStorage_fd } "cvfs" { set vfsHandler [list ::vfs::kitdll::vfshandler tcl] } } # mount the executable, i.e. make all runtime files available vfs::filesystem mount $mountpoint $vfsHandler # alter path to find encodings | > > > > > > > > > > > > > > > | 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 | seek $::tclKitStorage_fd 0 set vfsHandler [list ::vfs::zip::handler $::tclKitStorage_fd] unset ::tclKitStorage_fd } "cvfs" { set vfsHandler [list ::vfs::kitdll::vfshandler tcl] # Load these, the original Tclkit does so it should be safe. foreach vfsfile [list vfsUtils vfslib] { unset -nocomplain s catch { set s [::vfs::kitdll::data::getData tcl "lib/vfs/${vfsfile}.tcl"] } if {![info exists s]} { continue } uplevel #0 $s } } } # mount the executable, i.e. make all runtime files available vfs::filesystem mount $mountpoint $vfsHandler # alter path to find encodings |
︙ | ︙ |