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