root
/
rabbitmq-server
mirror of https://github.com/rabbitmq/rabbitmq-server.git
1
0
Fork 0
Code Issues Actions 2 Packages Projects Releases Wiki Activity

Fix dotnet tests. 

The CI image has been upgraded to debian 9 and thus had to use dotnet SDK 2.0.
This commit is contained in:
kjnilsson 2017-10-13 17:22:10 +01:00
parent 7630e18202
commit ff72f90512
2 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
deps/rabbitmq_amqp1_0/test/system_SUITE_data/fsharp-tests/Program.fs vendored
View File

@ -106,10 +106,10 @@ module Test =
use c = connect uri
let sender, receiver = senderReceiver c "test" "roundtrip-q"
for body in sampleTypes do
Message(body, Header = Header(Ttl = 500u))
new Message(body, Header = Header(Ttl = 500u))
|> sender.Send
let rtd = receive receiver
assertEqual body (rtd.GetBody())
assertEqual body rtd.Body
assertTrue (rtd.Header.Ttl <= 500u)
let defaultOutcome uri =
@ -152,10 +152,10 @@ module Test =
MaxFrameSize = frameSize)
use c = connectWithOpen uri opn
let sender, receiver = senderReceiver c "test" "framentation-q"
let m = Message(String.replicate size "a")
let m = new Message(String.replicate size "a")
sender.Send m
let m' = receive receiver
assertEqual (m.GetBody<string>()) (m'.GetBody<string>())
assertEqual (m.Body) (m'.Body)
let messageAnnotations uri =
use c = connect uri
@ -165,11 +165,11 @@ module Test =
let k2 = Symbol "key2"
ann.[Symbol "key1"] <- "value1"
ann.[Symbol "key2"] <- "value2"
let m = Message("testing annotations", MessageAnnotations = ann)
let m = new Message("testing annotations", MessageAnnotations = ann)
sender.Send m
let m' = receive receiver
assertEqual (m.GetBody<string>()) (m'.GetBody<string>())
assertEqual m.Body m'.Body
assertEqual (m.MessageAnnotations.Descriptor) (m'.MessageAnnotations.Descriptor)
assertEqual 2 (m'.MessageAnnotations.Map.Count)
assertTrue (m.MessageAnnotations.[k1] = m'.MessageAnnotations.[k1])
@ -183,11 +183,11 @@ module Test =
let k2 = Symbol "key2"
footer.[Symbol "key1"] <- "value1"
footer.[Symbol "key2"] <- "value2"
let m = Message("testing annotations", Footer = footer)
let m = new Message("testing annotations", Footer = footer)
sender.Send m
let m' = receive receiver
assertEqual (m.GetBody<string>()) (m'.GetBody<string>())
assertEqual m.Body m'.Body
assertEqual (m.Footer.Descriptor) (m'.Footer.Descriptor)
assertEqual 2 (m'.Footer.Map.Count)
assertTrue (m.Footer.[k1] = m'.Footer.[k1])

4
deps/rabbitmq_amqp1_0/test/system_SUITE_data/fsharp-tests/fsharp-tests.fsproj vendored
View File

@ -2,7 +2,7 @@
<PropertyGroup>
<OutputType>Exe</OutputType>
<TargetFramework>netcoreapp1.1</TargetFramework>
<TargetFramework>netcoreapp2.0</TargetFramework>
</PropertyGroup>
<ItemGroup>
@ -12,7 +12,7 @@
<ItemGroup>
<PackageReference Include="FSharp.Core" Version="4.1.*" />
<PackageReference Include="FSharp.NET.Sdk" Version="1.0.*" PrivateAssets="All" />
<PackageReference Include="AmqpNetLite" Version="*" PrivateAssets="All" />
<PackageReference Include="AmqpNetLite" Version="1.2.3" PrivateAssets="All" />
<PackageReference Include="System.Collections.NonGeneric" Version="*" PrivateAssets="All" />
<PackageReference Include="System.Runtime.Serialization.Primitives" Version="*" PrivateAssets="All" />
</ItemGroup>