From 01c3626f1d5bd1df281fac16f116af968b200bec Mon Sep 17 00:00:00 2001
From: "OPTIMUS-PRIME\\craig" <craig@craigoates.net>
Date: Wed, 13 Jun 2018 20:37:32 +0100
Subject: [PATCH] End of session check-in. Hooking up the testing.

---
 TestCentre/FsCTests.fs       |  7 -------
 TestCentre/PropTests.fs      |  6 ++++++
 TestCentre/TestCentre.fsproj |  7 +++----
 TestCentre/UnitTests.fs      | 10 ++++++++++
 4 files changed, 19 insertions(+), 11 deletions(-)
 delete mode 100644 TestCentre/FsCTests.fs
 create mode 100644 TestCentre/PropTests.fs
 create mode 100644 TestCentre/UnitTests.fs

diff --git a/TestCentre/FsCTests.fs b/TestCentre/FsCTests.fs
deleted file mode 100644
index 1da5f58..0000000
--- a/TestCentre/FsCTests.fs
+++ /dev/null
@@ -1,7 +0,0 @@
-module Say
-
-    open FsCheck
-    open FsCheck.Xunit
-    open WetPancake.Pancake
-
-    let RandomText = RequestRandomText()
\ No newline at end of file
diff --git a/TestCentre/PropTests.fs b/TestCentre/PropTests.fs
new file mode 100644
index 0000000..ca8c90c
--- /dev/null
+++ b/TestCentre/PropTests.fs
@@ -0,0 +1,6 @@
+module PropTests
+
+    open FsCheck
+    open WetPancake.Pancake
+
+    let RandomText = RequestRandomText()
\ No newline at end of file
diff --git a/TestCentre/TestCentre.fsproj b/TestCentre/TestCentre.fsproj
index ec5c770..cbf7fdc 100644
--- a/TestCentre/TestCentre.fsproj
+++ b/TestCentre/TestCentre.fsproj
@@ -5,15 +5,14 @@
   </PropertyGroup>
 
   <ItemGroup>
-    <Compile Include="FsCTests.fs" />
+    <Compile Include="PropTests.fs" />
+    <Compile Include="UnitTests.fs" />
   </ItemGroup>
 
   <ItemGroup>
     <PackageReference Include="FsCheck" Version="2.10.10" />
-    <PackageReference Include="FsCheck.Xunit" Version="2.10.10" />
     <PackageReference Include="xunit" Version="2.3.1" />
-    <PackageReference Include="xunit.analyzers" Version="0.9.0" />
-    <PackageReference Include="xunit.runner.console" Version="2.3.1" />
+    <PackageReference Include="xunit.runner.visualstudio" Version="2.3.1" />
   </ItemGroup>
 
   <ItemGroup>
diff --git a/TestCentre/UnitTests.fs b/TestCentre/UnitTests.fs
new file mode 100644
index 0000000..9747c10
--- /dev/null
+++ b/TestCentre/UnitTests.fs
@@ -0,0 +1,10 @@
+namespace TestCentre.UnitTests
+open Xunit
+open WetPancake.Pancake
+
+    module UnitTests =
+
+        [<Fact>]
+        let RandomTest1()=
+            let result = RequestRandomText
+            Assert.NotNull(result)
\ No newline at end of file