{$mode objfpc} type i = interface; i = interface end; begin end.