- removed commented out debug code from TOmfObjData.writeReloc

git-svn-id: trunk@30799 -
This commit is contained in:
nickysn 2015-05-04 16:24:28 +00:00
parent 8b41206ffd
commit 37840bc811

View File

@ -423,13 +423,6 @@ implementation
objreloc: TOmfRelocation;
symaddr: AWord;
begin
{ Write('writeReloc(', data, ',', len, ',');
if p<>nil then
write(p.Name)
else
write('nil');
Writeln(',',Reloctype,')');}
{ RELOC_FARPTR = RELOC_ABSOLUTE+RELOC_SEG }
if Reloctype=RELOC_FARPTR then
begin