From 9bf0706e06d3f4f187eed7fc97272c8932590db7 Mon Sep 17 00:00:00 2001 From: davidnolen Date: Tue, 4 Jun 2024 14:20:48 -0400 Subject: [PATCH] test demonstrating that single segment namespaces by themselves are not a problem --- src/test/cljs/cljs/macro_test.cljs | 8 ++++++-- src/test/cljs/single_seg_macros.clj | 4 ++++ 2 files changed, 10 insertions(+), 2 deletions(-) create mode 100644 src/test/cljs/single_seg_macros.clj diff --git a/src/test/cljs/cljs/macro_test.cljs b/src/test/cljs/cljs/macro_test.cljs index ed433e4f68..6c7354d56c 100644 --- a/src/test/cljs/cljs/macro_test.cljs +++ b/src/test/cljs/cljs/macro_test.cljs @@ -8,9 +8,10 @@ (ns cljs.macro-test (:refer-clojure :exclude [==]) - (:require [cljs.test :refer-macros [deftest is]]) + (:require [cljs.test :as test :refer-macros [deftest is]]) (:use-macros [cljs.macro-test.macros :only [== sm-cljs-3027]]) - (:require-macros [cljs.macro-test.cljs2852])) + (:require-macros [cljs.macro-test.cljs2852] + [single-seg-macros])) (deftest test-macros (is (= (== 1 1) 2))) @@ -31,3 +32,6 @@ (deftest test-cljs-3027 (is (= {"a" "b"} (sm-cljs-3027)))) + +(deftest test-cljs-3413 + (is (= 5 (single-seg-macros/test-macro 2 3)))) diff --git a/src/test/cljs/single_seg_macros.clj b/src/test/cljs/single_seg_macros.clj new file mode 100644 index 0000000000..679f07fd9a --- /dev/null +++ b/src/test/cljs/single_seg_macros.clj @@ -0,0 +1,4 @@ +(ns single-seg-macros) + +(defmacro test-macro [a b] + `(+ ~a ~b))