1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
#include "hs_tests.h"
char err_string[32] = "";
int set_err_string(lua_State *L)
{
if (lua_isstring(L, -1))
strcpy(err_string, lua_tostring(L, -1));
return 0;
}
int throw_const_error(lua_State *L)
{
hs_throw_error(L, "a constant error");
return 0;
}
TEST(hs_throw_error_constant)
{
lua_pushcfunction(L, set_err_string);
int pos = lua_gettop(L);
lua_pushcfunction(L, throw_const_error);
int result = lua_pcall(L, 0, 0, pos);
mu_assert_equal(result, LUA_ERRRUN);
mu_assert_str_not_equal(err_string, "");
mu_assert_str_equal(err_string, "a constant error");
return 0;
}
int throw_number_error(lua_State *L)
{
hs_throw_error(L, "%s number %d", "error", 10);
return 0;
}
TEST(hs_throw_error_format)
{
lua_pushcfunction(L, set_err_string);
int pos = lua_gettop(L);
lua_pushcfunction(L, throw_number_error);
int result = lua_pcall(L, 0, 0, pos);
mu_assert_equal(result, LUA_ERRRUN);
mu_assert_str_not_equal(err_string, "");
mu_assert_str_equal(err_string, "error number 10");
return 0;
}
// ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
void hs_throw_error_tests()
{
printf("running hs_throw_error() tests...\n");
mu_run_test("throw constant error string", hs_throw_error_constant);
mu_run_test("throw error with format string", hs_throw_error_format);
}
|
