Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Fixed a typo introduced by a global search and replace |
|---|---|
| Timelines: | family | ancestors | descendants | both | gort |
| Files: | files | file ages | folders |
| SHA1: |
4f2f9e391e8895fd66957351a5a5367e |
| User & Date: | hypnotoad 2016-02-19 14:54:45 |
Context
|
2016-02-23
| ||
| 01:11 | Changed the default supported Tcl to 8.6.3 Windows platform fixes Added a means to build kits from MSVC check-in: 035354bee3 user: hypnotoad tags: gort | |
|
2016-02-19
| ||
| 14:54 | Fixed a typo introduced by a global search and replace check-in: 4f2f9e391e user: hypnotoad tags: gort | |
|
2016-02-18
| ||
| 17:23 | Fixes to make odie build with "gort" instead of "sherpa" check-in: d0db26f6a0 user: hypnotoad tags: gort | |
Changes
Changes to build.tcl.
| ︙ | ︙ | |||
250 251 252 253 254 255 256 |
} elseif {[file isfile $f]} {
file copy -force $f [file join $d2 $ftail]
}
}
}
set name [lindex $argv 0]
| | | | | | 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 |
} elseif {[file isfile $f]} {
file copy -force $f [file join $d2 $ftail]
}
}
}
set name [lindex $argv 0]
set vfspath [lindex $argv 1]
file copy -force tclkit_bare$::KIT(EXEEXT) toadkit$::KIT(EXEEXT)
package require zipfile::mkzip
copyDir tclkit.vfs/boot $vfspath/boot
copyDir tclkit.vfs/lib $vfspath/lib
::zipfile::mkzip::mkzip ${name}$::KIT(EXEEXT) -runtime tclkit_bare$::KIT(EXEEXT) -directory $vfspath
}
close $fout
puts "BUILDING ZipVFS KITS"
if {"toadkit" in $argv || ![file exists tclkit_bare$::KIT(EXEEXT)]} {
file mkdir build
|
| ︙ | ︙ | |||
457 458 459 460 461 462 463 | ### # Build a starter VFS for both Tcl and wish ### set VFSROOT [file join $PWD tclkit.vfs] set PKGROOT [file join $PWD tclkit.pkg] | | | | | | | | | | 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 |
###
# Build a starter VFS for both Tcl and wish
###
set VFSROOT [file join $PWD tclkit.vfs]
set PKGROOT [file join $PWD tclkit.pkg]
foreach pkgpath [glob [file join $PWD tcl pkgs *]] {
if {[string range [file tail $pkgpath] 0 3] eq "itcl"} continue
if {![file isdirectory $pkgpath]} continue
cd $pkgpath
puts "$pkgpath"
if {![file exists $pkgpath/Makefile]} {
if {[file exists $pkgpath/Makefile.in]} {
doexec sh configure --with-tcl=$PWD/tcl/$::odie(tcl_src_dir) --with-tclinclude=$PWD/tcl/generic --with-tzdata --enable-shared --enable-threads
} else {
continue
}
}
puts "INSTALLING to VFS [file tail $pkgpath]"
domake install DESTDIR=$PKGROOT
}
cd $PWD
if {[file exists $VFSROOT]} {
file delete -force $VFSROOT
}
|
| ︙ | ︙ | |||
549 550 551 552 553 554 555 |
package require zipfile::mkzip
#file copy -force [file join $::HERE default_tclsh.tcl] tclkit.vfs/main.tcl
::zipfile::mkzip::mkzip toadkit$::KIT(EXEEXT) -runtime tclkit_bare$::KIT(EXEEXT) -directory tclkit.vfs
}
if {[lindex $argv 0] eq "wrap"} {
set name [lindex $argv 1]
| | | | | | | 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 |
package require zipfile::mkzip
#file copy -force [file join $::HERE default_tclsh.tcl] tclkit.vfs/main.tcl
::zipfile::mkzip::mkzip toadkit$::KIT(EXEEXT) -runtime tclkit_bare$::KIT(EXEEXT) -directory tclkit.vfs
}
if {[lindex $argv 0] eq "wrap"} {
set name [lindex $argv 1]
set vfspath [lindex $argv 2]
file copy -force tclkit_bare$::KIT(EXEEXT) toadkit$::KIT(EXEEXT)
puts [list AUTOPATH $::auto_path]
package ifneeded zipfile::mkzip 1.2 [list source [file join $::HERE scripts mkzip.tcl]]
package require zipfile::mkzip
copyDir tclkit.vfs/boot $vfspath/boot
copyDir tclkit.vfs/lib $vfspath/lib
::zipfile::mkzip::mkzip ${name}$::KIT(EXEEXT) -runtime tclkit_bare$::KIT(EXEEXT) -directory $vfspath
}
|