Quellcode durchsuchen

- removed commented out debug code from TOmfObjData.writeReloc

git-svn-id: trunk@30799 -
nickysn vor 10 Jahren
Ursprung
Commit
37840bc811
1 geänderte Dateien mit 0 neuen und 7 gelöschten Zeilen
  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