@@ -26,11 +26,11 @@ if (rv == 0) { return(TCL_OK); }; return(TCL_ERROR); -} [list mkdir] +} puts [test 1] puts [test1 1] puts [test3 1]