/
niceSOFT
/
swig
Обзор
Документация
Войти
/
niceSOFT
/
swig
Код
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
Examples/test-suite/lua/char_binary_runme.lua
39 строк
1020 B
Erez Geva
Remove Lua 5.0 and Lua 5.1 and Lua options
30 май 2026, 19:24
30 май 2026, 19:24
74ff929
Код
Авторство
О чём код?
v=require("char_binary") catch_undef_globs() -- catch "undefined" global variables t = v.Test() assert(t:strlen("hile") == 4, "bad multi-arg typemap") assert(t:ustrlen("hile") == 4, "bad multi-arg typemap") assert(t:strlen("hil\0") == 4, "bad multi-arg typemap") assert(t:ustrlen("hil\0") == 4, "bad multi-arg typemap") -- creating a raw char* pc = v.new_pchar(5) v.pchar_setitem(pc, 0, 'h') v.pchar_setitem(pc, 1, 'o') v.pchar_setitem(pc, 2, 'l') v.pchar_setitem(pc, 3, 'a') v.pchar_setitem(pc, 4, 0) -- FIXME: strlen except 'char const *' but pc is 'char *' if false then assert(t:strlen(pc) == 4, "bad multi-arg typemap") assert(t:ustrlen(pc) == 4, "bad multi-arg typemap") end -- FIXME: expected 'pchar' got 'char *' if false then v.var_pchar = pc else v.var_pchar = "hola" end assert(v.var_pchar == "hola", "bad pointer case") -- FIXME: expected 'pchar' got 'char *' if false then v.var_namet = pc else v.var_namet = "hola" end assert(v.var_namet == "hola", "bad pointer case") v.delete_pchar(pc)