mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 07:06:08 +02:00
* handle . in a reference like +
git-svn-id: trunk@4769 -
This commit is contained in:
parent
5de217f04c
commit
cc1f9f8a9b
@ -1251,6 +1251,16 @@ Unit Rax86int;
|
|||||||
Scale:=0;
|
Scale:=0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
AS_DOT :
|
||||||
|
Begin
|
||||||
|
{ Handle like a + }
|
||||||
|
Consume(AS_DOT);
|
||||||
|
Negative:=false;
|
||||||
|
GotPlus:=true;
|
||||||
|
GotStar:=false;
|
||||||
|
Scale:=0;
|
||||||
|
end;
|
||||||
|
|
||||||
AS_MINUS :
|
AS_MINUS :
|
||||||
begin
|
begin
|
||||||
Consume(AS_MINUS);
|
Consume(AS_MINUS);
|
||||||
|
Loading…
Reference in New Issue
Block a user