浏览代码

* fix compilation

git-svn-id: trunk@30554 -
florian 10 年之前
父节点
当前提交
bd803769b8
共有 1 个文件被更改,包括 4 次插入3 次删除
  1. 4 3
      compiler/avr/cgcpu.pas

+ 4 - 3
compiler/avr/cgcpu.pas

@@ -765,9 +765,10 @@ unit cgcpu;
                end
              else
                begin
-                 { if (op=OP_SAR) and (a=31) and (size in [OS_32,OS_S32]) then
+{$if 0}
+                 { code not working yet }
+                 if (op=OP_SAR) and (a=31) and (size in [OS_32,OS_S32]) then
                    begin
-                     { code not working yet }
                      tmpreg:=reg;
                      for i:=1 to 4 do
                        begin
@@ -776,7 +777,7 @@ unit cgcpu;
                        end;
                    end
                  else
-                 }
+{$endif}
                    begin
                      tmpreg:=getintregister(list,size);
                      a_load_const_reg(list,size,a,tmpreg);