/* { dg-do compile } */ /* { dg-options "-mdejagnu-cpu=power10" } */ #include extern void abort (void); /* Vector string isolate right-justified on array of signed char. */ vector signed char sirj (vector signed char arg) { return vec_strir (arg); } /* Enforce that a single dot-form instruction which is properly biased for the target's endianness implements this built-in. */ /* { dg-final { scan-assembler-times {\mvstribr\M} 1 { target { be } } } } */ /* { dg-final { scan-assembler-times {\mvstribl} 0 { target { be } } } } */ /* { dg-final { scan-assembler-times {\mvstribl\M} 1 { target { le } } } } */ /* { dg-final { scan-assembler-times {\mvstribr} 0 { target { le } } } } */