summaryrefslogtreecommitdiff
path: root/libgfortran/generated/maxval_r10.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/maxval_r10.c')
-rw-r--r--libgfortran/generated/maxval_r10.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/generated/maxval_r10.c b/libgfortran/generated/maxval_r10.c
index 75c45f93a5a..6eb3ea76ed1 100644
--- a/libgfortran/generated/maxval_r10.c
+++ b/libgfortran/generated/maxval_r10.c
@@ -128,7 +128,7 @@ maxval_r10 (gfc_array_r10 * const restrict retarray,
count[n] = 0;
dstride[n] = GFC_DESCRIPTOR_STRIDE(retarray,n);
if (extent[n] <= 0)
- len = 0;
+ return;
}
base = array->data;