FM / luabind

/usr/include/luabind

Name	Size	Mode	Actions
detail/	-	0755	rm
adopt_policy.hpp	5091	0644	edit dl rm
back_reference.hpp	3111	0644	edit dl rm
back_reference_fwd.hpp	1495	0644	edit dl rm
build_information.hpp	2015	0644	edit dl rm
class.hpp	27490	0644	edit dl rm
class_info.hpp	1704	0644	edit dl rm
config.hpp	5232	0644	edit dl rm
container_policy.hpp	4951	0644	edit dl rm
copy_policy.hpp	1313	0644	edit dl rm
dependency_policy.hpp	2691	0644	edit dl rm
discard_result_policy.hpp	2512	0644	edit dl rm
error.hpp	3345	0644	edit dl rm
error_callback_fun.hpp	1750	0644	edit dl rm
exception_handler.hpp	2086	0644	edit dl rm
from_stack.hpp	1485	0644	edit dl rm
function.hpp	1519	0644	edit dl rm
function_converter.hpp	4021	0644	edit dl rm
function_introspection.hpp	1949	0644	edit dl rm
get_main_thread.hpp	522	0644	edit dl rm
get_pointer.hpp	1554	0644	edit dl rm
handle.hpp	4218	0644	edit dl rm
intrusive_ptr_converter.hpp	1789	0644	edit dl rm
iterator_policy.hpp	2982	0644	edit dl rm
luabind.hpp	1356	0644	edit dl rm
lua_include.hpp	2665	0644	edit dl rm
lua_state_fwd.hpp	1357	0644	edit dl rm
make_function.hpp	3238	0644	edit dl rm
nil.hpp	1368	0644	edit dl rm
no_dependency.hpp	903	0644	edit dl rm
object.hpp	1291	0644	edit dl rm
object_fwd.hpp	331	0644	edit dl rm
open.hpp	1371	0644	edit dl rm
operator.hpp	8993	0644	edit dl rm
out_value_policy.hpp	12029	0644	edit dl rm
prefix.hpp	1265	0644	edit dl rm
raw_policy.hpp	2426	0644	edit dl rm
return_reference_to_policy.hpp	2661	0644	edit dl rm
scope.hpp	2944	0644	edit dl rm
set_package_preload.hpp	2452	0644	edit dl rm
shared_ptr_converter.hpp	5274	0644	edit dl rm
stack.hpp	4016	0644	edit dl rm
std_shared_ptr_converter.hpp	2271	0644	edit dl rm
tag_function.hpp	1622	0644	edit dl rm
typeid.hpp	2498	0644	edit dl rm
value_wrapper.hpp	4241	0644	edit dl rm
version.hpp	513	0644	edit dl rm
weak_ref.hpp	1834	0644	edit dl rm
wrapper_base.hpp	5987	0644	edit dl rm
yield_policy.hpp	1734	0644	edit dl rm

Edit: /usr/include/luabind/out_value_policy.hpp (12029B)

// Permission is hereby granted, free of charge, to any person obtaining a
// copy of this software and associated documentation files (the "Software"),
// to deal in the Software without restriction, including without limitation
// the rights to use, copy, modify, merge, publish, distribute, sublicense,
// and/or sell copies of the Software, and to permit persons to whom the
// Software is furnished to do so, subject to the following conditions:

// The above copyright notice and this permission notice shall be included
// in all copies or substantial portions of the Software.

// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF
// ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
// TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
// PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT
// SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR
// ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
// ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
// OR OTHER DEALINGS IN THE SOFTWARE.

#ifndef LUABIND_OUT_VALUE_POLICY_HPP_INCLUDED
#define LUABIND_OUT_VALUE_POLICY_HPP_INCLUDED

#include <luabind/config.hpp>
#include <luabind/detail/decorate_type.hpp> // for LUABIND_DECORATE_TYPE
#include <luabind/detail/policy.hpp> // for find_conversion_policy, etc
#include <luabind/detail/primitives.hpp> // for by_pointer, by_reference, etc
#include <luabind/detail/typetraits.hpp> // for is_nonconst_pointer, is_nonconst_reference, etc

#include <boost/mpl/apply_wrap.hpp> // for apply_wrap2
#include <boost/mpl/identity.hpp>
#include <boost/mpl/if.hpp> // for if_
#include <boost/mpl/or.hpp> // for or_
#include <boost/type_traits/is_same.hpp> // for is_same

#include <new> // for operator new

