Posted to tcl by schelte at Sun Jun 26 09:59:57 GMT 2022view pretty
proc a {} {puts "This is a"}
proc b {} {puts "This is b"}
proc c {} {proc c {} {puts "This is c"}}
proc q {} {a;b;c}
q
q
q
Output:
This is a
This is b
This is a
This is b
This is c
This is a
This is b
This is c