OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

backport: re PR libfortran/83613 (Executing gfortran.dg/inquire_internal.f90 hangs on darwin after r255621)

Browse Source 
2017-12-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	Backport from trunk
	PR libgfortran/83613
	* io/unit.c (init_units): Don't forget to unlock the unit locks
	after being inserted.

From-SVN: r256041
This commit is contained in:
Jerry DeLisle 2017-12-30 02:14:34 +00:00
parent f4c4157567
commit 83ab9a1ad8
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
libgfortran/ChangeLog
View File

@ -1,3 +1,10 @@
2017-12-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
Backport from trunk
PR libgfortran/83613
* io/unit.c (init_units): Don't forget to unlock the unit locks
after being inserted.
2017-12-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
Backport from trunk

2
libgfortran/io/unit.c
View File

@ -689,7 +689,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);
/* Calculate the maximum file offset in a portable manner.
max will be the largest signed number for the type gfc_offset.