Fix SCI#649 aget reflection (#1100)

Fix issue with aget reported in babashka/sci#649 by @MrEbbinghaus
This commit is contained in:
Michiel Borkent 2021-12-09 22:38:38 +01:00 committed by GitHub
parent 48cf9671e1
commit 73d466e7d6
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
3 changed files with 7 additions and 2 deletions

View file

@ -54,7 +54,7 @@
{:extra-paths ["process/src" "process/test" "test-resources/lib_tests"]
:extra-deps {org.clj-commons/clj-http-lite {:mvn/version "0.4.392"}
org.babashka/spec.alpha {:git/url "https://github.com/babashka/spec.alpha"
:sha "5012f0b11f0b59c928423982566c1e12b67f3ed1"}
:sha "0dec1f88cbde74a0470b454396f09a03adb4ae39"}
lambdaisland/regal {:git/url "https://github.com/lambdaisland/regal"
:sha "f902d2c43121f9e1c48603d6eb99f5900eb6a9f6"}
weavejester/medley {:git/url "https://github.com/weavejester/medley"

View file

@ -87,7 +87,9 @@
{:methods [{:name "applyTo"}]}
clojure.lang.MultiFn
{:fields [{:name "dispatchFn"}]
:methods [{:name "getMethod"}]}})
:methods [{:name "getMethod"}]}
clojure.lang.RT
{:methods [{:name "aget"}]}})
(def custom-map
(cond->

View file

@ -806,6 +806,9 @@ true")))
(java.net.PasswordAuthentication. "bork"
(char-array "dude")))))))))))
(deftest aget-test
(is (= 1 (bb nil "(def array-2d (into-array [(int-array [1 2]) (int-array [3 4])])) (aget array-2d 0 0)"))))
;;;; Scratch
(comment