[Pkg-cli-apps-commits] [fsharp] 19/60: fix integration
Christopher Halse Rogers
raof-guest at moszumanska.debian.org
Sun Sep 14 08:13:37 UTC 2014
This is an automated email from the git hooks/post-receive script.
raof-guest pushed a commit to branch master
in repository fsharp.
commit 738eeb4dbd5c415739f9aaf13cd566a657f739ff
Author: F# Software Foundation <fsgit at fastmail.fm>
Date: Thu Jul 17 20:52:04 2014 +0100
fix integration
---
src/FSharpSource.targets | 3 +++
src/fsharp/FSharp.Build/FSharp.Build.fsproj | 3 ---
.../FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj | 3 ---
src/fsharp/FSharp.Core.Unittests/SurfaceArea.2.0.fs | 2 +-
src/fsharp/FSharp.Core.Unittests/SurfaceArea.4.0.fs | 2 +-
src/fsharp/FSharp.Core.Unittests/SurfaceArea.Portable.fs | 2 +-
src/fsharp/FSharp.Core.Unittests/SurfaceArea.Silverlight.2.0.fs | 2 +-
7 files changed, 7 insertions(+), 10 deletions(-)
diff --git a/src/FSharpSource.targets b/src/FSharpSource.targets
index a7e5013..869dcc6 100755
--- a/src/FSharpSource.targets
+++ b/src/FSharpSource.targets
@@ -98,6 +98,9 @@ Some other NuGET monikers to support in the future, see http://docs.nuget.org/do
<!-- v2.0-specific flags -->
<PropertyGroup Condition="'$(TargetFramework)'=='net20'">
+ <!-- If 3.5 is not configured explicitly, use 2.0 -->
+ <TargetFrameworkVersion Condition="'$(TargetFrameworkVersion)'==''">v2.0</TargetFrameworkVersion>
+ <TargetFrameworkOutputDirectory>net20</TargetFrameworkOutputDirectory>
<DefineConstants>$(DefineConstants);FSHARP_CORE_2_0</DefineConstants>
<DefineConstants>$(DefineConstants);RUNTIME</DefineConstants>
<DefineConstants>$(DefineConstants);FX_ATLEAST_35</DefineConstants>
diff --git a/src/fsharp/FSharp.Build/FSharp.Build.fsproj b/src/fsharp/FSharp.Build/FSharp.Build.fsproj
index 4dc3cac..ef5dead 100644
--- a/src/fsharp/FSharp.Build/FSharp.Build.fsproj
+++ b/src/fsharp/FSharp.Build/FSharp.Build.fsproj
@@ -20,9 +20,6 @@
<FsSrGen Include="FSBuild.txt">
<Link>FSBuild.txt</Link>
</FsSrGen>
- <FsSrGen Include="FSBuild.txt">
- <Link>FSBuild.txt</Link>
- </FsSrGen>
<Compile Include="InternalsVisibleTo.fs" />
<Compile Include="..\..\assemblyinfo\assemblyinfo.FSharp.Build.dll.fs">
<Link>Utilities/assemblyinfo.FSharp.Build.dll.fs</Link>
diff --git a/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj b/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
index 80a217d..1842687 100644
--- a/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
+++ b/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
@@ -19,9 +19,6 @@
<FsSrGen Include="..\fsiserver\FSServerShared.txt">
<Link>FSServerShared.txt</Link>
</FsSrGen>
- <FsSrGen Include="..\fsiserver\FSServerShared.txt">
- <Link>FSServerShared.txt</Link>
- </FsSrGen>
<Compile Include="InternalsVisibleTo.fs" />
<Compile Include="..\..\assemblyinfo\assemblyinfo.FSharp.Compiler.Server.Shared.dll.fs">
<Link>assemblyinfo.FSharp.Compiler.Server.Shared.dll.fs</Link>
diff --git a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.2.0.fs b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.2.0.fs
index 2513788..a92699d 100755
--- a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.2.0.fs
+++ b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.2.0.fs
@@ -3120,6 +3120,6 @@ System.Tuple`8[T1,T2,T3,T4,T5,T6,T7,TRest]: Void .ctor(T1, T2, T3, T4, T5, T6, T
"
let act = actual.ToString()
- if expected <> act then
+ if expected.Replace("\r\n","\n") <> act.Replace("\r\n","\n") then
printf "%s" act
Assert.AreEqual(expected, act)
diff --git a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.4.0.fs b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.4.0.fs
index b0a1f98..1b45a9a 100755
--- a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.4.0.fs
+++ b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.4.0.fs
@@ -3322,7 +3322,7 @@ Microsoft.FSharp.Reflection.UnionCaseInfo: System.Type get_DeclaringType()
expectedSurfaceArea |> normalize
let act = actual.ToString() |> normalize
- if expected <> act then
+ if expected.Replace("\r\n","\n") <> act.Replace("\r\n","\n") then
let mutable indexFirstDiff = 0
while indexFirstDiff < expected.Length && expected.[indexFirstDiff] = act.[indexFirstDiff] do
indexFirstDiff <- indexFirstDiff + 1
diff --git a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Portable.fs b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Portable.fs
index fa50da4..44d9c77 100755
--- a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Portable.fs
+++ b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Portable.fs
@@ -3306,7 +3306,7 @@ System.IObserver`1[T]: Void OnNext(T)"
// add padding to ensure diagnostics below don't get IndexOutOfRange
let expected = expected + String.replicate 400 " "
let act = act + String.replicate 400 " "
- if expected <> act then
+ if expected.Replace("\r\n","\n") <> act.Replace("\r\n","\n") then
let mutable indexFirstDiff = 0
while indexFirstDiff < expected.Length && expected.[indexFirstDiff] = act.[indexFirstDiff] do
indexFirstDiff <- indexFirstDiff + 1
diff --git a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Silverlight.2.0.fs b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Silverlight.2.0.fs
index b3dc06c..fbdc9f4 100755
--- a/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Silverlight.2.0.fs
+++ b/src/fsharp/FSharp.Core.Unittests/SurfaceArea.Silverlight.2.0.fs
@@ -2908,6 +2908,6 @@ System.Tuple`8[T1,T2,T3,T4,T5,T6,T7,TRest]: Void .ctor(T1, T2, T3, T4, T5, T6, T
"
let act = actual.ToString()
- if expected <> act then
+ if expected.Replace("\r\n","\n") <> act.Replace("\r\n","\n") then
printf "%s" act
Assert.AreEqual(expected, act)
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-cli-apps/packages/fsharp.git
More information about the Pkg-cli-apps-commits
mailing list