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