Fantomas crash with evaluation of array member

[Smaug123]

I was unable to submit a bug using the online tool because "request too large". Testing 4.0.0-alpha, either 0.0.1 or 0.0.2, *.fs mode, default settings in the online tool.

namespace Foo

type T = { A : (unit -> unit) array }
module F =
  let f (a : T) =
    a.A.[0] ()

Output is a long stack trace starting with "System.Exception: cannot determine if synExpr DotIndexedGet... is uppercase or lowercase".