From 052144cabb126efe925a96f8a0597a0f2005d206 Mon Sep 17 00:00:00 2001 From: lemon Date: Mon, 23 Feb 2026 20:36:05 +0100 Subject: add metalang99 testsuite (preprocessor stress testing) --- test/external/metalang99/tests/assert.c | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 test/external/metalang99/tests/assert.c (limited to 'test/external/metalang99/tests/assert.c') diff --git a/test/external/metalang99/tests/assert.c b/test/external/metalang99/tests/assert.c new file mode 100644 index 0000000..44033cb --- /dev/null +++ b/test/external/metalang99/tests/assert.c @@ -0,0 +1,19 @@ +#include + +// This is used to check that `1 == 1` is put into parentheses automatically. +#define COND 1 == 1 + +ML99_EVAL(ML99_assert(v(COND))); +ML99_EVAL(ML99_assertEq(v(COND), v(COND))); + +ML99_ASSERT(v(COND)); +ML99_ASSERT_EQ(v(COND), v(COND)); + +ML99_ASSERT_UNEVAL(COND); + +#undef COND + +ML99_ASSERT_EMPTY(v()); +ML99_ASSERT_EMPTY_UNEVAL(); + +int main(void) {} -- cgit v1.2.3