factor: more top level forms.

[factor.git] / extra / tokyo / alien / tcutil / tcutil.factor

diff --git a/extra/tokyo/alien/tcutil/tcutil.factor b/extra/tokyo/alien/tcutil/tcutil.factor
index 39e9b48d67d9a2e889ab21c0261fe9f08255e2c3..feb1a1168fc1cfe21086b95716099a32c67a0e8a 100644 (file)
--- a/extra/tokyo/alien/tcutil/tcutil.factor
+++ b/extra/tokyo/alien/tcutil/tcutil.factor
@@ -4,11 +4,9 @@ USING: alien alien.c-types alien.libraries alien.syntax
 combinators system ;
 IN: tokyo.alien.tcutil
 
-<< "tokyocabinet" {
-    { [ os macosx? ] [ "libtokyocabinet.dylib" ] }
-    { [ os unix? ] [ "libtokyocabinet.so" ] }
-    { [ os windows? ] [ "tokyocabinet.dll" ] }
-} cond cdecl add-library >>
+LIBRARY-UNIX: tokyocabinet cdecl "tokyocabinet.so"
+LIBRARY-MACOSX: tokyocabinet cdecl "tokyocabinet.dylib"
+LIBRARY-WINDOWS: tokyocabinet cdecl "tokyocabinet.dll"
 
 LIBRARY: tokyocabinet