Changes in libcfa/src/fstream.cfa [bbdf954:874b16e]

File:

• libcfa/src/fstream.cfa (modified) (3 diffs)

libcfa/src/fstream.cfa

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sat Jun 17 08:51:12 2023
-// Update Count     : 528
+// Last Modified On : Mon Jun  5 22:00:23 2023
+// Update Count     : 518
 //
 
@@ -169 +169 @@
           if ( cnt == 9 ) abort( "ofstream fmt EINTR spinning exceeded" );
     } // for
-        if ( len == EOF ) {                                                                     // error writing ?
-                abort | IO_MSG "invalid write";
+        if ( len == EOF ) {
+                if ( ferror( (FILE *)(os.file$) ) ) {
+                        abort | IO_MSG "invalid write";
+                } // if
         } // if
         va_end( args );
@@ -300 +302 @@
           if ( len != EOF || errno != EINTR ) break;            // timer interrupt ?
     } // for
-        if ( len == EOF ) {                                                                     // EOF or matching failure ?
-                if ( ! feof( (FILE *)(is.file$) ) && ferror( (FILE *)(is.file$) ) ) {
+        if ( len == EOF ) {
+                if ( ferror( (FILE *)(is.file$) ) ) {
                         abort | IO_MSG "invalid read";
                 } // if