1 files changed, 0 insertions, 2 deletions
diff --git a/packages/fcl-json/src/jsonparser.pp b/packages/fcl-json/src/jsonparser.pp
index 58564e72bb..dcf00df23c 100644
--- a/packages/fcl-json/src/jsonparser.pp
+++ b/packages/fcl-json/src/jsonparser.pp
@@ -164,7 +164,6 @@ begin
       T:=GetNextToken;
       If (T<>tkColon) then
         DoError(SErrExpectedColon);
-      Writeln('Getting element');
       E:=DoParse(False,False);
       Result.Add(N,E);
       T:=GetNextToken;
@@ -221,7 +220,6 @@ begin
   Repeat
     Result:=FScanner.FetchToken;
   Until (Result<>tkWhiteSpace);
-  Writeln('GetNextToken : ',CurrentTokenString);
 end;
 
 Procedure TJSONParser.DoError(Msg : String);