luciano/coffi
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix bug where compound types in arglist metadata failed

Browse source
This commit is contained in:
Joshua Suskalo 2021-10-06 08:53:02 -05:00
parent 96f3153c5f
commit 014901233c
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
CHANGELOG.md
View file

@ -6,6 +6,7 @@ All notable changes to this project will be documented in this file. This change
- An `address?` predicate - An `address?` predicate
### Fixed ### Fixed
- Compound types caused problems in arglists meta on expansion of `defcfn`
- Compound types were not allowed as return types in `defcfn` - Compound types were not allowed as return types in `defcfn`
- `nil` was not considered a null pointer - `nil` was not considered a null pointer
- Primitive-serializing types fail to compile as arguments to downcall handles - Primitive-serializing types fail to compile as arguments to downcall handles

6
src/clj/coffi/ffi.clj
View file

@ -582,7 +582,11 @@
(or old-list (or old-list
(seq arglists) (seq arglists)
(list (list
(mapv (comp symbol name) (mapv (fn [type]
(-> (cond-> type
(vector? type) first)
name
symbol))
(:native-arglist args))))))) (:native-arglist args)))))))
(assoc (:attr-map args) (assoc (:attr-map args)
::address address))) ::address address)))