(namespace test (def target (lookup __test__ null)) (defmacro if-target [then] (if-eq (test.target null) :null (seq $%%))) (defmacro case [name] (test.if-target (builtins.errors.try (scope $%& (trace "Running test \"" $name "\": OK ✅")) #(trace "Running test \"" $name "\": FAILED ❌ (" %2 ": " %1 ")")))) (defmacro space [name] (if (bool.or (eq? test.target $name) (eq? test.target ".")) (namespace $name (seq $%&)) )) )