Browse Source

- removed commented out debug code from TOmfObjData.writeReloc

git-svn-id: trunk@30799 -
nickysn 10 years ago
parent
commit
37840bc811
1 changed files with 0 additions and 7 deletions
  1. 0 7
      compiler/ogomf.pas

+ 0 - 7
compiler/ogomf.pas

@@ -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