diff options
Diffstat (limited to 'test/scanners/delphi/ytools.expected.raydebug')
| -rw-r--r-- | test/scanners/delphi/ytools.expected.raydebug | 1436 |
1 files changed, 718 insertions, 718 deletions
diff --git a/test/scanners/delphi/ytools.expected.raydebug b/test/scanners/delphi/ytools.expected.raydebug index f1621fd..8653ea7 100644 --- a/test/scanners/delphi/ytools.expected.raydebug +++ b/test/scanners/delphi/ytools.expected.raydebug @@ -28,281 +28,281 @@ reserved(const) ident(LF) operator(=) char(#10)operator(;) comment(//Line Feed) ident(CR) operator(=) char(#13)operator(;) comment(//Carriage Return) ident(Space) operator(=) char(#32)operator(;) - ident(EOLChars) operator(=) operator([)ident(CR)operator(,) ident(LF)operator(];) + ident(EOLChars) operator(=) operator([)ident(CR)operator(,) ident(LF)operator(])operator(;) preprocessor({$IFNDEF VER140}) ident(sLineBreak) operator(=) char(#13)char(#10)operator(;) - ident(SwitchChars) operator(=) operator([)char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(-)delimiter(')>operator(];) + ident(SwitchChars) operator(=) operator([)char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(-)delimiter(')>operator(])operator(;) preprocessor({$ENDIF}) ident(EOL) operator(=) ident(sLineBreak)operator(;) - ident(MaxCard) operator(=) ident(High)operator(()ident(Cardinal)operator(\);) - ident(AllChars) operator(=) operator([)char(#0)operator(..)char(#255)operator(];) - ident(Alphabetical) operator(=) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(Z)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(z)delimiter(')>operator(];) - ident(DecimalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(];) + ident(MaxCard) operator(=) ident(High)operator(()ident(Cardinal)operator(\))operator(;) + ident(AllChars) operator(=) operator([)char(#0)operator(..)char(#255)operator(])operator(;) + ident(Alphabetical) operator(=) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(Z)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(z)delimiter(')>operator(])operator(;) + ident(DecimalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(])operator(;) ident(AlphaNumerical) operator(=) ident(Alphabetical) operator(+) ident(DecimalChars)operator(;) - ident(StrangeChars) operator(=) operator([)char(#0)operator(..)char(#31)operator(,) char(#127)operator(,) char(#129)operator(,) char(#141)operator(..)char(#144)operator(,) char(#157)operator(,) char(#158)operator(];) + ident(StrangeChars) operator(=) operator([)char(#0)operator(..)char(#31)operator(,) char(#127)operator(,) char(#129)operator(,) char(#141)operator(..)char(#144)operator(,) char(#157)operator(,) char(#158)operator(])operator(;) - ident(HexadecimalChars) operator(=) ident(DecimalChars) operator(+) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(F)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(f)delimiter(')>operator(];) - ident(OctalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(7)delimiter(')>operator(];) - ident(BinaryChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(,) char<delimiter(')content(1)delimiter(')>operator(];) + ident(HexadecimalChars) operator(=) ident(DecimalChars) operator(+) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(F)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(f)delimiter(')>operator(])operator(;) + ident(OctalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(7)delimiter(')>operator(])operator(;) + ident(BinaryChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(,) char<delimiter(')content(1)delimiter(')>operator(])operator(;) - ident(QuoteChars) operator(=) operator([)char<delimiter(')content('')delimiter(')>operator(,) char<delimiter(')content(")delimiter(')>operator(];) - ident(WildCards) operator(=) operator([)char<delimiter(')content(*)delimiter(')>operator(,) char<delimiter(')content(?)delimiter(')>operator(];) - ident(FileNameEnemies) operator(=) ident(WildCards) operator(+) operator([)char<delimiter(')content(\\)delimiter(')>operator(,) char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(:)delimiter(')>operator(,) char<delimiter(')content(<)delimiter(')>operator(,) char<delimiter(')content(>)delimiter(')>operator(,) char<delimiter(')content(|)delimiter(')>operator(];) + ident(QuoteChars) operator(=) operator([)char<delimiter(')content('')delimiter(')>operator(,) char<delimiter(')content(")delimiter(')>operator(])operator(;) + ident(WildCards) operator(=) operator([)char<delimiter(')content(*)delimiter(')>operator(,) char<delimiter(')content(?)delimiter(')>operator(])operator(;) + ident(FileNameEnemies) operator(=) ident(WildCards) operator(+) operator([)char<delimiter(')content(\\)delimiter(')>operator(,) char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(:)delimiter(')>operator(,) char<delimiter(')content(<)delimiter(')>operator(,) char<delimiter(')content(>)delimiter(')>operator(,) char<delimiter(')content(|)delimiter(')>operator(])operator(;) ident(HexChar)operator(:) reserved(array)operator([)ident(THex)operator(]) reserved(of) ident(Char) operator(=) operator(() - char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(A)delimiter(')>operator(,)char<delimiter(')content(B)delimiter(')>operator(,)char<delimiter(')content(C)delimiter(')>operator(,)char<delimiter(')content(D)delimiter(')>operator(,)char<delimiter(')content(E)delimiter(')>operator(,)char<delimiter(')content(F)delimiter(')>operator(\);) + char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(A)delimiter(')>operator(,)char<delimiter(')content(B)delimiter(')>operator(,)char<delimiter(')content(C)delimiter(')>operator(,)char<delimiter(')content(D)delimiter(')>operator(,)char<delimiter(')content(E)delimiter(')>operator(,)char<delimiter(')content(F)delimiter(')>operator(\))operator(;) ident(LowerHexChar)operator(:) reserved(array)operator([)ident(THex)operator(]) reserved(of) ident(Char) operator(=) operator(() - char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(a)delimiter(')>operator(,)char<delimiter(')content(b)delimiter(')>operator(,)char<delimiter(')content(c)delimiter(')>operator(,)char<delimiter(')content(d)delimiter(')>operator(,)char<delimiter(')content(e)delimiter(')>operator(,)char<delimiter(')content(f)delimiter(')>operator(\);) + char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(a)delimiter(')>operator(,)char<delimiter(')content(b)delimiter(')>operator(,)char<delimiter(')content(c)delimiter(')>operator(,)char<delimiter(')content(d)delimiter(')>operator(,)char<delimiter(')content(e)delimiter(')>operator(,)char<delimiter(')content(f)delimiter(')>operator(\))operator(;) ident(BaseNChar)operator(:) reserved(array)operator([)ident(TBaseN)operator(]) reserved(of) ident(Char) operator(=) operator(() char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(A)delimiter(')>operator(,)char<delimiter(')content(B)delimiter(')>operator(,)char<delimiter(')content(C)delimiter(')>operator(,)char<delimiter(')content(D)delimiter(')>operator(,)char<delimiter(')content(E)delimiter(')>operator(,)char<delimiter(')content(F)delimiter(')>operator(,)char<delimiter(')content(G)delimiter(')>operator(,)char<delimiter(')content(H)delimiter(')>operator(,) - char<delimiter(')content(I)delimiter(')>operator(,)char<delimiter(')content(J)delimiter(')>operator(,)char<delimiter(')content(K)delimiter(')>operator(,)char<delimiter(')content(L)delimiter(')>operator(,)char<delimiter(')content(M)delimiter(')>operator(,)char<delimiter(')content(N)delimiter(')>operator(,)char<delimiter(')content(O)delimiter(')>operator(,)char<delimiter(')content(P)delimiter(')>operator(,)char<delimiter(')content(Q)delimiter(')>operator(,)char<delimiter(')content(R)delimiter(')>operator(,)char<delimiter(')content(S)delimiter(')>operator(,)char<delimiter(')content(T)delimiter(')>operator(,)char<delimiter(')content(U)delimiter(')>operator(,)char<delimiter(')content(V)delimiter(')>operator(,)char<delimiter(')content(W)delimiter(')>operator(,)char<delimiter(')content(X)delimiter(')>operator(,)char<delimiter(')content(Y)delimiter(')>operator(,)char<delimiter(')content(Z)delimiter(')>operator(\);) + char<delimiter(')content(I)delimiter(')>operator(,)char<delimiter(')content(J)delimiter(')>operator(,)char<delimiter(')content(K)delimiter(')>operator(,)char<delimiter(')content(L)delimiter(')>operator(,)char<delimiter(')content(M)delimiter(')>operator(,)char<delimiter(')content(N)delimiter(')>operator(,)char<delimiter(')content(O)delimiter(')>operator(,)char<delimiter(')content(P)delimiter(')>operator(,)char<delimiter(')content(Q)delimiter(')>operator(,)char<delimiter(')content(R)delimiter(')>operator(,)char<delimiter(')content(S)delimiter(')>operator(,)char<delimiter(')content(T)delimiter(')>operator(,)char<delimiter(')content(U)delimiter(')>operator(,)char<delimiter(')content(V)delimiter(')>operator(,)char<delimiter(')content(W)delimiter(')>operator(,)char<delimiter(')content(X)delimiter(')>operator(,)char<delimiter(')content(Y)delimiter(')>operator(,)char<delimiter(')content(Z)delimiter(')>operator(\))operator(;) ident(cYcnusOverlayColor) operator(=) hex($050001)operator(;) ident(faFindEveryFile) operator(=) ident(faReadOnly) operator(+) ident(faHidden) operator(+) ident(faSysFile) operator(+) ident(faArchive)operator(;) - ident(platWin9x) operator(=) operator([)ident(VER_PLATFORM_WIN32s)operator(,) ident(VER_PLATFORM_WIN32_WINDOWS)operator(];) + ident(platWin9x) operator(=) operator([)ident(VER_PLATFORM_WIN32s)operator(,) ident(VER_PLATFORM_WIN32_WINDOWS)operator(])operator(;) comment({ Debugging }) -reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\);) -reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\);) -reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\);) +reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\))operator(;) +reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(;) +reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\))operator(;) comment({ Params }) -reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\);) directive(overload)operator(;) -reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\))operator(;) directive(overload)operator(;) +reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) -reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) -reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(function) ident(Switch)operator(()reserved(const) ident(Switch)operator(:) reserved(string)operator(;) reserved(const) ident(PrefixChars)operator(:) ident(TCharSet) operator(=) ident(SwitchChars)operator(;) - ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;) + ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;) comment({ Dirs & UserName}) -reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;) +reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;) reserved(function) ident(WinDir)operator(:) reserved(string)operator(;) reserved(function) ident(SysDir)operator(:) reserved(string)operator(;) reserved(function) ident(UserName)operator(:) reserved(string)operator(;) comment({ Strings & Chars}) -reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;) -reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;) - -reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\):) ident(Integer)operator(;) -reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) -reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) -reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) - -reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;) +reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;) + +reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) + +reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) reserved(function) ident(UntilLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;) - ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;) + ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) reserved(function) ident(FromLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;) - ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;) + ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;) reserved(function) ident(BetweenChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Start)operator(,) ident(Finish)operator(:) ident(Char)operator(;) - ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;) + ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\):) reserved(string)operator(;) +reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\))operator(:) reserved(string)operator(;) comment({ Splitting & Combining }) reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) - ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;) directive(overload)operator(;) + ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;) directive(overload)operator(;) reserved(procedure) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(Strings)operator(:) ident(TStrings)operator(;) - ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\);) directive(overload)operator(;) + ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(;) directive(overload)operator(;) reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Separators)operator(:) ident(TCharSet)operator(;) - ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;) directive(overload)operator(;) + ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;) directive(overload)operator(;) reserved(procedure) ident(TileStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(BrakeStart)operator(:) ident(Integer)operator(;) ident(BrakeEnd)operator(:) ident(Integer)operator(;) - reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\);) + reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\))operator(;) -reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) +reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) comment({ Strings ausrichten }) -reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) -reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) +reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) comment({ Stringing }) -reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Char)operator(;) +reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Char)operator(;) -reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\):) reserved(string)operator(;) -reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(function) ident(StrNumerus)operator(()reserved(const) ident(Value)operator(:) ident(Integer)operator(;) reserved(const) ident(Singular)operator(,) ident(Plural)operator(:) reserved(string)operator(;) - reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;) -reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);) +reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;) +reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;) comment({ Delete }) -reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) +reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) comment({ Find }) -reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Integer)operator(;) - -reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) - -reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) - -reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;) -reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Integer)operator(;) + +reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) + +reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) + +reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;) +reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) comment({ Replace }) -reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) comment({ TStrings }) -reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TStringList)operator(;) -reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\):) ident(Boolean)operator(;) -reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\);) -reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\);) +reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TStringList)operator(;) +reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(:) ident(Boolean)operator(;) +reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(;) +reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\))operator(;) reserved(procedure) ident(WriteSL)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) - reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);) + reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;) -reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) -reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\);) +reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\))operator(;) comment({ TStrA }) -reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\):) ident(Integer)operator(;) +reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\))operator(:) ident(Integer)operator(;) comment({ TByteA }) -reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;) -reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;) -reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(TByteA)operator(;) -reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\):) ident(Integer)operator(;) -reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;) +reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(TByteA)operator(;) +reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;) -reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(Reverse)operator(()ident(a)operator(:) ident(TByteA)operator(\):) ident(TByteA)operator(;) -reserved(function) ident(SaveByteA)operator(()ident(Data)operator(:) ident(TByteA)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(Reverse)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) ident(TByteA)operator(;) +reserved(function) ident(SaveByteA)operator(()ident(Data)operator(:) ident(TByteA)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;) -reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) +reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) comment({ Files }) -reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) -reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) +reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\))operator(:) reserved(string)operator(;) comment({ Converting }) -reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(function) ident(StrOfBool)operator(()ident(flag)operator(:) ident(Boolean)operator(;) reserved(const) ident(TrueStr)operator(:) reserved(string) operator(=) string<delimiter(')content(True)delimiter(')>operator(;) - reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\):) reserved(string)operator(;) -reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) -reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;) + reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;) -reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\):) ident(THex)operator(;) -reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\):) ident(Byte)operator(;) +reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\))operator(:) ident(THex)operator(;) +reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\))operator(:) ident(Byte)operator(;) -reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) reserved(string)operator(;) -reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\):) ident(THexByteStr)operator(;) -reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\):) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\))operator(:) ident(THexByteStr)operator(;) +reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) -reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(function) ident(HexOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(1)operator(;) - reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(function) ident(BinOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(4)operator(;) - reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;) -reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;) +reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;) +reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;) -reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\):) reserved(string)operator(;) -reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(cardinal)operator(\):) reserved(string)operator(;) +reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(cardinal)operator(\))operator(:) reserved(string)operator(;) -reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) reserved(string)operator(;) -reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) ident(Cardinal)operator(;) +reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) reserved(string)operator(;) +reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) ident(Cardinal)operator(;) comment({ Ranges }) -reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Variant)operator(;) -reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) -reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Variant)operator(;) +reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) +reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;) reserved(const) ident(RangesSeparator) operator(=) char<delimiter(')content(,)delimiter(')>operator(;) ident(RangeInnerSeparator) operator(=) char<delimiter(')content(-)delimiter(')>operator(;) ident(RangeInfinite) operator(=) char<delimiter(')content(*)delimiter(')>operator(;) - ident(RangeSpecialChars) operator(=) operator([)ident(RangesSeparator)operator(,) ident(RangeInnerSeparator)operator(,) ident(RangeInfinite)operator(];) + ident(RangeSpecialChars) operator(=) operator([)ident(RangesSeparator)operator(,) ident(RangeInnerSeparator)operator(,) ident(RangeInfinite)operator(])operator(;) -reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TRanges)operator(;) -reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TRanges)operator(;) +reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\))operator(:) ident(Boolean)operator(;) -reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;) -reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;) +reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;) -reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) comment({ Files }) reserved(procedure) ident(DeleteFiles)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) - ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\);) -reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\);) -reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\):) ident(TDateTime)operator(;) + ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(;) +reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;) +reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\))operator(:) ident(TDateTime)operator(;) comment({ FileNames }) -reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;) +reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;) comment({ Finding Files }) reserved(function) ident(FindAll)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(;) - ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\):) ident(Boolean)operator(;) + ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\))operator(:) ident(Boolean)operator(;) reserved(function) ident(FindAllFirst)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) - ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\):) reserved(string)operator(;) + ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(:) reserved(string)operator(;) reserved(function) ident(FullOSInfo)operator(:) reserved(string)operator(;) reserved(function) ident(Win32PlatformStr)operator(:) reserved(string)operator(;) @@ -317,7 +317,7 @@ reserved(var) comment({ Backward compatibility }) preprocessor({$IFNDEF VER130}) -reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) preprocessor({$ENDIF}) reserved(implementation) @@ -326,49 +326,49 @@ reserved(uses) ident(FileCtrl)operator(;) preprocessor({$ENDIF}) preprocessor({$IFNDEF VER130}) -reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(CompareText)operator(()ident(S1)operator(,) ident(S2)operator(\)) operator(=) integer(0)operator(;) reserved(end)operator(;) preprocessor({$ENDIF}) -reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\);) +reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(;) reserved(var) ident(F)operator(:) ident(TextFile)operator(;) ident(FileName)operator(:) reserved(string)operator(;) reserved(begin) ident(FileName) operator(:=) ident(MyDir) operator(+) ident(ReportName) operator(+) string<delimiter(')content(.rep)delimiter(')>operator(;) - ident(Assign)operator(()ident(F)operator(,) ident(FileName)operator(\);) + ident(Assign)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;) reserved(try) reserved(if) reserved(not) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(then) ident(Rewrite)operator(()ident(F)operator(\)) reserved(else) - ident(Append)operator(()ident(F)operator(\);) - ident(WriteLn)operator(()ident(F)operator(,) ident(Text)operator(\);) + ident(Append)operator(()ident(F)operator(\))operator(;) + ident(WriteLn)operator(()ident(F)operator(,) ident(Text)operator(\))operator(;) reserved(finally) - ident(Close)operator(()ident(F)operator(\);) + ident(Close)operator(()ident(F)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\);) +reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\))operator(;) reserved(var) ident(FileName)operator(:) reserved(string)operator(;) reserved(begin) ident(FileName) operator(:=) ident(MyDir) operator(+) ident(ReportName) operator(+) string<delimiter(')content(.rep)delimiter(')>operator(;) - ident(DeleteFile)operator(()ident(FileName)operator(\);) + ident(DeleteFile)operator(()ident(FileName)operator(\))operator(;) reserved(end)operator(;) -reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\);) +reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\))operator(;) reserved(begin) - ident(Report)operator(()ident(ReportName)operator(,) ident(Format)operator(()ident(Fmt)operator(,) ident(Args)operator(\)\);) + ident(Report)operator(()ident(ReportName)operator(,) ident(Format)operator(()ident(Fmt)operator(,) ident(Args)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\);) +reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\))operator(;) reserved(var) ident(P)operator(:) ident(PChar)operator(;) ident(Param)operator(:) reserved(string)operator(;) - reserved(function) ident(GetParamStr)operator(()reserved(var) ident(P)operator(:) ident(PChar)operator(;) reserved(var) ident(Param)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) + reserved(function) ident(GetParamStr)operator(()reserved(var) ident(P)operator(:) ident(PChar)operator(;) reserved(var) ident(Param)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(Quoted)operator(:) ident(Boolean)operator(;) reserved(begin) @@ -376,20 +376,20 @@ reserved(var) reserved(repeat) reserved(while) operator(()ident(P)operator([)integer(0)operator(]) operator(<>) char(#0)operator(\)) reserved(and) operator(()ident(P)operator([)integer(0)operator(]) operator(<=) char<delimiter(')content( )delimiter(')>operator(\)) reserved(do) - ident(Inc)operator(()ident(P)operator(\);) + ident(Inc)operator(()ident(P)operator(\))operator(;) ident(Quoted) operator(:=) ident(False)operator(;) reserved(while) ident(P)operator([)integer(0)operator(]) operator(<>) char(#0) reserved(do) reserved(begin) reserved(if) ident(P)operator([)integer(0)operator(]) operator(=) char<delimiter(')content(")delimiter(')> reserved(then) reserved(begin) ident(Quoted) operator(:=) reserved(not) ident(Quoted)operator(;) - ident(Inc)operator(()ident(P)operator(\);) + ident(Inc)operator(()ident(P)operator(\))operator(;) ident(Continue)operator(;) reserved(end)operator(;) reserved(if) operator(()ident(P)operator([)integer(0)operator(]) operator(<=) char<delimiter(')content( )delimiter(')>operator(\)) reserved(and) reserved(not) ident(Quoted) reserved(then) ident(Break)operator(;) - ident(Param) operator(:=) ident(Param) operator(+) ident(P)operator([)integer(0)operator(];) - ident(Inc)operator(()ident(P)operator(\);) + ident(Param) operator(:=) ident(Param) operator(+) ident(P)operator([)integer(0)operator(])operator(;) + ident(Inc)operator(()ident(P)operator(\))operator(;) reserved(end)operator(;) - reserved(until) operator(()ident(Param) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(P)operator([)integer(0)operator(]) operator(=) char(#0)operator(\);) + reserved(until) operator(()ident(Param) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(P)operator([)integer(0)operator(]) operator(=) char(#0)operator(\))operator(;) ident(Result) operator(:=) ident(Param) operator(<>) string<delimiter(')delimiter(')>operator(;) reserved(end)operator(;) @@ -397,23 +397,23 @@ reserved(var) reserved(begin) ident(Strings)operator(.)ident(Clear)operator(;) ident(P) operator(:=) ident(GetCommandLine)operator(;) - ident(GetParamStr)operator(()ident(P)operator(,) ident(Param)operator(\);) + ident(GetParamStr)operator(()ident(P)operator(,) ident(Param)operator(\))operator(;) reserved(while) ident(GetParamStr)operator(()ident(P)operator(,) ident(Param)operator(\)) reserved(do) - ident(Strings)operator(.)ident(Add)operator(()ident(Param)operator(\);) + ident(Strings)operator(.)ident(Add)operator(()ident(Param)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(SL)operator(:) ident(TStringList)operator(;) reserved(begin) ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;) - ident(GetParams)operator(()ident(SL)operator(\);) - ident(Result) operator(:=) ident(Join)operator(()ident(SL)operator(,) ident(Separator)operator(\);) + ident(GetParams)operator(()ident(SL)operator(\))operator(;) + ident(Result) operator(:=) ident(Join)operator(()ident(SL)operator(,) ident(Separator)operator(\))operator(;) ident(SL)operator(.)ident(Free)operator(;) reserved(end)operator(;) reserved(function) ident(Switch)operator(()reserved(const) ident(Switch)operator(:) reserved(string)operator(;) reserved(const) ident(PrefixChars)operator(:) ident(TCharSet) operator(=) ident(SwitchChars)operator(;) - ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;) + ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;) comment(//= SysUtils.FindCmdLineSwitch) reserved(var) ident(i)operator(:) ident(Integer)operator(;) @@ -422,12 +422,12 @@ reserved(begin) ident(Result) operator(:=) ident(True)operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(ParamCount) reserved(do) reserved(begin) - ident(s) operator(:=) ident(ParamStr)operator(()ident(i)operator(\);) + ident(s) operator(:=) ident(ParamStr)operator(()ident(i)operator(\))operator(;) reserved(if) operator(()ident(s) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(s)operator([)integer(1)operator(]) reserved(in) ident(PrefixChars)operator(\)) reserved(then) reserved(begin) comment(//i know that always s <> '', but this is saver) - ident(s) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(2)operator(,) ident(MaxInt)operator(\);) - reserved(if) operator(()ident(s) operator(=) ident(Switch)operator(\)) reserved(or) operator(()ident(IgnoreCase) reserved(and) operator(()integer(0)operator(=)ident(AnsiCompareText)operator(()ident(s)operator(,) ident(Switch)operator(\)\)\)) reserved(then) + ident(s) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(2)operator(,) ident(MaxInt)operator(\))operator(;) + reserved(if) operator(()ident(s) operator(=) ident(Switch)operator(\)) reserved(or) operator(()ident(IgnoreCase) reserved(and) operator(()integer(0)operator(=)ident(AnsiCompareText)operator(()ident(s)operator(,) ident(Switch)operator(\))operator(\))operator(\)) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) reserved(end)operator(;) @@ -435,61 +435,61 @@ reserved(begin) ident(Result) operator(:=) ident(False)operator(;) reserved(end)operator(;) -reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(Result) operator(:=) integer(1) reserved(to) ident(ParamCount) reserved(do) - reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(ParamStr)operator(()ident(Result)operator(\),) ident(S)operator(\)) reserved(then) + reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(ParamStr)operator(()ident(Result)operator(\))operator(,) ident(S)operator(\)) reserved(then) ident(Exit)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(Len)operator(:) ident(Integer)operator(;) reserved(begin) - ident(Len) operator(:=) ident(Length)operator(()ident(Prefix)operator(\);) + ident(Len) operator(:=) ident(Length)operator(()ident(Prefix)operator(\))operator(;) reserved(for) ident(Result) operator(:=) integer(1) reserved(to) ident(ParamCount) reserved(do) - reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(Copy)operator(()ident(ParamStr)operator(()ident(Result)operator(\),) integer(1)operator(,) ident(Len)operator(\),) ident(Prefix)operator(\)) reserved(then) + reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(Copy)operator(()ident(ParamStr)operator(()ident(Result)operator(\))operator(,) integer(1)operator(,) ident(Len)operator(\))operator(,) ident(Prefix)operator(\)) reserved(then) ident(Exit)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(ParamNum)operator(()ident(S)operator(\)) operator(>) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(ParamPrefixNum)operator(()ident(Prefix)operator(\)) operator(>) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(Default)operator(;) reserved(if) ident(Prefix) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin) - ident(Result) operator(:=) ident(ParamStr)operator(()integer(1)operator(\);) + ident(Result) operator(:=) ident(ParamStr)operator(()integer(1)operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) - ident(i) operator(:=) ident(ParamPrefixNum)operator(()ident(Prefix)operator(\);) + ident(i) operator(:=) ident(ParamPrefixNum)operator(()ident(Prefix)operator(\))operator(;) reserved(if) ident(i) operator(>) integer(0) reserved(then) - ident(Result) operator(:=) ident(Copy)operator(()ident(ParamStr)operator(()ident(i)operator(\),) ident(Length)operator(()ident(Prefix)operator(\)) operator(+) integer(1)operator(,) ident(MaxInt)operator(\);) + ident(Result) operator(:=) ident(Copy)operator(()ident(ParamStr)operator(()ident(i)operator(\))operator(,) ident(Length)operator(()ident(Prefix)operator(\)) operator(+) integer(1)operator(,) ident(MaxInt)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;) +reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(Buffer)operator(:) reserved(array)operator([)integer(0)operator(..)integer(260)operator(]) reserved(of) ident(Char)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(SetString)operator(()ident(Result)operator(,) ident(Buffer)operator(,) ident(GetModuleFileName)operator(()integer(0)operator(,) ident(Buffer)operator(,) ident(SizeOf)operator(()ident(Buffer)operator(\)\)\);) + ident(SetString)operator(()ident(Result)operator(,) ident(Buffer)operator(,) ident(GetModuleFileName)operator(()integer(0)operator(,) ident(Buffer)operator(,) ident(SizeOf)operator(()ident(Buffer)operator(\))operator(\))operator(\))operator(;) reserved(if) ident(FullPath) reserved(then) - ident(Result) operator(:=) ident(GetFileNew)operator(()ident(Result)operator(\);) - ident(Result) operator(:=) ident(ExtractPath)operator(()ident(Result)operator(\);) + ident(Result) operator(:=) ident(GetFileNew)operator(()ident(Result)operator(\))operator(;) + ident(Result) operator(:=) ident(ExtractPath)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(WinDir)operator(:) reserved(string)operator(;) @@ -497,10 +497,10 @@ reserved(var) ident(Res)operator(:) ident(PChar)operator(;) reserved(begin) ident(Result) operator(:=) char<delimiter(')content(\\)delimiter(')>operator(;) - ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) - ident(GetWindowsDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) + ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) + ident(GetWindowsDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) ident(Result) operator(:=) ident(Res) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;) - ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) + ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(SysDir)operator(:) reserved(string)operator(;) @@ -508,10 +508,10 @@ reserved(var) ident(Res)operator(:) ident(PChar)operator(;) reserved(begin) ident(Result) operator(:=) char<delimiter(')content(\\)delimiter(')>operator(;) - ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) - ident(GetSystemDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) + ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) + ident(GetSystemDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) ident(Result) operator(:=) ident(Res) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;) - ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) + ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(UserName)operator(:) reserved(string)operator(;) @@ -520,78 +520,78 @@ reserved(var) ident(Res)operator(:) ident(PChar)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) + ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) ident(Len) operator(:=) ident(MAX_PATH)operator(;) - ident(GetUserName)operator(()ident(Res)operator(,) ident(Len)operator(\);) + ident(GetUserName)operator(()ident(Res)operator(,) ident(Len)operator(\))operator(;) ident(Result) operator(:=) ident(Res)operator(;) - ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);) + ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;) +reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;) reserved(begin) reserved(if) ident(s) operator(=) string<delimiter(')delimiter(')> reserved(then) ident(Result) operator(:=) char(#0) reserved(else) - ident(Result) operator(:=) ident(s)operator([)integer(1)operator(];) + ident(Result) operator(:=) ident(s)operator([)integer(1)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;) +reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;) reserved(begin) reserved(if) ident(s) operator(=) string<delimiter(')delimiter(')> reserved(then) ident(Result) operator(:=) char(#0) reserved(else) - ident(Result) operator(:=) ident(s)operator([)ident(Length)operator(()ident(s)operator(\)];) + ident(Result) operator(:=) ident(s)operator([)ident(Length)operator(()ident(s)operator(\))operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) +reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(MaxPosToSearch)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(Offset)operator(;) - ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\);) + ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;) reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin) reserved(if) ident(S)operator([)ident(Result)operator(]) operator(=) ident(C) reserved(then) ident(Exit)operator(;) - ident(Inc)operator(()ident(Result)operator(\);) + ident(Inc)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) +reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(MaxPosToSearch)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(Offset)operator(;) - ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\);) + ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;) reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin) reserved(if) ident(S)operator([)ident(Result)operator(]) reserved(in) ident(C) reserved(then) ident(Exit)operator(;) - ident(Inc)operator(()ident(Result)operator(\);) + ident(Inc)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\):) ident(Integer)operator(;) +reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(if) ident(Offset) operator(<) integer(0) reserved(then) ident(Result) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(+) integer(1) operator(-) ident(Offset) reserved(else) ident(Result) operator(:=) ident(Offset)operator(;) reserved(if) ident(Result) operator(>) ident(Length)operator(()ident(S)operator(\)) reserved(then) - ident(Result) operator(:=) ident(Length)operator(()ident(S)operator(\);) + ident(Result) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;) reserved(while) ident(Result) operator(>) integer(0) reserved(do) reserved(begin) reserved(if) ident(S)operator([)ident(Result)operator(]) operator(=) ident(C) reserved(then) ident(Exit)operator(;) - ident(Dec)operator(()ident(Result)operator(\);) + ident(Dec)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) +reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(MaxPosToSearch)operator(,) ident(LenSubStr)operator(,) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -604,7 +604,7 @@ reserved(begin) reserved(else) ident(Result) operator(:=) ident(Offset)operator(;) - ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\);) + ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\))operator(;) ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(LenSubStr) operator(+) integer(1)operator(;) reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin) @@ -612,23 +612,23 @@ reserved(begin) ident(i) operator(:=) integer(1)operator(;) reserved(while) operator(()ident(i) operator(<) ident(LenSubStr)operator(\)) - reserved(and) operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(]) operator(=) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(]\)) reserved(do) - ident(Inc)operator(()ident(i)operator(\);) + reserved(and) operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(]) operator(=) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(])operator(\)) reserved(do) + ident(Inc)operator(()ident(i)operator(\))operator(;) reserved(if) ident(i) operator(=) ident(LenSubStr) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) - ident(Inc)operator(()ident(Result)operator(\);) + ident(Inc)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) +reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(MaxPosToSearch)operator(,) ident(LenSubStr)operator(,) ident(i)operator(:) ident(Integer)operator(;) - reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) + reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(UpCase)operator(()ident(a)operator(\)) operator(=) ident(UpCase)operator(()ident(b)operator(\)) reserved(end)operator(;) @@ -643,33 +643,33 @@ reserved(begin) reserved(else) ident(Result) operator(:=) ident(Offset)operator(;) - ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\);) + ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\))operator(;) ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(LenSubStr) operator(+) integer(1)operator(;) reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin) - reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(],) ident(SubStr)operator([)integer(1)operator(]\)) reserved(then) reserved(begin) + reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(])operator(,) ident(SubStr)operator([)integer(1)operator(])operator(\)) reserved(then) reserved(begin) ident(i) operator(:=) integer(1)operator(;) reserved(while) operator(()ident(i) operator(<) ident(LenSubStr)operator(\)) - reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(],) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(]\)\)) reserved(do) - ident(Inc)operator(()ident(i)operator(\);) + reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(])operator(,) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(])operator(\))operator(\)) reserved(do) + ident(Inc)operator(()ident(i)operator(\))operator(;) reserved(if) ident(i) operator(=) ident(LenSubStr) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) - ident(Inc)operator(()ident(Result)operator(\);) + ident(Inc)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) +reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(MaxPosToSearch)operator(,) ident(LenSubStr)operator(,) ident(i)operator(:) ident(Integer)operator(;) - reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) + reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) ident(CharLower)operator(()ident(PChar)operator(()ident(a)operator(\)\)) operator(=) ident(CharLower)operator(()ident(PChar)operator(()ident(b)operator(\)\);) + ident(Result) operator(:=) ident(CharLower)operator(()ident(PChar)operator(()ident(a)operator(\))operator(\)) operator(=) ident(CharLower)operator(()ident(PChar)operator(()ident(b)operator(\))operator(\))operator(;) reserved(end)operator(;) reserved(begin) @@ -682,31 +682,31 @@ reserved(begin) reserved(else) ident(Result) operator(:=) ident(Offset)operator(;) - ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\);) + ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\))operator(;) ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(LenSubStr) operator(+) integer(1)operator(;) reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin) - reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(],) ident(SubStr)operator([)integer(1)operator(]\)) reserved(then) reserved(begin) + reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(])operator(,) ident(SubStr)operator([)integer(1)operator(])operator(\)) reserved(then) reserved(begin) ident(i) operator(:=) integer(1)operator(;) reserved(while) operator(()ident(i) operator(<) ident(LenSubStr)operator(\)) - reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(],) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(]\)\)) reserved(do) - ident(Inc)operator(()ident(i)operator(\);) + reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(])operator(,) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(])operator(\))operator(\)) reserved(do) + ident(Inc)operator(()ident(i)operator(\))operator(;) reserved(if) ident(i) operator(=) ident(LenSubStr) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) - ident(Inc)operator(()ident(Result)operator(\);) + ident(Inc)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;) +reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) - ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\)) @@ -714,12 +714,12 @@ reserved(begin) ident(Result) operator(:=) ident(S)operator(;) reserved(end)operator(;) -reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) +reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\)) @@ -728,12 +728,12 @@ reserved(begin) reserved(end)operator(;) reserved(function) ident(UntilLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;) - ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;) + ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\)) @@ -741,35 +741,35 @@ reserved(begin) ident(Result) operator(:=) ident(S)operator(;) reserved(end)operator(;) -reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;) +reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) - ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\);) + ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) +reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) - ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\);) + ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(FromLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;) - ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;) + ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\)) @@ -778,37 +778,37 @@ reserved(begin) reserved(end)operator(;) reserved(function) ident(BetweenChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Start)operator(,) ident(Finish)operator(:) ident(Char)operator(;) - ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;) + ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(,) ident(fin)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(CharPos)operator(()ident(Start)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(CharPos)operator(()ident(Start)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(=) integer(0) reserved(then) ident(Exit)operator(;) - ident(fin) operator(:=) ident(CharPos)operator(()ident(Finish)operator(,) ident(S)operator(,) ident(p) operator(+) integer(1)operator(\);) + ident(fin) operator(:=) ident(CharPos)operator(()ident(Finish)operator(,) ident(S)operator(,) ident(p) operator(+) integer(1)operator(\))operator(;) reserved(if) ident(fin) operator(=) integer(0) reserved(then) ident(Exit)operator(;) reserved(if) reserved(not) ident(Inclusive) reserved(then) reserved(begin) - ident(Inc)operator(()ident(p)operator(\);) - ident(Dec)operator(()ident(fin)operator(\);) + ident(Inc)operator(()ident(p)operator(\))operator(;) + ident(Dec)operator(()ident(fin)operator(\))operator(;) reserved(end)operator(;) - ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p) operator(+) integer(1)operator(\);) + ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p) operator(+) integer(1)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) reserved(if) ident(Length)operator(()ident(Brake)operator(\)) operator(=) integer(1) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(UntilChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(]\);) + ident(Result) operator(:=) ident(UntilChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(])operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) - ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(S)operator(\);) + ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\)) @@ -816,24 +816,24 @@ reserved(begin) ident(Result) operator(:=) ident(S)operator(;) reserved(end)operator(;) -reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) reserved(if) ident(Length)operator(()ident(Brake)operator(\)) operator(=) integer(1) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(FromChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(]\);) + ident(Result) operator(:=) ident(FromChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(])operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(s)operator(\);) + ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(s)operator(\))operator(;) reserved(if) ident(p) operator(>) integer(0) reserved(then) reserved(begin) - ident(Inc)operator(()ident(p)operator(,) ident(Length)operator(()ident(Brake)operator(\)\);) - ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\);) + ident(Inc)operator(()ident(p)operator(,) ident(Length)operator(()ident(Brake)operator(\))operator(\))operator(;) + ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\):) reserved(string)operator(;) +reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -843,8 +843,8 @@ reserved(begin) ident(i) operator(:=) integer(1)operator(;) reserved(while) ident(True) reserved(do) reserved(begin) - ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(i)operator(,) ident(Width)operator(\);) - ident(Inc)operator(()ident(i)operator(,) ident(Width)operator(\);) + ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(i)operator(,) ident(Width)operator(\))operator(;) + ident(Inc)operator(()ident(i)operator(,) ident(Width)operator(\))operator(;) reserved(if) ident(i) operator(<=) ident(Length)operator(()ident(S)operator(\)) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(LineEnd) reserved(else) @@ -853,50 +853,50 @@ reserved(begin) reserved(end)operator(;) reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) - ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;) + ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;) reserved(var) ident(p)operator(,) ident(fin)operator(,) ident(SepLen)operator(:) ident(Integer)operator(;) - reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;) reserved(begin) reserved(if) ident(IgnoreMultiSep) reserved(and) operator(()ident(S) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(then) ident(Exit)operator(;) - ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\);) - ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)]) operator(:=) ident(S)operator(;) + ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\))operator(;) + ident(Result)operator([)ident(High)operator(()ident(Result)operator(\))operator(]) operator(:=) ident(S)operator(;) reserved(end)operator(;) reserved(begin) reserved(if) ident(S) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin) reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then) - ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) ident(Result) operator(:=) reserved(nil)operator(;) - ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\);) + ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\))operator(;) ident(p) operator(:=) integer(1)operator(;) - ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\);) + ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\))operator(;) reserved(while) ident(fin) operator(>) integer(0) reserved(do) reserved(begin) - ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\)\);) + ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\))operator(\))operator(;) ident(p) operator(:=) ident(fin) operator(+) ident(SepLen)operator(;) - ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\);) + ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\))operator(;) reserved(end)operator(;) - ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\)\);) + ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(\))operator(;) reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then) - ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;) reserved(end)operator(;) reserved(procedure) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(Strings)operator(:) ident(TStrings)operator(;) - ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\);) + ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(;) reserved(var) ident(p)operator(,) ident(fin)operator(,) ident(SepLen)operator(:) ident(Integer)operator(;) - reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;) reserved(begin) reserved(if) ident(IgnoreMultiSep) reserved(and) operator(()ident(S) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(then) ident(Exit)operator(;) - ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\);) + ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\))operator(;) reserved(end)operator(;) reserved(begin) @@ -904,85 +904,85 @@ reserved(begin) ident(Exit)operator(;) ident(Strings)operator(.)ident(BeginUpdate)operator(;) - ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\);) + ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\))operator(;) ident(p) operator(:=) integer(1)operator(;) - ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\);) + ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\))operator(;) reserved(while) ident(fin) operator(>) integer(0) reserved(do) reserved(begin) - ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\)\);) + ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\))operator(\))operator(;) ident(p) operator(:=) ident(fin) operator(+) ident(SepLen)operator(;) - ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\);) + ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\))operator(;) reserved(end)operator(;) - ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\)\);) + ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(\))operator(;) ident(Strings)operator(.)ident(EndUpdate)operator(;) reserved(end)operator(;) reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Separators)operator(:) ident(TCharSet)operator(;) - ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;) + ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;) reserved(var) ident(p)operator(,) ident(fin)operator(:) ident(Integer)operator(;) - reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;) reserved(begin) reserved(if) ident(IgnoreMultiSep) reserved(and) operator(()ident(S) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(then) ident(Exit)operator(;) - ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\);) - ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)]) operator(:=) ident(S)operator(;) + ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\))operator(;) + ident(Result)operator([)ident(High)operator(()ident(Result)operator(\))operator(]) operator(:=) ident(S)operator(;) reserved(end)operator(;) reserved(begin) reserved(if) ident(S) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin) reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then) - ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) ident(Result) operator(:=) reserved(nil)operator(;) ident(p) operator(:=) integer(1)operator(;) - ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(\);) + ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(\))operator(;) reserved(while) ident(fin) operator(>) integer(0) reserved(do) reserved(begin) - ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\)\);) + ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\))operator(\))operator(;) ident(p) operator(:=) ident(fin) operator(+) integer(1)operator(;) - ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(,) ident(p)operator(\);) + ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(,) ident(p)operator(\))operator(;) reserved(end)operator(;) - ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\)\);) + ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(\))operator(;) reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then) - ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;) reserved(end)operator(;) reserved(procedure) ident(TileStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(BrakeStart)operator(:) ident(Integer)operator(;) ident(BrakeEnd)operator(:) ident(Integer)operator(;) - reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\);) + reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\))operator(;) reserved(begin) - ident(Left) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(BrakeStart)operator(-)integer(1)operator(\);) - ident(Right) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(BrakeEnd) operator(+) integer(1)operator(,) ident(MaxInt)operator(\);) + ident(Left) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(BrakeStart)operator(-)integer(1)operator(\))operator(;) + ident(Right) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(BrakeEnd) operator(+) integer(1)operator(,) ident(MaxInt)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(,) ident(imax)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) ident(imax) operator(:=) ident(Strings)operator(.)ident(Count)operator(-)integer(1)operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(imax) reserved(do) reserved(begin) - ident(Result) operator(:=) ident(Result) operator(+) ident(Strings)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(Result) operator(+) ident(Strings)operator([)ident(i)operator(])operator(;) reserved(if) ident(i) operator(<) ident(imax) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(Separator)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;) +reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(StrA)operator(\)) reserved(do) reserved(begin) - ident(Result) operator(:=) ident(Result) operator(+) ident(StrA)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(Result) operator(+) ident(StrA)operator([)ident(i)operator(])operator(;) reserved(if) ident(i) operator(<) ident(High)operator(()ident(StrA)operator(\)) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(Separator)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) +reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(P)operator(:) ident(PChar)operator(;) ident(Len)operator(,) ident(i)operator(:) ident(Integer)operator(;) @@ -991,26 +991,26 @@ reserved(begin) reserved(if) ident(Count) operator(=) integer(0) reserved(then) ident(Exit)operator(;) - ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\);) - ident(SetLength)operator(()ident(Result)operator(,) ident(Len) operator(*) ident(Count)operator(\);) + ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;) + ident(SetLength)operator(()ident(Result)operator(,) ident(Len) operator(*) ident(Count)operator(\))operator(;) - ident(P) operator(:=) ident(Pointer)operator(()ident(Result)operator(\);) + ident(P) operator(:=) ident(Pointer)operator(()ident(Result)operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Count) reserved(do) reserved(begin) - ident(Move)operator(()ident(Pointer)operator(()ident(S)operator(\)^,) ident(P)operator(^,) ident(Len)operator(\);) - ident(Inc)operator(()ident(P)operator(,) ident(Len)operator(\);) + ident(Move)operator(()ident(Pointer)operator(()ident(S)operator(\))operator(^)operator(,) ident(P)operator(^)operator(,) ident(Len)operator(\))operator(;) + ident(Inc)operator(()ident(P)operator(,) ident(Len)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(begin) - ident(Result) operator(:=) ident(MulStr)operator(()ident(Filler)operator(,) ident(Width) operator(-) ident(Length)operator(()ident(S)operator(\)\)) operator(+) ident(S)operator(;) + ident(Result) operator(:=) ident(MulStr)operator(()ident(Filler)operator(,) ident(Width) operator(-) ident(Length)operator(()ident(S)operator(\))operator(\)) operator(+) ident(S)operator(;) reserved(end)operator(;) -reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) +reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(Len)operator(:) ident(Integer)operator(;) reserved(begin) - ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\);) + ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;) reserved(if) ident(Len) operator(<=) ident(MaxLen) reserved(then) reserved(begin) ident(Result) operator(:=) ident(S)operator(;) ident(Exit) reserved(end)operator(;) @@ -1018,21 +1018,21 @@ reserved(begin) ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(MaxLen) operator(-) integer(3)operator(\)) operator(+) string<delimiter(')content(...)delimiter(')>operator(;) reserved(end)operator(;) -reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do) reserved(if) ident(S)operator([)ident(i)operator(]) operator(>) char(#32) reserved(then) - ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(C) reserved(in) ident(StrangeChars)operator(;) reserved(end)operator(;) -reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Char)operator(;) +reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Char)operator(;) reserved(begin) reserved(case) ident(C) reserved(of) char(#0)operator(:) ident(Result) operator(:=) char<delimiter(')content(.)delimiter(')>operator(;) @@ -1043,25 +1043,25 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) - ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(S)operator(\)\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(S)operator(\))operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do) - ident(Result)operator([)ident(i)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(S)operator([)ident(i)operator(]\);) + ident(Result)operator([)ident(i)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(S)operator([)ident(i)operator(])operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;) +reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) - ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(a)operator(\)\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(a)operator(\))operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do) - ident(Result)operator([)ident(i) operator(+) integer(1)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(Char)operator(()ident(a)operator([)ident(i)operator(]\)\);) + ident(Result)operator([)ident(i) operator(+) integer(1)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(Char)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(begin) ident(Result) operator(:=) ident(S)operator(;) @@ -1072,31 +1072,31 @@ reserved(begin) ident(Result) operator(:=) ident(Result) operator(+) ident(Quoter)operator(;) reserved(end)operator(;) -reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(if) ident(Length)operator(()ident(S)operator(\)) operator(>) integer(2) reserved(then) - ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(2)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) integer(2)operator(\);) + ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(2)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) integer(2)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(Start)operator(,) ident(Len)operator(:) ident(Integer)operator(;) reserved(begin) ident(Start) operator(:=) integer(1)operator(;) - ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\);) + ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;) - reserved(if) operator(()ident(S) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(S)operator([)integer(1)operator(]) reserved(in) operator(([)char(#0)operator(..)char(#32)operator(]) operator(+) ident(QuoteChars)operator(\)\)) reserved(then) reserved(begin) - reserved(if) operator(()ident(LastChar)operator(()ident(S)operator(\)) operator(=) ident(S)operator([)integer(1)operator(]\)) reserved(then) - ident(Dec)operator(()ident(Len)operator(\);) - ident(Inc)operator(()ident(Start)operator(\);) + reserved(if) operator(()ident(S) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(S)operator([)integer(1)operator(]) reserved(in) operator(()operator([)char(#0)operator(..)char(#32)operator(]) operator(+) ident(QuoteChars)operator(\))operator(\)) reserved(then) reserved(begin) + reserved(if) operator(()ident(LastChar)operator(()ident(S)operator(\)) operator(=) ident(S)operator([)integer(1)operator(])operator(\)) reserved(then) + ident(Dec)operator(()ident(Len)operator(\))operator(;) + ident(Inc)operator(()ident(Start)operator(\))operator(;) reserved(end)operator(;) - ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(Start)operator(,) ident(Len) operator(-) ident(Start) operator(+) integer(1)operator(\);) + ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(Start)operator(,) ident(Len) operator(-) ident(Start) operator(+) integer(1)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(StrNumerus)operator(()reserved(const) ident(Value)operator(:) ident(Integer)operator(;) reserved(const) ident(Singular)operator(,) ident(Plural)operator(:) reserved(string)operator(;) - reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(begin) reserved(if) ident(Abs)operator(()ident(Value)operator(\)) operator(=) integer(1) reserved(then) ident(Result) operator(:=) ident(IntToStr)operator(()ident(Value)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(Singular) @@ -1106,22 +1106,22 @@ reserved(begin) ident(Result) operator(:=) ident(IntToStr)operator(()ident(Value)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(Plural)operator(;) reserved(end)operator(;) -reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(const) - ident(BoolStrings)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(False)delimiter(')>operator(,) string<delimiter(')content(True)delimiter(')>operator(\);) + ident(BoolStrings)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(False)delimiter(')>operator(,) string<delimiter(')content(True)delimiter(')>operator(\))operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) - reserved(function) ident(StrOfP)operator(()ident(P)operator(:) ident(Pointer)operator(\):) reserved(string)operator(;) + reserved(function) ident(StrOfP)operator(()ident(P)operator(:) ident(Pointer)operator(\))operator(:) reserved(string)operator(;) reserved(begin) reserved(if) ident(P) operator(=) reserved(nil) reserved(then) ident(Result) operator(:=) string<delimiter(')content([nil])delimiter(')> reserved(else) - ident(Result) operator(:=) char<delimiter(')content([)delimiter(')> operator(+) ident(IntToStr)operator(()ident(Cardinal)operator(()ident(P)operator(\)\)) operator(+) char<delimiter(')content(])delimiter(')>operator(;) + ident(Result) operator(:=) char<delimiter(')content([)delimiter(')> operator(+) ident(IntToStr)operator(()ident(Cardinal)operator(()ident(P)operator(\))operator(\)) operator(+) char<delimiter(')content(])delimiter(')>operator(;) reserved(end)operator(;) - reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;) reserved(begin) ident(Result) operator(:=) ident(Result) operator(+) ident(s) operator(+) ident(Separator)operator(;) reserved(end)operator(;) @@ -1131,102 +1131,102 @@ reserved(begin) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Items)operator(\)) reserved(do) reserved(with) ident(Items)operator([)ident(i)operator(]) reserved(do) reserved(case) ident(VType) reserved(of) - ident(vtString)operator(:) ident(Add)operator(()ident(VString)operator(^\);) - ident(vtInteger)operator(:) ident(Add)operator(()ident(IntToStr)operator(()ident(VInteger)operator(\)\);) - ident(vtBoolean)operator(:) ident(Add)operator(()ident(BoolStrings)operator([)ident(VBoolean)operator(]\);) - ident(vtChar)operator(:) ident(Add)operator(()ident(VChar)operator(\);) - ident(vtPChar)operator(:) ident(Add)operator(()ident(VPChar)operator(\);) - ident(vtExtended)operator(:) ident(Add)operator(()ident(FloatToStr)operator(()ident(VExtended)operator(^\)\);) + ident(vtString)operator(:) ident(Add)operator(()ident(VString)operator(^)operator(\))operator(;) + ident(vtInteger)operator(:) ident(Add)operator(()ident(IntToStr)operator(()ident(VInteger)operator(\))operator(\))operator(;) + ident(vtBoolean)operator(:) ident(Add)operator(()ident(BoolStrings)operator([)ident(VBoolean)operator(])operator(\))operator(;) + ident(vtChar)operator(:) ident(Add)operator(()ident(VChar)operator(\))operator(;) + ident(vtPChar)operator(:) ident(Add)operator(()ident(VPChar)operator(\))operator(;) + ident(vtExtended)operator(:) ident(Add)operator(()ident(FloatToStr)operator(()ident(VExtended)operator(^)operator(\))operator(\))operator(;) ident(vtObject)operator(:) reserved(if) ident(VObject) reserved(is) ident(TComponent) reserved(then) - ident(Add)operator(()ident(TComponent)operator(()ident(VObject)operator(\).)ident(Name)operator(\)) + ident(Add)operator(()ident(TComponent)operator(()ident(VObject)operator(\))operator(.)ident(Name)operator(\)) reserved(else) - ident(Add)operator(()ident(VObject)operator(.)ident(ClassName)operator(\);) - ident(vtClass)operator(:) ident(Add)operator(()ident(VClass)operator(.)ident(ClassName)operator(\);) - ident(vtAnsiString)operator(:) ident(Add)operator(()reserved(string)operator(()ident(VAnsiString)operator(\)\);) - ident(vtCurrency)operator(:) ident(Add)operator(()ident(CurrToStr)operator(()ident(VCurrency)operator(^\)\);) - ident(vtInt64)operator(:) ident(Add)operator(()ident(IntToStr)operator(()ident(VInt64)operator(^\)\);) - ident(vtVariant)operator(:) ident(Add)operator(()reserved(string)operator(()ident(VVariant)operator(^\)\);) - - ident(vtWideChar)operator(:) ident(Add)operator(()ident(VWideChar)operator(\);) - ident(vtPWideChar)operator(:) ident(Add)operator(()ident(VPWideChar)operator(\);) - ident(vtInterface)operator(:) ident(Add)operator(()ident(StrOfP)operator(()ident(VInterface)operator(\)\);) - ident(vtPointer)operator(:) ident(Add)operator(()ident(StrOfP)operator(()ident(VPointer)operator(\)\);) - ident(vtWideString)operator(:) ident(Add)operator(()ident(WideString)operator(()ident(VWideString)operator(\)\);) + ident(Add)operator(()ident(VObject)operator(.)ident(ClassName)operator(\))operator(;) + ident(vtClass)operator(:) ident(Add)operator(()ident(VClass)operator(.)ident(ClassName)operator(\))operator(;) + ident(vtAnsiString)operator(:) ident(Add)operator(()reserved(string)operator(()ident(VAnsiString)operator(\))operator(\))operator(;) + ident(vtCurrency)operator(:) ident(Add)operator(()ident(CurrToStr)operator(()ident(VCurrency)operator(^)operator(\))operator(\))operator(;) + ident(vtInt64)operator(:) ident(Add)operator(()ident(IntToStr)operator(()ident(VInt64)operator(^)operator(\))operator(\))operator(;) + ident(vtVariant)operator(:) ident(Add)operator(()reserved(string)operator(()ident(VVariant)operator(^)operator(\))operator(\))operator(;) + + ident(vtWideChar)operator(:) ident(Add)operator(()ident(VWideChar)operator(\))operator(;) + ident(vtPWideChar)operator(:) ident(Add)operator(()ident(VPWideChar)operator(\))operator(;) + ident(vtInterface)operator(:) ident(Add)operator(()ident(StrOfP)operator(()ident(VInterface)operator(\))operator(\))operator(;) + ident(vtPointer)operator(:) ident(Add)operator(()ident(StrOfP)operator(()ident(VPointer)operator(\))operator(\))operator(;) + ident(vtWideString)operator(:) ident(Add)operator(()ident(WideString)operator(()ident(VWideString)operator(\))operator(\))operator(;) reserved(end)operator(;) reserved(if) ident(Result) operator(<>) string<delimiter(')delimiter(')> reserved(then) - ident(SetLength)operator(()ident(result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(-) ident(Length)operator(()ident(Separator)operator(\)\);) + ident(SetLength)operator(()ident(result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(-) ident(Length)operator(()ident(Separator)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);) +reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;) reserved(var) ident(Text)operator(:) reserved(string)operator(;) reserved(begin) - ident(Text) operator(:=) ident(MakeStr)operator(()ident(Items)operator(,) ident(Separator)operator(\);) + ident(Text) operator(:=) ident(MakeStr)operator(()ident(Items)operator(,) ident(Separator)operator(\))operator(;) - ident(MessageBox)operator(()integer(0)operator(,) ident(PChar)operator(()ident(Text)operator(\),) string<delimiter(')content(Info)delimiter(')>operator(,) ident(MB_OK) reserved(and) ident(MB_APPLMODAL)operator(\);) + ident(MessageBox)operator(()integer(0)operator(,) ident(PChar)operator(()ident(Text)operator(\))operator(,) string<delimiter(')content(Info)delimiter(')>operator(,) ident(MB_OK) reserved(and) ident(MB_APPLMODAL)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) reserved(string)operator(;) +reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do) reserved(if) ident(S)operator([)ident(i)operator(]) operator(<>) ident(C) reserved(then) - ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) +reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do) reserved(if) reserved(not) operator(()ident(S)operator([)ident(i)operator(]) reserved(in) ident(C)operator(\)) reserved(then) - ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do) reserved(if) ident(S)operator([)ident(i)operator(]) reserved(in) ident(C) reserved(then) - ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Integer)operator(;) +reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) integer(0)operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do) reserved(if) ident(S)operator([)ident(i)operator(]) operator(=) ident(C) reserved(then) - ident(Inc)operator(()ident(Result)operator(\);) + ident(Inc)operator(()ident(Result)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(Str) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Str) operator(=) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Str)operator(\)\)\);) + ident(Result) operator(:=) operator(()ident(Str) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Str) operator(=) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Str)operator(\))operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(Text) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) ident(SameText)operator(()ident(Text)operator(,) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Text)operator(\)\)\);) + ident(Result) operator(:=) operator(()ident(Text) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) ident(SameText)operator(()ident(Text)operator(,) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Text)operator(\))operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) ident(StrAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Str)operator(\);) + ident(Result) operator(:=) ident(StrAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Str)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) ident(TextAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Text)operator(\);) + ident(Result) operator(:=) ident(TextAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Text)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1236,7 +1236,7 @@ reserved(begin) ident(Result) operator(:=) ident(False)operator(;) reserved(end)operator(;) -reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1248,65 +1248,65 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(PosEx)operator(()ident(SubStr)operator(,) ident(S)operator(\)) operator(>) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(False)operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin) - ident(Result) operator(:=) operator(()ident(S) operator(=) ident(SL)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) operator(()ident(S) operator(=) ident(SL)operator([)ident(i)operator(])operator(\))operator(;) reserved(if) ident(Result) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(False)operator(;) reserved(for) ident(i) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(begin) - ident(Result) operator(:=) operator(()ident(S) operator(=) ident(A)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) operator(()ident(S) operator(=) ident(A)operator([)ident(i)operator(])operator(\))operator(;) reserved(if) ident(Result) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) ident(PosExText)operator(()ident(Text)operator(,) ident(S)operator(\)) operator(>) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(False)operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin) - ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(i)operator(])operator(\))operator(;) reserved(if) ident(Result) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(False)operator(;) reserved(for) ident(i) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(begin) - ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(i)operator(])operator(\))operator(;) reserved(if) ident(Result) reserved(then) ident(Exit)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(if) ident(S) operator(=) ident(SL)operator([)ident(Result)operator(]) reserved(then) @@ -1314,7 +1314,7 @@ reserved(begin) ident(Result) operator(:=) operator(-)integer(1)operator(;) reserved(end)operator(;) -reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(Result) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(if) ident(S) operator(=) ident(A)operator([)ident(Result)operator(]) reserved(then) @@ -1322,23 +1322,23 @@ reserved(begin) ident(Result) operator(:=) operator(-)integer(1)operator(;) reserved(end)operator(;) -reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) - reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(Result)operator(]\)) reserved(then) + reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(Result)operator(])operator(\)) reserved(then) ident(Exit)operator(;) ident(Result) operator(:=) operator(-)integer(1)operator(;) reserved(end)operator(;) -reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(Result) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) - reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(Result)operator(]\)) reserved(then) + reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(Result)operator(])operator(\)) reserved(then) ident(Exit)operator(;) ident(Result) operator(:=) operator(-)integer(1)operator(;) reserved(end)operator(;) -reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;) +reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1348,7 +1348,7 @@ reserved(begin) ident(Result)operator([)ident(i)operator(]) operator(:=) ident(New)operator(;) reserved(end)operator(;) -reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;) +reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1358,7 +1358,7 @@ reserved(begin) ident(Result)operator([)ident(i)operator(]) operator(:=) ident(New)operator(;) reserved(end)operator(;) -reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(oldp)operator(,) ident(ps)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1366,28 +1366,28 @@ reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(while) ident(True) reserved(do) reserved(begin) ident(oldp) operator(:=) ident(ps)operator(;) - ident(ps) operator(:=) ident(PosEx)operator(()ident(Old)operator(,) ident(S)operator(,) ident(oldp)operator(\);) + ident(ps) operator(:=) ident(PosEx)operator(()ident(Old)operator(,) ident(S)operator(,) ident(oldp)operator(\))operator(;) reserved(if) ident(ps) operator(=) integer(0) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(oldp)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(oldp) operator(+) integer(1)operator(\);) + ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(oldp)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(oldp) operator(+) integer(1)operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(oldp)operator(,) ident(ps) operator(-) ident(oldp)operator(\)) operator(+) ident(New)operator(;) - ident(Inc)operator(()ident(ps)operator(,) ident(Length)operator(()ident(Old)operator(\)\);) + ident(Inc)operator(()ident(ps)operator(,) ident(Length)operator(()ident(Old)operator(\))operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TStringList)operator(;) +reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TStringList)operator(;) reserved(begin) ident(Result) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;) reserved(if) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(then) - ident(Result)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\);) + ident(Result)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) ident(StrIn)operator(()ident(SL)operator(,) string<delimiter(')delimiter(')>operator(\);) + ident(Result) operator(:=) ident(StrIn)operator(()ident(SL)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;) reserved(end)operator(;) -reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\);) +reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1396,113 +1396,113 @@ reserved(begin) reserved(if) ident(SL)operator([)ident(i)operator(]) operator(=) string<delimiter(')delimiter(')> reserved(then) ident(SL)operator(.)ident(Delete)operator(()ident(i)operator(\)) reserved(else) - ident(Inc)operator(()ident(i)operator(\);) + ident(Inc)operator(()ident(i)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\);) +reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\))operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(i) operator(:=) integer(0)operator(;) reserved(while) ident(i) operator(<) ident(SL)operator(.)ident(Count) reserved(do) reserved(begin) - reserved(if) operator(()ident(SL)operator([)ident(i)operator(]) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(StrAtBegin)operator(()ident(TrimLeft)operator(()ident(SL)operator([)ident(i)operator(]\),) ident(CommentSign)operator(\)\)) reserved(then) + reserved(if) operator(()ident(SL)operator([)ident(i)operator(]) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(StrAtBegin)operator(()ident(TrimLeft)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(,) ident(CommentSign)operator(\))operator(\)) reserved(then) ident(SL)operator(.)ident(Delete)operator(()ident(i)operator(\)) reserved(else) - ident(Inc)operator(()ident(i)operator(\);) + ident(Inc)operator(()ident(i)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) - reserved(if) ident(TextAtBegin)operator(()ident(SL)operator([)ident(Result)operator(],) ident(S)operator(\)) reserved(then) + reserved(if) ident(TextAtBegin)operator(()ident(SL)operator([)ident(Result)operator(])operator(,) ident(S)operator(\)) reserved(then) ident(Exit)operator(;) ident(Result) operator(:=) operator(-)integer(1)operator(;) reserved(end)operator(;) -reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\);) +reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\))operator(;) - reserved(procedure) ident(Sort)operator(()ident(l)operator(,) ident(r)operator(:) ident(Integer)operator(\);) + reserved(procedure) ident(Sort)operator(()ident(l)operator(,) ident(r)operator(:) ident(Integer)operator(\))operator(;) reserved(var) ident(i)operator(,)ident(j)operator(:) ident(Integer)operator(;) ident(z)operator(,)ident(x)operator(:) reserved(string)operator(;) reserved(begin) ident(i) operator(:=) ident(l)operator(;) ident(j) operator(:=) ident(r)operator(;) - ident(x) operator(:=) ident(SL)operator([()ident(j) operator(+) ident(i)operator(\)) reserved(div) integer(2)operator(];) + ident(x) operator(:=) ident(SL)operator([)operator(()ident(j) operator(+) ident(i)operator(\)) reserved(div) integer(2)operator(])operator(;) reserved(repeat) - reserved(while) ident(SL)operator([)ident(i)operator(]) operator(<) ident(x) reserved(do) ident(Inc)operator(()ident(i)operator(\);) - reserved(while) ident(SL)operator([)ident(j)operator(]) operator(>) ident(x) reserved(do) ident(Dec)operator(()ident(j)operator(\);) + reserved(while) ident(SL)operator([)ident(i)operator(]) operator(<) ident(x) reserved(do) ident(Inc)operator(()ident(i)operator(\))operator(;) + reserved(while) ident(SL)operator([)ident(j)operator(]) operator(>) ident(x) reserved(do) ident(Dec)operator(()ident(j)operator(\))operator(;) reserved(if) ident(i) operator(<=) ident(j) reserved(then) reserved(begin) - ident(z) operator(:=) ident(SL)operator([)ident(i)operator(];) - ident(SL)operator([)ident(i)operator(]) operator(:=) ident(SL)operator([)ident(j)operator(];) + ident(z) operator(:=) ident(SL)operator([)ident(i)operator(])operator(;) + ident(SL)operator([)ident(i)operator(]) operator(:=) ident(SL)operator([)ident(j)operator(])operator(;) ident(SL)operator([)ident(j)operator(]) operator(:=) ident(z)operator(;) - ident(Inc)operator(()ident(i)operator(\);) ident(Dec)operator(()ident(j)operator(\);) + ident(Inc)operator(()ident(i)operator(\))operator(;) ident(Dec)operator(()ident(j)operator(\))operator(;) reserved(end)operator(;) reserved(until) ident(i) operator(>) ident(j)operator(;) - reserved(if) ident(j) operator(>) ident(l) reserved(then) ident(Sort)operator(()ident(l)operator(,) ident(j)operator(\);) - reserved(if) ident(i) operator(<) ident(r) reserved(then) ident(Sort)operator(()ident(i)operator(,) ident(r)operator(\);) + reserved(if) ident(j) operator(>) ident(l) reserved(then) ident(Sort)operator(()ident(l)operator(,) ident(j)operator(\))operator(;) + reserved(if) ident(i) operator(<) ident(r) reserved(then) ident(Sort)operator(()ident(i)operator(,) ident(r)operator(\))operator(;) reserved(end)operator(;) reserved(begin) reserved(if) ident(SL)operator(.)ident(Count) operator(>) integer(0) reserved(then) - ident(Sort)operator(()integer(0)operator(,) ident(SL)operator(.)ident(Count)operator(-)integer(1)operator(\);) + ident(Sort)operator(()integer(0)operator(,) ident(SL)operator(.)ident(Count)operator(-)integer(1)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\):) ident(Integer)operator(;) +reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) - ident(SetLength)operator(()ident(StrA)operator(,) ident(Length)operator(()ident(StrA)operator(\)) operator(+) integer(1)operator(\);) - ident(Result) operator(:=) ident(High)operator(()ident(StrA)operator(\);) + ident(SetLength)operator(()ident(StrA)operator(,) ident(Length)operator(()ident(StrA)operator(\)) operator(+) integer(1)operator(\))operator(;) + ident(Result) operator(:=) ident(High)operator(()ident(StrA)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;) +reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;) reserved(begin) - ident(Result) operator(:=) reserved(string)operator(()ident(Copy)operator(()ident(a)operator(,) integer(0)operator(,) ident(Length)operator(()ident(a)operator(\)\)\);) + ident(Result) operator(:=) reserved(string)operator(()ident(Copy)operator(()ident(a)operator(,) integer(0)operator(,) ident(Length)operator(()ident(a)operator(\))operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;) reserved(begin) - ident(Result) operator(:=) ident(TByteA)operator(()ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(Length)operator(()ident(s)operator(\)\)\);) + ident(Result) operator(:=) ident(TByteA)operator(()ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(Length)operator(()ident(s)operator(\))operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(TByteA)operator(;) reserved(begin) - ident(SetLength)operator(()ident(Result)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\)\);) - ident(Move)operator(()ident(i)operator(,) ident(Pointer)operator(()ident(Result)operator(\)^,) ident(SizeOf)operator(()ident(Integer)operator(\)\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(;) + ident(Move)operator(()ident(i)operator(,) ident(Pointer)operator(()ident(Result)operator(\))operator(^)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\):) ident(Integer)operator(;) +reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) integer(0)operator(;) - ident(Move)operator(()ident(Pointer)operator(()ident(A)operator(\)^,) ident(Result)operator(,) ident(Min)operator(()ident(Length)operator(()ident(A)operator(\),) ident(SizeOf)operator(()ident(Integer)operator(\)\)\);) + ident(Move)operator(()ident(Pointer)operator(()ident(A)operator(\))operator(^)operator(,) ident(Result)operator(,) ident(Min)operator(()ident(Length)operator(()ident(A)operator(\))operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) ident(h)operator(:) reserved(string)operator(;) reserved(begin) - ident(h) operator(:=) ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\);) - ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(h)operator(\)) reserved(div) integer(2)operator(\);) + ident(h) operator(:=) ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\))operator(;) + ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(h)operator(\)) reserved(div) integer(2)operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Result)operator(\)) reserved(do) - ident(Result)operator([)ident(i)operator(]) operator(:=) ident(ByteOfHex)operator(()ident(Copy)operator(()ident(h)operator(,) operator(()ident(i) reserved(shl) integer(1)operator(\)) operator(+) integer(1)operator(,) integer(2)operator(\)\);) + ident(Result)operator([)ident(i)operator(]) operator(:=) ident(ByteOfHex)operator(()ident(Copy)operator(()ident(h)operator(,) operator(()ident(i) reserved(shl) integer(1)operator(\)) operator(+) integer(1)operator(,) integer(2)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) +reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(F)operator(:) reserved(file)operator(;) reserved(begin) - ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\);) - preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\);)preprocessor({$I+}) + ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;) + preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\))operator(;)preprocessor({$I+}) reserved(if) ident(IOResult) operator(=) integer(0) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(FileSize)operator(()ident(F)operator(\);) - ident(CloseFile)operator(()ident(F)operator(\);) + ident(Result) operator(:=) ident(FileSize)operator(()ident(F)operator(\))operator(;) + ident(CloseFile)operator(()ident(F)operator(\))operator(;) reserved(end) reserved(else) ident(Result) operator(:=) integer(0)operator(;) reserved(end)operator(;) -reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(FindData)operator(:) ident(TWin32FindData)operator(;) reserved(begin) @@ -1510,88 +1510,88 @@ reserved(begin) ident(Result) operator(:=) ident(False)operator(;) ident(Exit)operator(;) reserved(end)operator(;) - ident(Result) operator(:=) operator(()ident(AllowFolders) reserved(and) ident(DirectoryExists)operator(()ident(FileName)operator(\)\)) reserved(or) - operator(()ident(FindFirstFile)operator(()ident(PChar)operator(()ident(FileName)operator(\),) ident(FindData)operator(\)) operator(<>) ident(INVALID_HANDLE_VALUE)operator(\);) - ident(Result) operator(:=) ident(Result) reserved(and) reserved(not) ident(CharIn)operator(()ident(FileName)operator(,) ident(WildCards)operator(\);) + ident(Result) operator(:=) operator(()ident(AllowFolders) reserved(and) ident(DirectoryExists)operator(()ident(FileName)operator(\))operator(\)) reserved(or) + operator(()ident(FindFirstFile)operator(()ident(PChar)operator(()ident(FileName)operator(\))operator(,) ident(FindData)operator(\)) operator(<>) ident(INVALID_HANDLE_VALUE)operator(\))operator(;) + ident(Result) operator(:=) ident(Result) reserved(and) reserved(not) ident(CharIn)operator(()ident(FileName)operator(,) ident(WildCards)operator(\))operator(;) ident(Result) operator(:=) ident(Result) reserved(and) operator(()ident(AllowFolders) - reserved(or) operator((()ident(FindData)operator(.)ident(dwFileAttributes) reserved(and) ident(FILE_ATTRIBUTE_DIRECTORY)operator(\)) operator(=) integer(0)operator(\)\);) + reserved(or) operator(()operator(()ident(FindData)operator(.)ident(dwFileAttributes) reserved(and) ident(FILE_ATTRIBUTE_DIRECTORY)operator(\)) operator(=) integer(0)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) - reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\)]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\)) operator(-) integer(1)operator(\);) + reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\))operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin) + ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\)) operator(-) integer(1)operator(\))operator(;) reserved(end) reserved(else) ident(Result) operator(:=) ident(Dir)operator(;) reserved(end)operator(;) -reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) - reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\)]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\)\);) + reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\))operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin) + ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\))operator(\))operator(;) reserved(end) reserved(else) ident(Result) operator(:=) ident(Dir) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;) reserved(end)operator(;) -reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(if) operator(()ident(Length)operator(()ident(FileName)operator(\)) operator(>=) integer(2)operator(\)) reserved(and) operator(()ident(FileName)operator([)integer(2)operator(]) operator(=) char<delimiter(')content(:)delimiter(')>operator(\)) reserved(then) - ident(Result) operator(:=) ident(UpperCase)operator(()ident(FileName)operator([)integer(1)operator(]) operator(+) string<delimiter(')content(:\\)delimiter(')>operator(\);) + ident(Result) operator(:=) ident(UpperCase)operator(()ident(FileName)operator([)integer(1)operator(]) operator(+) string<delimiter(')content(:\\)delimiter(')>operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(p)operator(:) ident(Integer)operator(;) reserved(begin) - ident(p) operator(:=) ident(CharPosR)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);) + ident(p) operator(:=) ident(CharPosR)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;) reserved(if) ident(P) operator(>) integer(0) reserved(then) ident(Result) operator(:=) ident(Copy)operator(()ident(FileName)operator(,) integer(1)operator(,) ident(p)operator(\)) reserved(else) ident(Result) operator(:=) ident(FileName)operator(;) reserved(end)operator(;) -reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) - ident(Result) operator(:=) ident(UntilLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\),) char<delimiter(')content(.)delimiter(')>operator(\);) + ident(Result) operator(:=) ident(UntilLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\))operator(,) char<delimiter(')content(.)delimiter(')>operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) - ident(Result) operator(:=) ident(FromLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\),) char<delimiter(')content(.)delimiter(')>operator(\);) + ident(Result) operator(:=) ident(FromLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\))operator(,) char<delimiter(')content(.)delimiter(')>operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(A) operator(=) ident(B)operator(\)) reserved(or) operator((()ident(Length)operator(()ident(A)operator(\)) operator(=) ident(Length)operator(()ident(B)operator(\)\)) reserved(and) ident(CompareMem)operator(()ident(A)operator(,) ident(B)operator(,) ident(Length)operator(()ident(A)operator(\)\)\);) + ident(Result) operator(:=) operator(()ident(A) operator(=) ident(B)operator(\)) reserved(or) operator(()operator(()ident(Length)operator(()ident(A)operator(\)) operator(=) ident(Length)operator(()ident(B)operator(\))operator(\)) reserved(and) ident(CompareMem)operator(()ident(A)operator(,) ident(B)operator(,) ident(Length)operator(()ident(A)operator(\))operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(Reverse)operator(()ident(A)operator(:) ident(TByteA)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(Reverse)operator(()ident(A)operator(:) ident(TByteA)operator(\))operator(:) ident(TByteA)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) - ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(A)operator(\)\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(A)operator(\))operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) - ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)) operator(-) ident(i)operator(]) operator(:=) ident(A)operator([)ident(i)operator(];) + ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)) operator(-) ident(i)operator(]) operator(:=) ident(A)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) +reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) reserved(type) ident(EndianArray) operator(=) reserved(packed) reserved(array)operator([)integer(0)operator(..)integer(3)operator(]) reserved(of) ident(Byte)operator(;) reserved(var) ident(a)operator(,) ident(b)operator(:) ident(EndianArray)operator(;) reserved(begin) - ident(a) operator(:=) ident(EndianArray)operator(()ident(i)operator(\);) - ident(b)operator([)integer(0)operator(]) operator(:=) ident(a)operator([)integer(3)operator(];) - ident(b)operator([)integer(1)operator(]) operator(:=) ident(a)operator([)integer(2)operator(];) - ident(b)operator([)integer(2)operator(]) operator(:=) ident(a)operator([)integer(1)operator(];) - ident(b)operator([)integer(3)operator(]) operator(:=) ident(a)operator([)integer(0)operator(];) - ident(Result) operator(:=) ident(Integer)operator(()ident(b)operator(\);) + ident(a) operator(:=) ident(EndianArray)operator(()ident(i)operator(\))operator(;) + ident(b)operator([)integer(0)operator(]) operator(:=) ident(a)operator([)integer(3)operator(])operator(;) + ident(b)operator([)integer(1)operator(]) operator(:=) ident(a)operator([)integer(2)operator(])operator(;) + ident(b)operator([)integer(2)operator(]) operator(:=) ident(a)operator([)integer(1)operator(])operator(;) + ident(b)operator([)integer(3)operator(]) operator(:=) ident(a)operator([)integer(0)operator(])operator(;) + ident(Result) operator(:=) ident(Integer)operator(()ident(b)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(SaveByteA)operator(()ident(Data)operator(:) ident(TByteA)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(;) - ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;) + ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(F)operator(:) reserved(file)operator(;) reserved(begin) @@ -1599,52 +1599,52 @@ reserved(begin) ident(Result) operator(:=) ident(False)operator(;) ident(Exit) reserved(end)operator(;) - ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\);) - preprocessor({$I-})ident(Rewrite)operator(()ident(F)operator(,) integer(1)operator(\);)preprocessor({$I+}) + ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;) + preprocessor({$I-})ident(Rewrite)operator(()ident(F)operator(,) integer(1)operator(\))operator(;)preprocessor({$I+}) reserved(if) ident(IOResult) operator(=) integer(0) reserved(then) reserved(begin) reserved(if) ident(Length)operator(()ident(Data)operator(\)) operator(>) integer(0) reserved(then) - ident(BlockWrite)operator(()ident(F)operator(,) ident(Data)operator([)integer(0)operator(],) ident(Length)operator(()ident(Data)operator(\)\);) - ident(CloseFile)operator(()ident(F)operator(\);) + ident(BlockWrite)operator(()ident(F)operator(,) ident(Data)operator([)integer(0)operator(])operator(,) ident(Length)operator(()ident(Data)operator(\))operator(\))operator(;) + ident(CloseFile)operator(()ident(F)operator(\))operator(;) ident(Result) operator(:=) ident(True)operator(;) reserved(end) reserved(else) ident(Result) operator(:=) ident(False)operator(;) reserved(end)operator(;) -reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;) +reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;) reserved(var) ident(F)operator(:) reserved(file)operator(;) reserved(begin) - ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\);) - preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\);)preprocessor({$I+}) + ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;) + preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\))operator(;)preprocessor({$I+}) reserved(if) ident(IOResult) operator(=) integer(0) reserved(then) reserved(begin) - ident(SetLength)operator(()ident(Result)operator(,) ident(FileSize)operator(()ident(F)operator(\)\);) + ident(SetLength)operator(()ident(Result)operator(,) ident(FileSize)operator(()ident(F)operator(\))operator(\))operator(;) reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(>) integer(0) reserved(then) - ident(BlockRead)operator(()ident(F)operator(,) ident(Result)operator([)integer(0)operator(],) ident(FileSize)operator(()ident(F)operator(\)\);) - ident(CloseFile)operator(()ident(F)operator(\);) + ident(BlockRead)operator(()ident(F)operator(,) ident(Result)operator([)integer(0)operator(])operator(,) ident(FileSize)operator(()ident(F)operator(\))operator(\))operator(;) + ident(CloseFile)operator(()ident(F)operator(\))operator(;) reserved(end) reserved(else) - ident(SetLength)operator(()ident(Result)operator(,) integer(0)operator(\);) + ident(SetLength)operator(()ident(Result)operator(,) integer(0)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) operator(()ident(FileName) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) reserved(not) ident(CharIn)operator(()ident(FileName)operator(,) ident(FileNameEnemies)operator(\)) - reserved(and) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\),) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(]\);) + reserved(and) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\))operator(,) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(])operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\):) reserved(string)operator(;) +reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(begin) reserved(if) ident(FileName) operator(=) string<delimiter(')delimiter(')> reserved(then) ident(FileName) operator(:=) ident(Default)operator(;) reserved(if) ident(CharIn)operator(()ident(FileName)operator(,) ident(FileNameEnemies)operator(\)) reserved(then) ident(Result) operator(:=) ident(ReplaceChars)operator(()ident(FileName)operator(,) ident(FileNameEnemies)operator(,) char<delimiter(')content(_)delimiter(')>operator(\)) - reserved(else) reserved(if) reserved(not) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\),) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(]\)) reserved(then) + reserved(else) reserved(if) reserved(not) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\))operator(,) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(])operator(\)) reserved(then) ident(Result) operator(:=) ident(Default) reserved(else) ident(Result) operator(:=) ident(FileName)operator(;) reserved(end)operator(;) -reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) comment({const LowInt = '2147483648'; HighInt = '2147483647'; @@ -1710,11 +1710,11 @@ begin reserved(var) ident(i)operator(:) ident(Int64)operator(;) reserved(begin) - ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) ident(High)operator(()ident(Int64)operator(\)\);) - ident(Result) operator(:=) operator(()ident(i) operator(>=) ident(Low)operator(()ident(Integer)operator(\)\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Integer)operator(\)\);) + ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) ident(High)operator(()ident(Int64)operator(\))operator(\))operator(;) + ident(Result) operator(:=) operator(()ident(i) operator(>=) ident(Low)operator(()ident(Integer)operator(\))operator(\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Integer)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) comment({const HighCard = '4294967295'; var @@ -1752,12 +1752,12 @@ begin reserved(var) ident(i)operator(:) ident(Int64)operator(;) reserved(begin) - ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\);) - ident(Result) operator(:=) operator(()ident(i) operator(>=) integer(0)operator(\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Cardinal)operator(\)\);) + ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\))operator(;) + ident(Result) operator(:=) operator(()ident(i) operator(>=) integer(0)operator(\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Cardinal)operator(\))operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(StrOfBool)operator(()ident(flag)operator(:) ident(Boolean)operator(;) reserved(const) ident(TrueStr)operator(:) reserved(string) operator(=) string<delimiter(')content(True)delimiter(')>operator(;) - reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(begin) reserved(if) ident(Flag) reserved(then) ident(Result) operator(:=) ident(TrueStr) @@ -1765,7 +1765,7 @@ reserved(begin) ident(Result) operator(:=) ident(FalseStr)operator(;) reserved(end)operator(;) -reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) +reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) reserved(begin) comment({ if i = 0 then begin Result := '0'; @@ -1775,22 +1775,22 @@ comment({ if i = 0 then begin Result := Char(Byte('0'\) + (i mod 10\)\) + Result; i := i div 10; end;}) - ident(Result) operator(:=) ident(IntToStr)operator(()ident(i)operator(\);) + ident(Result) operator(:=) ident(IntToStr)operator(()ident(i)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;) +reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;) reserved(var) ident(Res)operator(:) ident(Int64)operator(;) reserved(begin) - ident(Res) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\);) + ident(Res) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\))operator(;) reserved(if) ident(Res) operator(>) ident(High)operator(()ident(Cardinal)operator(\)) reserved(then) ident(Res) operator(:=) ident(High)operator(()ident(Cardinal)operator(\)) reserved(else) reserved(if) ident(Res) operator(<) integer(0) reserved(then) ident(Res) operator(:=) integer(0)operator(;) - ident(Result) operator(:=) ident(Cardinal)operator(()ident(Res)operator(\);) + ident(Result) operator(:=) ident(Cardinal)operator(()ident(Res)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\):) ident(THex)operator(;) +reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\))operator(:) ident(THex)operator(;) reserved(begin) reserved(case) ident(Hex) reserved(of) char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(:) @@ -1804,20 +1804,20 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\):) ident(Byte)operator(;) +reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\))operator(:) ident(Byte)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(HexOrd)operator(()ident(Hex)operator([)integer(1)operator(]\)) reserved(shl) integer(4)operator(\)) operator(+) ident(HexOrd)operator(()ident(Hex)operator([)integer(2)operator(]\);) + ident(Result) operator(:=) operator(()ident(HexOrd)operator(()ident(Hex)operator([)integer(1)operator(])operator(\)) reserved(shl) integer(4)operator(\)) operator(+) ident(HexOrd)operator(()ident(Hex)operator([)integer(2)operator(])operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(begin) - ident(Result) operator(:=) ident(IntToStr)operator(()ident(CardOfHex)operator(()ident(Hex)operator(\)\);) + ident(Result) operator(:=) ident(IntToStr)operator(()ident(CardOfHex)operator(()ident(Hex)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\):) ident(THexByteStr)operator(;) +reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\))operator(:) ident(THexByteStr)operator(;) reserved(begin) - ident(Result) operator(:=) ident(HexChar)operator([()ident(b) reserved(and) hex($F0)operator(\)) reserved(shr) integer(4)operator(]) - operator(+) ident(HexChar)operator([) ident(b) reserved(and) hex($0F) operator(];) + ident(Result) operator(:=) ident(HexChar)operator([)operator(()ident(b) reserved(and) hex($F0)operator(\)) reserved(shr) integer(4)operator(]) + operator(+) ident(HexChar)operator([) ident(b) reserved(and) hex($0F) operator(])operator(;) reserved(end)operator(;) comment({function HexOfCard2(c: Cardinal\): string; @@ -1841,7 +1841,7 @@ begin + Data[(c and (((1 shl (1 shl 2\)\) - 1\) shl (0 shl 2\)\)\) shr (0 shl 2\)]; end; }) -reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\):) reserved(string)operator(;) +reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(a)operator(:) ident(Cardinal)operator(;) reserved(begin) @@ -1853,7 +1853,7 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) +reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(a)operator(:) ident(Cardinal)operator(;) reserved(begin) @@ -1863,21 +1863,21 @@ reserved(begin) ident(Result) operator(:=) ident(HexChar)operator([)ident(a)operator(]) operator(+) ident(Result)operator(;) ident(i) operator(:=) ident(i) reserved(shr) integer(4)operator(;) reserved(end)operator(;) - ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(Digits) operator(-) ident(Length)operator(()ident(Result)operator(\)\)) operator(+) ident(Result)operator(;) + ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(Digits) operator(-) ident(Length)operator(()ident(Result)operator(\))operator(\)) operator(+) ident(Result)operator(;) reserved(end)operator(;) -reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(,) ident(len)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')content(const)delimiter(')> operator(+) ident(EOL) operator(+) - string<delimiter(')content( )delimiter(')> operator(+) ident(Name) operator(+) string<delimiter(')content(: array[0..)delimiter(')> operator(+) ident(IntToStr)operator(()ident(High)operator(()ident(a)operator(\)\)) operator(+) string<delimiter(')content(] of Byte = ()delimiter(')>operator(;) + string<delimiter(')content( )delimiter(')> operator(+) ident(Name) operator(+) string<delimiter(')content(: array[0..)delimiter(')> operator(+) ident(IntToStr)operator(()ident(High)operator(()ident(a)operator(\))operator(\)) operator(+) string<delimiter(')content(] of Byte = ()delimiter(')>operator(;) - ident(len) operator(:=) ident(Length)operator(()ident(a)operator(\);) + ident(len) operator(:=) ident(Length)operator(()ident(a)operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(len)operator(-)integer(1) reserved(do) reserved(begin) reserved(if) operator(()ident(i) reserved(mod) integer(19)operator(\)) operator(=) integer(0) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(EOL) operator(+) string<delimiter(')content( )delimiter(')> operator(+) string<delimiter(')content( )delimiter(')>operator(;) - ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content($)delimiter(')> operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content($)delimiter(')> operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(;) reserved(if) ident(i) operator(<) ident(len)operator(-)integer(1) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content(,)delimiter(')>operator(;) reserved(end)operator(;) @@ -1885,7 +1885,7 @@ reserved(begin) reserved(end)operator(;) reserved(function) ident(HexOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(1)operator(;) - reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1893,18 +1893,18 @@ reserved(begin) reserved(if) ident(Blocks) operator(>) integer(0) reserved(then) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do) reserved(begin) - ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(;) reserved(if) ident(i) operator(<) ident(High)operator(()ident(a)operator(\)) reserved(then) - reserved(if) operator((()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then) + reserved(if) operator(()operator(()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(Splitter)operator(;) reserved(end) reserved(else) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do) - ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(]\);) + ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(BinOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(4)operator(;) - reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) + reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(i)operator(,) ident(max)operator(:) ident(Integer)operator(;) ident(Bit)operator(:) ident(Boolean)operator(;) @@ -1912,44 +1912,44 @@ reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(if) ident(Blocks) operator(>) integer(0) reserved(then) reserved(begin) - ident(max) operator(:=) integer(8) operator(*) operator(()ident(High)operator(()ident(a)operator(\)\)) operator(+) integer(7)operator(;) + ident(max) operator(:=) integer(8) operator(*) operator(()ident(High)operator(()ident(a)operator(\))operator(\)) operator(+) integer(7)operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(max) reserved(do) reserved(begin) - ident(Bit) operator(:=) integer(7)operator(-()ident(i) reserved(mod) integer(8)operator(\)) reserved(in) ident(TBitSet)operator(()ident(a)operator([)ident(i) reserved(div) integer(8)operator(]\);) - ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(Byte)operator(()ident(Bit)operator(\)\);) + ident(Bit) operator(:=) integer(7)operator(-)operator(()ident(i) reserved(mod) integer(8)operator(\)) reserved(in) ident(TBitSet)operator(()ident(a)operator([)ident(i) reserved(div) integer(8)operator(])operator(\))operator(;) + ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(Byte)operator(()ident(Bit)operator(\))operator(\))operator(;) reserved(if) ident(i) operator(<) ident(max) reserved(then) - reserved(if) operator((()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then) + reserved(if) operator(()operator(()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(Splitter)operator(;) reserved(end)operator(;) reserved(end) reserved(else) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do) - ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(a)operator([)ident(i)operator(]) reserved(shr) operator(()ident(i) reserved(and) integer(8)operator(\)\);) + ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(a)operator([)ident(i)operator(]) reserved(shr) operator(()ident(i) reserved(and) integer(8)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;) +reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) integer(0)operator(;) - ident(Hex) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\),) integer(1)operator(,) integer(8)operator(\);) + ident(Hex) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\))operator(,) integer(1)operator(,) integer(8)operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(Hex)operator(\)) reserved(do) reserved(if) ident(Hex)operator([)ident(i)operator(]) operator(<>) char<delimiter(')content(0)delimiter(')> reserved(then) - ident(Inc)operator(()ident(Result)operator(,) ident(HexOrd)operator(()ident(Hex)operator([)ident(i)operator(]\)) reserved(shl) operator((()ident(Length)operator(()ident(Hex)operator(\)) operator(-) ident(i)operator(\)) reserved(shl) integer(2)operator(\)\);) + ident(Inc)operator(()ident(Result)operator(,) ident(HexOrd)operator(()ident(Hex)operator([)ident(i)operator(])operator(\)) reserved(shl) operator(()operator(()ident(Length)operator(()ident(Hex)operator(\)) operator(-) ident(i)operator(\)) reserved(shl) integer(2)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;) +reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) integer(0)operator(;) - ident(Bin) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Bin)operator(,) ident(BinaryChars)operator(\),) integer(1)operator(,) integer(32)operator(\);) + ident(Bin) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Bin)operator(,) ident(BinaryChars)operator(\))operator(,) integer(1)operator(,) integer(32)operator(\))operator(;) reserved(for) ident(i) operator(:=) ident(Length)operator(()ident(Bin)operator(\)) reserved(downto) integer(1) reserved(do) reserved(if) ident(Bin)operator([)ident(i)operator(]) operator(=) char<delimiter(')content(1)delimiter(')> reserved(then) - ident(Inc)operator(()ident(Result)operator(,) integer(1) reserved(shl) operator(()ident(Length)operator(()ident(Bin)operator(\)) operator(-) ident(i)operator(\)\);) + ident(Inc)operator(()ident(Result)operator(,) integer(1) reserved(shl) operator(()ident(Length)operator(()ident(Bin)operator(\)) operator(-) ident(i)operator(\))operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(Cardinal)operator(\):) reserved(string)operator(;) +reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(Cardinal)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(a)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1960,29 +1960,29 @@ reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(while) ident(n) operator(>) integer(0) reserved(do) reserved(begin) ident(a) operator(:=) ident(n) reserved(and) integer(1)operator(;) - ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)\)) operator(+) ident(Result)operator(;) + ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\))operator(\)) operator(+) ident(Result)operator(;) ident(n) operator(:=) ident(n) reserved(shr) integer(1)operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(Cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\):) reserved(string)operator(;) +reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(Cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(a)operator(:) ident(Integer)operator(;) reserved(begin) reserved(if) ident(n) operator(=) integer(0) reserved(then) reserved(begin) - ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount)operator(\);) + ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount)operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(while) ident(n) operator(>) integer(0) reserved(do) reserved(begin) ident(a) operator(:=) ident(n) reserved(and) integer(1)operator(;) - ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)\)) operator(+) ident(Result)operator(;) + ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\))operator(\)) operator(+) ident(Result)operator(;) ident(n) operator(:=) ident(n) reserved(shr) integer(1)operator(;) reserved(end)operator(;) - ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount) operator(-) ident(Length)operator(()ident(Result)operator(\)\)) operator(+) ident(Result)operator(;) + ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount) operator(-) ident(Length)operator(()ident(Result)operator(\))operator(\)) operator(+) ident(Result)operator(;) reserved(end)operator(;) -reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) reserved(string)operator(;) +reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(a)operator(:) ident(Integer)operator(;) reserved(begin) @@ -1998,17 +1998,17 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) ident(Cardinal)operator(;) +reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) ident(Cardinal)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) ident(F)operator(:) ident(Cardinal)operator(;) ident(c)operator(:) ident(Byte)operator(;) reserved(begin) ident(Result) operator(:=) integer(0)operator(;) - ident(V) operator(:=) ident(TrimAll)operator(()ident(V)operator(\);) + ident(V) operator(:=) ident(TrimAll)operator(()ident(V)operator(\))operator(;) ident(F) operator(:=) integer(1)operator(;) reserved(for) ident(i) operator(:=) ident(Length)operator(()ident(V)operator(\)) reserved(downto) integer(1) reserved(do) reserved(begin) - ident(c) operator(:=) ident(Byte)operator(()ident(UpCase)operator(()ident(V)operator([)ident(i)operator(]\)\);) + ident(c) operator(:=) ident(Byte)operator(()ident(UpCase)operator(()ident(V)operator([)ident(i)operator(])operator(\))operator(\))operator(;) reserved(case) ident(Char)operator(()ident(c)operator(\)) reserved(of) char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(:) ident(c) operator(:=) ident(c) operator(-) integer(48)operator(;) char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(Z)delimiter(')>operator(:) ident(c) operator(:=) ident(c) operator(-) integer(55)operator(;) @@ -2019,7 +2019,7 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Variant)operator(;) +reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Variant)operator(;) reserved(begin) ident(Result) operator(:=) ident(i)operator(;) reserved(if) ident(Result) operator(>) ident(Top) reserved(then) @@ -2028,17 +2028,17 @@ reserved(begin) ident(Result) operator(:=) ident(Bottom)operator(;) reserved(end)operator(;) -reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(Value) operator(>=) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<=) ident(Top)operator(\);) + ident(Result) operator(:=) operator(()ident(Value) operator(>=) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<=) ident(Top)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(Value) operator(>) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<) ident(Top)operator(\);) + ident(Result) operator(:=) operator(()ident(Value) operator(>) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<) ident(Top)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) +reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(if) ident(A) operator(<) ident(B) reserved(then) ident(Result) operator(:=) ident(A) @@ -2046,7 +2046,7 @@ reserved(begin) ident(Result) operator(:=) ident(B)operator(;) reserved(end)operator(;) -reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;) +reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -2054,13 +2054,13 @@ reserved(begin) reserved(if) ident(Length)operator(()ident(A)operator(\)) operator(=) integer(0) reserved(then) ident(Exit)operator(;) - ident(Result) operator(:=) ident(A)operator([)integer(0)operator(];) + ident(Result) operator(:=) ident(A)operator([)integer(0)operator(])operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(if) ident(A)operator([)ident(i)operator(]) operator(<) ident(Result) reserved(then) - ident(Result) operator(:=) ident(A)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(A)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) +reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) reserved(begin) reserved(if) ident(A) operator(>) ident(B) reserved(then) ident(Result) operator(:=) ident(A) @@ -2068,7 +2068,7 @@ reserved(begin) ident(Result) operator(:=) ident(B)operator(;) reserved(end)operator(;) -reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;) +reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -2076,23 +2076,23 @@ reserved(begin) reserved(if) ident(Length)operator(()ident(A)operator(\)) operator(=) integer(0) reserved(then) ident(Exit)operator(;) - ident(Result) operator(:=) ident(A)operator([)integer(0)operator(];) + ident(Result) operator(:=) ident(A)operator([)integer(0)operator(])operator(;) reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(if) ident(A)operator([)ident(i)operator(]) operator(>) ident(Result) reserved(then) - ident(Result) operator(:=) ident(A)operator([)ident(i)operator(];) + ident(Result) operator(:=) ident(A)operator([)ident(i)operator(])operator(;) reserved(end)operator(;) -reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TRanges)operator(;) +reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TRanges)operator(;) reserved(var) ident(SL)operator(:) ident(TStringList)operator(;) ident(r)operator(,) ident(b)operator(,) ident(t)operator(:) reserved(string)operator(;) ident(i)operator(,) ident(p)operator(:) ident(Integer)operator(;) - reserved(function) ident(TryStrToCard)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) reserved(out) ident(Value)operator(:) ident(Cardinal)operator(\):) ident(Boolean)operator(;) + reserved(function) ident(TryStrToCard)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) reserved(out) ident(Value)operator(:) ident(Cardinal)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(E)operator(:) ident(Integer)operator(;) reserved(begin) - ident(Val)operator(()ident(S)operator(,) ident(Value)operator(,) ident(E)operator(\);) + ident(Val)operator(()ident(S)operator(,) ident(Value)operator(,) ident(E)operator(\))operator(;) ident(Result) operator(:=) ident(E) operator(=) integer(0)operator(;) reserved(end)operator(;) @@ -2100,23 +2100,23 @@ reserved(begin) ident(Result) operator(:=) reserved(nil)operator(;) ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;) reserved(try) - ident(Split)operator(()ident(S)operator(,) ident(RangesSeparator)operator(,) ident(SL)operator(\);) - ident(SetLength)operator(()ident(Result)operator(,) ident(SL)operator(.)ident(Count)operator(\);) + ident(Split)operator(()ident(S)operator(,) ident(RangesSeparator)operator(,) ident(SL)operator(\))operator(;) + ident(SetLength)operator(()ident(Result)operator(,) ident(SL)operator(.)ident(Count)operator(\))operator(;) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin) - ident(r) operator(:=) ident(SL)operator([)ident(i)operator(];) + ident(r) operator(:=) ident(SL)operator([)ident(i)operator(])operator(;) reserved(with) ident(Result)operator([)ident(i)operator(]) reserved(do) reserved(begin) - ident(p) operator(:=) ident(CharPos)operator(()ident(RangeInnerSeparator)operator(,) ident(r)operator(\);) + ident(p) operator(:=) ident(CharPos)operator(()ident(RangeInnerSeparator)operator(,) ident(r)operator(\))operator(;) ident(Simple) operator(:=) ident(p) operator(=) integer(0)operator(;) comment(// no '-' found) reserved(if) ident(Simple) reserved(then) reserved(begin) reserved(if) ident(r) operator(=) ident(RangeInfinite) reserved(then) reserved(begin) comment(// * --> *-*) ident(Simple) operator(:=) ident(False)operator(;) - ident(Bottom) operator(:=) ident(Low)operator(()ident(Bottom)operator(\);) - ident(Top) operator(:=) ident(High)operator(()ident(Top)operator(\);) + ident(Bottom) operator(:=) ident(Low)operator(()ident(Bottom)operator(\))operator(;) + ident(Top) operator(:=) ident(High)operator(()ident(Top)operator(\))operator(;) reserved(end) reserved(else) reserved(if) reserved(not) ident(TryStrToCard)operator(()ident(r)operator(,) ident(Value)operator(\)) reserved(then) ident(Break)operator(;) reserved(end) reserved(else) reserved(begin) - ident(TileStr)operator(()ident(r)operator(,) ident(p)operator(,) ident(p)operator(,) ident(b)operator(,) ident(t)operator(\);) + ident(TileStr)operator(()ident(r)operator(,) ident(p)operator(,) ident(p)operator(,) ident(b)operator(,) ident(t)operator(\))operator(;) reserved(if) ident(b) operator(=) ident(RangeInfinite) reserved(then) ident(Bottom) operator(:=) ident(Low)operator(()ident(Bottom)operator(\)) @@ -2142,7 +2142,7 @@ reserved(begin) reserved(end)operator(;) reserved(end)operator(;) -reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) @@ -2162,219 +2162,219 @@ reserved(begin) reserved(end)operator(;) reserved(procedure) ident(WriteSL)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) - reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);) + reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;) reserved(var) ident(i)operator(:) ident(Integer)operator(;) reserved(begin) reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Strings)operator(.)ident(Count)operator(-)integer(1) reserved(do) - ident(WriteLn)operator(()ident(Prefix) operator(+) ident(Strings)operator([)ident(i)operator(]) operator(+) ident(Suffix)operator(\);) + ident(WriteLn)operator(()ident(Prefix) operator(+) ident(Strings)operator([)ident(i)operator(]) operator(+) ident(Suffix)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) operator(()ident(Res) operator(=) ident(ResultOnSuccess)operator(\);) + ident(Result) operator(:=) operator(()ident(Res) operator(=) ident(ResultOnSuccess)operator(\))operator(;) ident(LastSuccessRes) operator(:=) ident(Res)operator(;) reserved(end)operator(;) -reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;) +reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;) reserved(begin) - ident(Result) operator(:=) reserved(not) ident(Success)operator(()ident(Res)operator(,) ident(ResultOnSuccess)operator(\);) + ident(Result) operator(:=) reserved(not) ident(Success)operator(()ident(Res)operator(,) ident(ResultOnSuccess)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) +reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(Len)operator(:) ident(Integer)operator(;) ident(P)operator(,) ident(Res)operator(:) ident(PChar)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(P) operator(:=) ident(PChar)operator(()ident(S)operator(\);) - ident(Len) operator(:=) ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) reserved(nil)operator(,) integer(0)operator(\);) + ident(P) operator(:=) ident(PChar)operator(()ident(S)operator(\))operator(;) + ident(Len) operator(:=) ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) reserved(nil)operator(,) integer(0)operator(\))operator(;) reserved(if) ident(Len) operator(=) integer(0) reserved(then) ident(Exit)operator(;) - ident(GetMem)operator(()ident(Res)operator(,) ident(Len)operator(\);) - ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) ident(Res)operator(,) ident(Len)operator(\);) + ident(GetMem)operator(()ident(Res)operator(,) ident(Len)operator(\))operator(;) + ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) ident(Res)operator(,) ident(Len)operator(\))operator(;) ident(Result) operator(:=) ident(Res)operator(;) - ident(FreeMem)operator(()ident(Res)operator(,) ident(Len)operator(\);) + ident(FreeMem)operator(()ident(Res)operator(,) ident(Len)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(FindAll)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(;) - ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\):) ident(Boolean)operator(;) + ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(;) - reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\))operator(;) reserved(var) ident(PSR)operator(:) ident(TSearchRec)operator(;) ident(Res)operator(:) ident(Integer)operator(;) - reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;) reserved(begin) reserved(if) ident(S) operator(<>) string<delimiter(')delimiter(')> reserved(then) - ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\);) + ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\))operator(;) reserved(end)operator(;) reserved(begin) - ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\);) + ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\))operator(;) reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin) reserved(if) ident(Assigned)operator(()ident(FileReturn)operator(\)) reserved(then) - ident(Add)operator(()ident(FileReturn)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\)\)) + ident(Add)operator(()ident(FileReturn)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(\)) reserved(else) - ident(Add)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);) - ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);) + ident(Add)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;) + ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(if) reserved(not) ident(ScanSubDirs) reserved(then) ident(Exit)operator(;) - ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\);) + ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\))operator(;) reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin) reserved(if) operator(()ident(PSR)operator(.)ident(Attr) reserved(and) ident(faDirectory) operator(>) integer(0)operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) char<delimiter(')content(.)delimiter(')>operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) string<delimiter(')content(..)delimiter(')>operator(\)) reserved(then) - ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);) - ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);) + ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;) + ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) reserved(begin) ident(Strings)operator(.)ident(Clear)operator(;) - ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\);) - ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\);) - ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\);) + ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\))operator(;) + ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\))operator(;) + ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\))operator(;) ident(Result) operator(:=) ident(Strings)operator(.)ident(Count) operator(>) integer(0)operator(;) reserved(end)operator(;) reserved(function) ident(FindAllFirst)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) - ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\):) reserved(string)operator(;) + ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(;) - reserved(function) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) + reserved(function) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) reserved(var) ident(PSR)operator(:) ident(TSearchRec)operator(;) ident(Res)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) ident(False)operator(;) - reserved(if) ident(Success)operator(()ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\),) integer(0)operator(\)) reserved(then) reserved(begin) + reserved(if) ident(Success)operator(()ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\))operator(,) integer(0)operator(\)) reserved(then) reserved(begin) ident(FindAllFirst) operator(:=) ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(;) ident(Result) operator(:=) ident(True)operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) ident(Exit)operator(;) reserved(end)operator(;) reserved(if) reserved(not) ident(ScanSubDirs) reserved(then) ident(Exit)operator(;) - ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\);) + ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\))operator(;) reserved(while) reserved(not) ident(Result) reserved(and) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin) reserved(if) operator(()ident(PSR)operator(.)ident(Attr) reserved(and) ident(faDirectory) operator(>) integer(0)operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) char<delimiter(')content(.)delimiter(')>operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) string<delimiter(')content(..)delimiter(')>operator(\)) reserved(then) - ident(Result) operator(:=) ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);) - ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);) + ident(Result) operator(:=) ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;) + ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\);) - ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\);) - ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\);) + ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\))operator(;) + ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\))operator(;) + ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\))operator(;) reserved(end)operator(;) reserved(procedure) ident(DeleteFiles)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) - ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\);) + ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(;) reserved(var) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(;) - reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\))operator(;) reserved(var) ident(PSR)operator(:) ident(TSearchRec)operator(;) ident(Res)operator(:) ident(Integer)operator(;) - reserved(procedure) ident(TryDeleteFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\);) + reserved(procedure) ident(TryDeleteFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;) reserved(begin) reserved(try) - ident(DeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);) + ident(DeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;) reserved(except) reserved(end)operator(;) reserved(end)operator(;) reserved(begin) - ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\);) + ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\))operator(;) reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin) - ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);) - ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);) + ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;) + ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(if) reserved(not) ident(ScanSubDirs) reserved(then) ident(Exit)operator(;) - ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\);) + ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\))operator(;) reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin) reserved(if) operator(()ident(PSR)operator(.)ident(Attr) reserved(and) ident(faDirectory) operator(>) integer(0)operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) char<delimiter(')content(.)delimiter(')>operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) string<delimiter(')content(..)delimiter(')>operator(\)) reserved(then) reserved(begin) - ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);) - ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);) + ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;) + ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;) reserved(end)operator(;) - ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);) + ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(end)operator(;) reserved(begin) - ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\);) - ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\);) - ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\);) + ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\))operator(;) + ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\))operator(;) + ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\))operator(;) reserved(end)operator(;) -reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;) +reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;) reserved(var) ident(Drive)operator(:) reserved(string)operator(;) ident(pf)operator(,) ident(pd)operator(,) ident(Len)operator(:) ident(Integer)operator(;) ident(PSR)operator(:) ident(TSearchRec)operator(;) reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(FileName) operator(:=) ident(Trim)operator(()ident(FileName)operator(\);) + ident(FileName) operator(:=) ident(Trim)operator(()ident(FileName)operator(\))operator(;) reserved(if) ident(Length)operator(()ident(FileName)operator(\)) operator(<) integer(2) reserved(then) ident(Exit)operator(;) - ident(Drive) operator(:=) ident(ExtractDrive)operator(()ident(FileName)operator(\);) + ident(Drive) operator(:=) ident(ExtractDrive)operator(()ident(FileName)operator(\))operator(;) reserved(if) reserved(not) ident(DirectoryExists)operator(()ident(Drive)operator(\)) reserved(then) ident(Exit)operator(;) - reserved(if) ident(NoFloppyDrives) reserved(and) operator(()ident(Drive)operator([)integer(1)operator(]) reserved(in) operator([)char<delimiter(')content(A)delimiter(')>operator(,) char<delimiter(')content(B)delimiter(')>operator(]\)) reserved(then) + reserved(if) ident(NoFloppyDrives) reserved(and) operator(()ident(Drive)operator([)integer(1)operator(]) reserved(in) operator([)char<delimiter(')content(A)delimiter(')>operator(,) char<delimiter(')content(B)delimiter(')>operator(])operator(\)) reserved(then) ident(Exit)operator(;) - ident(Len) operator(:=) ident(Length)operator(()ident(FileName)operator(\);) + ident(Len) operator(:=) ident(Length)operator(()ident(FileName)operator(\))operator(;) ident(Result) operator(:=) ident(Drive)operator(;) ident(pf) operator(:=) ident(Length)operator(()ident(Drive)operator(\)) operator(+) integer(1)operator(;) reserved(while) ident(pf) operator(<=) ident(Len) reserved(do) reserved(begin) reserved(if) ident(FileName)operator([)ident(pf)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')> reserved(then) reserved(begin) ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;) - ident(Inc)operator(()ident(pf)operator(\);) + ident(Inc)operator(()ident(pf)operator(\))operator(;) ident(Continue)operator(;) reserved(end)operator(;) - ident(pd) operator(:=) ident(CharPos)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(,) ident(pf)operator(\);) + ident(pd) operator(:=) ident(CharPos)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(,) ident(pf)operator(\))operator(;) reserved(if) ident(pd) operator(=) integer(0) reserved(then) reserved(begin) - reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\),) ident(faFindEveryFile)operator(,) ident(PSR)operator(\)) reserved(then) reserved(begin) + reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\))operator(,) ident(faFindEveryFile)operator(,) ident(PSR)operator(\)) reserved(then) reserved(begin) ident(Result) operator(:=) ident(Result) operator(+) ident(PSR)operator(.)ident(Name)operator(;) ident(Break)operator(;) reserved(end) reserved(else) reserved(begin) - ident(FindClose)operator(()ident(PSR)operator(\);) - reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\),) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) + reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\))operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')> reserved(else) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(if) ident(Result) operator(=) string<delimiter(')delimiter(')> reserved(then) ident(Break)operator(;) reserved(end)operator(;) reserved(end)operator(;) - reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(pd) operator(-) ident(pf)operator(\),) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then) + reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(pd) operator(-) ident(pf)operator(\))operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then) ident(Result) operator(:=) ident(Result) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')> reserved(else) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) - ident(FindClose)operator(()ident(PSR)operator(\);) + ident(FindClose)operator(()ident(PSR)operator(\))operator(;) reserved(if) ident(Result) operator(=) string<delimiter(')delimiter(')> reserved(then) ident(Break)operator(;) @@ -2385,40 +2385,40 @@ reserved(begin) ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;) reserved(end)operator(;) -reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\):) ident(TDateTime)operator(;) +reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\))operator(:) ident(TDateTime)operator(;) reserved(var) ident(LocalFileTime)operator(:) ident(TFileTime)operator(;) ident(Res)operator(:) ident(Integer)operator(;) reserved(begin) ident(Result) operator(:=) integer(0)operator(;) - ident(FileTimeToLocalFileTime)operator(()ident(FileTime)operator(,) ident(LocalFileTime)operator(\);) - reserved(if) reserved(not) ident(FileTimeToDosDateTime)operator(()ident(LocalFileTime)operator(,) ident(LongRec)operator(()ident(Res)operator(\).)ident(Hi)operator(,) - ident(LongRec)operator(()ident(Res)operator(\).)ident(Lo)operator(\)) reserved(then) + ident(FileTimeToLocalFileTime)operator(()ident(FileTime)operator(,) ident(LocalFileTime)operator(\))operator(;) + reserved(if) reserved(not) ident(FileTimeToDosDateTime)operator(()ident(LocalFileTime)operator(,) ident(LongRec)operator(()ident(Res)operator(\))operator(.)ident(Hi)operator(,) + ident(LongRec)operator(()ident(Res)operator(\))operator(.)ident(Lo)operator(\)) reserved(then) ident(Res) operator(:=) operator(-)integer(1)operator(;) reserved(if) operator(()ident(Res) operator(=) operator(-)integer(1)operator(\)) reserved(or) operator(()ident(Res) operator(=) integer(0)operator(\)) reserved(then) ident(Exit)operator(;) reserved(try) - ident(Result) operator(:=) ident(FileDateToDateTime)operator(()ident(Res)operator(\);) + ident(Result) operator(:=) ident(FileDateToDateTime)operator(()ident(Res)operator(\))operator(;) reserved(except) reserved(end)operator(;) reserved(end)operator(;) -reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\);) +reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;) reserved(var) ident(Handle)operator(:) ident(Integer)operator(;) reserved(begin) - ident(Handle) operator(:=) ident(FileCreate)operator(()ident(FileName)operator(\);) - ident(FileClose)operator(()ident(Handle)operator(\);) + ident(Handle) operator(:=) ident(FileCreate)operator(()ident(FileName)operator(\))operator(;) + ident(FileClose)operator(()ident(Handle)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(Win32PlatformStr)operator(:) reserved(string)operator(;) reserved(const) ident(PlatformStrings)operator(:) reserved(array)operator([)ident(VER_PLATFORM_WIN32s)operator(..)ident(VER_PLATFORM_WIN32_NT)operator(]) reserved(of) reserved(string) operator(=) - operator(()string<delimiter(')content(VER_PLATFORM_WIN32s)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_WINDOWS)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_NT)delimiter(')>operator(\);) + operator(()string<delimiter(')content(VER_PLATFORM_WIN32s)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_WINDOWS)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_NT)delimiter(')>operator(\))operator(;) reserved(begin) - ident(Result) operator(:=) ident(PlatformStrings)operator([)ident(Win32Platform)operator(];) + ident(Result) operator(:=) ident(PlatformStrings)operator([)ident(Win32Platform)operator(])operator(;) reserved(end)operator(;) reserved(function) ident(FullOSInfo)operator(:) reserved(string)operator(;) @@ -2432,7 +2432,7 @@ reserved(begin) ident(Win32MajorVersion)operator(,) ident(Win32MinorVersion)operator(,) ident(Win32BuildNumber)operator(,) ident(Win32CSDVersion) operator(]) - operator(\);) + operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(Win9x)operator(:) ident(Boolean)operator(;) @@ -2448,7 +2448,7 @@ reserved(end)operator(;) reserved(function) ident(Win2000)operator(:) ident(Boolean)operator(;) reserved(begin) ident(Result) operator(:=) operator(()ident(Win32Platform) operator(=) ident(VER_PLATFORM_WIN32_NT)operator(\)) - reserved(and) operator(()ident(Win32MajorVersion) operator(=) integer(4)operator(\);) + reserved(and) operator(()ident(Win32MajorVersion) operator(=) integer(4)operator(\))operator(;) reserved(end)operator(;) reserved(function) ident(WinXP)operator(:) ident(Boolean)operator(;) @@ -2474,7 +2474,7 @@ reserved(type) ident(PMemChunk) operator(=) operator(^)ident(TMemChunk)operator(;) ident(TMemChunk) operator(=) reserved(record) ident(Filled)operator(:) ident(Longword)operator(;) - ident(Read)operator(:) ident(Longword)operator(;) + directive(Read)operator(:) ident(Longword)operator(;) ident(Data)operator(:) ident(pointer)operator(;) reserved(end)operator(;) @@ -2490,9 +2490,9 @@ reserved(type) directive(public) reserved(constructor) ident(Create)operator(;) reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;) - reserved(procedure) ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\);) - reserved(procedure) ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);) - reserved(procedure) ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);) + reserved(procedure) ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\))operator(;) + reserved(procedure) ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;) + reserved(procedure) ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;) directive(published) reserved(property) ident(BytesInFifo)operator(:) ident(LongWord) directive(read) ident(FBytesInFifo)operator(;) reserved(end)operator(;) @@ -2505,24 +2505,24 @@ reserved(begin) ident(FBuffers) operator(:=) ident(TList)operator(.)ident(Create)operator(;) comment(// set default chunksize...) ident(FChunksize) operator(:=) ident(DefaultChunksize)operator(;) - ident(InitializeCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(InitializeCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) reserved(end)operator(;) reserved(destructor) ident(TFifo)operator(.)ident(Destroy)operator(;) reserved(var) ident(I)operator(:) ident(Integer)operator(;) reserved(begin) - ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) reserved(for) ident(I) operator(:=) integer(0) reserved(to) ident(FBuffers)operator(.)ident(count) operator(-) integer(1) reserved(do) reserved(begin) - ident(FreeMem)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(]\).)ident(Data)operator(\);) - ident(Dispose)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(]\)\);) + ident(FreeMem)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(])operator(\))operator(.)ident(Data)operator(\))operator(;) + ident(Dispose)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(])operator(\))operator(\))operator(;) reserved(end)operator(;) ident(FBuffers)operator(.)ident(Clear)operator(;) ident(FBuffers)operator(.)ident(Free)operator(;) - ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) - ident(DeleteCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(DeleteCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) reserved(inherited)operator(;) reserved(end)operator(;) @@ -2536,13 +2536,13 @@ reserved(begin) reserved(else) reserved(begin) reserved(if) ident(FBuffers)operator(.)ident(Count) operator(>) integer(1) reserved(then) - ident(Inc)operator(()ident(Result)operator(,) operator(()ident(FBuffers)operator(.)ident(Count) operator(-) integer(1)operator(\)) operator(*) ident(FChunkSize)operator(\);) - ident(Inc)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(Fbuffers)operator(.)ident(Count) operator(-) integer(1)operator(]\).)ident(Filled)operator(\);) - ident(Dec)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(]\).)ident(Read)operator(\);) + ident(Inc)operator(()ident(Result)operator(,) operator(()ident(FBuffers)operator(.)ident(Count) operator(-) integer(1)operator(\)) operator(*) ident(FChunkSize)operator(\))operator(;) + ident(Inc)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(Fbuffers)operator(.)ident(Count) operator(-) integer(1)operator(])operator(\))operator(.)ident(Filled)operator(\))operator(;) + ident(Dec)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(])operator(\))operator(.)ident(Read)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) -reserved(procedure) ident(TFifo)operator(.)ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\);) +reserved(procedure) ident(TFifo)operator(.)ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\))operator(;) reserved(var) ident(Privpointer)operator(:) ident(pointer)operator(;) ident(PrivSize)operator(:) ident(LongWord)operator(;) @@ -2554,70 +2554,70 @@ reserved(begin) comment(// null pointer? somebody is trying to fool us, get out...) ident(Exit)operator(;) reserved(end)operator(;) - ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) ident(PrivPointer) operator(:=) ident(Data)operator(;) ident(PrivSize) operator(:=) integer(0)operator(;) comment(// are already buffers there?) reserved(if) ident(FBuffers)operator(.)ident(count) operator(>) integer(0) reserved(then) reserved(begin) comment(// is the last one of them not completely filled?) - reserved(if) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(]\).)ident(filled) operator(<) ident(FChunksize) reserved(then) + reserved(if) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(])operator(\))operator(.)ident(filled) operator(<) ident(FChunksize) reserved(then) comment(// not completely filled, so fill up the buffer.) reserved(begin) - ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(]\);) + ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(])operator(\))operator(;) comment(// fetch chunkdata.) ident(PosInChunk) operator(:=) ident(Chunk)operator(.)ident(Data)operator(;) comment(// move to current fill pos...) - ident(Inc)operator(()ident(LongWord)operator(()ident(PosInChunk)operator(\),) ident(Chunk)operator(.)ident(Filled)operator(\);) + ident(Inc)operator(()ident(LongWord)operator(()ident(PosInChunk)operator(\))operator(,) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;) comment(// can we fill the chunk completely?) reserved(if) ident(Size) operator(>) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled) reserved(then) reserved(begin) comment(// yes we can.) - ident(Move)operator(()ident(PrivPointer)operator(^,) ident(PosInChunk)operator(^,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\);) - ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\),) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\);) + ident(Move)operator(()ident(PrivPointer)operator(^)operator(,) ident(PosInChunk)operator(^)operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;) + ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\))operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;) ident(Chunk)operator(.)ident(Filled) operator(:=) ident(FChunkSize)operator(;) reserved(end) reserved(else) comment(// we have to less data for filling the chunk completely,) comment(// just put everything in.) reserved(begin) - ident(Move)operator(()ident(PrivPointer)operator(^,) ident(PosInChunk)operator(^,) ident(Size)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size)operator(\);) - ident(Inc)operator(()ident(Chunk)operator(.)ident(Filled)operator(,) ident(Size)operator(\);) + ident(Move)operator(()ident(PrivPointer)operator(^)operator(,) ident(PosInChunk)operator(^)operator(,) ident(Size)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size)operator(\))operator(;) + ident(Inc)operator(()ident(Chunk)operator(.)ident(Filled)operator(,) ident(Size)operator(\))operator(;) reserved(end)operator(;) reserved(end)operator(;) reserved(end)operator(;) comment(// as long as we have remaining stuff put it into new chunks.) reserved(while) operator(()ident(PrivSize) operator(<) ident(Size)operator(\)) reserved(do) reserved(begin) - ident(new)operator(()ident(Chunk)operator(\);) - ident(GetMem)operator(()ident(Chunk)operator(.)ident(Data)operator(,) ident(FChunksize)operator(\);) + ident(new)operator(()ident(Chunk)operator(\))operator(;) + ident(GetMem)operator(()ident(Chunk)operator(.)ident(Data)operator(,) ident(FChunksize)operator(\))operator(;) ident(Chunk)operator(.)ident(Read) operator(:=) integer(0)operator(;) comment(// can we fill an entire chunk with the remaining data?) reserved(if) ident(Privsize) operator(+) ident(FChunksize) operator(<) ident(Size) reserved(then) reserved(begin) comment(// yes we can, so put the stuff in.) - ident(Move)operator(()ident(Privpointer)operator(^,) ident(Chunk)operator(.)ident(Data)operator(^,) ident(FChunksize)operator(\);) - ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\),) ident(FChunksize)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize)operator(\);) + ident(Move)operator(()ident(Privpointer)operator(^)operator(,) ident(Chunk)operator(.)ident(Data)operator(^)operator(,) ident(FChunksize)operator(\))operator(;) + ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\))operator(,) ident(FChunksize)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize)operator(\))operator(;) ident(Chunk)operator(.)ident(Filled) operator(:=) ident(FChunksize)operator(;) reserved(end) reserved(else) comment(// we have to less data to fill the entire chunk, just put the remaining stuff in.) reserved(begin) - ident(Move)operator(()ident(Privpointer)operator(^,) ident(Chunk)operator(.)ident(Data)operator(^,) ident(Size) operator(-) ident(Privsize)operator(\);) + ident(Move)operator(()ident(Privpointer)operator(^)operator(,) ident(Chunk)operator(.)ident(Data)operator(^)operator(,) ident(Size) operator(-) ident(Privsize)operator(\))operator(;) ident(Chunk)operator(.)ident(Filled) operator(:=) ident(Size) operator(-) ident(Privsize)operator(;) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size) operator(-) ident(Privsize)operator(\);) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size) operator(-) ident(Privsize)operator(\))operator(;) reserved(end)operator(;) - ident(Fbuffers)operator(.)ident(Add)operator(()ident(Chunk)operator(\);) + ident(Fbuffers)operator(.)ident(Add)operator(()ident(Chunk)operator(\))operator(;) reserved(end)operator(;) reserved(if) ident(Size) operator(<>) ident(Privsize) reserved(then) - ident(Showmessage)operator(()string<delimiter(')content(miscalculation in TFifo.write)delimiter(')>operator(\);) + ident(Showmessage)operator(()string<delimiter(')content(miscalculation in TFifo.write)delimiter(')>operator(\))operator(;) ident(FBytesInFifo) operator(:=) ident(GetBytesInFifo)operator(;) - ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) reserved(end)operator(;) -reserved(procedure) ident(TFifo)operator(.)ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);) +reserved(procedure) ident(TFifo)operator(.)ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;) reserved(var) ident(PrivSize)operator(:) ident(Integer)operator(;) ident(Privpos)operator(:) ident(pointer)operator(;) @@ -2629,41 +2629,41 @@ reserved(begin) comment(// null pointer? somebody is trying to fool us, get out...) ident(Exit)operator(;) reserved(end)operator(;) - ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) ident(PrivSize) operator(:=) integer(0)operator(;) ident(Privpos) operator(:=) ident(Buff)operator(;) reserved(while) ident(FBuffers)operator(.)ident(Count) operator(>) integer(0) reserved(do) reserved(begin) - ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(]\);) + ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(])operator(\))operator(;) ident(ChunkPos) operator(:=) ident(Chunk)operator(.)ident(data)operator(;) - ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\),) ident(Chunk)operator(.)ident(Read)operator(\);) + ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\))operator(,) ident(Chunk)operator(.)ident(Read)operator(\))operator(;) comment(// does the remaining part of the chunk fit into the buffer?) - reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\)) operator(<) ident(ReqSize) reserved(then) + reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\)) operator(<) ident(ReqSize) reserved(then) reserved(begin) comment(// yep, it fits) - ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);) - ident(FreeMem)operator(()ident(Chunk)operator(.)ident(Data)operator(\);) - ident(Dispose)operator(()ident(Chunk)operator(\);) - ident(FBuffers)operator(.)ident(Delete)operator(()integer(0)operator(\);) + ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;) + ident(FreeMem)operator(()ident(Chunk)operator(.)ident(Data)operator(\))operator(;) + ident(Dispose)operator(()ident(Chunk)operator(\))operator(;) + ident(FBuffers)operator(.)ident(Delete)operator(()integer(0)operator(\))operator(;) reserved(end) reserved(else) comment(// remaining part didn't fit, get as much as we can and increment the) comment(// read attribute.) reserved(begin) - ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);) - ident(Inc)operator(()ident(Chunk)operator(.)directive(read)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);) + ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;) + ident(Inc)operator(()ident(Chunk)operator(.)ident(read)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;) comment(// as we filled the buffer, we'll have to break here.) ident(break)operator(;) reserved(end)operator(;) reserved(end)operator(;) ident(FBytesInFifo) operator(:=) ident(GetBytesInFifo)operator(;) - ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) ident(ReqSize) operator(:=) ident(PrivSize)operator(;) reserved(end)operator(;) comment(// read Data from Stream without removing it from the Stream...) -reserved(procedure) ident(TFifo)operator(.)ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);) +reserved(procedure) ident(TFifo)operator(.)ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;) reserved(var) ident(PrivSize)operator(:) ident(Integer)operator(;) ident(Privpos)operator(:) ident(pointer)operator(;) @@ -2676,32 +2676,32 @@ reserved(begin) comment(// null pointer? somebody is trying to fool us, get out...) ident(Exit)operator(;) reserved(end)operator(;) - ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) ident(PrivSize) operator(:=) integer(0)operator(;) ident(Privpos) operator(:=) ident(Buff)operator(;) ident(ChunkNr) operator(:=) integer(0)operator(;) reserved(while) ident(FBuffers)operator(.)ident(Count) operator(>) ident(ChunkNr) reserved(do) reserved(begin) - ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(ChunkNr)operator(]\);) + ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(ChunkNr)operator(])operator(\))operator(;) ident(ChunkPos) operator(:=) ident(Chunk)operator(.)ident(data)operator(;) - ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\),) ident(Chunk)operator(.)ident(Read)operator(\);) + ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\))operator(,) ident(Chunk)operator(.)ident(Read)operator(\))operator(;) comment(// does the remaining part of the chunk fit into the buffer?) - reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\)) operator(<) ident(ReqSize) reserved(then) + reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\)) operator(<) ident(ReqSize) reserved(then) reserved(begin) comment(// yep, it fits) - ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);) - ident(Inc)operator(()ident(ChunkNr)operator(\);) + ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;) + ident(Inc)operator(()ident(ChunkNr)operator(\))operator(;) reserved(end) reserved(else) comment(// remaining part didn't fit, get as much as we can and increment the) comment(// read attribute.) reserved(begin) - ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);) - ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);) + ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;) + ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;) comment(// as we filled the buffer, we'll have to break here.) ident(break)operator(;) reserved(end)operator(;) reserved(end)operator(;) - ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);) + ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;) ident(ReqSize) operator(:=) ident(PrivSize)operator(;) reserved(end)operator(;) |