ui.backend.gtk: gtk_init terminates, better throw exception

2018-01-29 11:44:27 +01:00 · 2018-01-29 11:44:27 +01:00 · a9ebc772df
parent f281a8cb87
commit a9ebc772df
1 changed files with 1 additions and 1 deletions
--- a/basis/ui/backend/gtk/gtk.factor
+++ b/basis/ui/backend/gtk/gtk.factor
@ -503,7 +503,7 @@ M:: gtk-ui-backend system-alert ( caption text -- )
    ] with-destructors ;

 M: gtk-ui-backend (with-ui)
-    f f gtk_init
+    f f gtk_init_check [ "Unable to initialize GTK" throw ] unless
    f f gtk_gl_init
    load-icon
    init-clipboard