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

fcl-js: skip writeln test

Browse Source 
git-svn-id: trunk@46512 -
This commit is contained in:
Mattias Gaertner 2020-08-20 16:41:03 +00:00
parent 1002a7c590
commit 01d5519fe8
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-js/src/jswriter.pp
View File

@ -441,6 +441,7 @@ end;
{$endif} {$endif}
{ TJSWriter } { TJSWriter }
{AllowWriteln}
procedure TJSWriter.SetOptions(AValue: TWriteOptions); procedure TJSWriter.SetOptions(AValue: TWriteOptions);
begin begin
@ -1939,6 +1940,7 @@ begin
// Write('/* '+El.ClassName+' */'); // Write('/* '+El.ClassName+' */');
FSkipCurlyBrackets:=False; FSkipCurlyBrackets:=False;
end; end;
{AllowWriteln-}
{$ifdef HasFileWriter} {$ifdef HasFileWriter}
{ TFileWriter } { TFileWriter }