Add tests for M_KEYWORD_TO_VA_ARGS

This commit is contained in:
Patrick Pelissier committed 2022-04-17 19:01:32 +02:00
1 parent 5c98d47d8c
commit ffa3821acf
1 file changed
+5
+5
View File
@@ -411,6 +411,11 @@ static void test_test(void)
assert(M_KEYWORD_P(LIST, LIST(1,23,4) )); assert(M_KEYWORD_P(LIST, LIST(1,23,4) ));
assert(!M_KEYWORD_P(LIST, SEQ(1,23,4) )); assert(!M_KEYWORD_P(LIST, SEQ(1,23,4) ));
assert(M_KEYWORD_TO_VA_ARGS(LIST, LIST(16)) == 16);
assert(M_KEYWORD_TO_VA_ARGS(LIST, LIST(14)) == 14);
assert(M_GET_AT( ( M_KEYWORD_TO_VA_ARGS(LIST, LIST(11, 22, 33)) ), 0) == 11);
assert(M_GET_AT( ( M_KEYWORD_TO_VA_ARGS(LIST, LIST(11, 22, 33)) ), 1) == 22);
assert(M_GET_AT( ( M_KEYWORD_TO_VA_ARGS(LIST, LIST(11, 22, 33)) ), 2) == 33);
} }
static void test_list(void) static void test_list(void)