Fix upcall stubs not compiling with non-primitive argument types

This commit is contained in:
Joshua Suskalo 2021-09-30 15:25:58 -05:00
parent 3043bf7877
commit 50cc6f3bdc
2 changed files with 2 additions and 1 deletions

View file

@ -3,6 +3,7 @@ All notable changes to this project will be documented in this file. This change
## [Unreleased]
### Fixed
- Upcall stubs with non-primitive arguments failed to compile
- Upcall stubs had incorrect types
## [0.1.176] - 2021-09-29

View file

@ -320,7 +320,7 @@
[:getfield :this "upcall_ifn" IFn]
(map-indexed
(fn [idx arg]
[[(load-instructions arg) (inc idx)]
[[(load-instructions arg :aload) (inc idx)]
(to-object-asm arg)])
arg-types)
[:invokeinterface IFn "invoke" (repeat (inc (count arg-types)) Object)]