Solution to 4.30. Extremely enlightening!

[sicp.git] / src / sicp / ex2_55.clj

diff --git a/src/sicp/ex2_55.clj b/src/sicp/ex2_55.clj
index f3e70418a0e492faba6f7b18c6d33ada9b25aab2..6bc1d86df8840b72b3fa687a1ea43ae449e8086a 100644 (file)
--- a/src/sicp/ex2_55.clj
+++ b/src/sicp/ex2_55.clj
@@ -3,4 +3,10 @@
 
 (deftest test-double-quote
   (is [= (first ''abracadabra)
-         'quote]))
\ No newline at end of file
+         'quote]))
+
+(comment
+  "(first ''abcde) expands to (first (quote (quote (abcde)))
+  which is (quote (abcde)), first of which is quote. The outer
+  quote makes the inner quote a symbol and does not evaluate it." 
+  )
\ No newline at end of file