如何解决 F# 类型引用错误？

Question

我已经浏览了我的书，并且用谷歌搜索，直到我用完搜索词，但我仍然找不到这个问题的示例或答案：

以下代码无法编译，因为类型 Effect 和声明 Entity 时尚未声明类型 Affect。 所以我不明白如何解决这个问题。

在C++中，这个问题是通过h文件中的原型声明然后包含h文件来解决的。 在 C# 中，这从来都不是问题。 那么F#中是如何解决的呢？

#light
type Entity = 
    { 
        Name:string; 
        Affects:List<Affect>; //Compile error: The type Affect is not defined
        Effects:List<Effect>; //Compile error: the type Effect is not defined
    }

type Effect = 
    { 
        Name:string; 
        //A function pointer for a method that takes an Entity and returns an Entity
        ApplyEffect:Entity -> Entity;
    }

type Affect = 
    { 
        Name:string; 
        //A List of Effects that are applied by this Affect Object
        EffectList:List<Effect>; 
        //A function pointer to return an Entity modified by the listed Effects
        ApplyAffect:Entity->Entity;
    }

这里的基本目标是实体类型的对象应该能够列出它可以应用于实体类型的对象的影响。 实体还可以列出已应用于其的效果。 这样，通过将所有效果与原始实体状态折叠来找到实体的“当前”状态。

感谢您抽出时间，

--Adam Lenda

Answer 1

我相信这是正确的答案：

http://langexplr .blogspot.com/2008/02/defining-mutually-recursive-classes-in.html

所以...

type Entity = 
    { 
        Name:string; 
        Affects:List<Affect>; 
        Effects:List<Effect>; 
    }
and Effect = 
    { 
        Name:string; 
        ApplyEffect:Entity -> Entity;
    }
and  Affect = 
    { 
        Name:string; 
        EffectList:List<Effect>; 
        ApplyAffect:Entity->Entity;
    }