$OpenBSD: patch-runtime_flang_rewind_c,v 1.1.1.1 2017/12/31 18:06:38 bcallah Exp $

No async IO support

Index: runtime/flang/rewind.c
--- runtime/flang/rewind.c.orig
+++ runtime/flang/rewind.c
@@ -43,12 +43,14 @@ _f90io_rewind(__INT_T *unit, __INT_T *bitv, __INT_T *i
 
     /* check for outstanding async i/o */
 
+#if 0
     if (f->asy_rw) { /* stop any async i/o */
       f->asy_rw = 0;
       if (Fio_asy_disable(f->asyptr) == -1) {
         return (__fortio_error(__io_errno()));
       }
     }
+#endif
 
     /* append carriage return (maybe) */
 
