protected String lookupName(RList f) {
if (f.getNames() != null) {
RAbstractStringVector names = f.getNames();
for (int i = 0; i < names.getLength(); i++) {
if (names.getDataAt(i).equals("name")) {
String name = RRuntime.asString(f.getDataAt(i));
return name != null ? name : UNKNOWN_EXTERNAL_BUILTIN;
}
}
}
return UNKNOWN_EXTERNAL_BUILTIN;
}
