public void R_AutoFormatFuncionDefinition03() { using (var script = new TestScript(RContentTypeDefinition.ContentType)) { string text1 = "x <-function(x, y,{ENTER}"; string text2 = "a,b,"; string text3 = "c, d)"; script.Type(text1); script.DoIdle(300); script.Backspace(); script.Backspace(); script.Backspace(); script.Backspace(); script.DoIdle(300); script.Type(text2); script.Enter(); script.Type(text3); string actual = script.EditorText; string expected = "x <- function(x, y,\r\n" + " a, b,\r\n" + " c, d)"; actual.Should().Be(expected); } }
public void R_LoadedPackageFunctionCompletion() { using (var script = new TestScript(RContentTypeDefinition.ContentType)) { var provider = EditorShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>(); using (new RHostScript(provider)) { REvaluationResult result; script.Type("c"); script.DoIdle(200); var session = script.GetCompletionSession(); session.Should().NotBeNull(); script.DoIdle(500); var list = session.SelectedCompletionSet.Completions.ToList(); var item = list.FirstOrDefault(x => x.DisplayText == "codoc"); item.Should().BeNull(); var rSession = provider.GetOrCreate(GuidList.InteractiveWindowRSessionGuid, null); rSession.Should().NotBeNull(); using (var eval = rSession.BeginEvaluationAsync().Result) { result = eval.EvaluateAsync("library('tools')", REvaluationKind.Mutating).Result; } script.DoIdle(1000); script.Type("{ESC}"); script.DoIdle(200); script.Backspace(); script.Type("{ENTER}"); script.DoIdle(100); script.Type("c"); script.DoIdle(500); script.Backspace(); session = script.GetCompletionSession(); session.Should().NotBeNull(); list = session.SelectedCompletionSet.Completions.ToList(); item = list.FirstOrDefault(x => x.DisplayText == "codoc"); item.Should().NotBeNull(); } } }
public void R_CompletionFilter01() { using (var script = new TestScript(RContentTypeDefinition.ContentType)) { script.Type("x <- lm"); script.DoIdle(100); script.Type("mmm"); script.DoIdle(100); script.Backspace(); script.Backspace(); script.Backspace(); script.Backspace(); script.DoIdle(100); script.Type("abels.{TAB}"); string expected = "x <- labels.default"; string actual = script.EditorText; actual.Should().Be(expected); } }
public async Task R_LoadedPackageFunctionCompletion() { using (var script = new TestScript(RContentTypeDefinition.ContentType)) { var provider = EditorShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>(); using (new RHostScript(provider)) { script.Type("c"); script.DoIdle(200); var session = script.GetCompletionSession(); session.Should().NotBeNull(); script.DoIdle(500); var list = session.SelectedCompletionSet.Completions.ToList(); var item = list.FirstOrDefault(x => x.DisplayText == "codoc"); item.Should().BeNull(); var rSession = provider.GetOrCreate(GuidList.InteractiveWindowRSessionGuid); rSession.Should().NotBeNull(); await rSession.ExecuteAsync("library('tools')"); script.DoIdle(1000); script.Type("{ESC}"); script.DoIdle(200); script.Backspace(); script.Type("{ENTER}"); script.DoIdle(100); script.Type("c"); script.DoIdle(500); script.Backspace(); session = script.GetCompletionSession(); session.Should().NotBeNull(); list = session.SelectedCompletionSet.Completions.ToList(); item = list.FirstOrDefault(x => x.DisplayText == "codoc"); item.Should().NotBeNull(); } } }
public async Task R_DeclaredVariablesCompletion03() { using (var script = new TestScript(RContentTypeDefinition.ContentType)) { var provider = EditorShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>(); using (var hostScript = new RHostScript(provider)) { await ExecuteRCode(hostScript.Session, "i1 <- 1\r\n"); PrimeIntellisenseProviders(); script.DoIdle(1000); script.Type("i"); var session = script.GetCompletionSession(); session.Should().NotBeNull(); var list = session.SelectedCompletionSet.Completions.ToList(); var item = list.FirstOrDefault(x => x.DisplayText == "i1"); item.Should().NotBeNull(); script.DoIdle(100); script.Type("{ESC}"); script.Backspace(); script.DoIdle(100); script.Type("graphics::"); script.DoIdle(300); session = script.GetCompletionSession(); session.Should().NotBeNull(); list = session.SelectedCompletionSet.Completions.ToList(); item = list.FirstOrDefault(x => x.DisplayText == "i1"); item.Should().BeNull(); } } }