Using "as this" can overflow in Zafir

1
2
3
4
5
6
7
type Farm() as this =
    let x() = this
    member this.Cow() = "moo"

let f1 = new Farm()
let f2 = new Farm()
let x = f1 <> f2 // causes stack overflow