with-ui

with-ui ( quot: ( -- ) -- )

Startet die grafische Oberfläche, wenn sie nicht schon läuft, und führt dann die Quotation aus. Beispiel:

[ <pane> "Fenster-Titel" open-window ] with-ui