Hello,
I found that c-write was producing code in a weird style with
parentheses in odd places (yes it still works):
--------------------------------------------------------------------------------------------
(cffi:defcunion (spnav-event :size 40)
(type :int
)
(motion (:struct spnav-event-motion)
)
(button (:struct spnav-event-button)
))
--------------------------------------------------------------------------------------------
instead of the more reasonable:
--------------------------------------------------------------------------------------------
(cffi:defcunion (spnav-event :size 40)
(type :int)
(motion (:struct spnav-event-motion))
(button (:struct spnav-event-button)))
--------------------------------------------------------------------------------------------
The attached patch makes some minor changes to the function c-write
and adds the option of passing no-package to c-print-symbol down the
call stack.
Akshay
