Explorar o código

- removed commented out debug code from TOmfObjData.writeReloc

git-svn-id: trunk@30799 -
nickysn %!s(int64=10) %!d(string=hai) anos
pai
achega
37840bc811
Modificáronse 1 ficheiros con 0 adicións e 7 borrados
  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