fcl-js: comments

git-svn-id: trunk@36667 -

packages/fcl-js/src/jssrcmap.pas

@@ -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

packages/fcl-js/src/jstree.pp

@@ -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);