unit unitdots; {$mode objfpc}{$H+} interface type dots = record test: char; bar: char; end; var my: boolean; implementation end.