* avoid private constructor warning

git-svn-id: trunk@15780 -
This commit is contained in:
pierre 2010-08-11 15:41:54 +00:00
parent ecd4b3dc23
commit df01446f42

View File

@ -388,7 +388,6 @@ interface
destructor Destroy;override;
constructor ppuload(t:taitype;ppufile:tcompilerppufile);override;
procedure ppuwrite(ppufile:tcompilerppufile);override;
private
{ sections should be created via new_section() }
constructor Create(Asectype:TAsmSectiontype;Aname:string;Aalign:byte;Asecorder:TasmSectionorder=secorder_default);
end;