(capi:display (make-instance 'capi:interface :title "A Window"))