{ %NORUN } program tgeneric82; {$mode delphi} type TTest = record end; TTest = record end; TTest = record end; PTest = ^TTest; begin end.