(define-ffi-union NAME &rest SLOT...)
. Like define-ffi-struct
, but defines a
union.
(define-ffi-union test-union (cval :type :uchar) (ival :type :int)) (define-ffi-function test-get-union "test_get_union" test-union nil test.so) (let ((object (test-get-union))) (list (test-union-ival object) (test-union-cval object))) ; => (-1 25)