test/test_exception_handlers.cpp

   1 // Copyright Daniel Wallin 2008. Use, modification and distribution is
   2 // subject to the Boost Software License, Version 1.0. (See accompanying
   3 // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
   4
   5 #include "test.hpp"
   6 #include <luabind/luabind.hpp>
   7 #include <luabind/exception_handler.hpp>
   8
   9 struct my_exception {};
  10
  11 void translate_my_exception(lua_State* L, my_exception const&)
  12 {
  13     lua_pushstring(L, "my_exception");
  14 }
  15
  16 struct derived_std_exception : std::exception
  17 {
  18     char const* what() const throw()
  19     {
  20         return "derived_std_exception";
  21     }
  22 };
  23
  24 void translate_derived_exception(lua_State* L, derived_std_exception const&)
  25 {
  26     lua_pushstring(L, "derived_std_exception");
  27 }
  28
  29 void raise()
  30 {
  31     throw my_exception();
  32 }
  33
  34 void raise_derived()
  35 {
  36     throw derived_std_exception();
  37 }
  38
  39 void test_main(lua_State* L)
  40 {
  41     using namespace luabind;
  42
  43     register_exception_handler<my_exception>(&translate_my_exception);
  44
  45     module(L) [
  46         def("raise", &raise),
  47         def("raise_derived", &raise_derived)
  48     ];
  49
  50     DOSTRING(L,
  51         "status, msg = pcall(raise)\n"
  52         "assert(status == false)\n"
  53         "assert(msg == 'my_exception')\n");
  54
  55     DOSTRING(L,
  56         "status, msg = pcall(raise_derived)\n"
  57         "assert(status == false)\n"
  58         "assert(msg == 'std::exception: \\'derived_std_exception\\'')\n");
  59
  60     register_exception_handler<derived_std_exception>(&translate_derived_exception);
  61
  62     DOSTRING(L,
  63         "status, msg = pcall(raise_derived)\n"
  64         "assert(status == false)\n"
  65         "assert(msg == 'derived_std_exception')\n");
  66 }
  67