7bbfee4696
Highlights of Tcl 8.5
* Features: 8.5 has over 90 TIPs included to provide a wide variety of
new features.
* Bignums: Tcl now supports arbitrary-precision integers, which improves
math operations on large integers.
* Safer interps: Tcl's powerful safe interpreter mechanism now has
improved control of time and command limits in slave interpreters.
* clock command: More robust implementation of command for specifying
time, with significant l10n and i18n improvements.
* dict command: New data structure that allows access to data by value
rather than a variable name, which is substantially faster.
* Additional improvements: Faster list search, new and improved
mathematics procedures, anonymous procedures, new ways to package Tcl
extensions, Tcl-level custom channel types, file and line location
information for each command, and more.
There is of course much, much more.
See [8.5 Changes](http://wiki.tcl.tk/10630) on the wiki for a complete
list of new features.
33 lines
1.1 KiB
Text
33 lines
1.1 KiB
Text
$NetBSD: patch-tests_pkgMkIndex.test,v 1.1 2012/08/21 21:31:47 marino Exp $
|
|
|
|
Carried over from TCL 8.4
|
|
|
|
--- tests/pkgMkIndex.test.orig 2012-07-16 11:57:06.000000000 +0000
|
|
+++ tests/pkgMkIndex.test
|
|
@@ -557,7 +557,7 @@ removeFile [file join pkg circ2.tcl]
|
|
removeFile [file join pkg circ3.tcl]
|
|
|
|
# Some tests require the existence of one of the DLLs in the dltest directory
|
|
-set x [file join [file dirname [info nameofexecutable]] dltest \
|
|
+set x [file join [file dirname [info nameofexecutable]] .. dltest .libs \
|
|
pkga[info sharedlibextension]]
|
|
set dll "[file tail $x]Required"
|
|
testConstraint $dll [file exists $x]
|
|
@@ -570,7 +570,7 @@ proc pkga_neq { x } {
|
|
return [expr {! [pkgq_eq $x]}]
|
|
}
|
|
} [file join pkg pkga.tcl]
|
|
- file copy -force $x $fullPkgPath
|
|
+ eval file copy -force [glob "$x*"] $fullPkgPath
|
|
}
|
|
testConstraint exec [llength [info commands ::exec]]
|
|
|
|
@@ -596,7 +596,7 @@ test pkgMkIndex-10.2 {package in DLL hid
|
|
} {0 {}}
|
|
|
|
if {[testConstraint $dll]} {
|
|
- file delete -force [file join $fullPkgPath [file tail $x]]
|
|
+ eval file delete -force [global [file join $fullPkgPath [file tail "$x*"] ] ]
|
|
removeFile [file join pkg pkga.tcl]
|
|
}
|
|
|