(let [x. (fn [] "x")] (x.))

"x"

(let [foo 5] (var foo))

5

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

[a 1]

(let [&rest 1] [rest &rest])

[#object [clojure.core$rest__5453 0x454d6aa9 "clojure.core$rest__5453@454d6aa9"]
 1]

(let [#^float f 7] f)

7

(let [f 'print] (f "hello"))

nil

(let [a {}] (meta ^:a a))

nil

(let [[a & b] []] 0)

0

(let [x (float 2.4)] x)

2.4

(let [f (fn [x] x)])

nil

(let []
  (-> 3
      (+ 2)))

5

(let [] (+ 1 2 3))

6

(let [x (inc 1)] x)

2

(let [foo# 34] (inc foo#))

35

(let [foo 'bar] (ns foo))

nil

(let [^String x []] (meta x))

nil

(let [++ inc] (++ 1))

2

(let [x 1] `(~x))

(1)

(let [v 'test] `(~'~v))

((clojure.core/unquote v))

(let [x 3] (class x))

java.lang.Long

(let [_1+ inc] (_1+ 7))

8

(let [[x y] [1 2]])

nil

(macroexpand-1 '(let [[x] []] x))

(let [[x] []] x)

(let [a 3 b 4])

nil

(let [f (let [c (atom 0)] (fn [] (swap! c inc)))] (println (f) (f)))

nil

"1 2\n"

(let [f (fn [a] (let [list [1 2 3]] (a list)))] (f list))

([1 2 3])

(= (let [x (first [1 2 3])] x) (let [[x]] [1 2 3]))

false

(let [l '(1 2 3)] (let [[a & [b]] l] [a b]))

[1 2]

(let [do 10] #{do})

#{10}

(let [a 1 b 2])

nil

(let [^Foo x 1] x)

1

(-> [a 1]
    (let a))

1

(let [gsym (gensym 'bar)] `~gsym)

bar98580

(let [x (println "hello")] x)

nil

"hello\n"

(let [[a b] nil] a)

nil

(let [do inc] (do 1))

1

(let [a 1 b 2])

nil

(let [f (fn [] 3)] (f))

3

(let [x 1] (prn '~x))

nil

"(clojure.core/unquote x)\n"

(let [x 5] (prn x))

nil

"5\n"

(let [fn list] (fn [] 5))

([] 5)

(let [do 5] (do do))

5

(let [foo "foo"] (str foo "bar"))

"foobar"

(let [[head & tail] nil])

nil

(let [sym (gensym 'obj)] sym)

obj3284842

(let [a 5 c] a)

5

(let [pattern "foo\nbar"] (re-pattern pattern))

#"foo
bar"

(let [[a b c] []] a)

nil

(let [bla (new Integer 320409)])

nil

(let [String 1] (println String))

nil

"1\n"