diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2017-12-29 22:36:25 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2017-12-29 22:36:25 +0000 |
| commit | 46031d700201f5810b4ea0a693113aa1cd3e64fb (patch) | |
| tree | a0a9b54702977ed70a4b0a317f4405c420b34b6e | |
| parent | a97de3ccdce3bac856c2b10b57a49a15c94e6ef2 (diff) | |
| download | gcc-46031d700201f5810b4ea0a693113aa1cd3e64fb.zip gcc-46031d700201f5810b4ea0a693113aa1cd3e64fb.tar.gz gcc-46031d700201f5810b4ea0a693113aa1cd3e64fb.tar.bz2 | |
re PR libfortran/83613 (Executing gfortran.dg/inquire_internal.f90 hangs on darwin after r255621)
2017-12-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/83613
* io/unit.c (init_units): Don't forget to unlock the unit locks
after being inserted.
From-SVN: r256035
| -rw-r--r-- | libgfortran/ChangeLog | 6 | ||||
| -rw-r--r-- | libgfortran/io/unit.c | 2 |
2 files changed, 8 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index e94df2c..8a7b66c 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,5 +1,11 @@ 2017-12-29 Jerry DeLisle <jvdelisle@gcc.gnu.org> + PR libgfortran/83613 + * io/unit.c (init_units): Don't forget to unlock the unit locks + after being inserted. + +2017-12-29 Jerry DeLisle <jvdelisle@gcc.gnu.org> + PR libgfortran/83560 * io/write.c (write_integer): Modify to use write_decimal. For namelist mode, suppress leading blanks and emit them as 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); } |