Проверка существования объекта в TCL

Question

Я хочу проверить, существует ли объект или нет в tcl. Я просмотрел параметры info object, но не нашел чего-то определенного для существования объекта, а info exists работает только для переменных, а не для объектов.

Любая идея? Я создал объект struct :: stack ::struct::stack aa (Dcode) 52 % info object class aa ::struct::stack::stack_oo

Кажется, что он находится в tcloo. Я думаю, что в Itcl найти командные работы itcl::find object aa

Но не известно о tcl_oo.

Answer 1

Возможно, вы просто пропустили его: info object isa object используется для проверки того, относится ли конкретное слово к объекту.

% info object isa object abcde 
0 
% oo::object create abcde 
::abcde 
% info object isa object abcde 
1 
% abcde destroy 
% info object isa object abcde 
0 

Здесь с некоторыми другими командами ...

% info object isa object oo::object 
1 
% info object isa object while 
0 
% info object isa object no.such.thing.at.all.ever 
0