From 1459422a3dc158fa4c7222f7780d134261458b7c Mon Sep 17 00:00:00 2001 From: sanine-a Date: Sun, 8 Aug 2021 16:15:01 -0500 Subject: add hs_throw_error() implementation and fix bug in tests --- src/hs_throw_error.c | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 src/hs_throw_error.c (limited to 'src/hs_throw_error.c') diff --git a/src/hs_throw_error.c b/src/hs_throw_error.c new file mode 100644 index 0000000..b2377dd --- /dev/null +++ b/src/hs_throw_error.c @@ -0,0 +1,23 @@ +#include + +#include "honeysuckle.h" + +void hs_throw_error(lua_State *L, const char *format_string, ...) +{ + va_list args, args_; + va_start(args, format_string); + va_copy(args_, args); + + int string_size = vsnprintf(NULL, 0, format_string, args_); + va_end(args_); + + char *string = malloc((string_size+1) * sizeof(char)); + if (string == NULL) + lua_pushstring(L, "there was an error allocating memory for an error message"); + else { + vsnprintf(string, string_size+1, format_string, args); + lua_pushstring(L, string); + free(string); + } + lua_error(L); +} -- cgit v1.2.1