Add very inefficient raw types
This commit is contained in:
parent
c9f30a361c
commit
e1e64d8362
1 changed files with 14 additions and 0 deletions
|
|
@ -1118,6 +1118,20 @@
|
||||||
(with-acquired [(segment-scope segment)]
|
(with-acquired [(segment-scope segment)]
|
||||||
(map #(deserialize % type) (slice-segments segment (size-of type)))))
|
(map #(deserialize % type) (slice-segments segment (size-of type)))))
|
||||||
|
|
||||||
|
;;; Raw composite types
|
||||||
|
|
||||||
|
(defmethod c-layout ::raw
|
||||||
|
[[_raw type]]
|
||||||
|
(c-layout type))
|
||||||
|
|
||||||
|
(defmethod serialize-into ::raw
|
||||||
|
[obj _type segment _scope]
|
||||||
|
(copy-segment segment obj))
|
||||||
|
|
||||||
|
(defmethod deserialize-from ::raw
|
||||||
|
[segment _type]
|
||||||
|
(clone-segment segment))
|
||||||
|
|
||||||
;;; C String type
|
;;; C String type
|
||||||
|
|
||||||
(defmethod primitive-type ::c-string
|
(defmethod primitive-type ::c-string
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue