Fix upcall stubs having incorrect type descriptors
This commit is contained in:
parent
6065835e51
commit
3043bf7877
2 changed files with 7 additions and 2 deletions
|
|
@ -1,6 +1,10 @@
|
||||||
# Change Log
|
# Change Log
|
||||||
All notable changes to this project will be documented in this file. This change log follows the conventions of [keepachangelog.com](http://keepachangelog.com/).
|
All notable changes to this project will be documented in this file. This change log follows the conventions of [keepachangelog.com](http://keepachangelog.com/).
|
||||||
|
|
||||||
|
## [Unreleased]
|
||||||
|
### Fixed
|
||||||
|
- Upcall stubs had incorrect types
|
||||||
|
|
||||||
## [0.1.176] - 2021-09-29
|
## [0.1.176] - 2021-09-29
|
||||||
### Fixed
|
### Fixed
|
||||||
- Usage of `defcfn` without a docstring produced an invalid `def` form
|
- Usage of `defcfn` without a docstring produced an invalid `def` form
|
||||||
|
|
@ -15,5 +19,6 @@ All notable changes to this project will be documented in this file. This change
|
||||||
- Support for serializing and deserializing arbitrary Clojure functions
|
- Support for serializing and deserializing arbitrary Clojure functions
|
||||||
- Support for serializing and deserializing arbitrary Clojure data structures
|
- Support for serializing and deserializing arbitrary Clojure data structures
|
||||||
|
|
||||||
|
[Unreleased]: https://github.com/IGJoshua/coffi/compare/v0.1.176...HEAD
|
||||||
[0.1.176]: https://github.com/IGJoshua/coffi/compare/v0.1.169...v0.1.176
|
[0.1.176]: https://github.com/IGJoshua/coffi/compare/v0.1.169...v0.1.176
|
||||||
[0.1.169]: https://github.com/IGJoshua/coffi/compare/16f56bc31d69142ec4d2fb61b15b069d78b127ca...v0.1.169
|
[0.1.169]: https://github.com/IGJoshua/coffi/compare/16f56bc31d69142ec4d2fb61b15b069d78b127ca...v0.1.169
|
||||||
|
|
|
||||||
|
|
@ -314,8 +314,8 @@
|
||||||
[:return]]}
|
[:return]]}
|
||||||
{:name :upcall
|
{:name :upcall
|
||||||
:flags #{:public}
|
:flags #{:public}
|
||||||
:desc (conj (mapv mem/java-layout arg-types)
|
:desc (conj (mapv insn-layout arg-types)
|
||||||
(mem/java-layout ret-type))
|
(insn-layout ret-type))
|
||||||
:emit [[:aload 0]
|
:emit [[:aload 0]
|
||||||
[:getfield :this "upcall_ifn" IFn]
|
[:getfield :this "upcall_ifn" IFn]
|
||||||
(map-indexed
|
(map-indexed
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue