type t1 = class end; begin var a := t1&(t1&); end.