(bind-func gui_reset (lambda () ;; free all the Widget memory, reset GUI_root (Widget_walk_postorder (GUI_root EXTEMPORE_GUI) (lambda (w) (Widget_free w) w)) (GUI_set_root EXTEMPORE_GUI null)))