Fix bug where compound types in arglist metadata failed

CHANGELOG.md

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

src/clj/coffi/ffi.clj

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