sync images(*) ! { dg-error "Fortran 2008:" }
! num_images is implicitly defined:
-n = num_images() ! { dg-error "has no IMPLICIT type" }
+n = num_images() ! { dg-error "convert UNKNOWN to INTEGER" }
error stop 'stop' ! { dg-error "Fortran 2008:" }
end