[patch, fortran] Fix PR 88411, wrong code with async I/O

[Thomas Koenig]

Hello world,

the attached patch fixes the wrong-code regression by changing the
way synchronous writes are handled on files using asynchronous I/O:
The are now handled synchronously.

This also means that two places where a wait instruction was
issued in such a case are no longer needed.

I tried to construct a failing test case for this new behavior,
but failed :-)

Regression-tested.

OK for trunk?

Regards

	Thomas
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p2.diff
Type: text/x-patch
Size: 1828 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20181209/9db1be02/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: async_io_8.f90
Type: text/x-fortran
Size: 763 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20181209/9db1be02/attachment-0001.bin>