Changeset 211def2 for libcfa/src/iostream.hfa

Timestamp:

Feb 7, 2024, 10:54:16 PM (3 months ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

956299b

Parents:

a22d148

Message:

omnibus I/O changes to get quoted manipulator to work

File:

• libcfa/src/iostream.hfa (modified) (6 diffs)

libcfa/src/iostream.hfa

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sun Jan 28 11:56:29 2024
-// Update Count     : 733
+// Last Modified On : Tue Feb  6 18:35:54 2024
+// Update Count     : 743
 //
 
@@ -370 +370 @@
 // *********************************** exceptions ***********************************
 
-ExceptionDecl( cstring_length );
-ExceptionDecl( missing_data );
+ExceptionDecl( missing_data );                                                  // read finds no appropriate data
+ExceptionDecl( cstring_length );                                                // character string size exceeded
+ExceptionDecl( data_range );                                                    // value too large for numerical type
 
 // *********************************** manipulators ***********************************
@@ -406 +407 @@
         char * s;
         inline _Istream_str_base;
-}; // _Istream_Cstr
+}; // _Istream_Cwidth
 
 // Restrict nesting of input manipulators to those combinations that make sense.
+
+struct _Istream_Cquoted {
+        _Istream_Cwidth cstr;
+}; // _Istream_Cquoted
 
 struct _Istream_Cstr {
@@ -414 +419 @@
 }; // _Istream_Cstr
 
-struct _Istream_Cquoted {
-        _Istream_Cwidth cstr;
-}; // _Istream_Cquoted
-
 static inline {
         // width must include room for null terminator, (gcc) scanf does not allow a 0 width => wd > 1 (1 char and null) and rd > 0 (1 char);
         _Istream_Cwidth wdi( unsigned int wd, char s[] ) {
-                if ( wd <= 1 ) throw (cstring_length){ &cstring_length_vt }; // minimum 1 character and null terminator
+                if ( wd <= 1 ) throwResume ExceptionInst( cstring_length ); // minimum 1 character and null terminator
                 return (_Istream_Cwidth)@{ .s : s, { {.scanset : 0p}, .wd : wd, {.all : 0} } };
         }
         _Istream_Cwidth wdi( unsigned int wd, unsigned int rwd, char s[] ) {
-                if ( wd <= 1 || wd <= rwd ) throw (cstring_length){ &cstring_length_vt }; // minimum 1 character, null terminator, plus subset
+                if ( wd <= 1 || wd <= rwd ) throwResume ExceptionInst( cstring_length ); // minimum 1 character, null terminator, plus subset
                 return (_Istream_Cwidth)@{ .s : s, { {.scanset : 0p}, .wd : rwd, {.flags.rwd : true} } };
+        }
+        _Istream_Cstr & getline( _Istream_Cwidth & f, const char delimiter = '\n' ) {
+                f.delimiters[0] = delimiter; f.delimiters[1] = '\0'; f.flags.delimiter = true; return (_Istream_Cstr &)f;
         }
         _Istream_Cquoted quoted( char & ch, const char Ldelimiter = '\'', const char Rdelimiter = '\0' ) {
@@ -435 +439 @@
                 return (_Istream_Cquoted &)f;
         }
-        _Istream_Cstr & getline( _Istream_Cwidth & f, const char delimiter = '\n' ) {
-                f.delimiters[0] = delimiter; f.delimiters[1] = '\0'; f.flags.delimiter = true; return (_Istream_Cstr &)f;
-        }
         _Istream_Cstr & incl( const char scanset[], _Istream_Cwidth & f ) { f.scanset = scanset; f.flags.inex = false; return (_Istream_Cstr &)f; }
         _Istream_Cstr & excl( const char scanset[], _Istream_Cwidth & f ) { f.scanset = scanset; f.flags.inex = true; return (_Istream_Cstr &)f; }
-        _Istream_Cstr ignore( const char s[] ) { return (_Istream_Cwidth)@{ .s : (char *)s, { {.scanset : 0p}, .wd : -1, {.flags.ignore : true} } }; }
+        _Istream_Cstr ignore( const char s[] ) { return (_Istream_Cstr)@{ { .s : (char *)s, { {.scanset : 0p}, .wd : -1, {.flags.ignore : true} } } }; }
         _Istream_Cstr & ignore( _Istream_Cwidth & f ) { f.flags.ignore = true; return (_Istream_Cstr &)f; }
         _Istream_Cquoted & ignore( _Istream_Cquoted & f ) { f.cstr.flags.ignore = true; return (_Istream_Cquoted &)f; }
@@ -450 +451 @@
         istype & ?|?( istype & is, _Istream_Cquoted f );
         istype & ?|?( istype & is, _Istream_Cstr f );
-        static inline {
-                istype & ?|?( istype & is, _Istream_Cwidth f ) { return is | *(_Istream_Cstr *)&f; }
-        } // distribution
+        static inline istype & ?|?( istype & is, _Istream_Cwidth f ) { return is | *(_Istream_Cstr *)&f; }
 } // distribution