diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/stepA_more.mal | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/tests/stepA_more.mal b/tests/stepA_more.mal index aac1bac..abca165 100644 --- a/tests/stepA_more.mal +++ b/tests/stepA_more.mal @@ -232,6 +232,16 @@ (meta (with-meta [1 2 3] {"a" 1})) ;=>{"a" 1} +(meta (with-meta (list 1 2 3) {"a" 1})) +;=>{"a" 1} + +(meta (with-meta {"abc" 123} {"a" 1})) +;=>{"a" 1} + +;;; Not actually supported by Clojure +;;;(meta (with-meta (atom 7) {"a" 1})) +;;;;=>{"a" 1} + (def! lst (with-meta [4 5 6] {"b" 2})) ;=>[4 5 6] @@ -239,9 +249,9 @@ (meta f-wm) ;=>{"abc" 1} -(def! f-wm2 ^"str meta" (fn* [a] (+ 1 a))) +(def! f-wm2 ^{"abc" 1} (fn* [a] (+ 1 a))) (meta f-wm2) -;=>"str meta" +;=>{"abc" 1} ;; |