Mensch bin ich ein Dummkopf
Ich hab unter CHARS mal ein '[' und ']' hinzugefügt, darauf hin hing sich das Programm auf. Jetzt bin ich endlich mal auf die Idee gekommen, dass ich bei IdentStart auch noch ein '[' und ']' hinzufügen könnte. Jetzt klappts
Code:
TSyn
tk
IdentStart '_', 'a'..'z', 'A'..'Z', '[', ']'
TOKENTYPES
Identifier
Key
BBCode Foreground=clBlue|Style=[fsBold]
|><|
KEYS
|><|
KEYS
BBCode
[b]
|><|
CHARS
'A'..'Z', 'a'..'z', '[', ']':: Ident
BeginProc
fTokenID := IdentKind((fLine + Run));
inc(Run, fStringLen);
while Identifiers[fLine[Run]] do
Inc(Run);
EndProc
|><|