jcf: sync with r746 (misc fixes in comments)

git-svn-id: trunk@17880 -
This commit is contained in:
paul 2008-12-22 08:35:35 +00:00
parent 52c3090688
commit a4326b440c
4 changed files with 5 additions and 5 deletions

View File

@ -1018,7 +1018,7 @@ begin
if pbNestedInClass and (leFirstTokenType in ClassVisibility) then
break;
// can be followed by an operator decl in Lazarus
// can be followed by an operator decl in FreePascal
if leFirstTokenType = ttOperator then
break;
end;
@ -2275,7 +2275,7 @@ begin
if fcTokenList.FirstSolidTokenType = ttOpenBracket then
RecogniseFormalParameters;
// lazarus can give a name to "result" here
// FreePascal can give a name to "result" here
if fcTokenList.FirstSolidTokenType <> ttColon then
begin
RecogniseIdentifier(false, idAny);

View File

@ -738,7 +738,7 @@ begin
AddKeyword('@', wtOperator, ttAtSign);
AddKeyword('^', wtOperator, ttHat);
AddKeyword('*', wtOperator, ttTimes);
AddKeyword('**', wtOperator, ttExponent); // in Lazarus
AddKeyword('**', wtOperator, ttExponent); // in FreePascal
AddKeyword('/', wtOperator, ttFloatDiv);
AddKeyword('+', wtOperator, ttPlus);
AddKeyword('-', wtOperator, ttMinus);

View File

@ -516,7 +516,7 @@ function PathRemoveExtension(const Path: string): string;
var
p: Integer;
begin
// from lazarus FileUtil
// from Lazarus FileUtil
Result := Path;
p := Length(Result);
while (p>0) do

View File

@ -1,3 +1,3 @@
This directory contains a copy (sometimes modified) of r743 jcf2 svn tree: https://jedicodeformat.svn.sourceforge.net/svnroot/jedicodeformat/trunk/CodeFormat/Jcf2
This directory contains a copy (sometimes modified) of r746 jcf2 svn tree: https://jedicodeformat.svn.sourceforge.net/svnroot/jedicodeformat/trunk/CodeFormat/Jcf2
Only command line utility works currently.