956f203a55
The directory bindings/lua was getting too big and had too many dependencies. Moreover, it was getting too painful to edit/maintain two different places. Now, the bindings for module X are in the directory that defines X. For example, the bindings for util/name.cpp are located at util/name.cpp. The only exception is the kernel. We do not want to inflate the kernel with Lua bindings. The bindings for the kernel classes are located at bindings/kernel_bindings. Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
58 lines
1.7 KiB
C++
58 lines
1.7 KiB
C++
/*
|
|
Copyright (c) 2013 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
|
|
Author: Leonardo de Moura
|
|
*/
|
|
#pragma once
|
|
#include <memory>
|
|
#include <lua.hpp>
|
|
#include "util/lua_exception.h"
|
|
#include "library/script_evaluator.h"
|
|
|
|
namespace lean {
|
|
class environment;
|
|
class io_state;
|
|
/**
|
|
\brief Wrapper for lua_State objects which contains all Lean bindings.
|
|
*/
|
|
class leanlua_state : public script_evaluator {
|
|
public:
|
|
struct imp;
|
|
private:
|
|
std::shared_ptr<imp> m_ptr;
|
|
leanlua_state(std::weak_ptr<imp> const & ptr);
|
|
friend class leanlua_thread;
|
|
friend class data_channel;
|
|
friend int state_dostring(lua_State * L);
|
|
friend int state_set_global(lua_State * L);
|
|
friend int mk_thread(lua_State * L);
|
|
friend int thread_wait(lua_State * L);
|
|
friend leanlua_state to_leanlua_state(lua_State * L);
|
|
public:
|
|
leanlua_state();
|
|
virtual ~leanlua_state();
|
|
|
|
/**
|
|
\brief Execute the file with the given name.
|
|
This method throws an exception if an error occurs.
|
|
*/
|
|
void dofile(char const * fname);
|
|
/**
|
|
\brief Execute the given string.
|
|
This method throws an exception if an error occurs.
|
|
*/
|
|
virtual void dostring(char const * str);
|
|
|
|
/**
|
|
\brief Execute the given script, but sets the registry with the given environment object.
|
|
The registry can be accessed by \str by invoking the function <tt>env()</tt>.
|
|
The script \c str should not store a reference to the environment \c env.
|
|
*/
|
|
virtual void dostring(char const * str, environment & env, io_state & st);
|
|
};
|
|
/**
|
|
\brief Return a reference to the leanlua_state object that is wrapping \c L.
|
|
*/
|
|
leanlua_state to_leanlua_state(lua_State * L);
|
|
}
|