assert sexpr count without actually creating them.

clj-commons · Jan 16, 2015 · 9fb553d · 9fb553d
1 parent 9581fb2
commit 9fb553d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/rewrite_clj/node/protocols.clj b/src/rewrite_clj/node/protocols.clj
@@ -101,7 +101,7 @@
 (defn ^:no-doc assert-sexpr-count
   [nodes c]
   (assert
-    (= (count (sexprs nodes)) c)
+    (= (count (remove printable-only? nodes)) c)
     (format "can only contain %d non-whitespace form%s."
             c (if (= c 1) "" "s"))))