3 lines
61 B
Tcl
3 lines
61 B
Tcl
if {
|
|
[string is double -strict $varname]
|
|
} then { ... }
|
if {
|
|
[string is double -strict $varname]
|
|
} then { ... }
|