DotGet with parenthesis

[nojaf]

Issue created from fantomas-online

Code

let PublishValueDefn cenv env declKind (vspec: Val) =
    if (declKind = ModuleOrMemberBinding) && 
       ((GetCurrAccumulatedModuleOrNamespaceType env).ModuleOrNamespaceKind = Namespace) && 
       (Option.isNone vspec.MemberInfo) then 
           errorR(Error(FSComp.SR.tcNamespaceCannotContainValues(), vspec.Range))

    if (declKind = ExtrinsicExtensionBinding) && 
       ((GetCurrAccumulatedModuleOrNamespaceType env).ModuleOrNamespaceKind = Namespace) then 
           errorR(Error(FSComp.SR.tcNamespaceCannotContainExtensionMembers(), vspec.Range))

    ()

Result

let PublishValueDefn cenv env declKind (vspec: Val) =
    if (declKind = ModuleOrMemberBinding)
       && ((GetCurrAccumulatedModuleOrNamespaceType env)
           .ModuleOrNamespaceKind = Namespace)
       && (Option.isNone vspec.MemberInfo) then
        errorR (Error(FSComp.SR.tcNamespaceCannotContainValues (), vspec.Range))

    if (declKind = ExtrinsicExtensionBinding)
       && ((GetCurrAccumulatedModuleOrNamespaceType env)
           .ModuleOrNamespaceKind = Namespace) then
        errorR (Error(FSComp.SR.tcNamespaceCannotContainExtensionMembers (), vspec.Range))

    ()

Problem description

Code became invalid.
.ModuleOrNamespaceKind = Namespace needs to be further indented.

Extra information

• The formatted result breaks by code.
• The formatted result gives compiler warnings.
• I or my company would be willing to help fix this.

Options

Fantomas Master at 03/14/2021 11:15:02 - ea53b70

Default Fantomas configuration

_{Did you know that you can ignore files when formatting from fantomas-tool or the FAKE targets by using a .fantomasignore file?}