fcl-passrc: no writeln, bug #31656

git-svn-id: trunk@35782 -

packages/fcl-passrc/src/pparser.pp

@@ -4103,7 +4103,7 @@ begin
   while True do
   begin
     NextToken;
-     WriteLn({$IFDEF VerbosePasParser}i,{$ENDIF}' Token=',CurTokenText);
+    // WriteLn({$IFDEF VerbosePasParser}i,{$ENDIF}' Token=',CurTokenText);
     case CurToken of
     tkasm:
       begin