浏览代码

* check that not more than one relsymbol is used

git-svn-id: trunk@9367 -
Jonas Maebe 17 年之前
父节点
当前提交
3f57d681e1
共有 1 个文件被更改,包括 4 次插入1 次删除
  1. 4 1
      compiler/x86/rax86att.pas

+ 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;