Bläddra i källkod

* handle . in a reference like +

git-svn-id: trunk@4769 -
peter 19 år sedan
förälder
incheckning
cc1f9f8a9b
1 ändrade filer med 10 tillägg och 0 borttagningar
  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);