你能在 foq 中设置递归模拟吗？

Question

我想用 Foq 模拟 IBus。

IBus 上的方法之一是OpenPublishChannel，它返回一个IPublishChannel。 IPublishChannel 又具有一个Bus 属性，该属性返回父IBus。

我当前的代码如下，但显然它没有编译，因为 mockBus 不是由我需要的点定义的。有没有一种方法可以设置这样的递归模拟，而无需为任一接口创建两个模拟？

open System
open EasyNetQ
open Foq

let mockChannel = 
    Mock<IPublishChannel>()
        .Setup(fun x -> <@ x.Bus @>).Returns(mockBus)
        .Create()
let mockBus =
    Mock<IBus>()
        .Setup(fun x -> <@ x.OpenPublishChannel() @>).Returns(mockChannel)
        .Create()

Answer 1

Foq 支持 Returns : unit -> 'TValue 方法，因此您可以懒惰地创建值。

使用一点突变实例可以互相引用：

type IPublishChannel =
    abstract Bus : IBus
and IBus =
    abstract OpenPublishChannel : unit -> IPublishChannel

let mutable mockBus : IBus option = None
let mutable mockChannel : IPublishChannel option = None

mockChannel <-
    Mock<IPublishChannel>()
        .Setup(fun x -> <@ x.Bus @>).Returns(fun () -> mockBus.Value)
        .Create()
    |> Some

mockBus <-
    Mock<IBus>()
        .Setup(fun x -> <@ x.OpenPublishChannel() @>).Returns(fun () -> mockChannel.Value)
        .Create()
    |> Some