[tcl] - add a TODO'd test. Getting this test to pass will get us one step closer to running tcltest.tcl
[tcl] - add a TODO'd test. Getting this test to pass will get us one step closer to running tcltest.tcl




git-svn-id: 6e74a02f85675cec270f5d931b0f6998666294a3@31363 d31e2699-5ff4-0310-a27c-f18f2fbe73fe

ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot