瀏覽代碼

Fix z80 compiler failure after change to ConcatConstSymbol in commit #47668

git-svn-id: trunk@47675 -
pierre 4 年之前
父節點
當前提交
0cc91a50c7
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/z80/raz80asm.pas

+ 1 - 1
compiler/z80/raz80asm.pas

@@ -2301,7 +2301,7 @@ Unit raz80asm;
                   begin
                   begin
                     if constsize<>sizeof(pint) then
                     if constsize<>sizeof(pint) then
                       Message(asmr_w_32bit_const_for_address);
                       Message(asmr_w_32bit_const_for_address);
-                     ConcatConstSymbol(curlist,asmsym,asmsymtyp,value,constsize,true)
+                     ConcatConstSymbol(curlist,asmsym,'',asmsymtyp,value,constsize,true)
                   end
                   end
                 else
                 else
                   ConcatConstant(curlist,value,constsize);
                   ConcatConstant(curlist,value,constsize);