gcc/testsuite/gcc.target/powerpc/dfp-builtin-1.c

   1 /* { dg-do compile { target { powerpc*-*-linux* } } } */
   2 /* { dg-require-effective-target hard_dfp } */
   3 /* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power7" } } */
   4 /* { dg-options "-mcpu=power7 -O2" } */
   5 /* { dg-final { scan-assembler-times "ddedpd " 4    } } */
   6 /* { dg-final { scan-assembler-times "denbcd " 2    } } */
   7 /* { dg-final { scan-assembler-times "dxex "   1    } } */
   8 /* { dg-final { scan-assembler-times "diex "   1    } } */
   9 /* { dg-final { scan-assembler-times "dscli "  2    } } */
  10 /* { dg-final { scan-assembler-times "dscri "  2    } } */
  11 /* { dg-final { scan-assembler-times "std "    1    { target lp64 } } } */
  12 /* { dg-final { scan-assembler-times "ld "     1    { target lp64 } } } */
  13 /* 32-bit needs a stack frame, and needs two GPR mem insns per _Decimal64.  */
  14 /* { dg-final { scan-assembler-times "stwu "   2    { target ilp32 } } } */
  15 /* { dg-final { scan-assembler-times "stw "    2    { target ilp32 } } } */
  16 /* { dg-final { scan-assembler-times "lwz "    2    { target ilp32 } } } */
  17 /* { dg-final { scan-assembler-times "stfd "   1    } } */
  18 /* { dg-final { scan-assembler-times "lfd "    1    } } */
  19 /* { dg-final { scan-assembler-not   "bl __builtin" } } */
  20 /* { dg-final { scan-assembler-not   "dctqpq"       } } */
  21 /* { dg-final { scan-assembler-not   "drdpq"        } } */
  22
  23 _Decimal64
  24 do_dedpd_0 (_Decimal64 a)
  25 {
  26   return __builtin_ddedpd (0, a);
  27 }
  28
  29 _Decimal64
  30 do_dedpd_1 (_Decimal64 a)
  31 {
  32   return __builtin_ddedpd (1, a);
  33 }
  34
  35 _Decimal64
  36 do_dedpd_2 (_Decimal64 a)
  37 {
  38   return __builtin_ddedpd (2, a);
  39 }
  40
  41 _Decimal64
  42 do_dedpd_3 (_Decimal64 a)
  43 {
  44   return __builtin_ddedpd (3, a);
  45 }
  46
  47 _Decimal64
  48 do_enbcd_0 (_Decimal64 a)
  49 {
  50   return __builtin_denbcd (0, a);
  51 }
  52
  53 _Decimal64
  54 do_enbcd_1 (_Decimal64 a)
  55 {
  56   return __builtin_denbcd (1, a);
  57 }
  58
  59 long long
  60 do_xex (_Decimal64 a)
  61 {
  62   return __builtin_dxex (a);
  63 }
  64
  65 _Decimal64
  66 do_iex (long long a, _Decimal64 b)
  67 {
  68   return __builtin_diex (a, b);
  69 }
  70
  71 _Decimal64
  72 do_scli_1 (_Decimal64 a)
  73 {
  74   return __builtin_dscli (a, 1);
  75 }
  76
  77 _Decimal64
  78 do_scli_10 (_Decimal64 a)
  79 {
  80   return __builtin_dscli (a, 10);
  81 }
  82
  83 _Decimal64
  84 do_scri_1 (_Decimal64 a)
  85 {
  86   return __builtin_dscri (a, 1);
  87 }
  88
  89 _Decimal64
  90 do_scri_10 (_Decimal64 a)
  91 {
  92   return __builtin_dscri (a, 10);
  93 }