コード例 #1
0
ファイル: OutlineBuilderTest.cs プロジェクト: skrutsick/RTVS
        public void Conditionals()
        {
            var content =
                @"if (ncol(x) == 1L) {
    xnames < -1
} else {
    xnames < -paste0(1, 1L:ncol(x))
  }
  if (intercept) {
    x<- cbind(1, x)
    xnames<- c(0, xnames)
  }
";
            var rc = OutlineTest.BuildOutlineRegions(_services, content);

            rc.Should().HaveCount(3);

            rc[0].Start.Should().Be(0);
            rc[0].Length.Should().Be(89);

            rc[1].Start.Should().Be(41);
            rc[1].End.Should().Be(89);
            rc[1].DisplayText.Should().Be("else...");

            rc[2].Start.Should().Be(93);
            rc[2].End.Should().Be(162);
            rc[2].DisplayText.Should().Be("if...");
        }
コード例 #2
0
        public void RRegionBuilder_Test02()
        {
            string content =
                @"if (ncol(x) == 1L) {
    xnames < -1
} else {
    xnames < -paste0(1, 1L:ncol(x))
  }
  if (intercept) {
    x<- cbind(1, x)
    xnames<- c(0, xnames)
  }
";
            OutlineRegionCollection rc = OutlineTest.BuildOutlineRegions(content);

            rc.Should().HaveCount(3);

            rc[0].Start.Should().Be(0);
            rc[0].Length.Should().Be(89);

            rc[1].Start.Should().Be(41);
            rc[1].End.Should().Be(89);
            rc[1].DisplayText.Should().Be("else...");

            rc[2].Start.Should().Be(93);
            rc[2].End.Should().Be(162);
            rc[2].DisplayText.Should().Be("if...");
        }
コード例 #3
0
ファイル: OutlineBuilderTest.cs プロジェクト: skrutsick/RTVS
        public void EmptyTest()
        {
            var rc = OutlineTest.BuildOutlineRegions(_services, "");

            rc.Should().BeEmpty();
            rc.Start.Should().Be(0);
            rc.Length.Should().Be(0);
        }
コード例 #4
0
        public void RRegionBuilder_Test01()
        {
            OutlineRegionCollection rc = OutlineTest.BuildOutlineRegions("");

            rc.Should().BeEmpty();
            rc.Start.Should().Be(0);
            rc.Length.Should().Be(0);
        }
コード例 #5
0
        public void EmptyTest()
        {
            OutlineRegionCollection rc = OutlineTest.BuildOutlineRegions(_editorShell, "");

            rc.Should().BeEmpty();
            rc.Start.Should().Be(0);
            rc.Length.Should().Be(0);
        }
コード例 #6
0
ファイル: OutlineBuilderTest.cs プロジェクト: skrutsick/RTVS
        public void OutlineFile(string name)
        {
            Action a = () => OutlineTest.OutlineFile(_services, _testFiles, name);

            a.ShouldNotThrow();
        }
コード例 #7
0
        public void RRegionBuilder_OutlineFile01()
        {
            Action a = () => OutlineTest.OutlineFile(_testFiles, "01.r");

            a.ShouldNotThrow();
        }
コード例 #8
0
        public void OutlineFile(string name)
        {
            Action a = () => OutlineTest.OutlineFile(_editorShell, _testFiles, name);

            a.ShouldNotThrow();
        }