Hallo Matthias,
ein simples numerisches Literal kannst du definieren, indem du unter TokenTypes einen Eintrag - hier mit default settings - vornimmst:
Code:
TOKENTYPES
Number Background=clBlue|Foreground=clYellow
Dazu musst du noch den passenden Lexical Scanner unter CHARS bereit stellen:
Code:
CHARS
'0'..'9':: Number
BeginProc
fTokenID := tkNumber;
inc(Run);
while FLine[Run] in ['0'..'9'] do inc(Run);
EndProc
Bis du einen grammar file für Ada-95 mit seinen etwa 400 productions (wenn ich mich richtig erinnere) fertig hast, wird noch einige Zeit vergehen.
Frohe Weihnachten vom marabu