add testsuite macro

Author: lkdvos

test/testsuite/TestSuite.jl

@@ -8,4 +8,18 @@ Suite of tests that may be used for all packages inheriting from MatrixAlgebraKi
 """
 module TestSuite
 
+const tests = Dict()
+
+macro testsuite(name, ex)
+    safe_name = lowercase(replace(replace(name, " " => "_"), "/" => "_"))
+    fn = Symbol("test_", safe_name)
+    return quote
+        $(esc(fn))(AT; eltypes = supported_eltypes(AT, $(esc(fn)))) = $(esc(ex))(AT, eltypes)
+        @assert !haskey(tests, $name) "testsuite already exists"
+        tests[$name] = $fn
+    end
+end
+
+end
+
 end