" |], System.StringSplitOptions.None).Length
|> shouldEqual 5
@@ -128,11 +129,11 @@ let ``Can disable evaluation on an entire script file`` () =
printfn "%d" (40 + 2)
(*** include-output:t ***)
"""
- let doc1 = Literate.ParseScriptString(content, "." @@ "A.fsx", getFormatAgent(), fsiEvaluator = getFsiEvaluator())
+ let doc1 = Literate.ParseScriptString(content, "." > "A.fsx", getFormatAgent(), fsiEvaluator = getFsiEvaluator())
let html1 = Literate.WriteHtml(doc1)
html1.Contains("42") |> shouldEqual true
- let doc2 = Literate.ParseScriptString("(*** do-not-eval-file ***)\n" + content, "." @@ "A.fsx", getFormatAgent(), fsiEvaluator = getFsiEvaluator())
+ let doc2 = Literate.ParseScriptString("(*** do-not-eval-file ***)\n" + content, "." > "A.fsx", getFormatAgent(), fsiEvaluator = getFsiEvaluator())
let html2 = Literate.WriteHtml(doc2)
html2.Contains("42") |> shouldEqual false
@@ -156,7 +157,7 @@ printfn "%d" FsLab.Demo.test
(*** include-output:t ***)""".Replace("[PATH]", path)
let fsie = getFsiEvaluator()
fsie.EvaluationFailed.Add(printfn "%A")
- let doc1 = Literate.ParseScriptString(content, "." @@ "A.fsx", getFormatAgent(), fsiEvaluator = fsie)
+ let doc1 = Literate.ParseScriptString(content, "." > "A.fsx", getFormatAgent(), fsiEvaluator = fsie)
let html1 = Literate.WriteHtml(doc1)
html1.Contains("42") |> shouldEqual true
File.Delete(path)
@@ -183,7 +184,7 @@ module Demo =
FsLab.Demo.test
(*** include-it:t2 ***)""".Replace("[PATH]", path)
let fsie = FSharp.Literate.FsiEvaluator(fsiObj = FsiEvaluatorConfig.CreateNoOpFsiObject())
- let doc1 = Literate.ParseScriptString(content, "." @@ "A.fsx", getFormatAgent(), fsiEvaluator = fsie)
+ let doc1 = Literate.ParseScriptString(content, "." > "A.fsx", getFormatAgent(), fsiEvaluator = fsie)
let html1 = Literate.WriteHtml(doc1)
html1.Contains("Not executed") |> shouldEqual true
html1.Contains("Executed") |> shouldEqual false
diff --git a/tests/FSharp.Literate.Tests/FSharp.Literate.Tests.fsproj b/tests/FSharp.Literate.Tests/FSharp.Literate.Tests.fsproj
index 318e2749d..d5647589c 100644
--- a/tests/FSharp.Literate.Tests/FSharp.Literate.Tests.fsproj
+++ b/tests/FSharp.Literate.Tests/FSharp.Literate.Tests.fsproj
@@ -44,6 +44,7 @@
bin\Release\FSharp.Literate.Tests.xml
+ 14.011
@@ -68,16 +69,13 @@
-
+
-
- Common\FsUnit.fs
-
Common\MarkdownUnit.fs
@@ -90,15 +88,6 @@
-
- ..\..\bin\CSharpFormat.dll
-
-
- ..\..\bin\FSharp.CodeFormat.dll
-
-
- False
-
@@ -113,6 +102,11 @@
-->
+
+ CSharpFormat
+ {9ab3650b-cc24-4404-a175-a573da928475}
+ True
+ FSharp.CodeFormat{341ebf32-d470-4c55-99e9-55f14f7ffbb1}
@@ -123,6 +117,11 @@
{91bad90e-bf3b-4646-a1a7-1568f8f25075}True
+
+ FSharp.Formatting.Razor
+ {c6b3c274-71a8-4239-ba9a-1af7b2f7c736}
+ True
+ FSharp.Literate{65e6d541-0486-4383-b619-5cfc5d2ba2f0}
@@ -133,11 +132,72 @@
{c44c1c05-599a-40dd-9590-465eab8960c5}True
-
- FSharp.Formatting.Razor.fsproj
- {c6b3c274-71a8-4239-ba9a-1af7b2f7c736}
-
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\net20\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\net40\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+monoandroid10+monotouch10+xamarinios10\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45+wp8\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45+wpa81+wp8\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+sl5+netcore45\FSharp.Core.dll
+ True
+ True
+
+
+
+
@@ -149,18 +209,65 @@
-
-
- ..\..\packages\NUnit\lib\nunit.framework.dll
- True
- True
-
-
-
+
- ..\..\packages\RazorEngine\lib\net40\RazorEngine.dll
+ ..\..\packages\RazorEngine\lib\net45\RazorEngine.dll
+ True
+ True
+
+
+
+
+
+
+
+
+ ..\..\packages\test\FsUnit\lib\net45\FsUnit.NUnit.dll
+ True
+ True
+
+
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\MonoAndroid\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net20\NUnit.System.Linq.dll
+ True
+ True
+
+
+ ..\..\packages\test\NUnit\lib\net20\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net35\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net40\nunit.framework.dllTrueTrue
@@ -168,8 +275,35 @@
-
- ..\..\packages\RazorEngine\lib\net45\RazorEngine.dll
+
+ ..\..\packages\test\NUnit\lib\net45\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\netstandard1.6\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\portable-net45+win8+wp8+wpa81\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\Xamarin.iOS10\nunit.framework.dllTrueTrue
diff --git a/tests/FSharp.Literate.Tests/Setup.fs b/tests/FSharp.Literate.Tests/Setup.fs
index 35e0dc717..23f333613 100644
--- a/tests/FSharp.Literate.Tests/Setup.fs
+++ b/tests/FSharp.Literate.Tests/Setup.fs
@@ -8,7 +8,7 @@ open System.Reflection
// Setup - find the compiler assembly etc.
// --------------------------------------------------------------------------------------
-let (@@) a b = Path.Combine(a, b)
+let (>) a b = Path.Combine(a, b)
type TempFile() =
let file = Path.GetTempFileName()
diff --git a/tests/FSharp.Literate.Tests/Tests.fs b/tests/FSharp.Literate.Tests/Tests.fs
index 7e567ecab..859089b3c 100644
--- a/tests/FSharp.Literate.Tests/Tests.fs
+++ b/tests/FSharp.Literate.Tests/Tests.fs
@@ -4,8 +4,8 @@
#r "FSharp.CodeFormat.dll"
#r "FSharp.Markdown.dll"
#r "CSharpFormat.dll"
-#r "../../packages/NUnit/lib/nunit.framework.dll"
-#load "../Common/FsUnit.fs"
+#r "../../packages/test/NUnit/lib/net45/nunit.framework.dll"
+#r "../../packages/test/FsUnit/lib/net45/FsUnit.NUnit.dll"
#load "../Common/MarkdownUnit.fs"
#load "Setup.fs"
#else
@@ -19,6 +19,7 @@ open FSharp.Markdown.Unit
open NUnit.Framework
open FSharp.Literate.Tests.Setup
open FSharp.Formatting.Razor
+open FsUnitTyped
module Logging = FSharp.Formatting.Common.Log
@@ -60,7 +61,7 @@ a
[lang=csharp,file=Tests.fs,key=test]
-b""", __SOURCE_DIRECTORY__ @@ "Test.fsx")
+b""", __SOURCE_DIRECTORY__ > "Test.fsx")
//[/test]
doc.Paragraphs |> shouldMatchPar (function Paragraph([Literal("a", Some({ StartLine = 2 }))], Some({ StartLine = 2 })) -> true | _ -> false)
doc.Paragraphs |> shouldMatchPar (function Paragraph([Literal("b", Some({ StartLine = 6 }))], Some({ StartLine = 6 })) -> true | _ -> false)
@@ -78,7 +79,7 @@ let ``Can parse and format literate F# script`` () =
let content = """
(** **hello** *)
let test = 42"""
- let doc = Literate.ParseScriptString(content, "C" @@ "A.fsx", getFormatAgent())
+ let doc = Literate.ParseScriptString(content, "C" > "A.fsx", getFormatAgent())
doc.Errors |> Seq.length |> shouldEqual 0
doc.Paragraphs |> shouldMatchPar (function
| Matching.LiterateParagraph(FormattedCode(_)) -> true | _ -> false)
@@ -91,7 +92,7 @@ let ``Can parse heading on the same line as opnening comment (#147)`` () =
(** ## Heading
content *)
let test = 42"""
- let doc = Literate.ParseScriptString(content, "C" @@ "A.fsx", getFormatAgent())
+ let doc = Literate.ParseScriptString(content, "C" > "A.fsx", getFormatAgent())
doc.Paragraphs |> shouldMatchPar (function
| Heading(2, [Literal("Heading", Some({ StartLine = 1 }))], Some({ StartLine = 1 })) -> true | _ -> false)
@@ -144,7 +145,7 @@ some [link][ref] to
[ref]: http://there "Author: Article"
*)"""
- let doc = Literate.ParseScriptString(content, "C" @@ "A.fsx", getFormatAgent(), references=true)
+ let doc = Literate.ParseScriptString(content, "C" > "A.fsx", getFormatAgent(), references=true)
doc.Paragraphs |> shouldMatchPar (function ListBlock(_, _, _) -> true | _ -> false)
doc.Paragraphs |> shouldMatchSpan (function Literal("Article", None) -> true | _ -> false)
doc.Paragraphs |> shouldMatchSpan (function Literal(" - Author", None) -> true | _ -> false)
@@ -163,7 +164,7 @@ let ``Can report errors in F# code snippets (in Markdown document)`` () =
let content = """
(** **hello** *)
let test = 4 + 1.0"""
- let doc = Literate.ParseScriptString(content, "C" @@ "A.fsx", getFormatAgent())
+ let doc = Literate.ParseScriptString(content, "C" > "A.fsx", getFormatAgent())
doc.Errors |> Seq.length |> should be (greaterThan 0)
// --------------------------------------------------------------------------------------
@@ -291,7 +292,7 @@ let ``Path to network share should not be recognized as comments in Paket code b
cache //hive/dependencies"""
let doc = Literate.ParseMarkdownString(content, formatAgent=getFormatAgent())
let html = Literate.WriteHtml(doc)
- html |> should notContain "//hive/dependencies"
+ html |> shouldNotContainText "//hive/dependencies"
[]
let ``Correctly handles Paket coloring`` () =
@@ -351,8 +352,8 @@ let ``Correctly handles Paket coloring`` () =
html |> should contain "strategy"
html |> should contain "version_in_path"
- html |> should notContain "https"
- html |> should notContain ".git"
+ html |> shouldNotContainText "https"
+ html |> shouldNotContainText ".git"
html |> should contain "~>"
html |> should contain ">="
@@ -366,7 +367,7 @@ let ``Correctly handles Paket coloring`` () =
html |> should contain "// NuGet packages"
html |> should contain "// nuget.org"
- html |> should notContain "//hive/dependencies"
+ html |> shouldNotContainText "//hive/dependencies"
html |> should contain @"https://nuget.org/api/v2"
html |> should contain @"http://www.fssnip.net/1n"
@@ -385,7 +386,7 @@ let a2 = 2"""
html |> should contain "
Hello
"
html |> should contain "1:"
html |> should contain "2:"
- html |> should notContain "3:"
+ html |> shouldNotContainText "3:"
[]
let ``Generates line numbers for non-F# code snippets`` () =
@@ -401,7 +402,7 @@ var a2 = 2;
html |> should contain "
Hello
"
html |> should contain "1:"
html |> should contain "2:"
- html |> should notContain "3:"
+ html |> shouldNotContainText "3:"
[]
let ``HTML for line numbers generated for F# and non-F# is the same``() =
@@ -451,12 +452,12 @@ let ``Parsing simple script and markdown produces the same result`` () =
// Test processing simple files using simple templates
// --------------------------------------------------------------------------------------
-let templateHtml = __SOURCE_DIRECTORY__ @@ "files/template.html"
-let templateCsHtml = __SOURCE_DIRECTORY__ @@ "files/template.cshtml"
+let templateHtml = __SOURCE_DIRECTORY__ > "files/template.html"
+let templateCsHtml = __SOURCE_DIRECTORY__ > "files/template.cshtml"
[]
let ``Code and HTML is formatted with a tooltip in Markdown file using HTML template``() =
- let simpleMd = __SOURCE_DIRECTORY__ @@ "files/simple.md"
+ let simpleMd = __SOURCE_DIRECTORY__ > "files/simple.md"
use temp = new TempFile()
RazorLiterate.ProcessMarkdown(simpleMd, templateHtml, temp.File)
temp.Content |> should contain ""
@@ -464,7 +465,7 @@ let ``Code and HTML is formatted with a tooltip in Markdown file using HTML temp
[]
let ``Code and HTML is formatted with a tooltip in F# Script file using HTML template``() =
- let simpleFsx = __SOURCE_DIRECTORY__ @@ "files/simple.fsx"
+ let simpleFsx = __SOURCE_DIRECTORY__ > "files/simple.fsx"
use temp = new TempFile()
RazorLiterate.ProcessScriptFile(simpleFsx, templateHtml, temp.File)
temp.Content |> should contain ""
@@ -472,11 +473,11 @@ let ``Code and HTML is formatted with a tooltip in F# Script file using HTML tem
[]
let ``Code and HTML is formatted with a tooltip in F# Script file using Razor template``() =
- let simpleFsx = __SOURCE_DIRECTORY__ @@ "files/simple.fsx"
+ let simpleFsx = __SOURCE_DIRECTORY__ > "files/simple.fsx"
use temp = new TempFile()
RazorLiterate.ProcessScriptFile
( simpleFsx, templateCsHtml, temp.File,
- layoutRoots = [__SOURCE_DIRECTORY__ @@ "files"] )
+ layoutRoots = [__SOURCE_DIRECTORY__ > "files"] )
temp.Content |> should contain ""
temp.Content |> should contain "val hello : string"
temp.Content |> should contain "Heading"
@@ -493,25 +494,25 @@ let info =
"project-nuget", "http://nuget.com/packages/FSharp.ProjectScaffold"
"root", "http://tpetricek.github.io/FSharp.FSharp.ProjectScaffold" ]
-let docPageTemplate = __SOURCE_DIRECTORY__ @@ "../../misc/templates/docpage.cshtml"
+let docPageTemplate = __SOURCE_DIRECTORY__ > "../../misc/templates/docpage.cshtml"
[]
let ``Can process fsx file using the template included in NuGet package``() =
- let simpleFsx = __SOURCE_DIRECTORY__ @@ "files/simple.fsx"
+ let simpleFsx = __SOURCE_DIRECTORY__ > "files/simple.fsx"
use temp = new TempFile()
RazorLiterate.ProcessScriptFile
( simpleFsx, docPageTemplate, temp.File,
- layoutRoots = [__SOURCE_DIRECTORY__ @@ "../../misc/templates"], replacements = info)
+ layoutRoots = [__SOURCE_DIRECTORY__ > "../../misc/templates"], replacements = info)
temp.Content |> should contain "val hello : string"
temp.Content |> should contain "Heading"
[]
let ``Can process md file using the template included in NuGet package``() =
- let simpleMd = __SOURCE_DIRECTORY__ @@ "files/simple.md"
+ let simpleMd = __SOURCE_DIRECTORY__ > "files/simple.md"
use temp = new TempFile()
RazorLiterate.ProcessMarkdown
( simpleMd, docPageTemplate, temp.File,
- layoutRoots = [__SOURCE_DIRECTORY__ @@ "../../misc/templates"], replacements = info)
+ layoutRoots = [__SOURCE_DIRECTORY__ > "../../misc/templates"], replacements = info)
temp.Content |> should contain "val hello : string"
temp.Content |> should contain "Heading"
@@ -522,7 +523,7 @@ let ``Gives nice error when parsing unclosed comment`` () =
(** **hello**
let test = 42"""
try
- Literate.ParseScriptString(content, "C" @@ "A.fsx", getFormatAgent()) |> ignore
+ Literate.ParseScriptString(content, "C" > "A.fsx", getFormatAgent()) |> ignore
failwith ""
with
| e when e.Message.Contains("comment was not closed") -> ()
@@ -566,12 +567,12 @@ hello
*)
let test = 42
"""
- let doc = Literate.ParseScriptString(content, "." @@ "A.fsx", getFormatAgent())
+ let doc = Literate.ParseScriptString(content, "." > "A.fsx", getFormatAgent())
let doc2 = Literate.FormatLiterateNodes(doc,format=OutputKind.Html)
let html = Literate.WriteHtml(doc2.With(formattedTips=""))
let tips = doc2.FormattedTips
tips |> should contain "test : int"
- html |> should notContain "test : int"
+ html |> shouldNotContainText "test : int"
html |> should contain "hello"
diff --git a/tests/FSharp.Literate.Tests/paket.references b/tests/FSharp.Literate.Tests/paket.references
index 99552bb38..582963fe6 100644
--- a/tests/FSharp.Literate.Tests/paket.references
+++ b/tests/FSharp.Literate.Tests/paket.references
@@ -1,3 +1,7 @@
+FSharp.Core
Microsoft.AspNet.Razor
+RazorEngine
+
+group Test
+FsUnit
NUnit
-RazorEngine
\ No newline at end of file
diff --git a/tests/FSharp.Markdown.Tests/App.config b/tests/FSharp.Markdown.Tests/App.config
index 016441f87..782c7196a 100644
--- a/tests/FSharp.Markdown.Tests/App.config
+++ b/tests/FSharp.Markdown.Tests/App.config
@@ -4,35 +4,37 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ True
+
+
+
+
+ True
+
+
+
+
\ No newline at end of file
diff --git a/tests/FSharp.Markdown.Tests/CommonMarkSpecTest.fs b/tests/FSharp.Markdown.Tests/CommonMarkSpecTest.fs
index 0895020bf..3fc9ab319 100644
--- a/tests/FSharp.Markdown.Tests/CommonMarkSpecTest.fs
+++ b/tests/FSharp.Markdown.Tests/CommonMarkSpecTest.fs
@@ -2,8 +2,8 @@
open System.IO
open System.Diagnostics
-let (++) a b = Path.Combine(a, b)
-let testdir = __SOURCE_DIRECTORY__ ++ Path.Combine("..", "..", "tests")
+let (>) a b = Path.Combine(a, b)
+let testdir = __SOURCE_DIRECTORY__ > Path.Combine("..", "..", "tests")
open FSharp.Data
type CommonMarkSpecJson = JsonProvider<"../../tests/commonmark_spec.json">
diff --git a/tests/FSharp.Markdown.Tests/Externals.fs b/tests/FSharp.Markdown.Tests/Externals.fs
index b8c391d94..2dfd46b80 100644
--- a/tests/FSharp.Markdown.Tests/Externals.fs
+++ b/tests/FSharp.Markdown.Tests/Externals.fs
@@ -1,8 +1,9 @@
#if INTERACTIVE
#r "../../bin/FSharp.Markdown.dll"
-#r "../../packages/NUnit/lib/nunit.framework.dll"
-#load "../Common/FsUnit.fs"
+#r "../../packages/test/NUnit/lib/net45/nunit.framework.dll"
+#r "../../packages/test/FsUnit/lib/net45/FsUnit.NUnit.dll"
#else
+[]
module FSharp.Markdown.Tests.Externals
#endif
diff --git a/tests/FSharp.Markdown.Tests/FSharp.Markdown.Tests.fsproj b/tests/FSharp.Markdown.Tests/FSharp.Markdown.Tests.fsproj
index 06e3a3ad8..f5d064f6b 100644
--- a/tests/FSharp.Markdown.Tests/FSharp.Markdown.Tests.fsproj
+++ b/tests/FSharp.Markdown.Tests/FSharp.Markdown.Tests.fsproj
@@ -40,6 +40,7 @@
AnyCPU
+ 14.011
@@ -64,11 +65,8 @@
-
+
-
- FsUnit.fs
-
@@ -79,9 +77,6 @@
-
- False
-
@@ -106,6 +101,71 @@
True
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\net20\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\net40\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+monoandroid10+monotouch10+xamarinios10\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45+wp8\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45+wpa81+wp8\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+sl5+netcore45\FSharp.Core.dll
+ True
+ True
+
+
+
+
@@ -119,23 +179,34 @@
-
+
+
+
+ ..\..\packages\FSharp.Data\lib\portable-net45+netcore45\FSharp.Data.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Data\lib\portable-net45+netcore45+wpa81+wp8\FSharp.Data.dll
+ True
+ True
+
+
+
+
- ..\..\packages\FSharp.Data\lib\portable-net40+sl5+wp8+win8\FSharp.Data.dll
+ ..\..\packages\FSharp.Data\lib\portable-net45+sl50+netcore45\FSharp.Data.dllTrueTrue
-
-
- ..\..\packages\NUnit\lib\nunit.framework.dll
- True
- True
-
-
@@ -147,4 +218,26 @@
+
+
+
+
+ ..\..\packages\test\FsUnit\lib\net45\FsUnit.NUnit.dll
+ True
+ True
+
+
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net45\nunit.framework.dll
+ True
+ True
+
+
+
+
\ No newline at end of file
diff --git a/tests/FSharp.Markdown.Tests/Markdown.fs b/tests/FSharp.Markdown.Tests/Markdown.fs
index 8d90faf69..de8475bbf 100644
--- a/tests/FSharp.Markdown.Tests/Markdown.fs
+++ b/tests/FSharp.Markdown.Tests/Markdown.fs
@@ -3,6 +3,7 @@
#r "../../packages/NUnit/lib/nunit.framework.dll"
#load "../Common/FsUnit.fs"
#else
+[]
module FSharp.Markdown.Tests.Parsing
#endif
@@ -10,6 +11,7 @@ open FsUnit
open NUnit.Framework
open FSharp.Markdown
open FSharp.Formatting.Common
+open FsUnitTyped
let properNewLines (text: string) = text.Replace("\r\n", System.Environment.NewLine)
diff --git a/tests/FSharp.Markdown.Tests/TestFiles.fs b/tests/FSharp.Markdown.Tests/TestFiles.fs
index db7c43bf9..7133d8675 100644
--- a/tests/FSharp.Markdown.Tests/TestFiles.fs
+++ b/tests/FSharp.Markdown.Tests/TestFiles.fs
@@ -7,15 +7,15 @@ open FSharp.Markdown
open System.IO
open System.Diagnostics
-let (++) a b = Path.Combine(a, b)
-let testdir = __SOURCE_DIRECTORY__ ++ Path.Combine("..","..","tests")
+let (>) a b = Path.Combine(a, b)
+let testdir = __SOURCE_DIRECTORY__ > Path.Combine("..","..","tests")
// --------------------------------------------------------------------------------------
// Run performance benchmarks
// --------------------------------------------------------------------------------------
let benchmark file count =
- let text = File.ReadAllText(testdir ++ "benchmark" ++ file)
+ let text = File.ReadAllText(testdir > "benchmark" > file)
let sw = new Stopwatch()
sw.Start()
@@ -68,5 +68,5 @@ let rec runTests dir =
// --------------------------------------------------------------------------------------
let runAll () =
- runTests (testdir ++ "testfiles")
+ runTests (testdir > "testfiles")
benchmarks ()
diff --git a/tests/FSharp.Markdown.Tests/paket.references b/tests/FSharp.Markdown.Tests/paket.references
index 112f82367..3d9223558 100644
--- a/tests/FSharp.Markdown.Tests/paket.references
+++ b/tests/FSharp.Markdown.Tests/paket.references
@@ -1,2 +1,6 @@
-NUnit
-FSharp.Data
\ No newline at end of file
+FSharp.Core
+FSharp.Data
+
+group Test
+FsUnit
+group Test
\ No newline at end of file
diff --git a/tests/FSharp.MetadataFormat.Tests/App.config b/tests/FSharp.MetadataFormat.Tests/App.config
index 248f19a69..19ea03904 100644
--- a/tests/FSharp.MetadataFormat.Tests/App.config
+++ b/tests/FSharp.MetadataFormat.Tests/App.config
@@ -42,10 +42,6 @@
-
-
-
-
@@ -55,8 +51,14 @@
+ True
-
+
+
+
+ True
+
+
diff --git a/tests/FSharp.MetadataFormat.Tests/FSharp.MetadataFormat.Tests.fsproj b/tests/FSharp.MetadataFormat.Tests/FSharp.MetadataFormat.Tests.fsproj
index 66216f4b4..ea654a060 100644
--- a/tests/FSharp.MetadataFormat.Tests/FSharp.MetadataFormat.Tests.fsproj
+++ b/tests/FSharp.MetadataFormat.Tests/FSharp.MetadataFormat.Tests.fsproj
@@ -42,23 +42,18 @@
true
-
- False
-
-
- FsUnit.fs
-
+ 14.011
@@ -83,7 +78,7 @@
-
+
+
+ FSharp.CodeFormat
+ {341ebf32-d470-4c55-99e9-55f14f7ffbb1}
+ True
+ FSharp.Formatting.Common{91bad90e-bf3b-4646-a1a7-1568f8f25075}True
-
- FSharp.MetadataFormat
- {bc4946ba-2724-4524-ac50-dfc49ee154a1}
- True
-
- FSharp.Formatting.Razor.fsproj
+ FSharp.Formatting.Razor{c6b3c274-71a8-4239-ba9a-1af7b2f7c736}
+ True
- FSharp.Literate.fsproj
+ FSharp.Literate{65e6d541-0486-4383-b619-5cfc5d2ba2f0}
+ True
-
- FSharp.CodeFormat.fsproj
- {341ebf32-d470-4c55-99e9-55f14f7ffbb1}
+
+ FSharp.MetadataFormat
+ {bc4946ba-2724-4524-ac50-dfc49ee154a1}
+ True
@@ -136,6 +134,71 @@
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\net20\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\net40\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+monoandroid10+monotouch10+xamarinios10\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45+wp8\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+netcore45+wpa81+wp8\FSharp.Core.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\FSharp.Core\lib\portable-net45+sl5+netcore45\FSharp.Core.dll
+ True
+ True
+
+
+
+
@@ -147,18 +210,65 @@
-
-
- ..\..\packages\NUnit\lib\nunit.framework.dll
- True
- True
-
-
-
+
- ..\..\packages\RazorEngine\lib\net40\RazorEngine.dll
+ ..\..\packages\RazorEngine\lib\net45\RazorEngine.dll
+ True
+ True
+
+
+
+
+
+
+
+
+ ..\..\packages\test\FsUnit\lib\net45\FsUnit.NUnit.dll
+ True
+ True
+
+
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\MonoAndroid\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net20\NUnit.System.Linq.dll
+ True
+ True
+
+
+ ..\..\packages\test\NUnit\lib\net20\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net35\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\net40\nunit.framework.dllTrueTrue
@@ -166,8 +276,35 @@
-
- ..\..\packages\RazorEngine\lib\net45\RazorEngine.dll
+
+ ..\..\packages\test\NUnit\lib\net45\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\netstandard1.6\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\portable-net45+win8+wp8+wpa81\nunit.framework.dll
+ True
+ True
+
+
+
+
+
+
+ ..\..\packages\test\NUnit\lib\Xamarin.iOS10\nunit.framework.dllTrueTrue
diff --git a/tests/FSharp.MetadataFormat.Tests/Tests.fs b/tests/FSharp.MetadataFormat.Tests/Tests.fs
index a3424ed8f..d10afc7ad 100755
--- a/tests/FSharp.MetadataFormat.Tests/Tests.fs
+++ b/tests/FSharp.MetadataFormat.Tests/Tests.fs
@@ -1,10 +1,13 @@
#if INTERACTIVE
#I "../../bin"
+#r "FSharp.Formatting.Common.dll"
#r "FSharp.MetadataFormat.dll"
+#r "FSharp.Formatting.Razor.dll"
#r "FSharp.Compiler.Service.dll"
#r "RazorEngine.dll"
-#r "../../packages/NUnit/lib/nunit.framework.dll"
-#load "../Common/FsUnit.fs"
+#r "../../packages/test/NUnit/lib/net45/nunit.framework.dll"
+#r "../../packages/test/FsUnit/lib/net45/FsUnit.NUnit.dll"
+
#else
module FSharp.MetadataFormat.Tests
#endif
@@ -14,12 +17,13 @@ open System.IO
open NUnit.Framework
open FSharp.MetadataFormat
open FSharp.Formatting.Razor
+open FsUnitTyped
// --------------------------------------------------------------------------------------
// Run the metadata formatter on sample project
// --------------------------------------------------------------------------------------
-let (@@) a b = Path.Combine(a, b)
+let (>) a b = Path.Combine(a, b)
let root = __SOURCE_DIRECTORY__
@@ -28,9 +32,13 @@ let getOutputDir() =
File.Delete(tempFile)
Directory.CreateDirectory(tempFile).FullName
+let removeWhiteSpace (str:string) =
+ str.Replace("\n", "").Replace("\r", "").Replace(" ", "")
+
+
let layoutRoots =
- [ root @@ "../../misc/templates"
- root @@ "../../misc/templates/reference" ]
+ [ root > "../../misc/templates"
+ root > "../../misc/templates/reference" ]
let info =
[ "project-name", "FSharp.ProjectScaffold"
@@ -42,10 +50,10 @@ let info =
[]
let ``MetadataFormat works on sample Deedle assembly``() =
- let library = root @@ "files" @@ "Deedle.dll"
+ let library = root > "files" > "Deedle.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate
- ( library, output, layoutRoots, info, libDirs = [root @@ "../../lib"],
+ ( library, output, layoutRoots, info, libDirs = [root > "../../lib"],
sourceRepo = "https://github.com/BlueMountainCapital/Deedle/tree/master/",
sourceFolder = "c:/dev/FSharp.DataFrame")
let files = Directory.GetFiles(output)
@@ -60,26 +68,24 @@ let ``MetadataFormat works on sample Deedle assembly``() =
System.Diagnostics.Process.Start(output)
#endif
-// Ignore by default to make tests run reasonably fast
-[]
+
+[]
let ``MetadataFormat works on sample FAKE assembly``() =
- let library = root @@ "files" @@ "FAKE" @@ "FakeLib.dll"
+ let library = root > "files" > "FAKE" > "FakeLib.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate(library, output, layoutRoots, info)
let files = Directory.GetFiles(output)
files |> Seq.length |> shouldEqual 166
-let removeWhiteSpace (str:string) =
- str.Replace("\n", "").Replace("\r", "").Replace(" ", "")
[]
let ``MetadataFormat works on two sample F# assemblies``() =
- let binDir = root @@ "files" @@ "FsLib" @@ "bin" @@ "Debug"
+ let binDir = root > "files" > "FsLib" > "bin" > "Debug"
let libraries =
- [ binDir @@ "FsLib1.dll"
- binDir @@ "FsLib2.dll" ]
+ [ binDir > "FsLib1.dll"
+ binDir > "FsLib2.dll" ]
let output = getOutputDir()
- RazorMetadataFormat.Generate(libraries, output, layoutRoots, info, libDirs = [binDir; root @@ "../../lib"])
+ RazorMetadataFormat.Generate(libraries, output, layoutRoots, info, libDirs = [binDir; root > "../../lib"])
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
@@ -103,17 +109,17 @@ let ``MetadataFormat works on two sample F# assemblies``() =
#endif
// Check that methods with no arguments are correctly generated (#113)
- files.["fslib-record.html"] |> should notContain "Foo2(arg1)"
+ files.["fslib-record.html"] |> shouldNotContainText "Foo2(arg1)"
files.["fslib-record.html"] |> should contain "Foo2()"
files.["fslib-record.html"] |> should contain "Signature: unit -> int"
files.["fslib-class.html"] |> should contain "new()"
files.["fslib-class.html"] |> should contain "Signature: unit -> Class"
// Check that properties are correctly generated (#114)
- files.["fslib-class.html"] |> removeWhiteSpace |> should notContain ">Member(arg1)<"
- files.["fslib-class.html"] |> removeWhiteSpace |> should notContain ">Member()<"
- files.["fslib-class.html"] |> removeWhiteSpace |> should contain ">Member<"
- files.["fslib-class.html"] |> should notContain "Signature: unit -> int"
+ files.["fslib-class.html"] |> removeWhiteSpace |> shouldNotContainText ">Member(arg1)<"
+ files.["fslib-class.html"] |> removeWhiteSpace |> shouldNotContainText ">Member()<"
+ files.["fslib-class.html"] |> removeWhiteSpace |> shouldContainText ">Member<"
+ files.["fslib-class.html"] |> shouldNotContainText "Signature: unit -> int"
files.["fslib-class.html"] |> should contain "Signature: int"
#if INTERACTIVE
@@ -122,16 +128,16 @@ let ``MetadataFormat works on two sample F# assemblies``() =
[]
let ``MetadataFormat generates Go to GitHub source links``() =
- let binDir = root @@ "files" @@ "FsLib" @@ "bin" @@ "Debug"
+ let binDir = root > "files" > "FsLib" > "bin" > "Debug"
let libraries =
- [ binDir @@ "FsLib1.dll"
- binDir @@ "FsLib2.dll" ]
+ [ binDir > "FsLib1.dll"
+ binDir > "FsLib2.dll" ]
let output = getOutputDir()
printfn "Output: %s" output
RazorMetadataFormat.Generate
- ( libraries, output, layoutRoots, info, libDirs = [binDir; root @@ "../../lib"],
+ ( libraries, output, layoutRoots, info, libDirs = [binDir; root > "../../lib"],
sourceRepo = "https://github.com/tpetricek/FSharp.Formatting/tree/master",
- sourceFolder = root @@ "../.." )
+ sourceFolder = (root > "../..") )
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
files.["fslib-class.html"] |> should contain "github-link"
@@ -148,16 +154,16 @@ let ``MetadataFormat generates Go to GitHub source links``() =
[]
let ``MetadataFormat test that cref generation works``() =
let libraries =
- [ root @@ "files/crefLib/bin/Debug" @@ "crefLib1.dll"
- root @@ "files/crefLib/bin/Debug" @@ "crefLib2.dll"
- root @@ "files/crefLib/bin/Debug" @@ "crefLib3.dll"
- root @@ "files/crefLib/bin/Debug" @@ "crefLib4.dll" ]
+ [ root > "files/crefLib/bin/Debug" > "crefLib1.dll"
+ root > "files/crefLib/bin/Debug" > "crefLib2.dll"
+ root > "files/crefLib/bin/Debug" > "crefLib3.dll"
+ root > "files/crefLib/bin/Debug" > "crefLib4.dll" ]
let output = getOutputDir()
printfn "Output: %s" output
RazorMetadataFormat.Generate
- ( libraries, output, layoutRoots, info, libDirs = [root @@ "../../lib"],
+ ( libraries, output, layoutRoots, info, libDirs = [root > "../../lib"],
sourceRepo = "https://github.com/tpetricek/FSharp.Formatting/tree/master",
- sourceFolder = __SOURCE_DIRECTORY__ @@ "../..",
+ sourceFolder = (__SOURCE_DIRECTORY__ > "../.."),
markDownComments = false )
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
@@ -221,13 +227,13 @@ let ``MetadataFormat test that cref generation works``() =
[]
let ``MetadataFormat test that csharp (publiconly) support works``() =
let libraries =
- [ root @@ "files/csharpSupport/bin/Debug" @@ "csharpSupport.dll" ]
+ [ root > "files/csharpSupport/bin/Debug" > "csharpSupport.dll" ]
let output = getOutputDir()
printfn "Output: %s" output
RazorMetadataFormat.Generate
- ( libraries, output, layoutRoots, info, libDirs = [root @@ "../../lib"],
+ ( libraries, output, layoutRoots, info, libDirs = [root > "../../lib"],
sourceRepo = "https://github.com/tpetricek/FSharp.Formatting/tree/master",
- sourceFolder = __SOURCE_DIRECTORY__ @@ "../..",
+ sourceFolder = (__SOURCE_DIRECTORY__ > "../.."),
publicOnly = true,
markDownComments = false )
let fileNames = Directory.GetFiles(output)
@@ -271,17 +277,17 @@ let ``MetadataFormat test that csharp (publiconly) support works``() =
#endif
-[] // Ignored because publicOnly=false is currently not working, see https://github.com/tpetricek/FSharp.Formatting/pull/259
+[]
[]
let ``MetadataFormat test that csharp support works``() =
let libraries =
- [ root @@ "files/csharpSupport/bin/Debug" @@ "csharpSupport.dll" ]
+ [ root > "files/csharpSupport/bin/Debug" > "csharpSupport.dll" ]
let output = getOutputDir()
printfn "Output: %s" output
RazorMetadataFormat.Generate
- ( libraries, output, layoutRoots, info, libDirs = [root @@ "../../lib"],
+ ( libraries, output, layoutRoots, info, libDirs = [root > "../../lib"],
sourceRepo = "https://github.com/tpetricek/FSharp.Formatting/tree/master",
- sourceFolder = __SOURCE_DIRECTORY__ @@ "../..",
+ sourceFolder = (__SOURCE_DIRECTORY__ > "../.."),
publicOnly = false,
markDownComments = false )
let fileNames = Directory.GetFiles(output)
@@ -327,10 +333,10 @@ let ``MetadataFormat test that csharp support works``() =
[]
let ``MetadataFormat process XML comments in two sample F# assemblies``() =
let libraries =
- [ root @@ "files/TestLib/bin/Debug" @@ "TestLib1.dll"
- root @@ "files/TestLib/bin/Debug" @@ "TestLib2.dll" ]
+ [ root > "files/TestLib/bin/Debug" > "TestLib1.dll"
+ root > "files/TestLib/bin/Debug" > "TestLib2.dll" ]
let output = getOutputDir()
- RazorMetadataFormat.Generate(libraries, output, layoutRoots, info, libDirs = [root @@ "../../lib"], markDownComments = false)
+ RazorMetadataFormat.Generate(libraries, output, layoutRoots, info, libDirs = [root > "../../lib"], markDownComments = false)
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
files.["fslib-class.html"] |> should contain "Readonly int property"
@@ -347,9 +353,9 @@ let ``MetadataFormat process XML comments in two sample F# assemblies``() =
[]
let ``MetadataFormat highlights code snippets in Markdown comments``() =
- let library = root @@ "files/TestLib/bin/Debug" @@ "TestLib1.dll"
+ let library = root > "files/TestLib/bin/Debug" > "TestLib1.dll"
let output = getOutputDir()
- RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [root @@ "../../lib"], markDownComments = true)
+ RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [root > "../../lib"], markDownComments = true)
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
files.["fslib-myclass.html"] |> should contain """let"""
@@ -358,10 +364,10 @@ let ``MetadataFormat highlights code snippets in Markdown comments``() =
[]
let ``MetadataFormat handles c# dlls`` () =
- let library = root @@ "files" @@ "CSharpFormat.dll"
+ let library = root > "files" > "CSharpFormat.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate
- ( library, output, layoutRoots, info, libDirs = [root @@ "../../lib"])
+ ( library, output, layoutRoots, info, libDirs = [root > "../../lib"])
let files = Directory.GetFiles(output)
let optIndex = files |> Seq.tryFind (fun s -> s.EndsWith "index.html")
@@ -373,10 +379,10 @@ let ``MetadataFormat handles c# dlls`` () =
[]
let ``MetadataFormat processes C# types and includes xml comments in docs`` () =
- let library = root @@ "files" @@ "CSharpFormat.dll"
+ let library = root > "files" > "CSharpFormat.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate
- ( library, output, layoutRoots, info, libDirs = [root @@ "../../lib"])
+ ( library, output, layoutRoots, info, libDirs = [root > "../../lib"])
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
files.["index.html"] |> should contain "CLikeFormat"
@@ -384,10 +390,10 @@ let ``MetadataFormat processes C# types and includes xml comments in docs`` () =
[]
let ``MetadataFormat processes C# properties on types and includes xml comments in docs`` () =
- let library = root @@ "files" @@ "CSharpFormat.dll"
+ let library = root > "files" > "CSharpFormat.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate
- ( library, output, layoutRoots, info, libDirs = [root @@ "../../lib"])
+ ( library, output, layoutRoots, info, libDirs = [root > "../../lib"])
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
@@ -396,10 +402,10 @@ let ``MetadataFormat processes C# properties on types and includes xml comments
[]
let ``MetadataFormat generates module link in nested types``() =
- let binDir = root @@ "files/FsLib/bin/Debug"
- let library = binDir @@ "FsLib2.dll"
+ let binDir = root > "files/FsLib/bin/Debug"
+ let library = binDir > "FsLib2.dll"
let output = getOutputDir()
- RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [binDir; root @@ "../../lib"], markDownComments = true)
+ RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [binDir; root > "../../lib"], markDownComments = true)
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
@@ -415,7 +421,7 @@ let ``MetadataFormat generates module link in nested types``() =
files.["fslib-nested-nestedtype.html"] |> should contain "Nested"
// Only for nested types
- files.["fslib-class.html"] |> should notContain "Parent Module:"
+ files.["fslib-class.html"] |> shouldNotContainText "Parent Module:"
// Check that the link to the module is correctly generated for types in nested modules
files.["fslib-nested-submodule-verynestedtype.html"] |> should contain "Parent Module:"
@@ -430,11 +436,11 @@ open FSharp.Formatting.Common
[]
let ``MetadataFormat omit works without markdown``() =
- let binDir = root @@ "files/FsLib/bin/Debug"
- let library = binDir @@ "FsLib2.dll"
+ let binDir = root > "files/FsLib/bin/Debug"
+ let library = binDir > "FsLib2.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate
- ([library], output, layoutRoots, info, libDirs = [binDir; root @@ "../../lib"],
+ ([library], output, layoutRoots, info, libDirs = [binDir; root > "../../lib"],
markDownComments = false)
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
@@ -443,11 +449,11 @@ let ``MetadataFormat omit works without markdown``() =
[]
let ``MetadataFormat test FsLib1``() =
- let binDir = root @@ "files/FsLib/bin/Debug"
- let library = binDir @@ "FsLib1.dll"
+ let binDir = root > "files/FsLib/bin/Debug"
+ let library = binDir > "FsLib1.dll"
let output = getOutputDir()
RazorMetadataFormat.Generate
- ([ library ], output, layoutRoots, info, libDirs = [ binDir; root @@ "../../lib" ],
+ ([ library ], output, layoutRoots, info, libDirs = [ binDir; root > "../../lib" ],
markDownComments = false)
let fileNames = Directory.GetFiles(output)
@@ -458,9 +464,9 @@ let ``MetadataFormat test FsLib1``() =
// -------------------Indirect links----------------------------------
[]
let ``Metadata generates cross-type links for Indirect Links``() =
- let library = root @@ "files/FsLib/bin/Debug" @@ "FsLib2.dll"
+ let library = root > "files/FsLib/bin/Debug" > "FsLib2.dll"
let output = getOutputDir()
- RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [root @@ "../../lib"], markDownComments = true)
+ RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [root > "../../lib"], markDownComments = true)
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
@@ -485,9 +491,9 @@ let ``Metadata generates cross-type links for Indirect Links``() =
// -------------------Inline code----------------------------------
[]
let ``Metadata generates cross-type links for Inline Code``() =
- let library = root @@ "files/FsLib/bin/Debug" @@ "FsLib2.dll"
+ let library = root > "files/FsLib/bin/Debug" > "FsLib2.dll"
let output = getOutputDir()
- RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [root @@ "../../lib"], markDownComments = true)
+ RazorMetadataFormat.Generate([library], output, layoutRoots, info, libDirs = [root > "../../lib"], markDownComments = true)
let fileNames = Directory.GetFiles(output)
let files = dict [ for f in fileNames -> Path.GetFileName(f), File.ReadAllText(f) ]
diff --git a/tests/FSharp.MetadataFormat.Tests/files/FsLib/FsLib1.fsproj b/tests/FSharp.MetadataFormat.Tests/files/FsLib/FsLib1.fsproj
index 14ed6d95b..a29006e8f 100644
--- a/tests/FSharp.MetadataFormat.Tests/files/FsLib/FsLib1.fsproj
+++ b/tests/FSharp.MetadataFormat.Tests/files/FsLib/FsLib1.fsproj
@@ -8,9 +8,10 @@
LibraryFsLibFsLib1
- v4.0
- 4.3.0.0
+ v4.5
+ 4.4.0.0FsLib1
+ true
@@ -33,9 +34,6 @@
-
- False
-
@@ -44,6 +42,7 @@
+ 14.011
@@ -52,6 +51,11 @@
$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets
+
+
+ $(MSBuildExtensionsPath32)\..\Microsoft SDKs\F#\4.0\Framework\v4.0\Microsoft.FSharp.Targets
+
+ $(MSBuildExtensionsPath32)\..\Microsoft SDKs\F#\3.1\Framework\v4.0\Microsoft.FSharp.Targets
@@ -63,7 +67,7 @@
-
+