public static MemberDecoration GetDecoration(INestedTypeUnionCaseDeclaration caseDeclaration)
{
if (caseDeclaration.FieldsEnumerable.IsEmpty())
{
return(MemberDecoration.FromModifiers(Modifiers.INTERNAL));
}
return(caseDeclaration.GetContainingTypeDeclaration() is IUnionDeclaration unionDeclaration
? GetDecoration(unionDeclaration.AccessModifiers, TreeNodeEnumerable <IFSharpAttribute> .Empty)
: MemberDecoration.DefaultValue);
}
public override void VisitNestedTypeUnionCaseDeclaration(INestedTypeUnionCaseDeclaration decl)
{
Builder.StartPart(new UnionCasePart(decl, Builder));
ProcessTypeMembers(decl.MemberDeclarations);
Builder.EndPart();
}
