Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:More version number updates.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | prepare-release
Files: files | file ages | folders
SHA3-256: b1097ab0860e604e2359aba4570ffed6a9efe4a31afc912d536aebc3fe3074ba
User & Date: rolf 2024-07-04 13:31:54
Context
2024-07-04
14:09
Better only 7-bit ASCII characters in test files. check-in: 177bc743cb user: rolf tags: prepare-release
13:31
More version number updates. check-in: b1097ab086 user: rolf tags: prepare-release
01:56
Regenerated included doc. check-in: e54a5f4ff4 user: rolf tags: prepare-release
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to extensions/example/exampletest.tcl.

1
2
3
4
5
6
7
8
9
10
11
12
13
#!tclsh

if {[info tclversion] >= 9.0} {
    load ../../unix/libtcl9tdom0.9.3.so
} else {
    load ../../unix/libtdom0.9.3.so
}
load ./libexample1.0.so

set counter1 0
set counter2 0

proc eh1 {args} {



|

|







1
2
3
4
5
6
7
8
9
10
11
12
13
#!tclsh

if {[info tclversion] >= 9.0} {
    load ../../unix/libtcl9tdom0.9.4.so
} else {
    load ../../unix/libtdom0.9.4.so
}
load ./libexample1.0.so

set counter1 0
set counter2 0

proc eh1 {args} {

Changes to tests/loadtdom.tcl.

12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
} 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.3}]} {
    if {[catch {load [file join [file dir [info script]] ../unix/libtdom0.9.3.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]
}







|
|







12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
} 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.4}]} {
    if {[catch {load [file join [file dir [info script]] ../unix/libtdom0.9.4.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]
}