factor: trim using lists

[factor.git] / basis / atk / ffi / ffi.factor

diff --git a/basis/atk/ffi/ffi.factor b/basis/atk/ffi/ffi.factor
index 67c8362c73305add541d2264d1b22d902e4a8eef..4082c4a04beb78266fd32c172e78d08857ccaf68 100644 (file)
--- a/basis/atk/ffi/ffi.factor
+++ b/basis/atk/ffi/ffi.factor
@@ -1,23 +1,17 @@
-! Copyright (C) 2009 Anton Gorenko.
+! Copyright (C) 2010 Anton Gorenko.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: alien alien.libraries alien.syntax combinators kernel
-system
-gobject-introspection glib.ffi gobject.ffi ;
+USING: alien alien.libraries alien.syntax combinators
+gobject-introspection system vocabs ;
 IN: atk.ffi
 
-<<
-"atk" {
-    { [ os winnt? ] [ "libatk-1.0-0.dll" cdecl add-library ] }
-    { [ os macosx? ] [ drop ] }
-    { [ os unix? ] [ "libatk-1.0.so" cdecl add-library ] }
-} cond
->>
+<< "gobject.ffi" require >>
 
-TYPEDEF: guint64 AtkState
-TYPEDEF: GSList AtkAttributeSet
+LIBRARY: atk
 
-! gir: error
-C-TYPE: AtkPropertyValues
+<< "atk" {
+    { [ os windows? ] [ "libatk-1.0-0.dll" ] }
+    { [ os macosx? ] [ "libatk-1.0.dylib" ] }
+    { [ os unix? ] [ "libatk-1.0.so" ] }
+} cond cdecl add-library >>
 
 GIR: vocab:atk/Atk-1.0.gir
-