diff options
author | Matt Ward <matt.ward@xamarin.com> | 2017-07-27 17:48:36 +0300 |
---|---|---|
committer | Matt Ward <ward.matt@gmail.com> | 2017-07-27 18:10:49 +0300 |
commit | c890ba7826d35d55a66a1a78a49d8aa8a8690913 (patch) | |
tree | e7f2543a608a40e5459f7e962a7a15bedf1d3c75 /main | |
parent | 8d86bda3c0b5d74d812b6c5f9cdb9e1d4ba7d050 (diff) |
[F#] Add test for Xamarin.Forms template using a shared project
The portable class library project is being tested already. The shared
project needs other parameters configured so it is created instead of
the portable class library project.
Diffstat (limited to 'main')
-rw-r--r-- | main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs b/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs index 5b10ccab5f..0522ceb299 100644 --- a/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs +++ b/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs @@ -54,7 +54,7 @@ type ``Template tests``() = let templatesDir = FilePath(".").FullPath.ToString() / "buildtemplates" - let test (tt:string) = + let testWithParameters (tt:string, parameters:string) = if not MonoDevelop.Core.Platform.IsMac then Assert.Ignore () //if tt = "FSharpPortableLibrary" then @@ -80,6 +80,10 @@ type ``Template tests``() = cinfo.Parameters.["AndroidMinSdkVersionAttribute"] <- "android:minSdkVersion=\"10\"" cinfo.Parameters.["AndroidThemeAttribute"] <- "" cinfo.Parameters.["TargetFrameworkVersion"] <- "MonoAndroid,Version=v7.0" + + for templateParameter in TemplateParameter.CreateParameters (parameters) do + cinfo.Parameters.[templateParameter.Name] <- templateParameter.Value + use sln = projectTemplate.CreateWorkspaceItem (cinfo) :?> Solution let createTemplate (template:SolutionTemplate) = @@ -137,6 +141,9 @@ type ``Template tests``() = | [] -> Assert.Pass() | errors -> Assert.Fail (sprintf "%A" errors) } + + let test (tt:string) = testWithParameters (tt, "") + [<TestFixtureSetUp>] member x.Setup() = let config = """ @@ -179,3 +186,6 @@ type ``Template tests``() = [<Test;AsyncStateMachine(typeof<Task>)>]member x.``FSharpGtkProject``()= test "FSharpGtkProject" [<Test;AsyncStateMachine(typeof<Task>)>]member x.``MonoDevelop FSharp LibraryProject``()= test "MonoDevelop.FSharp.LibraryProject" [<Test;AsyncStateMachine(typeof<Task>)>]member x.``FSharpNUnitLibraryProject``()= test "FSharpNUnitLibraryProject" + [<Test;AsyncStateMachine(typeof<Task>)>] + member x.``Xamarin Forms FSharp FormsApp Shared``() = + testWithParameters ("Xamarin.Forms.FSharp.FormsApp", "CreateSharedAssetsProject=True;CreatePortableDotNetProject=False") |