steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

prélude to a haiku

db4
Joe Groff 2009-02-28 15:01:28 -06:00
parent 2e97263e2b
commit bb0e2a49ba
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
core/system/system.factor
View File

@ -25,9 +25,11 @@ SINGLETON: solaris
SINGLETON: macosx SINGLETON: macosx
SINGLETON: linux SINGLETON: linux
SINGLETON: haiku
UNION: bsd freebsd netbsd openbsd macosx ; UNION: bsd freebsd netbsd openbsd macosx ;
UNION: unix bsd solaris linux ; UNION: unix bsd solaris linux haiku ;
: os ( -- class ) \ os get-global ; foldable : os ( -- class ) \ os get-global ; foldable
@ -51,6 +53,7 @@ UNION: unix bsd solaris linux ;
{ "solaris" solaris } { "solaris" solaris }
{ "macosx" macosx } { "macosx" macosx }
{ "linux" linux } { "linux" linux }
{ "haiku" haiku }
} at ; } at ;
PRIVATE> PRIVATE>