unit ugenconst31b; {$mode delphi}{$H+} interface type Test = class end; implementation end.