Переглянути джерело

* compiling error fixed

git-svn-id: trunk@511 -
florian 20 роки тому
батько
коміт
fb47b29858
1 змінених файлів з 2 додано та 2 видалено
  1. 2 2
      compiler/arm/cpubase.pas

+ 2 - 2
compiler/arm/cpubase.pas

@@ -413,7 +413,7 @@ unit cpubase;
 
 
     function reg_cgsize(const reg: tregister): tcgsize;
     function reg_cgsize(const reg: tregister): tcgsize;
       const subreg2cgsize:array[Tsubregister] of Tcgsize =
       const subreg2cgsize:array[Tsubregister] of Tcgsize =
-            (OS_NO,OS_8,OS_8,OS_16,OS_32,OS_64,OS_NO,OS_NO,OS_NO);
+            (OS_NO,OS_8,OS_8,OS_16,OS_32,OS_64,OS_NO,OS_NO,OS_NO,OS_NO,OS_NO);
       begin
       begin
         case getregtype(reg) of
         case getregtype(reg) of
           R_INTREGISTER :
           R_INTREGISTER :
@@ -501,7 +501,7 @@ unit cpubase;
       begin
       begin
         result := inverse[c];
         result := inverse[c];
       end;
       end;
-    
+
 
 
     function conditions_equal(const c1, c2: TAsmCond): boolean; {$ifdef USEINLINE}inline;{$endif USEINLINE}
     function conditions_equal(const c1, c2: TAsmCond): boolean; {$ifdef USEINLINE}inline;{$endif USEINLINE}
       begin
       begin