diff --git a/packages/fcl-js/src/tstopas.pp b/packages/fcl-js/src/tstopas.pp
index 318b8deac8..229af9d880 100644
--- a/packages/fcl-js/src/tstopas.pp
+++ b/packages/fcl-js/src/tstopas.pp
@@ -770,12 +770,14 @@ procedure TTypescriptToPas.DumpElements;
     N : TJSElementNode;
 
   begin
+    {AllowWriteln}
     Writeln(aSection,': ',aList.Count,' elements');
     For I:=0 to aList.Count-1 do
       begin
       N:=Alist[i];
       Writeln(aSection,' element ',I,' : ',N.Node.ClassName);
       end;
+    {AllowWriteln-}
   end;
 
 Var