34 lines
		
	
	
		
			806 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			34 lines
		
	
	
		
			806 B
		
	
	
	
		
			Factor
		
	
	
! Copyright (C) 2010 Anton Gorenko.
 | 
						|
! See http://factorcode.org/license.txt for BSD license.
 | 
						|
USING: alien alien.c-types alien.destructors alien.libraries
 | 
						|
alien.syntax combinators gobject-introspection
 | 
						|
gobject-introspection.standard-types kernel pango.ffi system vocabs ;
 | 
						|
IN: gtk.ffi
 | 
						|
 | 
						|
<<
 | 
						|
"atk.ffi" require
 | 
						|
"gdk.ffi" require
 | 
						|
>>
 | 
						|
 | 
						|
LIBRARY: gtk
 | 
						|
 | 
						|
<<
 | 
						|
"gtk" {
 | 
						|
    { [ os windows? ] [ "libgtk-win32-2.0-0.dll" cdecl add-library ] }
 | 
						|
    { [ os linux? ] [ "libgtk-x11-2.0.so" cdecl add-library ] }
 | 
						|
    [ drop ]
 | 
						|
} cond
 | 
						|
>>
 | 
						|
 | 
						|
IMPLEMENT-STRUCTS: GtkTreeIter ;
 | 
						|
 | 
						|
GIR: vocab:gtk/Gtk-3.0.gir
 | 
						|
 | 
						|
DESTRUCTOR: gtk_widget_destroy
 | 
						|
 | 
						|
! <workaround
 | 
						|
FORGET: gtk_im_context_get_preedit_string
 | 
						|
FUNCTION: void
 | 
						|
gtk_im_context_get_preedit_string ( GtkIMContext* imcontext, gchar** str, PangoAttrList** attrs, gint* cursor_pos )
 | 
						|
! workaround>
 |