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

fcl-js: comments

Browse Source 
git-svn-id: trunk@36667 -
This commit is contained in:
Mattias Gaertner 2017-07-07 17:30:28 +00:00
parent de3f4e72ed
commit 97fd5b956a
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-js/src/jssrcmap.pas
View File

@ -366,6 +366,8 @@ var
NodeCnt, i: Integer;
OtherNode: TSourceMapSegment;
begin
//writeln('TSourceMap.AddMapping Gen:Line=',GeneratedLine,',Col=',GeneratedCol,
// ' Src:File=',ExtractFileName(SourceFile),',Line=',SrcLine,',Col=',SrcCol,' Name=',Name);
if GeneratedLine<1 then
RaiseInvalid('invalid GeneratedLine');
if GeneratedCol<0 then

6
packages/fcl-js/src/jstree.pp
View File

@ -175,7 +175,7 @@ Type
Property Value : TJSValue Read FValue Write FValue;
end;
{ TJSRegularExpressionLiteral }
{ TJSRegularExpressionLiteral - /Pattern/PatternFlags }
TJSRegularExpressionLiteral = Class(TJSElement)
private
@ -227,7 +227,7 @@ Type
Property Elements[AIndex : Integer] : TJSArrayLiteralElement Read GetE ; default;
end;
{ TJSArrayLiteral }
{ TJSArrayLiteral - [element1,...] }
TJSArrayLiteral = Class(TJSElement)
private
@ -272,7 +272,7 @@ Type
Property Elements : TJSObjectLiteralElements Read FElements;
end;
{ TJSArguments }
{ TJSArguments - (element1,...) }
TJSArguments = Class(TJSArrayLiteral);