diff options
Diffstat (limited to 'libgfortran/io/unit.c')
| -rw-r--r-- | libgfortran/io/unit.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c index 2ca8525..a655665 100644 --- a/libgfortran/io/unit.c +++ b/libgfortran/io/unit.c @@ -707,7 +707,9 @@ init_units (void) } /* The default internal units. */ u = insert_unit (GFC_INTERNAL_UNIT); + __gthread_mutex_unlock (&u->lock); u = insert_unit (GFC_INTERNAL_UNIT4); + __gthread_mutex_unlock (&u->lock); } |