Diff

Differences From Artifact [24f9bfe9d5]:

To Artifact [9ae291a22a]:





1
2
3
4
5
6
7
8
1
2
3
4
5
6
7
8
9
10

+
+
+







-
#! /usr/bin/env tclsh

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
puts [join [tls::status $s] \n]
exit