Formatting one-line methods causes an exception

[vasily-kirichenko]

module M

type T () = 
    let items = []
    member x.Reorder () = items |> List.iter ignore

Select the method, then execute 'format selection' command:

[vasily-kirichenko]

Fixed in Fantomas 0.9.6