2
0
Эх сурвалжийг харах

* fixed reg_cgsize

git-svn-id: trunk@4760 -
Jonas Maebe 19 жил өмнө
parent
commit
d379417ca4

+ 4 - 2
compiler/powerpc/cpubase.pas

@@ -516,10 +516,12 @@ implementation
     function reg_cgsize(const reg: tregister): tcgsize;
     function reg_cgsize(const reg: tregister): tcgsize;
       begin
       begin
         case getregtype(reg) of
         case getregtype(reg) of
-          R_MMREGISTER,
-          R_FPUREGISTER,
           R_INTREGISTER :
           R_INTREGISTER :
             result:=OS_32;
             result:=OS_32;
+          R_MMREGISTER:
+            result:=OS_M128;
+          R_FPUREGISTER:
+            result:=OS_F64;
           else
           else
             internalerror(200303181);
             internalerror(200303181);
         end;
         end;