summaryrefslogtreecommitdiff
path: root/libgfortran/generated/findloc2_s1.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/findloc2_s1.c')
-rw-r--r--libgfortran/generated/findloc2_s1.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/generated/findloc2_s1.c b/libgfortran/generated/findloc2_s1.c
index bfeca024b45..9b894a85895 100644
--- a/libgfortran/generated/findloc2_s1.c
+++ b/libgfortran/generated/findloc2_s1.c
@@ -145,7 +145,7 @@ sfindloc2_s1 (gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 back, gfc_charlen_type len_array,
gfc_charlen_type len_value)
{
- if (*mask)
+ if (mask == NULL || *mask)
{
return findloc2_s1 (array, value, back, len_array, len_value);
}