* src/clj/cljs/core.clj: add coercive-not

clojure · May 3, 2012 · 17a22ac · 17a22ac
1 parent 2cd15f8
commit 17a22ac
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/clj/cljs/core.clj b/src/clj/cljs/core.clj
@@ -54,6 +54,10 @@
 (defmacro nil? [x]
   `(coercive-= ~x nil))
 
+;; internal - do not use.
+(defmacro coercive-not [x]
+  (bool-expr (list 'js* "(!~{})" x)))
+
 ;; internal - do not use.
 (defmacro coercive-not= [x y]
   (bool-expr (list 'js* "(~{} != ~{})" x y)))