Overview
| Comment: | Merge trunk |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | bohagan |
| Files: | files | file ages | folders |
| SHA3-256: |
61fb454f56cf8e0250a66a8e83f2c2ef |
| User & Date: | jan.nijtmans on 2024-02-20 16:22:56 |
| Other Links: | branch diff | manifest | tags |
Context
|
2024-02-20
| ||
| 22:09 | Merge trunk check-in: 6853760139 user: jan.nijtmans tags: bohagan | |
| 16:22 | Merge trunk check-in: 61fb454f56 user: jan.nijtmans tags: bohagan | |
| 16:18 | Don't depend on Tcl 8.3 ..... check-in: c4ff285b07 user: jan.nijtmans tags: nijtmans | |
| 16:11 | Merge trunk check-in: daa14243cf user: jan.nijtmans tags: bohagan | |
Changes
Modified tests/keytest1.tcl from [bd5cb9f857] to [8c36976f30].
|
| | > > | 1 2 3 4 5 6 7 8 9 10 |
#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh "$0" ${1+"$@"}
set auto_path [linsert $auto_path 0 [file normalize [file join [file dirname [info script]] ..]]]
package require tls
proc creadable {s} {
puts "LINE=[gets $s]"
after 2000
|
| ︙ | ︙ |
Modified tests/keytest2.tcl from [9ae291a22a] to [b3210d97a2].
|
| | > > | 1 2 3 4 5 6 7 8 9 10 |
#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh "$0" ${1+"$@"}
set auto_path [linsert $auto_path 0 [file normalize [file join [file dirname [info script]] ..]]]
package require tls
set s [tls::socket 127.0.0.1 12300]
puts $s "A line"
flush $s
|
| ︙ | ︙ |
Modified tests/simpleClient.tcl from [38bd23a6f6] to [4d694417ae].
|
| | > > | 1 2 3 4 5 6 7 8 9 10 |
#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh "$0" ${1+"$@"}
package require tls
set dir [file join [file dirname [info script]] ../tests/certs]
set OPTS(-cafile) [file join $dir ca.pem]
set OPTS(-cert) [file join $dir client.pem]
set OPTS(-key) [file join $dir client.key]
|
| ︙ | ︙ |
Modified tests/simpleServer.tcl from [0490845ed9] to [0be01a94d0].
|
| | > > | 1 2 3 4 5 6 7 8 9 10 |
#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh "$0" ${1+"$@"}
package require tls
set dir [file join [file dirname [info script]] ../tests/certs]
set OPTS(-cafile) [file join $dir ca.pem]
set OPTS(-cert) [file join $dir server.pem]
set OPTS(-key) [file join $dir server.key]
|
| ︙ | ︙ |