From 874593bae9cf6c05584364457f0d7bdcc63f1700 Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Sat, 6 Mar 2021 16:02:41 +0100 Subject: [PATCH] Add clojure.lang.Associative --- src/babashka/impl/classes.clj | 3 ++- src/babashka/impl/reify.clj | 5 ++++- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/src/babashka/impl/classes.clj b/src/babashka/impl/classes.clj index 260f15a8..c1eb8feb 100644 --- a/src/babashka/impl/classes.clj +++ b/src/babashka/impl/classes.clj @@ -249,7 +249,8 @@ :methods [borkdude.graal.LockFix] ;; support for locking :fields [clojure.lang.PersistentQueue] - :instance-checks [clojure.lang.Atom + :instance-checks [clojure.lang.Associative + clojure.lang.Atom clojure.lang.Cons clojure.lang.Cycle clojure.lang.IObj diff --git a/src/babashka/impl/reify.clj b/src/babashka/impl/reify.clj index ceae6bcd..b5718e3b 100644 --- a/src/babashka/impl/reify.clj +++ b/src/babashka/impl/reify.clj @@ -86,4 +86,7 @@ [this a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 a14 a15 a16 a17 a18] [this a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 a14 a15 a16 a17 a18 a19] [this a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 a14 a15 a16 a17 a18 a19 a20] - [this a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 a14 a15 a16 a17 a18 a19 a20 varargs]]}})) + [this a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 a14 a15 a16 a17 a18 a19 a20 varargs]]} + clojure.lang.Associative {containsKey [[this k]] + entryAt [[this k]] + assoc [[this k v]]}}))