@Override
protected RExternalBuiltinNode lookupBuiltin(RList f) {
if (FastROptions.UseInternalGraphics.getBooleanValue()) {
switch (lookupName(f)) {
case "C_mtext":
return new GraphicsCCalls.C_mtext();
case "C_plotXY":
return new C_PlotXY();
}
}
return null;
}
@Override
protected RExternalBuiltinNode lookupBuiltin(RList f) {
String name = lookupName(f);
if (FastROptions.UseInternalGraphics.getBooleanValue()) {
switch (name) {
case "PDF":
return new DevicesCCalls.C_PDF();
case "devoff":
return new DevicesCCalls.C_DevOff();
case "devcur":
return new DevicesCCalls.C_DevCur();
}
}
switch (name) {
case "compcases":
return new CompleteCases();
// utils
case "countfields":
return new CountFields();
case "readtablehead":
return new ReadTableHead();
case "rnorm":
return RnormNodeGen.create();
case "runif":
return RunifNodeGen.create();
case "qgamma":
return QgammaNodeGen.create();
case "download":
return new Download();
case "unzip":
case "Rprof":
case "Rprofmem":
case "addhistory":
case "loadhistory":
case "savehistory":
case "dataentry":
case "dataviewer":
case "edit":
case "fileedit":
case "selectlist":
return new UnimplementedExternal(name);
default:
return null;
}
}
@Override
protected RExternalBuiltinNode lookupBuiltin(RList f) {
if (FastROptions.UseInternalGraphics.getBooleanValue()) {
switch (lookupName(f)) {
case "C_par":
return new C_Par();
}
}
String name = lookupName(f);
switch (name) {
// tools
case "writetable":
return new WriteTable();
case "typeconvert":
return TypeConvertNodeGen.create();
case "C_parseRd":
return C_ParseRdNodeGen.create();
default:
return null;
}
}