浏览代码

Merged revisions 570 via svnmerge from
/trunk

git-svn-id: branches/fixes_2_0@571 -

florian 20 年之前
父节点
当前提交
853ce41f53
共有 1 个文件被更改,包括 6 次插入0 次删除
  1. 6 0
      compiler/ncgmem.pas

+ 6 - 0
compiler/ncgmem.pas

@@ -245,6 +245,12 @@ implementation
                  location.reference.base:=cg.getaddressregister(exprasmlist);
                  cg.a_load_loc_reg(exprasmlist,OS_ADDR,left.location,location.reference.base);
               end;
+            LOC_CONSTANT:
+              begin
+                location.reference.offset:=left.location.value;
+              end;
+            else
+              internalerror(200507031);
          end;
          if (cs_gdb_heaptrc in aktglobalswitches) and
             (cs_checkpointer in aktlocalswitches) and