static L<Int> unix_killAll(S pattern) {
  ret unix_killAll(cicAsFunction(pattern));
}

static L<Int> unix_killAll(final F1<S, Bool> f) {
  Map<Int, S> procs = psPidsAndCommands();
  Map<Int, S> p2 = filterMap(procs, func(Int i, S cmd) { f.get(cmd) });
  for (Int pid : keys(p2))
    print("Killing " + pid + ": " + p2.get(pid));
  unix_killProcesses(keys(p2));
  ret asList(keys(p2));
}