namespace luabind { namespace detail
{
    namespace mpl = boost::mpl;

template<int N>
 struct char_array
 {
 char storage[N];
 };

#if defined(__GNUC__) && ( __GNUC__ == 3 && __GNUC_MINOR__ == 1 )

template<class U>
 char_array<sizeof(U)> indirect_sizeof_test(by_reference);

template<class U>
 char_array<sizeof(U)> indirect_sizeof_test(by_const_reference);

template<class U>
 char_array<sizeof(U)> indirect_sizeof_test(by_pointer);

template<class U>
 char_array<sizeof(U)> indirect_sizeof_test(by_const_pointer);

template<class U>
 char_array<sizeof(U)> indirect_sizeof_test(by_value);

#else

template<class U>
 char_array<sizeof(typename mpl::identity::type)>
 indirect_sizeof_test(by_reference);

template<class U>
 char_array<sizeof(typename mpl::identity::type)>
 indirect_sizeof_test(by_const_reference);

template<class U>
 char_array<sizeof(typename mpl::identity::type)>
 indirect_sizeof_test(by_pointer);

template<class U>
 char_array<sizeof(typename mpl::identity::type)>
 indirect_sizeof_test(by_const_pointer);

template<class U>
 char_array<sizeof(typename mpl::identity::type)>
 indirect_sizeof_test(by_value);

#endif

template<class T>
 struct indirect_sizeof
 {
 BOOST_STATIC_CONSTANT(int, value = sizeof(indirect_sizeof_test(LUABIND_DECORATE_TYPE(T))));
 };

template<int Size, class Policies = detail::null_type>
 struct out_value_converter
 {
 int consumed_args() const
 {
 return 1;
 }

template<class T>
 T& apply(lua_State* L, by_reference<T>, int index)
 {
 typedef typename find_conversion_policy<1, Policies>::type converter_policy;
 typename mpl::apply_wrap2<converter_policy,T,lua_to_cpp>::type converter;
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 new (storage) T(converter.apply(L, LUABIND_DECORATE_TYPE(T), index));
 return *storage;
#else
 new (m_storage) T(converter.apply(L, LUABIND_DECORATE_TYPE(T), index));
 return *reinterpret_cast<T*>(m_storage);
#endif
 }

template<class T>
 static int match(lua_State* L, by_reference<T>, int index)
 {
 typedef typename find_conversion_policy<1, Policies>::type converter_policy;
 typedef typename mpl::apply_wrap2<converter_policy,T,lua_to_cpp>::type converter;
 return converter::match(L, LUABIND_DECORATE_TYPE(T), index);
 }

template<class T>
 void converter_postcall(lua_State* L, by_reference<T>, int)
 {
 typedef typename find_conversion_policy<2, Policies>::type converter_policy;
 typename mpl::apply_wrap2<converter_policy,T,cpp_to_lua>::type converter;
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 converter.apply(L, *storage);
 storage->~T();
#else
 converter.apply(L, *reinterpret_cast<T*>(m_storage));
 reinterpret_cast<T*>(m_storage)->~T();
#endif
 }

template<class T>
 T* apply(lua_State* L, by_pointer<T>, int index)
 {
 typedef typename find_conversion_policy<1, Policies>::type converter_policy;
 typename mpl::apply_wrap2<converter_policy,T,lua_to_cpp>::type converter;
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 new (storage) T(converter.apply(L, LUABIND_DECORATE_TYPE(T), index));
 return storage;
#else
 new (m_storage) T(converter.apply(L, LUABIND_DECORATE_TYPE(T), index));
 return reinterpret_cast<T*>(m_storage);
#endif
 }

template<class T>
 static int match(lua_State* L, by_pointer<T>, int index)
 {
 typedef typename find_conversion_policy<1, Policies>::type converter_policy;
 typedef typename mpl::apply_wrap2<converter_policy,T,lua_to_cpp>::type converter;
 return converter::match(L, LUABIND_DECORATE_TYPE(T), index);
 }

template<class T>
 void converter_postcall(lua_State* L, by_pointer<T>, int)
 {
 typedef typename find_conversion_policy<2, Policies>::type converter_policy;
 typename mpl::apply_wrap2<converter_policy,T,cpp_to_lua>::type converter;
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 converter.apply(L, *storage);
 storage->~T();
#else
 converter.apply(L, *reinterpret_cast<T*>(m_storage));
 reinterpret_cast<T*>(m_storage)->~T();
#endif
 }

char m_storage[Size];
    };

template<int N, class Policies = detail::null_type>
 struct out_value_policy : conversion_policy<N>
 {
 static void precall(lua_State*, const index_map&) {}
 static void postcall(lua_State*, const index_map&) {}

struct only_accepts_nonconst_references_or_pointers {};
        struct can_only_convert_from_lua_to_cpp {};

template<class T, class Direction>
 struct apply
 {
 typedef typename boost::mpl::if_<boost::is_same<lua_to_cpp, Direction>
 , typename boost::mpl::if_<boost::mpl::or_<is_nonconst_reference<T>, is_nonconst_pointer<T> >
 , out_value_converter<indirect_sizeof<T>::value, Policies>
 , only_accepts_nonconst_references_or_pointers
 >::type
 , can_only_convert_from_lua_to_cpp
 >::type type;
 };
 };

template<int Size, class Policies = detail::null_type>
 struct pure_out_value_converter
 {
 int consumed_args() const
 {
 return 0;
 }

template<class T>
 T& apply(lua_State*, by_reference<T>, int)
 {
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 new (storage) T();
 return *storage;
#else
 new (m_storage) T();
 return *reinterpret_cast<T*>(m_storage);
#endif
 }

template<class T>
 static int match(lua_State*, by_reference<T>, int)
 {
 return 0;
 }

template<class T>
 void converter_postcall(lua_State* L, by_reference<T>, int)
 {
 typedef typename find_conversion_policy<1, Policies>::type converter_policy;
 typename mpl::apply_wrap2<converter_policy,T,cpp_to_lua>::type converter;
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 converter.apply(L, *storage);
 storage->~T();
#else
 converter.apply(L, *reinterpret_cast<T*>(m_storage));
 reinterpret_cast<T*>(m_storage)->~T();
#endif
 }

template<class T>
 T* apply(lua_State*, by_pointer<T>, int)
 {
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 new (storage) T();
 return storage;
#else
 new (m_storage) T();
 return reinterpret_cast<T*>(m_storage);
#endif
 }

template<class T>
 static int match(lua_State*, by_pointer<T>, int)
 {
 return 0;
 }

template<class T>
 void converter_postcall(lua_State* L, by_pointer<T>, int)
 {
 typedef typename find_conversion_policy<1, Policies>::type converter_policy;
 typename mpl::apply_wrap2<converter_policy,T,cpp_to_lua>::type converter;
#if defined(__GNUC__) && __GNUC__ >= 4
 T* storage = reinterpret_cast<T*>(m_storage);
 converter.apply(L, *storage);
 storage->~T();
#else
 converter.apply(L, *reinterpret_cast<T*>(m_storage));
 reinterpret_cast<T*>(m_storage)->~T();
#endif
 }

char m_storage[Size];
    };

template<int N, class Policies = detail::null_type>
 struct pure_out_value_policy : conversion_policy<N, false>
 {
 static void precall(lua_State*, const index_map&) {}
 static void postcall(lua_State*, const index_map&) {}

struct only_accepts_nonconst_references_or_pointers {};
        struct can_only_convert_from_lua_to_cpp {};

template<class T, class Direction>
 struct apply
 {
 typedef typename boost::mpl::if_<boost::is_same<lua_to_cpp, Direction>
 , typename boost::mpl::if_<boost::mpl::or_<is_nonconst_reference<T>, is_nonconst_pointer<T> >
 , pure_out_value_converter<indirect_sizeof<T>::value, Policies>
 , only_accepts_nonconst_references_or_pointers
 >::type
 , can_only_convert_from_lua_to_cpp
 >::type type;
 };
 };

}}

