🐛 Fix Uuid crash

This commit is contained in:
Belén Albeza 2024-11-28 13:16:04 +01:00
parent 9a9815ebfa
commit 13d61d1105
2 changed files with 1 additions and 3 deletions

View file

@ -94,7 +94,7 @@
[this]
(let [buffer (unchecked-get this "__u32_buffer")]
(if (nil? buffer)
(let [buffer (get-unsigned-parts (.-uuid ^UUID this))]
(let [buffer (get-unsigned-parts this)]
(unchecked-set this "__u32_buffer" buffer)
buffer)
buffer))))

View file

@ -153,8 +153,6 @@
(ShapeProxy. (.-id ^ShapeProxy self)
nil
(.-delegate ^ShapeProxy self))
:else
(let [delegate (.-delegate ^ShapeProxy self)
delegate' (dissoc delegate k)]
(if (identical? delegate delegate')