RosettaCodeData/Task/Call-a-function/Tcl/call-a-function-2.tcl

expr {func() + [cmd]}
expr {func(1,2,3} + [cmd a b c]}