diff --git a/SmoulderingBeachBall.sln b/SmoulderingBeachBall.sln index 8328c68..0e40a48 100644 --- a/SmoulderingBeachBall.sln +++ b/SmoulderingBeachBall.sln @@ -7,6 +7,8 @@ Project("{6EC3EE1D-3C4E-46DD-8F32-0CC8E7565705}") = "SmoulderingBeachBall", "Smo EndProject Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "SmoulderingBeachBallCLI", "SmoulderingBeachBallCLI\SmoulderingBeachBallCLI.fsproj", "{5C00D583-EF09-4FE6-A3FE-EB01454C0607}" EndProject +Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "TestCentre", "TestCentre\TestCentre.fsproj", "{9EAEE0E6-1E90-4C44-AD22-E8CA727B3392}" +EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Any CPU = Debug|Any CPU @@ -21,6 +23,10 @@ Global {5C00D583-EF09-4FE6-A3FE-EB01454C0607}.Debug|Any CPU.Build.0 = Debug|Any CPU {5C00D583-EF09-4FE6-A3FE-EB01454C0607}.Release|Any CPU.ActiveCfg = Release|Any CPU {5C00D583-EF09-4FE6-A3FE-EB01454C0607}.Release|Any CPU.Build.0 = Release|Any CPU + {9EAEE0E6-1E90-4C44-AD22-E8CA727B3392}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {9EAEE0E6-1E90-4C44-AD22-E8CA727B3392}.Debug|Any CPU.Build.0 = Debug|Any CPU + {9EAEE0E6-1E90-4C44-AD22-E8CA727B3392}.Release|Any CPU.ActiveCfg = Release|Any CPU + {9EAEE0E6-1E90-4C44-AD22-E8CA727B3392}.Release|Any CPU.Build.0 = Release|Any CPU EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE diff --git a/SmoulderingBeachBallCLI/Validation.fs b/SmoulderingBeachBallCLI/Validation.fs index 3820173..ef7473e 100644 --- a/SmoulderingBeachBallCLI/Validation.fs +++ b/SmoulderingBeachBallCLI/Validation.fs @@ -1,4 +1,4 @@ -module internal Validation +module Validation open System.Drawing open SmoulderingBeachBall.Domain.DomainTypes diff --git a/TestCentre/AssemblyInfo.fs b/TestCentre/AssemblyInfo.fs new file mode 100644 index 0000000..d8dda7b --- /dev/null +++ b/TestCentre/AssemblyInfo.fs @@ -0,0 +1,41 @@ +namespace TestCentre.AssemblyInfo + +open System.Reflection +open System.Runtime.CompilerServices +open System.Runtime.InteropServices + +// General Information about an assembly is controlled through the following +// set of attributes. Change these attribute values to modify the information +// associated with an assembly. +[] +[] +[] +[] +[] +[] +[] +[] + +// Setting ComVisible to false makes the types in this assembly not visible +// to COM components. If you need to access a type in this assembly from +// COM, set the ComVisible attribute to true on that type. +[] + +// The following GUID is for the ID of the typelib if this project is exposed to COM +[] + +// Version information for an assembly consists of the following four values: +// +// Major Version +// Minor Version +// Build Number +// Revision +// +// You can specify all the values or you can default the Build and Revision Numbers +// by using the '*' as shown below: +// [] +[] +[] + +do + () \ No newline at end of file diff --git a/TestCentre/ConsoleTests.fs b/TestCentre/ConsoleTests.fs new file mode 100644 index 0000000..690021b --- /dev/null +++ b/TestCentre/ConsoleTests.fs @@ -0,0 +1,16 @@ +namespace ConsoleTests + + module PropertyTests = + + open Xunit + open FsCheck + open FsCheck.Xunit + open Validation + + let config = { FsCheck.Config.Default with MaxTest = 10 } + + [] + let ``colour map is not empty`` () = + (Map.isEmpty colourList) = false + + Check.Quick (``colour map is not empty`` ()) \ No newline at end of file diff --git a/TestCentre/Script.fsx b/TestCentre/Script.fsx new file mode 100644 index 0000000..1845605 --- /dev/null +++ b/TestCentre/Script.fsx @@ -0,0 +1,8 @@ +// Learn more about F# at http://fsharp.org +// See the 'F# Tutorial' project for more help. + +#load "Library1.fs" +open TestCentre + +// Define your library scripting code here + diff --git a/TestCentre/TestCentre.fsproj b/TestCentre/TestCentre.fsproj new file mode 100644 index 0000000..74e7271 --- /dev/null +++ b/TestCentre/TestCentre.fsproj @@ -0,0 +1,112 @@ + + + + + + + Debug + AnyCPU + 2.0 + 9eaee0e6-1e90-4c44-ad22-e8ca727b3392 + Library + TestCentre + TestCentre + true + v4.7.1 + true + TestCentre + + + + + true + full + false + false + bin\$(Configuration)\ + DEBUG;TRACE + 3 + bin\$(Configuration)\$(AssemblyName).XML + + + pdbonly + true + true + bin\$(Configuration)\ + TRACE + 3 + bin\$(Configuration)\$(AssemblyName).XML + + + 11 + + + $(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets + + + + + + + + + + + ..\packages\FsCheck.2.11.0\lib\net452\FsCheck.dll + + + ..\packages\FsCheck.Xunit.2.11.0\lib\net452\FsCheck.Xunit.dll + + + ..\packages\FSharp.Core.4.5.2\lib\net45\FSharp.Core.dll + + + + + + + + True + + + ..\packages\xunit.abstractions.2.0.3\lib\net35\xunit.abstractions.dll + + + ..\packages\xunit.assert.2.4.0\lib\netstandard2.0\xunit.assert.dll + + + ..\packages\xunit.extensibility.core.2.4.0\lib\net452\xunit.core.dll + + + ..\packages\xunit.extensibility.execution.2.4.0\lib\net452\xunit.execution.desktop.dll + + + + + SmoulderingBeachBallCLI + {5c00d583-ef09-4fe6-a3fe-eb01454c0607} + True + + + SmoulderingBeachBall + {dfc3cbca-3da7-4cf4-a8bc-bccb740fa6cd} + True + + + + + This project references NuGet package(s) that are missing on this computer. Use NuGet Package Restore to download them. For more information, see http://go.microsoft.com/fwlink/?LinkID=322105. The missing file is {0}. + + + + + + + + \ No newline at end of file diff --git a/TestCentre/packages.config b/TestCentre/packages.config new file mode 100644 index 0000000..0e1b818 --- /dev/null +++ b/TestCentre/packages.config @@ -0,0 +1,15 @@ + + + + + + + + + + + + + + + \ No newline at end of file