Browse Source

- reduce debug output a bit

git-svn-id: branches/svenbarth/packages@29014 -
svenbarth 10 years ago
parent
commit
c5c774be11
2 changed files with 0 additions and 3 deletions
  1. 0 1
      compiler/fppu.pas
  2. 0 2
      compiler/pkgutil.pas

+ 0 - 1
compiler/fppu.pas

@@ -1135,7 +1135,6 @@ var
         typ : tasmsymtype;
       begin
         cnt:=ppufile.getlongint;
-        writeln('loading: unit ', modulename^, ' has ', cnt, ' imported asm symbols');
         while not ppufile.endofentry and not ppufile.error do
           begin
             s:=ppufile.getstring;

+ 0 - 2
compiler/pkgutil.pas

@@ -481,7 +481,6 @@ implementation
           impname,symname : TSymStr;
           suffixidx : longint;
         begin
-          writeln('available assembler symbols: ', symlist.count);
           for i:=0 to symlist.count-1 do
             begin
               sym:=tasmsymbol(symlist[i]);
@@ -578,7 +577,6 @@ implementation
           pd : tprocdef;
           list : tasmlist;
         begin
-          writeln('unit has ', syms.count, ' imported symbols');
           for i:=0 to syms.count-1 do
             begin
               sym:=tsymentry(syms[i]);