2013-11-04 11:28:45 -05:00
|
|
|
|
2014-06-07 23:48:09 -04:00
|
|
|
USING: combinators kernel system vocabs alien.libraries ;
|
2013-11-16 14:58:37 -05:00
|
|
|
IN: alien.libraries.finder
|
2013-11-07 18:30:23 -05:00
|
|
|
|
2014-06-07 23:48:09 -04:00
|
|
|
HOOK: find-library* os ( name -- path/f )
|
|
|
|
|
|
|
|
|
|
: find-library ( name -- path/library-not-found )
|
|
|
|
|
dup find-library* [ nip ] when* ;
|
2013-11-04 11:28:45 -05:00
|
|
|
|
2013-11-16 14:58:37 -05:00
|
|
|
{
|
|
|
|
|
{ [ os macosx? ] [ "alien.libraries.finder.macosx" ] }
|
|
|
|
|
{ [ os linux? ] [ "alien.libraries.finder.linux" ] }
|
|
|
|
|
{ [ os windows? ] [ "alien.libraries.finder.windows" ] }
|
|
|
|
|
} cond require
|