




 
The macro 
define-menu
 defines a function called 
function-name
 with a single argument 
self
 that will make a menu. The parameters 
title
, 
menu-body
 and 
menu-options
 take the same form as the 
:menus
 section of define-interface. 
(capi:define-menu make-test-menu (self)
"Test"
("Item1"
"Item2"
(:component
("Item3"
"Item4")
:interaction :single-selection)
(:menu
("Item5"
"Item6")
:title "More Items")))
(setq interface (make-instance 'capi:interface))
(setf (capi:interface-menu-bar-items interface)
(list (make-test-menu interface)))
(capi:display interface)
CAPI Reference Manual - 15 Dec 2011