Ver Fonte

* Remove debug writeln

git-svn-id: trunk@35694 -
michael há 8 anos atrás
pai
commit
92cca391aa
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      packages/fcl-passrc/src/pparser.pp

+ 1 - 1
packages/fcl-passrc/src/pparser.pp

@@ -4096,7 +4096,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