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

remove maplike option from defstruct generation

Browse source
This commit is contained in:
Kristin Rutenkolk 2024-12-20 10:40:55 +01:00
parent f3f156c53a
commit b2cc9e6549
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/clj/coffi/mem.clj
View file

@ -1857,7 +1857,7 @@
(defn as-map [^coffi.mem.IStruct struct] (.asMap struct))
(defn- generate-struct-type [typename typed-member-symbols maplike?]
(defn- generate-struct-type [typename typed-member-symbols]
(let [members (map (comp keyword str) typed-member-symbols)
as-vec (vec (map (comp symbol name) members))
as-map (into {} (map (fn [m] [m (symbol (name m))]) members))]
@ -1958,7 +1958,7 @@
(register-new-struct-deserialization coffi-typename struct-layout)
(register-new-struct-serialization coffi-typename struct-layout)
`(do
~(generate-struct-type typename typed-symbols true)
~(generate-struct-type typename typed-symbols)
(defmethod c-layout ~coffi-typename [~'_] (c-layout ~struct-layout))
(defmethod deserialize-from ~coffi-typename ~[segment-form '_type]
~(generate-deserialize coffi-typename 0 segment-form))