File tree

2 files changed

+10
-1
lines changed

2 files changed

+10
-1
lines changed
Original file line numberDiff line numberDiff line change
@@ -4668,7 +4668,7 @@ reduces them without incurring seq initialization"
46684668
{:added "1.2"
46694669
:static true}
46704670
([m ks]
4671-
(get-in m ks nil))
4671+
(reduce get m ks))
46724672
([m ks not-found]
46734673
(loop [sentinel lookup-sentinel
46744674
m m
Original file line numberDiff line numberDiff line change
@@ -3111,6 +3111,15 @@
31113111
(deftest test-cljs-1569
31123112
(is (= (meta (with-meta (seq [1 2 3]) {:a 1})) {:a 1})))
31133113

3114+
(deftest test-cljs-1420
3115+
(is (= :2-arity
3116+
(get-in
3117+
(reify
3118+
ILookup
3119+
(-lookup [o k] :2-arity)
3120+
(-lookup [o k not-found] :3-arity))
3121+
[:foo]))))
3122+
31143123

31153124
(comment
31163125
;; ObjMap

0 commit comments

Comments
 (0)