ShuriZma
/
mgba
mirror of https://github.com/mgba-emu/mgba.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Scripting: Add some nullity tests

This commit is contained in:
Vicki Pfau 2023-01-25 04:10:36 -08:00
parent 53abcfd28e
commit 0da94526bc
2 changed files with 69 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/script/test/lua.c
View File

@ -371,6 +371,25 @@ M_TEST_DEFINE(callCFunc) {
mScriptContextDeinit(&context); mScriptContextDeinit(&context);
} }
M_TEST_DEFINE(globalStructNull) {
SETUP_LUA;
struct Test s = {};
struct mScriptValue a;
LOAD_PROGRAM("assert(a)");
a = mSCRIPT_MAKE_S(Test, &s);
assert_true(lua->setGlobal(lua, "a", &a));
assert_true(lua->run(lua));
a = mSCRIPT_MAKE_S(Test, NULL);
assert_true(lua->setGlobal(lua, "a", &a));
assert_false(lua->run(lua));
mScriptContextDeinit(&context);
}
M_TEST_DEFINE(globalStructFieldGet) { M_TEST_DEFINE(globalStructFieldGet) {
SETUP_LUA; SETUP_LUA;
@ -709,6 +728,7 @@ M_TEST_SUITE_DEFINE_SETUP_TEARDOWN(mScriptLua,
cmocka_unit_test(rootScope), cmocka_unit_test(rootScope),
cmocka_unit_test(callLuaFunc), cmocka_unit_test(callLuaFunc),
cmocka_unit_test(callCFunc), cmocka_unit_test(callCFunc),
cmocka_unit_test(globalStructNull),
cmocka_unit_test(globalStructFieldGet), cmocka_unit_test(globalStructFieldGet),
cmocka_unit_test(globalStructFieldSet), cmocka_unit_test(globalStructFieldSet),
cmocka_unit_test(globalStructMethods), cmocka_unit_test(globalStructMethods),

49
src/script/test/types.c
View File

@ -76,6 +76,14 @@ static int isSequential(struct mScriptList* list) {
return true; return true;
} }
static bool isNullCharp(const char* arg) {
return !arg;
}
static bool isNullStruct(struct Test* arg) {
return !arg;
}
mSCRIPT_BIND_FUNCTION(boundVoidOne, S32, voidOne, 0); mSCRIPT_BIND_FUNCTION(boundVoidOne, S32, voidOne, 0);
mSCRIPT_BIND_VOID_FUNCTION(boundDiscard, discard, 1, S32, ignored); mSCRIPT_BIND_VOID_FUNCTION(boundDiscard, discard, 1, S32, ignored);
mSCRIPT_BIND_FUNCTION(boundIdentityInt, S32, identityInt, 1, S32, in); mSCRIPT_BIND_FUNCTION(boundIdentityInt, S32, identityInt, 1, S32, in);
@ -86,6 +94,8 @@ mSCRIPT_BIND_FUNCTION(boundAddInts, S32, addInts, 2, S32, a, S32, b);
mSCRIPT_BIND_FUNCTION(boundSubInts, S32, subInts, 2, S32, a, S32, b); mSCRIPT_BIND_FUNCTION(boundSubInts, S32, subInts, 2, S32, a, S32, b);
mSCRIPT_BIND_FUNCTION(boundIsHello, S32, isHello, 1, CHARP, str); mSCRIPT_BIND_FUNCTION(boundIsHello, S32, isHello, 1, CHARP, str);
mSCRIPT_BIND_FUNCTION(boundIsSequential, S32, isSequential, 1, LIST, list); mSCRIPT_BIND_FUNCTION(boundIsSequential, S32, isSequential, 1, LIST, list);
mSCRIPT_BIND_FUNCTION(boundIsNullCharp, BOOL, isNullCharp, 1, CHARP, arg);
mSCRIPT_BIND_FUNCTION(boundIsNullStruct, BOOL, isNullStruct, 1, S(Test), arg);
M_TEST_DEFINE(voidArgs) { M_TEST_DEFINE(voidArgs) {
struct mScriptFrame frame; struct mScriptFrame frame;
@ -1261,6 +1271,43 @@ M_TEST_DEFINE(invokeList) {
mScriptListDeinit(&list); mScriptListDeinit(&list);
} }
M_TEST_DEFINE(nullString) {
struct mScriptFrame frame;
bool res;
mScriptFrameInit(&frame);
mSCRIPT_PUSH(&frame.arguments, CHARP, "hi");
assert_true(mScriptInvoke(&boundIsNullCharp, &frame));
assert_true(mScriptPopBool(&frame.returnValues, &res));
assert_false(res);
mSCRIPT_PUSH(&frame.arguments, CHARP, NULL);
assert_true(mScriptInvoke(&boundIsNullCharp, &frame));
assert_true(mScriptPopBool(&frame.returnValues, &res));
assert_true(res);
mScriptFrameDeinit(&frame);
}
M_TEST_DEFINE(nullStruct) {
struct mScriptFrame frame;
struct Test v = {};
bool res;
mScriptFrameInit(&frame);
mSCRIPT_PUSH(&frame.arguments, S(Test), &v);
assert_true(mScriptInvoke(&boundIsNullStruct, &frame));
assert_true(mScriptPopBool(&frame.returnValues, &res));
assert_false(res);
mSCRIPT_PUSH(&frame.arguments, S(Test), NULL);
assert_true(mScriptInvoke(&boundIsNullStruct, &frame));
assert_true(mScriptPopBool(&frame.returnValues, &res));
assert_true(res);
mScriptFrameDeinit(&frame);
}
M_TEST_SUITE_DEFINE(mScript, M_TEST_SUITE_DEFINE(mScript,
cmocka_unit_test(voidArgs), cmocka_unit_test(voidArgs),
cmocka_unit_test(voidFunc), cmocka_unit_test(voidFunc),
@ -1295,4 +1342,6 @@ M_TEST_SUITE_DEFINE(mScript,
cmocka_unit_test(stringIsHello), cmocka_unit_test(stringIsHello),
cmocka_unit_test(stringIsNotHello), cmocka_unit_test(stringIsNotHello),
cmocka_unit_test(invokeList), cmocka_unit_test(invokeList),
cmocka_unit_test(nullString),
cmocka_unit_test(nullStruct),
) )