Дисплейная функция вызывается автоматически, когда всё окно или его часть нуждается в перерисовке. Вызывая её, CAPI передаёт ей
output-pane, т.е. порт,(defun draw-a-circle (pane x y width height)
(gp:draw-circle pane 100 100 50))
(capi:contain (make-instance 'capi:output-pane
:display-callback 'draw-a-circle))