diff options
Diffstat (limited to 'libgfortran/generated/maxloc1_4_r10.c')
| -rw-r--r-- | libgfortran/generated/maxloc1_4_r10.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/generated/maxloc1_4_r10.c b/libgfortran/generated/maxloc1_4_r10.c index 5df2ca36bed..7e94e7b45bc 100644 --- a/libgfortran/generated/maxloc1_4_r10.c +++ b/libgfortran/generated/maxloc1_4_r10.c @@ -129,7 +129,7 @@ maxloc1_4_r10 (gfc_array_i4 * const restrict retarray, count[n] = 0; dstride[n] = GFC_DESCRIPTOR_STRIDE(retarray,n); if (extent[n] <= 0) - len = 0; + return; } base = array->data; |