[Bug target/85166] [nvptx, libgfortran] Libgomp fortran tests using stop in offloaded fns fail to compile

[vries at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85166

--- Comment #3 from Tom de Vries <vries at gcc dot gnu.org> ---
(In reply to Thomas Koenig from comment #2)
> Does this fix the problem?
> 
> Index: minimal.c
> ===================================================================
> --- minimal.c   (Revision 259055)
> +++ minimal.c   (Arbeitskopie)
> @@ -187,3 +187,17 @@ sys_abort (void)
>  
>    abort();
>  }
> +
> +/* A numeric STOP statement.  */
> +
> +extern _Noreturn void stop_numeric (int, bool);
> +export_proto(stop_numeric);
> +
> +void
> +stop_numeric (int code, bool quiet)
> +{
> +  if (!quiet)
> +    printf ("STOP %d\n", code);
> +
> +  exit (code);
> +}

It does.

Build for x86_64 with nvtpx accelerator and tested libgomp.