Exclude property-based tests from portable47

dotnet · Jul 29, 2015 · ba0ef70 · ba0ef70
1 parent 8c83c8f
commit ba0ef70
Show file tree

Hide file tree

Showing 5 changed files with 25 additions and 5 deletions.
diff --git a/src/fsharp/FSharp.Core.Unittests/FSharp.Core.Unittests.fsproj b/src/fsharp/FSharp.Core.Unittests/FSharp.Core.Unittests.fsproj
@@ -49,7 +49,7 @@
       <Private>True</Private>
       <HintPath>$(NUnitLibDir)\nunit.framework.dll</HintPath>
     </Reference>
-    <Reference Include="FsCheck, Version=$(FsCheckFullVersion)" Condition="'$(TargetFramework)' != 'sl5' AND '$(TargetFramework)' != 'sl3-wp'">
+    <Reference Include="FsCheck, Version=$(FsCheckFullVersion)" Condition="'$(TargetFramework)' != 'sl5' AND '$(TargetFramework)' != 'sl3-wp' AND '$(TargetFramework)' != 'portable47'">
       <SpecificVersion>true</SpecificVersion>
       <Private>True</Private>
       <HintPath>$(FsCheckLibDir)\FsCheck.dll</HintPath>

diff --git a/src/fsharp/FSharp.Core.Unittests/PropertyTests/ArrayProperties.fs b/src/fsharp/FSharp.Core.Unittests/PropertyTests/ArrayProperties.fs
@@ -5,6 +5,8 @@ module FSharp.Core.PropertyTests.ArrayProperties
 open System
 open System.Collections.Generic
 
+#if portable7 || portable78 || portable259
+
 open NUnit.Framework
 open FsCheck
 
@@ -18,4 +20,7 @@ let distinctByStable<'a when 'a : comparison> (xs : 'a []) =
 [<Test>]
 let ``Seq.distinctBy is stable`` () =
     Check.QuickThrowOnFailure distinctByStable<int>
-    Check.QuickThrowOnFailure distinctByStable<string>
+    Check.QuickThrowOnFailure distinctByStable<string>
+
+#else
+#endif
diff --git a/src/fsharp/FSharp.Core.Unittests/PropertyTests/CollectionModulesConsistency.fs b/src/fsharp/FSharp.Core.Unittests/PropertyTests/CollectionModulesConsistency.fs
@@ -5,6 +5,8 @@ module FSharp.Core.PropertyTests.CollectionModulesConsistency
 open System
 open System.Collections.Generic
 
+#if portable7 || portable78 || portable259
+
 open NUnit.Framework
 open FsCheck
 open Utils
@@ -1237,4 +1239,7 @@ let zip3<'a when 'a : equality> (xs':('a*'a*'a) []) =
 let ``zip3 is consistent for collections with equal length`` () =
     Check.QuickThrowOnFailure zip3<int>
     Check.QuickThrowOnFailure zip3<string>
-    Check.QuickThrowOnFailure zip3<NormalFloat>
+    Check.QuickThrowOnFailure zip3<NormalFloat>
+
+#else
+#endif
diff --git a/src/fsharp/FSharp.Core.Unittests/PropertyTests/ListProperties.fs b/src/fsharp/FSharp.Core.Unittests/PropertyTests/ListProperties.fs
@@ -5,6 +5,8 @@ module FSharp.Core.PropertyTests.Lists
 open System
 open System.Collections.Generic
 
+#if portable7 || portable78 || portable259
+
 open NUnit.Framework
 open FsCheck
 open Utils
@@ -823,4 +825,7 @@ let sumBy<'a> (xs : 'a list) (f:'a -> int) =
 let ``List.sumBy calculates the sum of the mapped list`` () =
     Check.QuickThrowOnFailure sumBy<int>
     Check.QuickThrowOnFailure sumBy<string> 
-    Check.QuickThrowOnFailure sumBy<float>
+    Check.QuickThrowOnFailure sumBy<float>
+
+#else
+#endif
diff --git a/src/fsharp/FSharp.Core.Unittests/PropertyTests/SeqProperties.fs b/src/fsharp/FSharp.Core.Unittests/PropertyTests/SeqProperties.fs
@@ -5,6 +5,8 @@ module FSharp.Core.PropertyTests.SeqProperties
 open System
 open System.Collections.Generic
 
+#if portable7 || portable78 || portable259
+
 open NUnit.Framework
 open FsCheck
 open Utils
@@ -37,4 +39,7 @@ let distinctByStable<'a when 'a : comparison> (xs : 'a []) =
 [<Test>]
 let ``Seq.distinctBy is stable`` () =
     Check.QuickThrowOnFailure distinctByStable<int>
-    Check.QuickThrowOnFailure distinctByStable<string>
+    Check.QuickThrowOnFailure distinctByStable<string>
+
+#else
+#endif