!7


p-exp {
  checkStandardFunctionForSafety('standardBotsToRun);
}
  
sS checkStandardFunctionForSafety(S fname) {
  S listName = "JavaX Identifier Safety";
  Set<S> identifiers = setMinus(tok_allIdentifiers(textOfStandardFunction(fname)), fname);
  
  // should lock on map
  new Set<S> statuses = treeSet();
  final SS map = mechHashMap(listName);
  bool changes = false;
  for (S id : identifiers) {
    S status = map.get(id);
    if (status == null)
      changes ||= mapPut_trueIfChanged(id, status = "?");
    statuses.add(status);
  }
  S status = or2(joinWithComma(statuses), "?");
  changes ||= mapPut_trueIfChanged(map, fname, status);
  if (changes)
    uploadMechMap(map);
}