diff options
Diffstat (limited to 'gcc-4.6/libgfortran/io/intrinsics.c')
-rw-r--r-- | gcc-4.6/libgfortran/io/intrinsics.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc-4.6/libgfortran/io/intrinsics.c b/gcc-4.6/libgfortran/io/intrinsics.c index f48bd7774..2d00a6649 100644 --- a/gcc-4.6/libgfortran/io/intrinsics.c +++ b/gcc-4.6/libgfortran/io/intrinsics.c @@ -206,7 +206,7 @@ flush_i4 (GFC_INTEGER_4 *unit) us = find_unit (*unit); if (us != NULL) { - sflush (us->s); + flush_sync (us->s); unlock_unit (us); } } @@ -229,7 +229,7 @@ flush_i8 (GFC_INTEGER_8 *unit) us = find_unit (*unit); if (us != NULL) { - sflush (us->s); + flush_sync (us->s); unlock_unit (us); } } |