Ignore:
Timestamp:
Mar 23, 2017, 10:39:30 AM (7 years ago)
Author:
Peter A. Buhr <pabuhr@…>
Branches:
ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, demangler, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, with_gc
Children:
6013bd7, 7895d46
Parents:
89e1b16
Message:

additions to printing tuples, iostream, nad user documentations

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/libcfa/iostream.c

    r89e1b16 r0583064b  
    1010// Created On       : Wed May 27 17:56:53 2015
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Wed Mar 22 17:46:06 2017
    13 // Update Count     : 359
     12// Last Modified On : Thu Mar 23 08:20:40 2017
     13// Update Count     : 367
    1414//
    1515
     
    201201forall( dtype ostype, otype T, ttype Params | ostream( ostype ) | writeable( T ) | { ostype * ?|?( ostype *, Params ); } )
    202202ostype * ?|?( ostype * os, T arg, Params rest ) {
    203         forall( ttype Params ) ostype * prtTuple( T arg, Params rest ) {
    204                 os | arg;                                                                               // print first argument
    205                 os | rest;                                                                              // print remaining arguments
    206                 return os;
    207         } // prtTuple
    208203        sepSetCur( os, sepGetTuple( os ) );                                     // switch to tuple separator
    209         prtTuple( arg, rest );                                                          // recursively print tuple
     204        os | arg;                                                                                       // print first argument
     205        os | rest;                                                                                      // print remaining arguments
    210206        sepSetCur( os, sepGet( os ) );                                          // switch to regular separator
    211207        return os;
     
    223219        os | '\n';
    224220        flush( os );
    225         sepOff( os );
     221        sepOff( os );                                                                           // prepare for next line
    226222        return os;
    227223} // endl
Note: See TracChangeset for help on using the changeset viewer.