Preventing let variables being disposed when creating interfaces
Hi,
I am trying to write a function that extends part of a CAPI interface as follows:(defun addchooser (data interface)
(let ((chooser-layout (slot-value interface 'choosers))
(new-chooser (make-instance 'push-button :data "Sheep")))
(setf (layout-description chooser-layout) (append (layout-description chooser-layout) '(new-chooser)))))