Модераторы: Daevaorn
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Reference variable из Tcl в C++ 
:(
    Опции темы
azesmcar
Дата 3.11.2005, 16:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


uploading...
****


Профиль
Группа: Участник Клуба
Сообщений: 6291
Регистрация: 12.11.2004
Где: Армения

Репутация: 81
Всего: 211



Здравстуйте. Даже не знаю куда эту тему пихать. Видимо сюда...
Такой вот вопрос, нужно передать из Tcl out параметр в функцию. Т.е. что то вроде reference -а.
в Tcl -е это делаеться так

Код

proc setByUpvar { name value } {
    upvar $name localVar
    set localVar $value
}

set originalVar 1
puts $originalVar
setByUpvar originalVar 2
puts $originalVar


А вот в Си не знаю. Делаю что то вроде этого, программа вылетает к чертовой матери...Есть кто нибудь кто работал с Tcl?

Код

int connection::init(Tcl_Interp* interp, int objc, Tcl_Obj *CONST objv[])
{
  Tcl_Obj *objPtr = Tcl_ObjGetVar2(interp, objv[0], (Tcl_Obj*) NULL, TCL_LEAVE_ERR_MSG);
  if ( Tcl_IsShared(objPtr) )
  {
    objPtr = Tcl_DuplicateObj(objPtr);
  }

  Tcl_SetStringObj(objPtr, "Hello!", 6);
  Tcl_InvalidateStringRep(objPtr);
  Tcl_ObjSetVar2(interp, objv[0], objPtr, objPtr, TCL_LEAVE_ERR_MSG);
}

PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++:Общие вопросы"
Earnest Daevaorn

Добро пожаловать!

  • Черновик стандарта C++ (за октябрь 2005) можно скачать с этого сайта. Прямая ссылка на файл черновика(4.4мб).
  • Черновик стандарта C (за сентябрь 2005) можно скачать с этого сайта. Прямая ссылка на файл черновика (3.4мб).
  • Прежде чем задать вопрос, прочтите это и/или это!
  • Здесь хранится весь мировой запас ссылок на документы, связанные с C++ :)
  • Не брезгуйте пользоваться тегами [code=cpp][/code].
  • Пожалуйста, не просите написать за вас программы в этом разделе - для этого существует "Центр Помощи".
  • C++ FAQ

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Earnest Daevaorn

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C/C++: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0434 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.