2
0
Эх сурвалжийг харах

* check that not more than one relsymbol is used

git-svn-id: trunk@9367 -
Jonas Maebe 17 жил өмнө
parent
commit
3f57d681e1

+ 4 - 1
compiler/x86/rax86att.pas

@@ -296,7 +296,10 @@ Implementation
               Consume(AS_MINUS);
               BuildConstSymbolExpression(true,true,false,l,relsym,asmsymtyp);
               if (relsym<>'') then
-                oper.opr.ref.relsymbol:=current_asmdata.RefAsmSymbol(relsym)
+                if not assigned(oper.opr.ref.relsymbol) then
+                  oper.opr.ref.relsymbol:=current_asmdata.RefAsmSymbol(relsym)
+                else
+                  Message(asmr_e_invalid_reference_syntax)
               else
                 dec(oper.opr.ref.offset,l);
             end;