! Copyright (C) 2012-2013 Doug Coleman, John Benediktsson.
! See http://factorcode.org/license.txt for BSD license.
USING: combinators prettyprint sequences sorting system vocabs ;
IN: tools.ps

HOOK: ps os ( -- assoc )

{
    { [ os macosx?  ] [ "tools.ps.macosx"  ] }
    { [ os linux?   ] [ "tools.ps.linux"   ] }
    { [ os windows? ] [ "tools.ps.windows" ] }
} cond require

: ps. ( -- )
    ps sort-keys { "PID" "CMD" } prefix simple-table. ;