Browse Source

- removed debug writelns after r30800

git-svn-id: trunk@30802 -
nickysn 10 years ago
parent
commit
b17087a645
1 changed files with 0 additions and 2 deletions
  1. 0 2
      compiler/ogomf.pas

+ 0 - 2
compiler/ogomf.pas

@@ -162,7 +162,6 @@ implementation
 
     procedure TOmfRelocation.BuildOmfFixup;
       begin
-        Writeln(typ, ' ', ObjSection<>nil, ' ', symbol<>nil);
         FreeAndNil(FOmfFixup);
         FOmfFixup:=TOmfSubRecord_FIXUP.Create;
         if ObjSection<>nil then
@@ -450,7 +449,6 @@ implementation
         objreloc: TOmfRelocation;
         symaddr: AWord;
       begin
-        Writeln(Reloctype);
         { RELOC_FARPTR = RELOC_ABSOLUTE+RELOC_SEG }
         if Reloctype=RELOC_FARPTR then
           begin