2013-04-25 12:12:42 -04:00
|
|
|
! Copyright (C) 2012-2013 Doug Coleman, John Benediktsson.
|
2012-02-03 20:30:34 -05:00
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
2014-11-13 16:00:44 -05:00
|
|
|
USING: accessors prettyprint sequences sorting system vocabs ;
|
2012-02-03 20:30:34 -05:00
|
|
|
IN: tools.ps
|
|
|
|
|
|
2013-04-25 12:12:42 -04:00
|
|
|
HOOK: ps os ( -- assoc )
|
2012-02-03 20:30:34 -05:00
|
|
|
|
2014-11-13 16:00:44 -05:00
|
|
|
"tools.ps." os name>> append require
|
2012-02-03 20:30:34 -05:00
|
|
|
|
|
|
|
|
: ps. ( -- )
|
2013-04-25 13:05:57 -04:00
|
|
|
ps sort-keys { "PID" "CMD" } prefix simple-table. ;
|
2015-04-09 13:43:43 -04:00
|
|
|
|
|
|
|
|
MAIN: ps.
|
