paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 20:29:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

fcl-passrc: no writeln, bug #31656

Browse Source 
git-svn-id: trunk@35782 -
This commit is contained in:
Mattias Gaertner 2017-04-12 13:13:14 +00:00
parent b6d05dba9e
commit d8dbeb10b9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-passrc/src/pparser.pp
View File

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