Tcl: support eval/catch commands

--HG--
extra : rebase_source : 5d7e3a2b3c549419c672cddd8d780542053d68bb
Tcl: support switch command

--HG--
extra : rebase_source : f516669986006db5aca6af6417f323e57fa848d1
Tcl: refactor similar code into tcl_codify_token function

--HG--
extra : rebase_source : 71a597ee1427c9ee52d8879ffc360f91912f8561