summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDrew Raines <aaraines@gmail.com>2009-07-24 07:08:03 -0500
committerRich Hickey <richhickey@gmail.com>2009-11-24 08:04:14 -0500
commitebf6a66ba96c6d6e696bdf58200bfdd26253ab09 (patch)
treeb86f1b586b0bf2e45103532bf3fc7faae760379e
parent1b4852fdbd5ca8df86e783e417f01c8db226d428 (diff)
Add char? fn to test for Character.
Signed-off-by: Rich Hickey <richhickey@gmail.com>
-rw-r--r--src/clj/clojure/core.clj5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj
index 823c65f8..1dbfe163 100644
--- a/src/clj/clojure/core.clj
+++ b/src/clj/clojure/core.clj
@@ -115,6 +115,11 @@
(def
#^{:arglists '([x])
+ :doc "Return true if x is a Character"}
+ char? (fn char? [x] (instance? Character x)))
+
+(def
+ #^{:arglists '([x])
:doc "Return true if x is a String"}
string? (fn string? [x] (instance? String x)))