ui.backend.gtk: gtk_init terminates, better throw exception
parent
f281a8cb87
commit
a9ebc772df
|
@ -503,7 +503,7 @@ M:: gtk-ui-backend system-alert ( caption text -- )
|
||||||
] with-destructors ;
|
] with-destructors ;
|
||||||
|
|
||||||
M: gtk-ui-backend (with-ui)
|
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
|
f f gtk_gl_init
|
||||||
load-icon
|
load-icon
|
||||||
init-clipboard
|
init-clipboard
|
||||||
|
|
Loading…
Reference in New Issue