From 6a58ce286a6acd85fede5452ec7b784e58788fce Mon Sep 17 00:00:00 2001
From: Chris Allen <cma@bitemyapp.com>
Date: Wed, 30 Jan 2013 00:22:09 -0800
Subject: [PATCH] tinsel results

---
 README.md                                |  6 ++++++
 src/clojure_template_benchmarks/core.clj | 13 ++-----------
 2 files changed, 8 insertions(+), 11 deletions(-)

diff --git a/README.md b/README.md
index 5524826..2b5b173 100644
--- a/README.md
+++ b/README.md
@@ -52,6 +52,12 @@ Units are in microseconds (us)
       <td>38 us / 0.943 us</td>
       <td>784 us / 16 us</td>
     </tr>
+    <tr>
+      <td>tinsel</td>
+      <td>0.0052 us / 0.00017 us</td>
+      <td>1,100 us / 52 us</td>
+      <td>22,000 us / 770 us</td>
+    </tr>
 
 </table>
 
diff --git a/src/clojure_template_benchmarks/core.clj b/src/clojure_template_benchmarks/core.clj
index 7073aa5..b807d3c 100644
--- a/src/clojure_template_benchmarks/core.clj
+++ b/src/clojure_template_benchmarks/core.clj
@@ -56,15 +56,8 @@
   (stencil/render-file "clojure_template_benchmarks/templates/list.mustache" {:items (range 1 ceil)}))
 
 
-(deftemplate simple-tinsel [[:span {:class "foo"}]]
-  []
-  (set-content bar))
-
-(deftemplate list-tinsel [[:ul]]
-  [ceil]
-  (set-content (for [x (range 1 ceil)]
-                 [:li x])))
-
+(deftemplate simple-tinsel [[:span {:class "foo"}]] [] (has-class? "foo") (set-content "bar"))
+(deftemplate list-tinsel [[:ul]] [ceil] (tag= :ul) (set-content (for [x (range 1 ceil)] [:li x])))
 
 (defn -main [& args]
   ;; (println (simple-hiccup))
@@ -120,8 +113,6 @@
   ;; (with-progress-reporting (quick-bench (list-stencil 1000)))
   ;; (println "\n --- \n")
 
-  (println (simple-tinsel))
-  (println (list-tinsel 50))
   (println "\n\n ***** tinsel ***** \n\n")
   (with-progress-reporting (quick-bench (simple-tinsel)))
   (println "\n --- \n")