svoid innerCleanUp(O c) {
  // call custom cleanMeUp() and cleanMeUp_*() functions
  
  if (!isFalse(pcallOpt(c, "cleanMeUp")))
    for (S name : sorted(methodsStartingWith(c, "cleanMeUp_"))) try {
      callOpt(c, name);
    } catch e {
      print("Error cleaning up: " + programID(c));
      _handleException(e);
    }
}

svoid innerCleanUp() {
  innerCleanUp(mc());
}