(map macroexpand [`(let [x 10] x) `(let [x# 10] x#) `(let [~'x 10] ~'x)])

((clojure.core/let [user/x 10] user/x)
  (clojure.core/let [x__1003499__auto__ 10] x__1003499__auto__)
  (clojure.core/let [x 10] x))

(let [a :foo]
  (prn a)
  (let [a :bar] (prn a)))

nil

":foo\n:bar\n"

(let [b 2] `(let [a 1] `(~a ~~b)))

(clojure.core/let [user/a 1]
  (clojure.core/sequence (clojure.core/seq (clojure.core/concat
                                             (clojure.core/list user/a)
                                             (clojure.core/list 2)))))

(let [a 2] a)

2

(let [do 3] do)

3

(let [foo "hello"] foo)

"hello"

(let [] (def x 2))

#'user/x

(let [x 1] x)

1

(let [[v] [1]] v)

1

(let [a (str 1)])

nil

(let [foo3bar 4] foo3bar)

4

(let [do 1] (do))

nil

(let [..] (def ..))

#'user/..

(let [x# 3] x#)

3

(let [>.> :-D] >.>)

:-D

(let [map 1] #'map)

1

(let [x# 100] nil)

nil

(let [tiger (atom ["elin"])])

nil

(let [f +] (f))

0

(let [-> 8] ->)

8

(let [foo 'bar] ``~foo)

user/foo

(let [_ 1] _)

1

(let [⠠⠓⠑⠇⠇⠕ "hi"] ⠠⠓⠑⠇⠇⠕)

"hi"

(let [a 1] #'a)

1

(let []
  3
  4
  5)

5

(let [sym 'ap] `~'sym)

sym

(let [2])

nil

(let [] (+ 1 2))

3

(let [sym `obj#] sym)

obj__3037607__auto__

(let [+ 5] +)

5

(let [o_O :-D] o_O)

:-D

(let [x 0] x)

0

(let [pmap 42] 42)

42

(let [sym 'ap] `'~sym)

(quote ap)

(let [  10]  )

10

(let [a 1] 2)

2

(let [· 0] ·)

0

(let [x# 1] x#)

1

(let (x 1) 1)

1

(let [map 1] map)

1

(let [?1+1=2 5] ?1+1=2)

5

(let [r# 1] r#)

1

(let [key {:key map}])

nil

(let [a 1] 1.0)

1.0

(let [x?y?z 1] x?y?z)

1

(let [x (double 2.0)])

nil

(let [foo:bar 42] foo:bar)

42

(let [a'a'a'a' 1] a'a'a'a')

1

(let [a +] `a)

user/a

(let [do "`fogus"] do)

"`fogus"