1! { dg-do compile }
2! { dg-options "-fall-intrinsics -std=f95" }
3! PR fortran/20248
4program z
5   if (iargc() /= 0) call abort
6end program z
7