Changes in libcfa/src/iostream.cfa [4f37255:65240bb]

File:

• libcfa/src/iostream.cfa (modified) (8 diffs)

libcfa/src/iostream.cfa

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sat Jul 13 08:07:59 2019
-// Update Count     : 821
+// Last Modified On : Fri Jul 12 12:04:13 2019
+// Update Count     : 819
 //
 
@@ -499 +499 @@
                                 if ( ! f.flags.left ) { \
                                         buf[i] = '.'; buf[i + 1] = '\0'; \
-                                        if ( buf[0] == ' ' ) bufbeg = 1;        /* decimal point within width */ \
+                                        if ( buf[0] == ' ' ) bufbeg = 1; /* decimal point within width */ \
                                 } else { \
                                         for ( i = 0; i < len && buf[i] != ' '; i += 1 ); /* trailing blank ? */ \
@@ -546 +546 @@
 forall( dtype ostype | ostream( ostype ) ) {
         ostype & ?|?( ostype & os, _Ostream_Manip(char) f ) {
-                if ( f.base != 'c' ) {                                                  // bespoke binary/octal/hex format
+                if ( f.base != 'c' ) {                                                          // bespoke binary/octal/hex format
                         _Ostream_Manip(unsigned char) fmtuc @= { f.val, f.wd, f.pc, f.base, {'\0'} };
                         fmtuc.flags.pc = f.flags.pc;
@@ -558 +558 @@
 
                 #define CFMTNP "% * "
-                char fmtstr[sizeof(CFMTNP)];                                    // sizeof includes '\0'
+                char fmtstr[sizeof(CFMTNP)];                                            // sizeof includes '\0'
                 memcpy( &fmtstr, CFMTNP, sizeof(CFMTNP) );
-                int star = 1;                                                                   // position before first '*'
+                int star = 1;                                                                           // position before first '*'
 
                 // Insert flags into spaces before '*', from right to left.
@@ -566 +566 @@
                 fmtstr[star] = '%';
 
-                fmtstr[sizeof(CFMTNP)-2] = f.base;                              // sizeof includes '\0'
+                fmtstr[sizeof(CFMTNP)-2] = f.base;                                      // sizeof includes '\0'
                 // printf( "%d %s\n", f.wd, &fmtstr[star] );
                 fmt( os, &fmtstr[star], f.wd, f.val );
@@ -631 +631 @@
                 else {
                         fprintf( stderr, "invalid Boolean constant\n" );
-                        abort();                                                                        // cannot use abort stream
+                        abort();
                 } // if
                 return is;
@@ -639 +639 @@
                 char temp;
                 for () {
-                        fmt( is, "%c", &temp );                                         // must pass pointer through varg to fmt
+                        fmt( is, "%c", &temp );                                                 // must pass pointer through varg to fmt
                         // do not overwrite parameter with newline unless appropriate
                         if ( temp != '\n' || getANL( is ) ) { c = temp; break; }
@@ -773 +773 @@
         if ( ! f.s ) {
                 // printf( "skip %s %d\n", f.scanset, f.wd );
-                if ( f.wd == -1 ) fmt( is, f.scanset, "" );             // no input arguments
+                if ( f.wd == -1 ) fmt( is, f.scanset, "" ); // no input arguments
                 else for ( f.wd ) fmt( is, "%*c" );
                 return is;