1  /* { dg-do run { target { power10_hw } } } */
       2  /* { dg-do link { target { ! power10_hw } } } */
       3  /* { dg-require-effective-target power10_ok } */
       4  /* { dg-options "-mdejagnu-cpu=power10" } */
       5  
       6  #include <altivec.h>
       7  
       8  extern void abort (void);
       9  
      10  /* Vector string isolate right-justified on array of unsigned char.  */
      11  int
      12  sirj_p (vector unsigned char arg)
      13  {
      14    return vec_strir_p (arg);
      15  }
      16  
      17  int main (int argc, char *argv [])
      18  {
      19    vector unsigned char input1 =
      20      { 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7, 0x8,
      21        0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf, 0x11 };
      22    vector unsigned char input2 =
      23      { 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7, 0x8,
      24        0x9, 0xa, 0xb, 0xc, 0xd, 0x0, 0xf, 0x11 };
      25    vector unsigned char input3 =
      26      { 0x1, 0x2, 0x0, 0x4, 0x5, 0x6, 0x7, 0x8,
      27        0x9, 0xa, 0xb, 0xc, 0xd, 0x0, 0xf, 0x11 };
      28    vector unsigned char input4 =
      29      { 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7, 0x8,
      30        0x9, 0xa, 0xb, 0xc, 0xd, 0x0, 0xf, 0x11 };
      31  
      32    if (sirj_p (input1))
      33      abort ();
      34    if (!sirj_p (input2))
      35      abort ();
      36    if (!sirj_p (input3))
      37      abort ();
      38    if (!sirj_p (input4))
      39      abort ();
      40  }