src/sicp/ex2_55.clj

   1 (ns sicp.ex2_55
   2   (:use [clojure.test]))
   3
   4 (deftest test-double-quote
   5   (is [= (first ''abracadabra)
   6          'quote]))
   7
   8 (comment
   9   "(first ''abcde) expands to (first (quote (quote (abcde)))
  10   which is (quote (abcde)), first of which is quote. The outer
  11   quote makes the inner quote a symbol and does not evaluate it."
  12   )