15 lines
359 B
Factor
15 lines
359 B
Factor
|
USING: alien namespaces system combinators kernel sequences
|
||
|
|
vocabs vocabs.loader ;
|
||
|
|
|
||
|
|
"bootstrap.compiler" vocab [
|
||
|
|
"ui-backend" get [
|
||
|
|
{
|
||
|
{ [ os macosx? ] [ "cocoa" ] }
|
||
|
|
{ [ os windows? ] [ "windows" ] }
|
||
|
|
{ [ os unix? ] [ "x11" ] }
|
||
|
|
} cond
|
||
|
|
] unless* "ui." prepend require
|
||
|
|
|
||
|
|
"ui.freetype" require
|
||
|
|
] when
|