Commit bb347ee2 by Thomas Koenig

re PR libfortran/85166 ([nvptx, libgfortran] Libgomp fortran tests using stop in…

re PR libfortran/85166 ([nvptx, libgfortran] Libgomp fortran tests using stop in offloaded fns fail to compile)

2018-04-04  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR libfortran/85166
	* runtime/minimal.c (stop_numeric): Add new function in order to
	implement numeric stop on minimal targets.

From-SVN: r259072
parent 76dc9cb5
2018-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/85166
* runtime/minimal.c (stop_numeric): Add new function in order to
implement numeric stop on minimal targets.
2018-03-28 Jakub Jelinek <jakub@redhat.com> 2018-03-28 Jakub Jelinek <jakub@redhat.com>
* io/io.h (IOPARM_DT_DEFAULT_EXP): Rename to ... * io/io.h (IOPARM_DT_DEFAULT_EXP): Rename to ...
......
...@@ -187,3 +187,17 @@ sys_abort (void) ...@@ -187,3 +187,17 @@ sys_abort (void)
abort(); 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);
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment