F# FSI 在内联函数内没有中断

Question

我有几个通用的内联函数，例如：

let inline getRatesImpl<'T when 'T : (member enantiomer : 'T) and 'T : equality> 
    (d : Dictionary<'T, (ReactionRate option * ReactionRate option)>) 
    (calculateRates : 'T -> RelatedReactions<'T>)
    (r : 'T) = 

    match d.TryGetValue r with 
    | true, rates -> 
        rates
    | false, _ -> 
        updateRelatedReactions d (calculateRates r) r

函数是这样使用的：

type FoodCreationModel (p : FoodCreationParam) = 
    let rateDictionary = new Dictionary<FoodCreationReaction, (ReactionRate option * ReactionRate option)>()
    let calculateRates _ = getRates (Some p.foodCreationRate, Some 1.0) (None, None)

    member __.getRates r = 
        getRatesImpl rateDictionary calculateRates r

    member __.inputParams = p

当我在getRatesImpl 中插入一个break 时，它不会在FSI 中被击中。即使我在getRates（在线getRatesImpl rateDictionary calculateRates r）上休息一下，然后按F11，FSI 也不会进入inline getRatesImpl。但是，它确实有效，我可以通过查看字典在调用前后的变化来检查它。

其中一些内联函数非常复杂，我真的需要不时调试它们。

问题是怎么做的？

Answer 1

您的代码可能可以更改以避免需要复杂的inlines。

避免使用 SRTP 的一种方法是将所需函数作为参数而不是约束传递：

let getRatesImpl
        (d : Dictionary<'T, (ReactionRate option * ReactionRate option)>) 
        (getEnantiomer: 'T -> 'T)
        (calculateRates : 'T -> RelatedReactions<'T>)
        (r : 'T) = 

    match d.TryGetValue r with 
    | true, rates -> 
        rates
    | false, _ -> 
        updateRelatedReactions d getEnantiomer (calculateRates r) r

现在getRatesImpl 不需要内联了。

如果需要多个函数，则可以传递函数记录。