浏览代码

* fixed alignment of reference used to set the first char of a 1-byte
shortstring

git-svn-id: trunk@34300 -

Jonas Maebe 9 年之前
父节点
当前提交
f0bf3b364a
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/ncgld.pas

+ 1 - 0
compiler/ncgld.pas

@@ -752,6 +752,7 @@ implementation
                     hlcg.g_ptrtypecast_ref(current_asmdata.CurrAsmList,cpointerdef.getreusable(left.resultdef),tpointerdef(charpointertype),href);
                     hlcg.g_ptrtypecast_ref(current_asmdata.CurrAsmList,cpointerdef.getreusable(left.resultdef),tpointerdef(charpointertype),href);
                     hlcg.a_load_const_ref(current_asmdata.CurrAsmList,cansichartype,1,href);
                     hlcg.a_load_const_ref(current_asmdata.CurrAsmList,cansichartype,1,href);
                     inc(href.offset,1);
                     inc(href.offset,1);
+                    href.alignment:=1;
                     case right.location.loc of
                     case right.location.loc of
                       LOC_REGISTER,
                       LOC_REGISTER,
                       LOC_CREGISTER :
                       LOC_CREGISTER :