Skip to content
Snippets Groups Projects
Commit 78b400f6 authored by Thomas Jahns's avatar Thomas Jahns :cartwheel:
Browse files

Fix truncation warning from gfortran.

* The warning is generated when -Winteger-truncation is enabled.
parent 8142a734
No related branches found
No related tags found
No related merge requests found
......@@ -60,7 +60,7 @@ PROGRAM test_perf
! global extents including halos:
INTEGER, PARAMETER :: nlev = 30
INTEGER, PARAMETER :: undef_int = HUGE(undef_int)/2 - 1
INTEGER, PARAMETER :: undef_int = (HUGE(undef_int)-1)/2 - 1
INTEGER(xt_int_kind), PARAMETER :: undef_index = -1
INTEGER, PARAMETER :: nhalo = 1 ! 1dim. halo border size
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment