sample popping up

(x-popup-menu `((0 0) ,(get-window-with-predicate (lambda (win) t))) (tmm-get-keybind [menu-bar]))

keymap prompt
(keymap-prompt (cadr (tmm-get-keybind [menu-bar])))