@jacket Tcl is something of an acquired taste. Perhaps you need to have a twisted brain to really appreciate it (as I do)! 🤪

That's quite a good introductory video though. My one criticism would be that it may give the impression that all commands operate directly on strings, which would be very inefficient. This was the case in the very earliest versions of Tcl, but now strings are converted to/from more efficient representations behind the scenes as required. #tcltk 🪶

@patricus Depending on your definition of "sane", you might find Tcl/Tk fits the bill. See https://www.tcl-lang.org and https://wiki.tcl-lang.org/welcome . Indentation is optional, you can write:

if {$a > 0} {puts OK} else {puts "TOO LOW"; set a 1}

or:

if {$a > 0} {
puts OK
} else {
puts "TOO LOW"
set a 1
}

or:

if {$a > 0} \
{puts OK} \
else \
{puts "TOO LOW"
set a 1}

or even:

eval [lreverse {{puts "TOO LOW"; set a 1} else {puts OK} {$a > 0} if}]
🤪

#programming #tcltk