make defstruct robust against dangling and unbound vars
This commit is contained in:
parent
020e10264f
commit
b6f1e44ce0
1 changed files with 1 additions and 0 deletions
|
|
@ -1938,6 +1938,7 @@
|
||||||
(map #(update % 1 keyword))
|
(map #(update % 1 keyword))
|
||||||
(map reverse)
|
(map reverse)
|
||||||
(map vec))])]
|
(map vec))])]
|
||||||
|
(if (resolve typename) (ns-unmap *ns* typename))
|
||||||
(register-new-struct-deserialization coffi-typename struct-layout)
|
(register-new-struct-deserialization coffi-typename struct-layout)
|
||||||
(register-new-struct-serialization coffi-typename struct-layout)
|
(register-new-struct-serialization coffi-typename struct-layout)
|
||||||
`(do
|
`(do
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue