(flet ((run ()

(let ((frame (make-application-frame 'test)))

(setq *test-frame* frame) (run-frame-top-level frame))))

(mp:process-run-function "test" #'run))) does not work because of the (mp:process-run-function "test" #'run) term . What does mean mp:?