INTERFACE Test;

TYPE T = OBJECT METHODS m (); n() := N; END;

PROCEDURE N (x: T);

END Test.