Changes in / [3da7c19:d57e349]


Ignore:
Files:
1 added
2 deleted
6 edited

Legend:

Unmodified
Added
Removed

  • libcfa/src/iostream.cfa

    r3da7c19 rd57e349  
    1010// Created On       : Wed May 27 17:56:53 2015
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Mon Jun 10 18:06:16 2019
    13 // Update Count     : 809
     12// Last Modified On : Sun Jun  9 20:54:05 2019
     13// Update Count     : 804
    1414//
    1515
    … …  
    797797} // ?|?
    798798
    799 forall( dtype istype | istream( istype ) )
    800 istype & ?|?( istype & is, _Istream_Char f ) {
    801         fmt( is, "%*c" );                                                                       // argument variable unused
    802         return is;
    803 } // ?|?
    804 
    805799#define InputFMTImpl( T, CODE ) \
    806800forall( dtype istype | istream( istype ) ) \
    … …  
    808802        enum { size = 16 }; \
    809803        char fmtstr[size]; \
    810         if ( f.wd == -1 ) { \
     804        if ( f.wd == -1 || strcmp( CODE, "c" ) == 0 ) { /* ignore width with "c" */     \
    811805                snprintf( fmtstr, size, "%%%s%s", f.ignore ? "*" : "", CODE ); \
    812806        } else { \
    … …  
    818812} // ?|?
    819813
     814InputFMTImpl( char, "c" )
    820815InputFMTImpl( signed char, "hhi" )
    821816InputFMTImpl( unsigned char, "hhi" )

  • libcfa/src/iostream.hfa

    r3da7c19 rd57e349  
    1010// Created On       : Wed May 27 17:56:53 2015
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Mon Jun 10 18:05:13 2019
    13 // Update Count     : 320
     12// Last Modified On : Sun Jun  9 22:46:17 2019
     13// Update Count     : 315
    1414//
    1515
    … …  
    347347static inline _Istream_Cstr excl( const char * scanset, _Istream_Cstr & fmt ) { fmt.scanset = scanset; fmt.flags.inex = true; return fmt; }
    348348static inline _Istream_Cstr cstr( char * s ) { return (_Istream_Cstr){ s, 0p, -1, { .all : 0 } }; }
    349 static inline _Istream_Cstr ignore( const char * s ) { return (_Istream_Cstr)@{ 0p, 0p, -1, { .flags.ignore : true } }; }
     349static inline _Istream_Cstr ignore( const char * s ) { return (_Istream_Cstr)@{ s, 0p, -1, { .flags.ignore : true } }; }
    350350static inline _Istream_Cstr ignore( _Istream_Cstr & fmt ) { fmt.flags.ignore = true; return fmt; }
    351351static inline _Istream_Cstr wd( unsigned int w, char * s ) { return (_Istream_Cstr)@{ s, 0p, w, { .all : 0 } }; }
    352352static inline _Istream_Cstr wd( unsigned int w, _Istream_Cstr & fmt ) { fmt.wd = w; return fmt; }
    353 forall( dtype istype | istream( istype ) ) istype & ?|?( istype & is, _Istream_Cstr f );
    354 
    355 struct _Istream_Char {
    356         bool ignore;                                                                            // do not change input argument
    357 }; // _Istream_Char
    358 
    359 static inline _Istream_Char ignore( const char c ) { return (_Istream_Char)@{ true }; }
    360 static inline _Istream_Char ignore( _Istream_Char & fmt ) { fmt.ignore = true; return fmt; }
    361 forall( dtype istype | istream( istype ) ) istype & ?|?( istype & is, _Istream_Char f );
     353forall( dtype istype | istream( istype ) ) istype & ?|?( istype &, _Istream_Cstr );
    362354
    363355forall( otype T )
    … …  
    376368} // ?|?
    377369
     370InputFMTDecl( char )
    378371InputFMTDecl( signed char )
    379372InputFMTDecl( unsigned char )

  • tests/.expect/manipulatorsInput.txt

    r3da7c19 rd57e349  
    262613 wwwwwwww
    2727a
    28 a
     28b
     29b
     30b
    2931-1
    303215

  • tests/.in/manipulatorsInput.txt

    r3da7c19 rd57e349  
    77abcyyy
    88aaaaaaaaxxxxxxxxaabbccbbdddwwwbbbbbbbbwwwwwwwwaaaaaaaawwwwwwww
    9 ab
     9abcd
    10100xff 017 15-15
    11110xff 017 15-15

  • tests/manipulatorsInput.cfa

    r3da7c19 rd57e349  
    77// Created On       : Sat Jun  8 17:58:54 2019
    88// Last Modified By : Peter A. Buhr
    9 // Last Modified On : Mon Jun 10 18:38:35 2019
    10 // Update Count     : 8
     9// Last Modified On : Mon Jun 10 08:11:03 2019
     10// Update Count     : 7
    1111//
    1212
    … …  
    5252                char c;
    5353                sin | c;                                                        sout | c;
     54                sin | wdi( 3, c );                                      sout | c;
    5455                sin | ignore( c );                                      sout | c;
     56                sin | ignore( wdi( 3, c ) );            sout | c;
    5557
    5658                signed char sc;

  • tests/sum.cfa

    r3da7c19 rd57e349  
    1111// Created On       : Wed May 27 17:56:53 2015
    1212// Last Modified By : Peter A. Buhr
    13 // Last Modified On : Thu Jun  6 16:18:22 2019
    14 // Update Count     : 333
     13// Last Modified On : Sun May 19 11:21:02 2019
     14// Update Count     : 330
    1515//
    1616
    … …  
    111111        };
    112112        GS(int) gs;
    113         // FIX ME, resolution problem with anew not picking up the LH type
    114         gs.x = (typeof(gs.x))anew( size );                                      // create array storage for field
     113        gs.x = anew( size );                                                            // create array storage for field
    115114        s = 0; v = low;
    116115        for ( int i = 0; i < size; i += 1, v += 1 ) {
Note: See TracChangeset for help on using the changeset viewer.