public RPlotIntegrationTest(IExportProvider exportProvider, TestMethodFixture testMethod, TestFilesFixture testFiles)
{
_workflowProvider = exportProvider.GetExportedValue <TestRInteractiveWorkflowProvider>();
_workflow = _workflowProvider.GetOrCreate();
_plotDeviceVisualComponentContainerFactory = exportProvider.GetExportedValue <TestRPlotDeviceVisualComponentContainerFactory>();
_plotHistoryVisualComponentContainerFactory = exportProvider.GetExportedValue <IRPlotHistoryVisualComponentContainerFactory>();
_testMethod = testMethod.MethodInfo;
_testFiles = testFiles;
}
private async Task <IRInteractiveWorkflow> CreateWorkflowAsync()
{
var workflow = UIThreadHelper.Instance.Invoke(() => _workflowProvider.GetOrCreate());
var settings = _exportProvider.GetExportedValue <IRSettings>();
await workflow.RSessions.TrySwitchBrokerAsync(nameof(PackageManagerIntegrationTest));
await workflow.RSession.EnsureHostStartedAsync(new RHostStartupInfo (settings.CranMirror, codePage : settings.RCodePage), new RHostClientTestApp(), 50000);
return(workflow);
}
private async Task <IRInteractiveWorkflow> CreateWorkflowAsync()
{
var workflow = _workflowProvider.GetOrCreate();
await workflow.RSession.StartHostAsync(new RHostStartupInfo {
Name = _testMethod.Name,
RBasePath = RToolsSettings.Current.RBasePath,
RHostCommandLineArguments = RToolsSettings.Current.RCommandLineArguments,
CranMirrorName = RToolsSettings.Current.CranMirror,
}, 50000);
return(workflow);
}
private async Task <IRInteractiveWorkflow> CreateWorkflowAsync()
{
var workflow = _workflowProvider.GetOrCreate();
var settings = _exportProvider.GetExportedValue <IRSettings>();
await workflow.RSession.StartHostAsync(new RHostStartupInfo {
Name = _testMethod.Name,
RBasePath = settings.RBasePath,
RHostCommandLineArguments = settings.RCommandLineArguments,
CranMirrorName = settings.CranMirror,
CodePage = settings.RCodePage
}, new RHostClientTestApp(), 50000);
return(workflow);
}
private async Task <IRInteractiveWorkflow> CreateWorkflowAsync()
{
var workflow = _workflowProvider.GetOrCreate();
var settings = _exportProvider.GetExportedValue <IRSettings>();
workflow.BrokerConnector.SwitchToLocalBroker(nameof(PackageManagerIntegrationTest));
await workflow.RSession.StartHostAsync(new RHostStartupInfo {
Name = _testMethod.Name,
CranMirrorName = settings.CranMirror,
CodePage = settings.RCodePage
}, new RHostClientTestApp(), 50000);
return(workflow);
}
