Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Test suite respects tcl-test options -load|-loadfile. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
7a0bfb53ad81b05fe6450a357454cbb9 |
| User & Date: | rolf 2019-03-14 22:01:10 |
Context
|
2019-05-09
| ||
| 18:31 | Reworked (and renamed) selectNodesNamespaces to make it usable from elsewhere and made it public. check-in: 4ca5de8963 user: rolf tags: trunk | |
|
2019-03-14
| ||
| 22:01 | Test suite respects tcl-test options -load|-loadfile. check-in: 7a0bfb53ad user: rolf tags: trunk | |
| 16:16 | accept tcl-test options like -load "load libtdom...; source ../lib/tdom.tcl" (allow to run test-suite from development environment, other tdom-version or uninstalled) Leaf check-in: 881efc6915 user: sebres tags: fix-traced-gc-regression-of-091 | |
| 11:38 | More tests to check/document behaviour in case of using traced doc vars (pattern [dom parse $xml docvar]). check-in: 30c2ebb89f user: rolf tags: trunk | |
Changes
Changes to tests/loadtdom.tcl.
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
# We still support 8.4 to some degree
package require Tcl 8.4
} else {
package require Tcl 8.4-
}
package require tcltest 2.2
namespace import ::tcltest::*
if {[catch {package require -exact tdom 0.9.2}]} {
if {[catch {load [file join [file dir [info script]] ../unix/libtdom0.9.2.so]}]} {
error "Unable to load the appropriate tDOM version!"
}
}
if {[info commands ::tdom::xmlReadFile] == ""} {
# tcldomsh without the script library. Source the lib.
source [file join [file dir [info script]] ../lib tdom.tcl]
}
|
> > |
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
# We still support 8.4 to some degree
package require Tcl 8.4
} else {
package require Tcl 8.4-
}
package require tcltest 2.2
namespace import ::tcltest::*
catch {tcltest::loadTestedCommands}
if {[catch {package require -exact tdom 0.9.2}]} {
if {[catch {load [file join [file dir [info script]] ../unix/libtdom0.9.2.so]}]} {
error "Unable to load the appropriate tDOM version!"
}
}
if {[info commands ::tdom::xmlReadFile] == ""} {
# tcldomsh without the script library. Source the lib.
source [file join [file dir [info script]] ../lib tdom.tcl]
}
|