factor/basis/tools/ps/ps.factor

16 lines
398 B
Factor
Raw Normal View History

2013-04-25 12:12:42 -04:00
! Copyright (C) 2012-2013 Doug Coleman, John Benediktsson.
! See http://factorcode.org/license.txt for BSD license.
2013-04-25 12:12:42 -04:00
USING: combinators prettyprint system vocabs ;
IN: tools.ps
2013-04-25 12:12:42 -04:00
HOOK: ps os ( -- assoc )
2013-04-25 12:12:42 -04:00
{
{ [ os macosx? ] [ "tools.ps.macosx" ] }
{ [ os linux? ] [ "tools.ps.linux" ] }
{ [ os windows? ] [ "tools.ps.windows" ] }
} cond require
: ps. ( -- )
ps simple-table. ;