Как обернуть указатель void * в объект TCL

Question

Я пытаюсь сохранить указатель void * (или любой указатель) в объект tcl, чтобы я мог получить его позже. Я видел, как SWIG преобразовал это в строку с некоторой кодировкой и позже расшифровал это. Но чтобы сделать его более эффективным, я хочу напрямую получить указатель в tcl obj и из него. Что-то вроде Tcl_GetPointerFromObj (). Есть ли способ сделать это? Нужно ли копаться в структуре Tcl_Obj и выполнять грязную работу?

Answer 1

Я предлагаю прочитать эту страницу в вики Tcler , которая находится по теме.

Answer 2

Вы можете использовать Tcl_RegisterObjType для создания нового типа объекта Tcl, который содержит пустой указатель.Это позволяет вам расширить Tcl, чтобы Tcl_ObjType можно было использовать для хранения (в вашем случае) void * и для возможности записи Tcl_GetPointerfromObj.

Answer 3

Вы можете использовать Tcl API: Tcl_GetWideIntFromObj(), хотя я думаю, что хранение указателей в Tcl - это первый шаг к безумию ....