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