class TEST create make feature make is do end f: like anchor is do Result := 1 end anchor: INTEGER_REF end