Ver código fonte

+ tcgsizep2size[] to convert a tcgsize to its power-of-2 bytesize

git-svn-id: trunk@29841 -
Jonas Maebe 10 anos atrás
pai
commit
24d3b1cdf6
1 arquivos alterados com 7 adições e 0 exclusões
  1. 7 0
      compiler/aarch64/cpubase.pas

+ 7 - 0
compiler/aarch64/cpubase.pas

@@ -135,6 +135,13 @@ unit cpubase;
       TOpPostfixes = set of TOpPostfix;
 
     const
+      tcgsizep2size: array[OS_NO..OS_F128] of byte =
+        {OS_NO }
+        (0,
+        {OS_8,OS_16,OS_32,OS_64,OS_128,OS_S8,OS_S16,OS_S32,OS_S64,OS_S128}
+            0,    1,    2,    3,     4,    0,     1,     2,     3,      4,
+        {OS_F32,OS_F64,OS_F80,OS_C64,OS_F128,}
+             2,      3,     0,     3,      4);
       oppostfix2str: array[TOpPostfix] of string[2] = ('',
         's',
         'b','sb','h','sh','w','sw');