Как сделать правильно замыкание функцией на api lua c++

@Егор Щербанов · Регистрация: 19.02.2018

Студворк — интернет-сервис помощи студентам

В книге программирования на lua. Есть пример

Главной функцией здесь является lua_pushcclosure, которая создает
новое замыкание. Ее вторым аргументом является базовая функция (в
примере это counter), а третьим — число верхних значений (в примере
это 1). Перед созданием нового замыкания мы должны затолкать в стек
начальные значения для их верхних значений. В нашем примере мы
заталкиваем 0 как начальное значение для единственного верхнего
значения. Как и ожидалось, lua_pushcclosure оставляет новое замыкание
в стеке, поэтому замыкание уже готово к возвращению как результат
newCounter.

Помогите, пожалуйста, как сделать правильно замыкание функцией на api lua c++, не получается. Хочется понять.

Lua
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
   void checkerror(lua_State *L, const char* LUA) {
    if (luaL_dostring(L, LUA) != LUA_OK) {
        cout << "error " << lua_tostring(L, -1) << endl;
    }
    }
 
   static int counter(lua_State *L) {
    int val = lua_tointeger(L, lua_upvalueindex(1));
    lua_pushinteger(L, ++val);  /* new value */
    lua_copy(L, -1, lua_upvalueindex(1));  /* update upvalue */
    return 1;  /* return new value */
}
 
int newcounter(lua_State *L) {
    lua_pushinteger(L, 0);
    lua_pushcclosure(L, &counter, 1);
    return 1;
}
 
int main(int argc, char *argv[]) {
    const char* LUA = R"(
 c1 = newcounter()
      print(c1(), c1(), c1())   --> 1    2    3
      c2 = newcounter()
      print(c2(), c2(), c1())   --> 1    2    4
 
        )";
 
    lua_State *L = luaL_newstate();/*Функция создает новое Lua состояние. Она вызывает lua_newstate с функцией-*/
    luaL_openlibs(L);
 
    checkerror(L, LUA);//Функция проверка на ошибки.
 
    lua_newtable(L);
    lua_pushvalue(L, 1);
    lua_getglobal(L, "newcounter");
    lua_pushcfunction(L, newcounter);
    lua_pushcclosure(L, counter, 1);
    lua_setglobal(L, "newcounter");
    lua_settable(L, -3);
    lua_close(L);
 
    cin.get();//ожидает ввода символа программа завершается.
    return 0;
   }

@Егор Щербанов · 22.04.2019, 13:22 **[ТС]**

Вот как сделал замыкание, может кому поможет.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
void checkerror(lua_State *L, const char* LUA) {
    if (luaL_dostring(L, LUA) != LUA_OK) {
        cout << "error " << lua_tostring(L, -1) << endl;
    }
}
static int newcounter(lua_State *L) {
    int val = lua_tointeger(L, lua_upvalueindex(1));
    lua_pushinteger(L, ++val);          /*  новое  значение    */
    lua_pushvalue(L, -1);   /*  дублирует  его  */
    lua_replace(L, lua_upvalueindex(1));    /*  обновляет  верхнее  значение*/
    return 1;
}
static int counter(lua_State *L) {
    lua_pushinteger(L, 0);
    lua_pushcclosure(L, newcounter, 1);
    return 1;  /* return new value */
}
 
int main(int argc, char *argv[]) {
    const char* LUA = R"(
   c1 = counter()
   print(c1(), c1(), c1())   --> 1    2    3 
   )";
 
    lua_State *L = luaL_newstate();/*Функция создает новое Lua состояние. Она вызывает lua_newstate с функцией-*/
    luaL_openlibs(L);
 
    lua_register(L,"counter", counter);// отправить c функцию в стек.
    checkerror(L, LUA);
 
    lua_pushcclosure(L, newcounter, 1);
 
    lua_pcall(L, 0, 0, 0);// вызвать функцию.
 
    lua_close(L);
 
    cin.get();//ожидает ввода символа программа завершается.
    return 0;
}

@Lunar_ · 11.10.2022, 16:23

Сообщение от Егор Щербанов

Вот как сделал замыкание, может кому поможет.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
void checkerror(lua_State *L, const char* LUA) {
    if (luaL_dostring(L, LUA) != LUA_OK) {
        cout << "error " << lua_tostring(L, -1) << endl;
    }
}
static int newcounter(lua_State *L) {
    int val = lua_tointeger(L, lua_upvalueindex(1));
    lua_pushinteger(L, ++val);          /*  новое  значение    */
    lua_pushvalue(L, -1);   /*  дублирует  его  */
    lua_replace(L, lua_upvalueindex(1));    /*  обновляет  верхнее  значение*/
    return 1;
}
static int counter(lua_State *L) {
    lua_pushinteger(L, 0);
    lua_pushcclosure(L, newcounter, 1);
    return 1;  /* return new value */
}
 
int main(int argc, char *argv[]) {
    const char* LUA = R"(
   c1 = counter()
   print(c1(), c1(), c1())   --> 1    2    3 
   )";
 
    lua_State *L = luaL_newstate();/*Функция создает новое Lua состояние. Она вызывает lua_newstate с функцией-*/
    luaL_openlibs(L);
 
    lua_register(L,"counter", counter);// отправить c функцию в стек.
    checkerror(L, LUA);
 
    lua_pushcclosure(L, newcounter, 1);
 
    lua_pcall(L, 0, 0, 0);// вызвать функцию.
 
    lua_close(L);
 
    cin.get();//ожидает ввода символа программа завершается.
    return 0;
}

Подскажите пожалуйста, что то не пойму:

lua_pushcclosure(L, newcounter, 1) - вы указываете функцию newcounter и указываете один аргумент третьим параметром, который должен быть связан с этой функцией, но в стек е добавляете ни какого параметра.

А потом вообще после lua_pcall - удаляете стек lua_close.

@Егор Щербанов · 18.10.2022, 04:52 **[ТС]**

Lunar_, уже не помню, слишком много времени прошло. как-то записывал видеоуроки об этом, посмотрите пожалуйста на youtube, может они вам чем-то помогут. вот ещё небольшая заметка

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .