luabind 简单应用

// Use_of_Lua_Bind.cpp : 定义控制台应用程序的入口点。
//

#include "stdafx.h"
#include <string>

extern "C"
{
#include <lua.h>
#include <lualib.h>
#include <lauxlib.h>
}

#include <luabind/luabind.hpp>
using namespace std;
using  namespace luabind;

int _tmain(int argc, _TCHAR* argv[])
{
 //some define
 lua_State   *pL_;
 luabind::object  *obj;

 pL_  = lua_open();
 luaL_openlibs(pL_);
 luabind::open(pL_);

 char lua_module_name[255];
 sprintf(lua_module_name, "LearnLua");

 string lua_module_content = "module(/"LearnLua/", package.seeall) /
         function printsothing()    /
          print(/"neal is great/")  /
         end";

 //do stirng
 int str_len = std::strlen(lua_module_name);
 if (luaL_loadbuffer(pL_, lua_module_content.c_str(), std::strlen(lua_module_content.c_str()), lua_module_content.c_str())
  || lua_pcall(pL_, 0, 0, 0))
 {
  printf("error in luaL_loadbuffer and lua_pcall");
 }

 //get global
 obj = new luabind::object();
 lua_getglobal(pL_, lua_module_name);
 *obj = luabind::object(luabind::from_stack(pL_, -1));
 lua_pop(pL_, 1);

 (*obj)["printsothing"]();

 //excute function
 return 0;
}