skip the switch(result) on returning TCL_OK from a proc
merge trunk