diff options
| -rw-r--r-- | src/boot.clj | 3 | ||||
| -rw-r--r-- | src/jvm/clojure/lang/RT.java | 4 |
2 files changed, 3 insertions, 4 deletions
diff --git a/src/boot.clj b/src/boot.clj index dce1554c..cd535d05 100644 --- a/src/boot.clj +++ b/src/boot.clj @@ -1148,7 +1148,7 @@ into [to from] array [& items] (into-array items)) -(defn #^{:private true} +(defn make-proxy [classes method-map] (. java.lang.reflect.Proxy (newProxyInstance (. (identity clojure.lang.Compiler) (getClassLoader)) @@ -1981,7 +1981,6 @@ defn- [name & decls] (list* `defn (with-meta name (assoc (meta name) :private true)) decls)) (defn -#^{:private true} print-doc [v] (println "-------------------------") (println (str (ns-name (:ns ^v)) "/" (:name ^v))) diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java index 48896267..58ed95ad 100644 --- a/src/jvm/clojure/lang/RT.java +++ b/src/jvm/clojure/lang/RT.java @@ -465,8 +465,8 @@ static public Object contains(Object coll, Object key){ int n = ((Number) key).intValue(); return n >= 0 && n < count(coll); } - - throw new UnsupportedOperationException("contains not supported on this type"); + return F; + //throw new UnsupportedOperationException("contains not supported on this type"); } static public Object find(Object coll, Object key){ |