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/bench/many_call_in_arg_pos.c | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 test/external/metalang99/bench/many_call_in_arg_pos.c (limited to 'test/external/metalang99/bench/many_call_in_arg_pos.c') diff --git a/test/external/metalang99/bench/many_call_in_arg_pos.c b/test/external/metalang99/bench/many_call_in_arg_pos.c new file mode 100644 index 0000000..712738f --- /dev/null +++ b/test/external/metalang99/bench/many_call_in_arg_pos.c @@ -0,0 +1,10 @@ +#include + +#define F_IMPL(x) v(x) + +#define CALL ML99_call(F, ML99_call(F, ML99_call(F, v(~~~~~)))) +#define _5 CALL, CALL, CALL, CALL, CALL +#define _10 _5, _5 +#define _100 _10, _10, _10, _10, _10, _10, _10, _10, _10, _10 + +ML99_EVAL(_100) -- cgit v1.2.3