luaStackBalancer.h

Go to the documentation of this file.

/************************************************************************
**
** Copyright (C) 2009 K2FS Sistemas e Projetos Ltd.  
** All rights reserved.
**
************************************************************************/
 
#ifndef _LUASTACKBALANCER_H_
#define _LUASTACKBALANCER_H_
 
#include <assert.h>
 
#include <lua.hpp>
#include "luaEnv.h"
 
// Macros auxiliares para verificação de balanceamento de pilha 
#if defined QT_NO_DEBUG   
 
#define LUA_SAVE_TOP(ENV)       ((void)0)
#define LUA_CHECK_TOP(ENV)      ((void)0)
#define LUA_CHECK_TOP_O(ENV, o) ((void)0)
                                
#define LUA_SAVE_TOPL(L)        ((void)0)
#define LUA_CHECK_TOPL(L)       ((void)0)
#define LUA_CHECK_TOPL_O(L, o)  ((void)0)
 
#else
 
#define LUA_SAVE_TOP(ENV)  int _lua_save_top = (ENV).top()
 
#define LUA_CHECK_TOP(ENV) assert((ENV).top() == _lua_save_top)
 
#define LUA_CHECK_TOP_O(ENV, o) assert((ENV).top() == _lua_save_top + o)
 
 
#define LUA_SAVE_TOPL(L)  int _lua_save_top = lua_gettop(L)
 
#define LUA_CHECK_TOPL(L) assert(lua_gettop(L) == _lua_save_top)
 
#define LUA_CHECK_TOPL_O(L, o) assert(lua_gettop(L) == _lua_save_top + o)
 
#endif
 
 
class LUAUTILS_API_EXPORT LuaStackBalancer
{
public:
  LuaStackBalancer(LuaEnv* lua)
  {
    _lua = lua;
    if(lua)
      _top = lua->top();
  }
  
  ~LuaStackBalancer()
  {
    if(_lua)
    {
      assert(_lua->top() >= _top);
      _lua->setTop(_top);
    }
  }
 
private:
  LuaEnv* _lua; 
  int     _top; 
};
 
 
#endif