{ %norun } unit uw18909a; {$mode objfpc} interface type TA = record x: Integer; end; TB = record x: Integer; end; implementation end.