From f58748ebbe677ef574a92b04c46b309fd16acbf7 Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Sat, 13 Mar 2021 11:18:53 +0100 Subject: [PATCH] Remove proxy-super --- src/babashka/impl/proxy.clj | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/src/babashka/impl/proxy.clj b/src/babashka/impl/proxy.clj index a859c53d..ad8d8873 100644 --- a/src/babashka/impl/proxy.clj +++ b/src/babashka/impl/proxy.clj @@ -12,12 +12,8 @@ (case (.getName ^Class class) "clojure.lang.APersistentMap" (proxy [clojure.lang.APersistentMap] [] - (iterator [] (if-let [m (get methods 'iterator)] - (m) - (proxy-super iterator))) ;; TODO: should we call proxy-super as a fallback always? - (containsKey [k] (if-let [m (get methods 'containsKey)] - (m k) - (proxy-super containsKey k))) + (iterator [] ((method-or-bust methods 'iterator))) + (containsKey [k] ((method-or-bust methods 'containsKey) k)) (entryAt [k] ((method-or-bust methods 'entryAt) k)) (valAt ([k] ((method-or-bust methods 'valAt) k))