Changes in libcfa/src/fstream.cfa [5cb2b8c:0efb269]

File:

• libcfa/src/fstream.cfa (modified) (5 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 : Thu May 16 08:33:28 2019
-// Update Count     : 328
+// Last Modified On : Sat Apr 20 12:03:43 2019
+// Update Count     : 311
 //
 
@@ -27 +27 @@
 #define IO_MSG "I/O error: "
 
-void ?{}( ofstream & os, void * file ) {
+void ?{}( ofstream & os, void * file, bool sepDefault, bool sepOnOff, bool nlOnOff, bool prt, const char * separator, const char * tupleSeparator ) {
         os.file = file;
-        os.sepDefault = true;
-        os.sepOnOff = false;
-        os.nlOnOff = true;
-        os.prt = false;
+        os.sepDefault = sepDefault;
+        os.sepOnOff = sepOnOff;
+        os.nlOnOff = nlOnOff;
+        os.prt = prt;
         os.sawNL = false;
-        sepSet( os, " " );
+        sepSet( os, separator );
         sepSetCur( os, sepGet( os ) );
-        sepSetTuple( os, ", " );
+        sepSetTuple( os, tupleSeparator );
 }
 
@@ -104 +104 @@
 
 void open( ofstream & os, const char * name, const char * mode ) {
-        FILE * file = fopen( name, mode );
+        FILE *file = fopen( name, mode );
         #ifdef __CFA_DEBUG__
         if ( file == 0 ) {
@@ -110 +110 @@
         } // if
         #endif // __CFA_DEBUG__
-        (os){ file };
+        (os){ file, true, false, true, false, " ", ", " };
 } // open
 
@@ -152 +152 @@
 } // fmt
 
-static ofstream soutFile = { (FILE *)(&_IO_2_1_stdout_) };
+static ofstream soutFile = { (FILE *)(&_IO_2_1_stdout_), true, false, true, false, " ", ", " };
 ofstream & sout = soutFile;
-static ofstream serrFile = { (FILE *)(&_IO_2_1_stderr_) };
+static ofstream serrFile = { (FILE *)(&_IO_2_1_stderr_), true, false, true, false, " ", ", " };
 ofstream & serr = serrFile;
 
-// static ofstream sexitFile = { (FILE *)(&_IO_2_1_stdout_) };
-// ofstream & sexit = sexitFile;
-// static ofstream sabortFile = { (FILE *)(&_IO_2_1_stderr_) };
-// ofstream & sabort = sabortFile;
-
-void nl( ofstream & os ) {
-        if ( getANL( os ) ) (ofstream &)(nl( os ));                     // implementation only
-        else setPrt( os, false );                                                       // turn off
-}
 
 //---------------------------------------