add metalang99 testsuite (preprocessor stress testing)

1 files changed, 51 insertions, 0 deletions

diff --git a/test/external/metalang99/tests/metalang99.c b/test/external/metalang99/tests/metalang99.c
new file mode 100644
index 0000000..b469885
--- /dev/null
+++ b/test/external/metalang99/tests/metalang99.c
@@ -0,0 +1,51 @@
+#include <metalang99.h>
+#include <metalang99/assert.h>
+
+int main(void) {
+
+#undef ML99_MAJOR
+#undef ML99_MINOR
+#undef ML99_PATCH
+
+#define ML99_MAJOR 1
+#define ML99_MINOR 2
+#define ML99_PATCH 3
+
+    // ML99_VERSION_COMPATIBLE
+    {
+
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 0, 0));
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 1, 0));
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 1, 1));
+
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 2, 0));
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 2, 1));
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 2, 2));
+        ML99_ASSERT_UNEVAL(ML99_VERSION_COMPATIBLE(1, 2, 3));
+
+        // Major-incompatible.
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_COMPATIBLE(2, 0, 0));
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_COMPATIBLE(7, 1, 2));
+
+        // Minor-incompatible.
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_COMPATIBLE(1, 3, 0));
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_COMPATIBLE(1, 4, 9));
+
+        // Patch-incompatible.
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_COMPATIBLE(1, 2, 4));
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_COMPATIBLE(1, 2, 5));
+    }
+
+    // ML99_VERSION_EQ
+    {
+        ML99_ASSERT_UNEVAL(ML99_VERSION_EQ(1, 2, 3));
+
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_EQ(1, 2, 7));
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_EQ(1, 7, 3));
+        ML99_ASSERT_UNEVAL(!ML99_VERSION_EQ(7, 2, 3));
+    }
+
+#undef ML99_MAJOR
+#undef ML99_MINOR
+#undef ML99_PATCH
+}