diff options
| author | Rich Hickey <richhickey@gmail.com> | 2007-12-20 11:52:37 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2007-12-20 11:52:37 +0000 |
| commit | bce22e39c40c65cd0b4d97c813beba0d98f2339d (patch) | |
| tree | a7a5f307a8007364603186e5b168f1cf8a61b193 /src | |
| parent | c08a9a4879a9cdc1530bea3d37c09f0aed09e251 (diff) | |
made (str nil) return empty string
Diffstat (limited to 'src')
| -rw-r--r-- | src/boot.clj | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/boot.clj b/src/boot.clj index 8094e2b3..4064281d 100644 --- a/src/boot.clj +++ b/src/boot.clj @@ -77,7 +77,8 @@ (defn eql? [x y] (. clojure.lang.RT (equal x y))) -(defn str [#^Object x] (. x (toString))) +(defn str [#^Object x] + (if x (. x (toString)) "")) (defn strcat [x & ys] (let [#^String s (str x)] |