summaryrefslogtreecommitdiff
path: root/libgfortran/generated/minval_r4.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/minval_r4.c')
-rw-r--r--libgfortran/generated/minval_r4.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libgfortran/generated/minval_r4.c b/libgfortran/generated/minval_r4.c
index ac048eedb06..8511795b12c 100644
--- a/libgfortran/generated/minval_r4.c
+++ b/libgfortran/generated/minval_r4.c
@@ -123,7 +123,7 @@ minval_r4 (gfc_array_r4 * const restrict retarray,
(long int) (GFC_DESCRIPTOR_RANK (retarray)),
(long int) rank);
- if (compile_options.bounds_check)
+ if (unlikely (compile_options.bounds_check))
{
for (n=0; n < rank; n++)
{
@@ -312,7 +312,7 @@ mminval_r4 (gfc_array_r4 * const restrict retarray,
if (rank != GFC_DESCRIPTOR_RANK (retarray))
runtime_error ("rank of return array incorrect in MINVAL intrinsic");
- if (compile_options.bounds_check)
+ if (unlikely (compile_options.bounds_check))
{
for (n=0; n < rank; n++)
{
@@ -497,7 +497,7 @@ sminval_r4 (gfc_array_r4 * const restrict retarray,
(long int) (GFC_DESCRIPTOR_RANK (retarray)),
(long int) rank);
- if (compile_options.bounds_check)
+ if (unlikely (compile_options.bounds_check))
{
for (n=0; n < rank; n++)
{