В моем сценарии TCL я использую несколько процедур, для которых у меня нет исходного кода. Все эти процедуры выполняют некоторые задачи и выводят много сообщений. Но я просто хочу, чтобы задачи были выполнены, и я хочу подавить сообщения. Есть ли способ сделать это.

Так, например, я хотел бы запустить процедуру так:

my_proc $arg1 $arg2 $arg3

и подавить все это сообщения. Любые обходные пути / умные альтернативы приветствуются.

Больше информации: Я использую пользовательскую оболочку, которая принимает файл TCL в качестве аргумента и запускает его. Внутри этой пользовательской оболочки у меня есть доступ к некоторым процедурам TCL, для которых у меня нет кода.

Или даже есть ли способ, которым я могу сделать вывод сценария перейти в файл вместо командной строки (stdout)?