static L<Int> hardKillProgram(fS progID, O... _) {
  print("Trying to hard-kill program " + fsI(progID));
  ret os_killAll(func(S cmd) -> Bool {
    if (regexpFinds("[/ ]" + psI(progID), cmd)) {
      print("! KILLING " + cmd);
      true;
    }
    false;
  }, _);
}