procyberian/gcc
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fortran: fix use of static_assert() to conform to C11

Browse source 
libgfortran/ChangeLog:

	PR libfortran/98076
	* runtime/string.c (gfc_itoa): Use two args for static_assert().
This commit is contained in:
Francois-Xavier Coudert 2021-12-27 21:32:08 +01:00
parent ea8b564055
commit 3430132f3e
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libgfortran/runtime/string.c
View file

@ -242,7 +242,8 @@ gfc_itoa (GFC_UINTEGER_LARGEST n, char *buffer, size_t len)
integers (we would need three calls), but they do suffice for all integers (we would need three calls), but they do suffice for all
values up to 2^127, which is the largest that Fortran can produce values up to 2^127, which is the largest that Fortran can produce
(-HUGE(0_16)-1) with its signed integer types. */ (-HUGE(0_16)-1) with its signed integer types. */
static_assert(sizeof(GFC_UINTEGER_LARGEST) <= 2 * sizeof(uint64_t)); static_assert(sizeof(GFC_UINTEGER_LARGEST) <= 2 * sizeof(uint64_t),
"integer too large");
GFC_UINTEGER_LARGEST r; GFC_UINTEGER_LARGEST r;
r = n % TEN19; r = n % TEN19;