summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/clojure/boot.clj10
1 files changed, 9 insertions, 1 deletions
diff --git a/src/clojure/boot.clj b/src/clojure/boot.clj
index 1c53114e..04e7e61a 100644
--- a/src/clojure/boot.clj
+++ b/src/clojure/boot.clj
@@ -2243,24 +2243,28 @@ not-every? (comp not every?))
(defn pr-str
"pr to a string, returning it"
+ {:tag String}
[& xs]
(with-out-str
(apply pr xs)))
(defn prn-str
"prn to a string, returning it"
+ {:tag String}
[& xs]
(with-out-str
(apply prn xs)))
(defn print-str
"print to a string, returning it"
+ {:tag String}
[& xs]
(with-out-str
(apply print xs)))
(defn println-str
"println to a string, returning it"
+ {:tag String}
[& xs]
(with-out-str
(apply println xs)))
@@ -2712,4 +2716,8 @@ not-every? (comp not every?))
(send-off agt fill)
(lazy-cons (if (identical? x NIL) nil x) (drain))))))]
(send-off agt fill)
- (drain)))) \ No newline at end of file
+ (drain))))
+
+(defn class?
+ "Returns true if x is an instance of Class"
+ [x] (instance? Class x)) \ No newline at end of file