(list `(let …))
((clojure.core/let user/…))
(let [x 15] `x)
user/x
(let [{:keys [whatev]} map])
nil
(let [&$!# '<foo>] &$!#)
<foo>
(let [do 5] [do])
[5]
(let [& 1] &)
1
(let [let* 5] let*)
5
(let [ping "pong"] ping)
"pong"
(let [a 0] a)
0
(let (x 1) x)
1
(let [x 5] x)
5
(let [. :not-ok] .)
:not-ok
(let [… 42] …)
42
(let [added-1.5 2] added-1.5)
2
(let [when 5] when)
5
(let [x "foo"] #'x)
"foo"
(let [x] (print 'x))
nil
"x"
(let [. 1] .)
1
(let [x 3] x)
3
(let [+ 3] +)
3
(let [ಠ_ಠ 3] ಠ_ಠ)
3
(let [... 42] ...)
42
(let [a +] 'a)
a
(let [x 10] x)
10
(let [m 1] ({} m))
nil
(let [foo# 1] foo#)
1
(let [+ *] (+))
1
(let [無 0] 無)
0
(let [x "hai"] x)
"hai"
(let [pr-str+spit 1] pr-str+spit)
1
(let [sym (gensym)] `~sym)
G__1246349
(let [boing (atom nil)])
nil
(let [x 42] x)
42
(let [do 1] do)
1
(let [-> 5] ->)
5
(let [a [:b :c]])
nil
(let [テ 1] テ)
1
(let [foo 5] #'foo)
5
(let [x nil] x)
nil
(let [*14-days* 14] 10)
10
(let [v 1] v)
1
(macroexpand-1 '`(let 1))
(clojure.core/sequence (clojure.core/seq (clojure.core/concat (clojure.core/list (quote clojure.core/let)) (clojure.core/list 1))))
(let [tel 1 let 2] (print (quote whatever)) ''((revetahw etouq) tnirp) [2 tel 1 let] tel)
1
"whatever"
(let [v [1 2]] (let [[x y] v] (+ x y)))
3
(let [f (let [x 100] #(+ x %))] (f 42))
142
(let [a 1] (let [b (inc a) a :parrot] [b a]))
[2 :parrot]
(let [y 1] (eval `(let [x# ~y] (+ 1 x#))))
2
(defmacro foo [] (let [x (gensym)] `(let [~x 1] (inc ~x))))
#'user/foo
(= (let [do 1] (println do) do) (let [do 1] do))
true
"1\n"
(let [a 1] (let [b (inc a) a 1] [b a]))
[2 1]