Add sample clojure files

2022-02-02 23:07:11 +07:00 · 2022-02-02 23:07:11 +07:00 · 34a1946197
parent 0eba3ecabe
commit 34a1946197
2 changed files with 14 additions and 0 deletions
--- a/sample_files/clojure_after.clj
+++ b/sample_files/clojure_after.clj
@ -0,0 +1,7 @@
+;; Example from Autochrome, under EPL-1.0 license.
+
+(defn example
+  [x]
+  (-> {:more (inc x)
+       :less (dec x)}
+      (assoc :twice (+ x x)))
--- a/sample_files/clojure_before.clj
+++ b/sample_files/clojure_before.clj
@ -0,0 +1,7 @@
+;; Example from Autochrome, under EPL-1.0 license.
+
+(defn example
+  [x]
+  (println "hello!")
+  {:more (inc x)
+   :less (dec x)})