1! { dg-do compile }
2! { dg-options "-ffree-line-length-256 -O3 -march=z13 -mzvector -mzarch" }
3
4#include "autovec-fortran.h"
5
6AUTOVEC_FORTRAN (max)
7
8! Fortran's max does not specify whether or not an exception should be raised in
9! face of qNaNs, and neither does gcc's smax.  Vectorize max using quiet
10! comparison, because that's the only one we have on z13.
11! { dg-final { scan-assembler {\n\tvfchdb\t} } }
12