Experimental DEFCSTRUCT feature: accessors.
Experimental DEFCSTRUCT feature: accessors.

CFFI> (macroexpand-1 '(defcstruct (foo :conc-name foo-)
                        (a :int)))
;;; ...
(defun foo-a (pointer-to-foo)
  (foreign-slot-value pointer-to-foo 'foo 'a))
(defun (setf foo-a) (value pointer-to-foo)
  (foreign-slot-set value pointer-to-foo 'foo 'a))
;;; ...

akovalenko/cffi,3b/cffi,dochang/cffi,dkochmanski/cffi,kingcheez/cffi-cheez,dochang/cffi,attila-lendvai/cffi,wesen/cffi,marsijanin/cffi,kingcheez/cffi-cheez,marsijanin/cffi,akovalenko/cffi,stassats/cffi,attila-lendvai/cffi,mcna/cffi,cffi/cffi,cffi/cffi,stassats/cffi,3b/cffi,3b/cffi,mcna/cffi,kingcheez/cffi-cheez,akovalenko/cffi,dkochmanski/cffi,marsijanin/cffi,stassats/cffi,cffi/cffi,wesen/cffi,wesen/cffi,dochang/cffi,dkochmanski/cffi