Explorar o código

* handle . in a reference like +

git-svn-id: trunk@4769 -
peter %!s(int64=19) %!d(string=hai) anos
pai
achega
cc1f9f8a9b
Modificáronse 1 ficheiros con 10 adicións e 0 borrados
  1. 10 0
      compiler/x86/rax86int.pas

+ 10 - 0
compiler/x86/rax86int.pas

@@ -1251,6 +1251,16 @@ Unit Rax86int;
                 Scale:=0;
               end;
 
+            AS_DOT :
+              Begin
+                { Handle like a + }
+                Consume(AS_DOT);
+                Negative:=false;
+                GotPlus:=true;
+                GotStar:=false;
+                Scale:=0;
+              end;
+
             AS_MINUS :
               begin
                 Consume(AS_MINUS);