basis/tools/ps/ps.factor

   1 ! Copyright (C) 2012-2013 Doug Coleman, John Benediktsson.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: accessors prettyprint sequences sorting system vocabs ;
   4 IN: tools.ps
   5
   6 HOOK: ps os ( -- assoc )
   7
   8 "tools.ps." os name>> append require
   9
  10 : ps. ( -- )
  11     ps sort-keys { "PID" "CMD" } prefix simple-table. ;
  12
  13 MAIN: ps.