diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/core.clj | 5 | ||||
| -rw-r--r-- | src/jvm/clojure/lang/ASeq.java | 2 |
2 files changed, 4 insertions, 3 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index 56db96b3..397ca177 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -3154,8 +3154,9 @@ (defn empty "Returns an empty collection of the same category as coll, or nil" - [#^clojure.lang.IPersistentCollection coll] - (.empty coll)) + [coll] + (when (instance? clojure.lang.IPersistentCollection coll) + (.empty #^clojure.lang.IPersistentCollection coll))) (defmacro amap "Maps an expression across an array a, using an index named idx, and diff --git a/src/jvm/clojure/lang/ASeq.java b/src/jvm/clojure/lang/ASeq.java index cb38bb6d..73f88da7 100644 --- a/src/jvm/clojure/lang/ASeq.java +++ b/src/jvm/clojure/lang/ASeq.java @@ -20,7 +20,7 @@ public String toString(){ }
public IPersistentCollection empty(){
- return null;
+ return PersistentList.EMPTY;
}
protected ASeq(IPersistentMap meta){
|