1  /* { dg-do compile { target { s390*-*-* } } } */
       2  /* { dg-options "-O3 -mzarch -mzvector -march=z15 -fdump-rtl-subreg1" } */
       3  
       4  /* { dg-final { scan-rtl-dump-times "Skipping mode V2DI for copy lowering" 2 "subreg1" } } */
       5  
       6  #include <vecintrin.h>
       7  
       8  #define STYPE long long
       9  #define VTYPE __attribute__ ((vector_size (16))) STYPE
      10  
      11  STYPE
      12  foo1 (VTYPE a)
      13  {
      14    /* { dg-final { scan-assembler-not "vst\t.*" } } */
      15    /* { dg-final { scan-assembler-not "lg\t.*" } } */
      16    /* { dg-final { scan-assembler-not "lgr\t.*" } } */
      17    return a[0] + a[1];
      18  }