namespace luabind
{
 template<int N>
 detail::policy_cons<detail::out_value_policy<N>, detail::null_type>
 out_value(LUABIND_PLACEHOLDER_ARG(N))
 {
 return detail::policy_cons<detail::out_value_policy<N>, detail::null_type>();
 }

template<int N, class Policies>
 detail::policy_cons<detail::out_value_policy<N, Policies>, detail::null_type>
 out_value(LUABIND_PLACEHOLDER_ARG(N), const Policies&)
 {
 return detail::policy_cons<detail::out_value_policy<N, Policies>, detail::null_type>();
 }

template<int N>
 detail::policy_cons<detail::pure_out_value_policy<N>, detail::null_type>
 pure_out_value(LUABIND_PLACEHOLDER_ARG(N))
 {
 return detail::policy_cons<detail::pure_out_value_policy<N>, detail::null_type>();
 }

template<int N, class Policies>
 detail::policy_cons<detail::pure_out_value_policy<N, Policies>, detail::null_type>
 pure_out_value(LUABIND_PLACEHOLDER_ARG(N), const Policies&)
 {
 return detail::policy_cons<detail::pure_out_value_policy<N, Policies>, detail::null_type>();
 }
}

#endif // LUABIND_OUT_VALUE_POLICY_HPP_INCLUDED

cmd: