4 lines
112 B
Tcl
4 lines
112 B
Tcl
|
set s ""
|
||
|
|
if {$s eq ""} {puts "s contains an empty string"}
|
||
|
|
if {$s ne ""} {puts "s contains a non-empty string"}
|