Skip to content

Commit 67e5b54

Browse files
committed
Attempt to make rabbitmq_amqp1_0 tests less flaky
1 parent ad8c6f8 commit 67e5b54

File tree

1 file changed

+5
-0
lines changed
  • deps/rabbitmq_amqp1_0/test/system_SUITE_data/fsharp-tests

1 file changed

+5
-0
lines changed

deps/rabbitmq_amqp1_0/test/system_SUITE_data/fsharp-tests/Program.fs

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -401,6 +401,7 @@ module Test =
401401
use ac = connect uri
402402
let dest = "/amq/queue/test"
403403
let receiver = ReceiverLink(ac.Session, "test-receiver", dest)
404+
receiver.Receive()
404405
receiver.Close()
405406
failwith "expected exception not received"
406407
with
@@ -415,12 +416,16 @@ module Test =
415416
use ac = connect uri
416417
let dest = "/amq/queue/test"
417418
let receiver = ReceiverLink(ac.Session, "test-receiver", dest)
419+
receiver.Receive()
418420
receiver.Close()
419421
failwith "expected exception not received"
420422
with
421423
| :? Amqp.AmqpException as ex ->
422424
printfn "Exception %A" ex
423425
()
426+
| :? System.ObjectDisposedException as ex ->
427+
printfn "Exception %A" ex
428+
()
424429

425430
let (|AsLower|) (s: string) =
426431
match s with

0 commit comments

Comments
 (0)