paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-17 22:09:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

FpDebug: PascalParser, allow $ sign in identifiers. Required for mangled classnames / specialized generics ...

Browse Source
This commit is contained in:
Martin 2022-04-10 12:43:19 +02:00
parent ca8c6a84e2
commit 94ae766164
1 changed files with 1 additions and 1 deletions

2
components/fpdebug/fppascalparser.pas
View File

@ -1786,7 +1786,7 @@ var
procedure AddIdentifier;
begin
while TokenEndPtr^ in ['a'..'z', 'A'..'Z', '_', '0'..'9'] do
while TokenEndPtr^ in ['a'..'z', 'A'..'Z', '_', '0'..'9', '$'] do
inc(TokenEndPtr);
// TODO: Check functions not, and, in, as, is ...
if (CurPart <> nil) and (CurPart.CanHaveOperatorAsNext) then