Reformatting for consistency

This commit is contained in:
Aaron Bedra 2011-10-25 22:55:54 -04:00
parent dd232703af
commit 3cca560b96
12 changed files with 47 additions and 58 deletions

View File

@ -27,5 +27,4 @@
"When your expectations are aligned with reality things, proceed that way" "When your expectations are aligned with reality things, proceed that way"
(= :fin (do (= :fin (do
(compare-and-set! __ __ __) (compare-and-set! __ __ __)
@atomic-clock)) @atomic-clock)))
)

View File

@ -44,4 +44,3 @@
"But admit it when you don't know what to do" "But admit it when you don't know what to do"
(= __ (= __
(explain-defcon-level :yo-mama))) (explain-defcon-level :yo-mama)))

View File

@ -1,7 +1,6 @@
(defn square [x] (* x x)) (defn square [x] (* x x))
(meditations (meditations
"One may know what they seek by knowing what they do not seek" "One may know what they seek by knowing what they do not seek"
(= [__ __ __] (let [not-a-symbol? (complement symbol?)] (= [__ __ __] (let [not-a-symbol? (complement symbol?)]
(map not-a-symbol? [:a 'b "c"]))) (map not-a-symbol? [:a 'b "c"])))
@ -31,4 +30,3 @@
"Be careful about the order in which you mix your functions" "Be careful about the order in which you mix your functions"
(= 99 (let [square-and-dec ___] (= 99 (let [square-and-dec ___]
(square-and-dec 10)))) (square-and-dec 10))))

View File

@ -42,4 +42,3 @@
"Surely we can implement our own by now" "Surely we can implement our own by now"
(= "You're really the Worst Picture, Final Destination 5... sorry." (= "You're really the Worst Picture, Final Destination 5... sorry."
(with-out-str (present (Razzie. "Worst Picture") "Final Destination 5")))) (with-out-str (present (Razzie. "Worst Picture") "Final Destination 5"))))

View File

@ -38,5 +38,4 @@
"All together now!" "All together now!"
(= "Test Testerson, 123 Test Lane, Testerville, TX" (= "Test Testerson, 123 Test Lane, Testerville, TX"
(___ ["Test" "Testerson"] test-address)) (___ ["Test" "Testerson"] test-address)))
)

View File

@ -22,7 +22,6 @@
(r-infix ~first-arg) (r-infix ~first-arg)
(r-infix ~others))))) (r-infix ~others)))))
(meditations (meditations
"Macros are like functions created at compile time" "Macros are like functions created at compile time"
(= __ (hello "Macros!")) (= __ (hello "Macros!"))
@ -41,4 +40,3 @@
"Really, you dont understand recursion until you understand recursion" "Really, you dont understand recursion until you understand recursion"
(= 36 (r-infix (10 + (2 * 3) + (4 * 5))))) (= 36 (r-infix (10 + (2 * 3) + (4 * 5)))))

View File

@ -48,4 +48,3 @@
"Or the values" "Or the values"
(= (list "Sochi" "Torino" __) (= (list "Sochi" "Torino" __)
(sort (vals {2006 "Torino" 2010 "Vancouver" 2014 "Sochi"})))) (sort (vals {2006 "Torino" 2010 "Vancouver" 2014 "Sochi"}))))

View File

@ -37,4 +37,3 @@
(alter the-world assoc :jerry "Real Jerry") (alter the-world assoc :jerry "Real Jerry")
(alter bizarro-world assoc :jerry "Bizarro Jerry") (alter bizarro-world assoc :jerry "Bizarro Jerry")
__)))) __))))

View File

@ -16,4 +16,3 @@
"But don't forget about the difference" "But don't forget about the difference"
(= __ (clojure.set/difference #{1 2 3 4 5} #{2 3 5}))) (= __ (clojure.set/difference #{1 2 3 4 5} #{2 3 5})))