瀏覽代碼

Avoid Internal Error 200310121 with -O3 for test/units/system/tabs.pp with ppcarm

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

+ 1 - 0
compiler/hlcg2ll.pas

@@ -656,6 +656,7 @@ implementation
         internalerror(2012071226);
       tocgsize:=getintmmcgsize(reg,def_cgmmsize(tosize));
       case loc.loc of
+        LOC_CONSTANT,
         LOC_SUBSETREG,LOC_CSUBSETREG,
         LOC_SUBSETREF,LOC_CSUBSETREF:
           begin