ui.backend.gtk: update to new with-out-parameters combinator

db4
Anton Gorenko 2010-07-17 14:25:59 +06:00
parent 9c4e1ceb97
commit 32952a6071
1 changed files with 3 additions and 3 deletions

View File

@ -58,7 +58,7 @@ M: gtk-ui-backend (free-pixel-format)
M: gtk-ui-backend (pixel-format-attribute) M: gtk-ui-backend (pixel-format-attribute)
[ handle>> ] [ >gl-config-attribs ] bi* [ handle>> ] [ >gl-config-attribs ] bi*
{ int } [ gdk_gl_config_get_attrib drop ] [ ] { int } [ gdk_gl_config_get_attrib drop ]
with-out-parameters ; with-out-parameters ;
CONSTANT: events-mask CONSTANT: events-mask
@ -354,8 +354,8 @@ M: editor get-cursor-loc&dim
: get-preedit-string ( im-context -- str cursor-pos ) : get-preedit-string ( im-context -- str cursor-pos )
{ void* int } [ f swap gtk_im_context_get_preedit_string ] { void* int } [ f swap gtk_im_context_get_preedit_string ]
[ [ [ utf8 alien>string ] [ g_free ] bi ] dip ] with-out-parameters
with-out-parameters ; [ [ utf8 alien>string ] [ g_free ] bi ] dip ;
: on-preedit-changed ( im-context user-data -- ) : on-preedit-changed ( im-context user-data -- )
window world-focus dup support-input-methods? [ window world-focus dup support-input-methods? [