File: Lua.cc

package info (click to toggle)
exactimage 1.2.1-3
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 3,048 kB
  • sloc: cpp: 35,940; ansic: 1,952; xml: 1,447; makefile: 338; perl: 138; sh: 110; python: 45; php: 37; ruby: 12
file content (45 lines) | stat: -rw-r--r-- 1,311 bytes parent folder | download | duplicates (5)
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
/*
 * Copyright (C) 2014-2015 René Rebe, ExactCODE GmbH
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; version 2. A copy of the GNU General
 * Public License can be found in the file LICENSE.
 * 
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANT-
 * ABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
 * Public License for more details.
 * 
 * Alternatively, commercial licensing options are available from the
 * copyright holder ExactCODE GmbH Germany.
 */

#include "Lua.hh"

extern "C" {
#include "lstate.h"
}

namespace LuaWrapper {
  
  AutoReleaseItem::AutoReleaseItem(lua_State* L) {
    global_State *g = G(L);
    AutoReleaseItem** autoReleaseList = (AutoReleaseItem**)&(g->ud); 
    
    this->next = *autoReleaseList;
    *autoReleaseList = this;
  }
  
  void runAutoRelease(lua_State* L) {
    global_State *g = G(L);
    AutoReleaseItem** autoReleaseList = (AutoReleaseItem**)&(g->ud); 
    
    while (*autoReleaseList) {
      AutoReleaseItem* next = (*autoReleaseList)->next;
      delete *autoReleaseList;
      *autoReleaseList = next;
    }
  }
  
}