Viewing file:  bcd-3.c (2.57 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
/* { dg-do compile { target { powerpc*-*-linux* && lp64 } } } */
/* { dg-skip-if "" { powerpc*-*-darwin* } } */
/* { dg-require-effective-target powerpc_p8vector_ok } */
/* { dg-options "-mdejagnu-cpu=power8 -O2" } */
/* { dg-final { scan-assembler-times "bcdadd\[.\] " 4 } } */
/* { dg-final { scan-assembler-times "bcdsub\[.\] " 4 } } */
/* { dg-final { scan-assembler-not "bl __builtin" } } */
/* { dg-final { scan-assembler-not "mtvsr" } } */
/* { dg-final { scan-assembler-not "mfvsr" } } */
/* { dg-final { scan-assembler-not "lvx" } } */
/* { dg-final { scan-assembler-not "lxvw4x" } } */
/* { dg-final { scan-assembler-not "lxvd2x" } } */
/* { dg-final { scan-assembler-not "stvx" } } */
/* { dg-final { scan-assembler-not "stxvw4x" } } */
/* { dg-final { scan-assembler-not "stxvd2x" } } */
typedef __int128_t __attribute__((__vector_size__(16))) vector_128_t;
typedef __int128_t scalar_128_t;
typedef unsigned long long scalar_64_t;
#include <altivec.h>
/* Test whether the peephole works to allow folding a bcdadd, with a
bcdadd_<test> into a single instruction. */
vector_128_t
do_add_lt (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdadd (a, b, 0);
if (__builtin_bcdadd_lt (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_add_eq (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdadd (a, b, 0);
if (__builtin_bcdadd_eq (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_add_gt (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdadd (a, b, 0);
if (__builtin_bcdadd_gt (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_add_ov (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdadd (a, b, 0);
if (__builtin_bcdadd_ov (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_sub_lt (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdsub (a, b, 0);
if (__builtin_bcdsub_lt (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_sub_eq (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdsub (a, b, 0);
if (__builtin_bcdsub_eq (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_sub_gt (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdsub (a, b, 0);
if (__builtin_bcdsub_gt (a, b, 0))
*p = 1;
return ret;
}
vector_128_t
do_sub_ov (vector_128_t a, vector_128_t b, int *p)
{
vector_128_t ret = __builtin_bcdsub (a, b, 0);
if (__builtin_bcdsub_ov (a, b, 0))
*p = 1;
return ret;
}
|
