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

Ensure serializing nil as a pointer returns null

Browse source
This commit is contained in:
Joshua Suskalo 2021-10-01 12:03:25 -05:00
parent 673a653200
commit 8100295567
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -323,13 +323,14 @@
(defmethod serialize* ::pointer (defmethod serialize* ::pointer
[obj type scope] [obj type scope]
(when-not (null? obj) (if-not (null? obj)
(if (sequential? type) (if (sequential? type)
(with-acquired [scope] (with-acquired [scope]
(let [segment (alloc-instance (second type) scope)] (let [segment (alloc-instance (second type) scope)]
(serialize-into obj (second type) segment scope) (serialize-into obj (second type) segment scope)
(address-of segment))) (address-of segment)))
obj))) obj)
(MemoryAddress/NULL)))
(defmulti serialize-into (defmulti serialize-into
"Writes a serialized version of the `obj` to the given `segment`. "Writes a serialized version of the `obj` to the given `segment`.