Changeset 9d362a0
- Timestamp:
- Dec 25, 2018, 5:47:50 PM (6 years ago)
- Branches:
- ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, no_list, persistent-indexer, pthread-emulation, qualifiedEnum
- Children:
- ef346f7c
- Parents:
- bd07b15
- Location:
- libcfa/src
- Files:
-
- 4 edited
-
fstream.cfa (modified) (2 diffs)
-
fstream.hfa (modified) (3 diffs)
-
iostream.cfa (modified) (24 diffs)
-
iostream.hfa (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
-
libcfa/src/fstream.cfa
rbd07b15 r9d362a0 10 10 // Created On : Wed May 27 17:56:53 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Sat Dec 22 17:01:54201813 // Update Count : 30 212 // Last Modified On : Mon Dec 24 18:33:38 2018 13 // Update Count : 304 14 14 // 15 15 … … 150 150 va_end( args ); 151 151 152 setPrt( os, true ); 152 setPrt( os, true ); // called in output cascade 153 153 sepReset( os ); // reset separator 154 154 return len; -
libcfa/src/fstream.hfa
rbd07b15 r9d362a0 10 10 // Created On : Wed May 27 17:56:53 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Sat Dec 22 17:55:37201813 // Update Count : 14 812 // Last Modified On : Mon Dec 24 18:33:41 2018 13 // Update Count : 149 14 14 // 15 15 … … 62 62 void close( ofstream & ); 63 63 ofstream & write( ofstream &, const char * data, size_t size ); 64 int fmt( ofstream &, const char f mt[], ... );64 int fmt( ofstream &, const char format[], ... ); 65 65 66 66 void ?{}( ofstream & os ); … … 83 83 ifstream & read( ifstream & is, char * data, size_t size ); 84 84 ifstream & ungetc( ifstream & is, char c ); 85 int fmt( ifstream &, const char f mt[], ... );85 int fmt( ifstream &, const char format[], ... ); 86 86 87 87 void ?{}( ifstream & is ); -
libcfa/src/iostream.cfa
rbd07b15 r9d362a0 10 10 // Created On : Wed May 27 17:56:53 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Sat Dec 22 23:09:56201813 // Update Count : 5 6912 // Last Modified On : Mon Dec 24 18:33:40 2018 13 // Update Count : 589 14 14 // 15 15 … … 33 33 } // ?|? 34 34 void ?|?( ostype & os, bool b ) { 35 (ostype)(os | b); if ( getANL( os ) ) nl( os ); 36 setPrt( os, false ); // turn off 35 (ostype &)(os | b); nl( os ); 37 36 } // ?|? 38 37 … … 43 42 } // ?|? 44 43 void ?|?( ostype & os, char c ) { 45 (ostype)(os | c); if ( getANL( os ) ) nl( os ); 46 setPrt( os, false ); // turn off 44 (ostype &)(os | c); nl( os ); 47 45 } // ?|? 48 46 … … 53 51 } // ?|? 54 52 void ?|?( ostype & os, signed char sc ) { 55 (ostype)(os | sc); if ( getANL( os ) ) nl( os ); 56 setPrt( os, false ); // turn off 53 (ostype &)(os | sc); nl( os ); 57 54 } // ?|? 58 55 … … 63 60 } // ?|? 64 61 void ?|?( ostype & os, unsigned char usc ) { 65 (ostype)(os | usc); if ( getANL( os ) ) nl( os ); 66 setPrt( os, false ); // turn off 62 (ostype &)(os | usc); nl( os ); 67 63 } // ?|? 68 64 … … 73 69 } // ?|? 74 70 void & ?|?( ostype & os, short int si ) { 75 (ostype)(os | si); if ( getANL( os ) ) nl( os ); 76 setPrt( os, false ); // turn off 71 (ostype &)(os | si); nl( os ); 77 72 } // ?|? 78 73 … … 83 78 } // ?|? 84 79 void & ?|?( ostype & os, unsigned short int usi ) { 85 (ostype)(os | usi); if ( getANL( os ) ) nl( os ); 86 setPrt( os, false ); // turn off 80 (ostype &)(os | usi); nl( os ); 87 81 } // ?|? 88 82 … … 93 87 } // ?|? 94 88 void & ?|?( ostype & os, int i ) { 95 (ostype)(os | i); if ( getANL( os ) ) nl( os ); 96 setPrt( os, false ); // turn off 89 (ostype &)(os | i); nl( os ); 97 90 } // ?|? 98 91 … … 103 96 } // ?|? 104 97 void & ?|?( ostype & os, unsigned int ui ) { 105 (ostype)(os | ui); if ( getANL( os ) ) nl( os ); 106 setPrt( os, false ); // turn off 98 (ostype &)(os | ui); nl( os ); 107 99 } // ?|? 108 100 … … 113 105 } // ?|? 114 106 void & ?|?( ostype & os, long int li ) { 115 (ostype)(os | li); if ( getANL( os ) ) nl( os ); 116 setPrt( os, false ); // turn off 107 (ostype &)(os | li); nl( os ); 117 108 } // ?|? 118 109 … … 123 114 } // ?|? 124 115 void & ?|?( ostype & os, unsigned long int uli ) { 125 (ostype)(os | uli); if ( getANL( os ) ) nl( os ); 126 setPrt( os, false ); // turn off 116 (ostype &)(os | uli); nl( os ); 127 117 } // ?|? 128 118 … … 133 123 } // ?|? 134 124 void & ?|?( ostype & os, long long int lli ) { 135 (ostype)(os | lli); if ( getANL( os ) ) nl( os ); 136 setPrt( os, false ); // turn off 125 (ostype &)(os | lli); nl( os ); 137 126 } // ?|? 138 127 … … 143 132 } // ?|? 144 133 void & ?|?( ostype & os, unsigned long long int ulli ) { 145 (ostype)(os | ulli); if ( getANL( os ) ) nl( os ); 146 setPrt( os, false ); // turn off 134 (ostype &)(os | ulli); nl( os ); 147 135 } // ?|? 148 136 … … 153 141 } // ?|? 154 142 void & ?|?( ostype & os, float f ) { 155 (ostype)(os | f); if ( getANL( os ) ) nl( os ); 156 setPrt( os, false ); // turn off 143 (ostype &)(os | f); nl( os ); 157 144 } // ?|? 158 145 … … 163 150 } // ?|? 164 151 void & ?|?( ostype & os, double d ) { 165 (ostype)(os | d); if ( getANL( os ) ) nl( os ); 166 setPrt( os, false ); // turn off 152 (ostype &)(os | d); nl( os ); 167 153 } // ?|? 168 154 … … 173 159 } // ?|? 174 160 void & ?|?( ostype & os, long double ld ) { 175 (ostype)(os | ld); if ( getANL( os ) ) nl( os ); 176 setPrt( os, false ); // turn off 161 (ostype &)(os | ld); nl( os ); 177 162 } // ?|? 178 163 … … 183 168 } // ?|? 184 169 void & ?|?( ostype & os, float _Complex fc ) { 185 (ostype)(os | fc); if ( getANL( os ) ) nl( os ); 186 setPrt( os, false ); // turn off 170 (ostype &)(os | fc); nl( os ); 187 171 } // ?|? 188 172 … … 193 177 } // ?|? 194 178 void & ?|?( ostype & os, double _Complex dc ) { 195 (ostype)(os | dc); if ( getANL( os ) ) nl( os ); 196 setPrt( os, false ); // turn off 179 (ostype &)(os | dc); nl( os ); 197 180 } // ?|? 198 181 … … 203 186 } // ?|? 204 187 void & ?|?( ostype & os, long double _Complex ldc ) { 205 (ostype)(os | ldc); if ( getANL( os ) ) nl( os ); 206 setPrt( os, false ); // turn off 188 (ostype &)(os | ldc); nl( os ); 207 189 } // ?|? 208 190 … … 246 228 } // ?|? 247 229 void ?|?( ostype & os, const char * str ) { 248 (ostype)(os | str); if ( getANL( os ) ) nl( os ); 249 setPrt( os, false ); // turn off 230 (ostype &)(os | str); nl( os ); 250 231 } // ?|? 251 232 … … 276 257 } // ?|? 277 258 void ?|?( ostype & os, const void * p ) { 278 (ostype)(os | p); if ( getANL( os ) ) nl( os ); 279 setPrt( os, false ); // turn off 259 (ostype &)(os | p); nl( os ); 280 260 } // ?|? 281 261 282 262 // manipulators 283 263 ostype & ?|?( ostype & os, ostype & (* manip)( ostype & ) ) { 284 (ostype )(manip( os ));264 (ostype &)(manip( os )); 285 265 return os; 286 266 } // ?|? 287 267 void ?|?( ostype & os, ostype & (* manip)( ostype & ) ) { 288 (ostype )(manip( os ));289 if ( get ANL( os ) && getPrt( os ) ) nl( os ); // ignore auto nl?268 (ostype &)(manip( os )); 269 if ( getPrt( os ) ) nl( os ); // something printed ? 290 270 setPrt( os, false ); // turn off 291 271 } // ?|? 292 272 293 273 ostype & sep( ostype & os ) { 294 return (ostype )(os | sepGet( os ));274 return (ostype &)(os | sepGet( os )); 295 275 } // sep 296 276 … … 300 280 301 281 ostype & nl( ostype & os ) { 302 (ostype )(os | '\n');282 (ostype &)(os | '\n'); 303 283 setPrt( os, false ); // turn off 304 284 setNL( os, true ); … … 307 287 } // nl 308 288 289 void nl( ostype & os ) { 290 if ( getANL( os ) ) (ostype &)(nl( os )); // implementation only 291 else setPrt( os, false ); // turn off 292 } // nl 293 309 294 ostype & nonl( ostype & os ) { 310 295 setPrt( os, false ); // turn off … … 346 331 forall( dtype ostype, otype T, ttype Params | writeable( T, ostype ) | { ostype & ?|?( ostype &, Params ); } ) { 347 332 ostype & ?|?( ostype & os, T arg, Params rest ) { 348 (ostype )(os | arg);// print first argument333 (ostype &)(os | arg); // print first argument 349 334 sepSetCur( os, sepGetTuple( os ) ); // switch to tuple separator 350 (ostype )(os | rest); // print remaining arguments335 (ostype &)(os | rest); // print remaining arguments 351 336 sepSetCur( os, sepGet( os ) ); // switch to regular separator 352 337 return os; 353 338 } // ?|? 354 339 void ?|?( ostype & os, T arg, Params rest ) { 355 // (ostype)(?|?( os, arg, rest )); if ( getANL( os ) )nl( os );356 (ostype )(os | arg);// print first argument340 // (ostype &)(?|?( os, arg, rest )); nl( os ); 341 (ostype &)(os | arg); // print first argument 357 342 sepSetCur( os, sepGetTuple( os ) ); // switch to tuple separator 358 (ostype )(os | rest); // print remaining arguments343 (ostype &)(os | rest); // print remaining arguments 359 344 sepSetCur( os, sepGet( os ) ); // switch to regular separator 360 if ( getANL( os ) ) nl( os ); 361 setPrt( os, false ); // turn off 345 nl( os ); 362 346 } // ?|? 363 347 } // distribution -
libcfa/src/iostream.hfa
rbd07b15 r9d362a0 10 10 // Created On : Wed May 27 17:56:53 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Sat Dec 22 17:00:39201813 // Update Count : 2 1812 // Last Modified On : Mon Dec 24 18:33:40 2018 13 // Update Count : 220 14 14 // 15 15 … … 20 20 trait ostream( dtype ostype ) { 21 21 // private 22 bool sepPrt( ostype & ); // returnseparator state (on/off)22 bool sepPrt( ostype & ); // get separator state (on/off) 23 23 void sepReset( ostype & ); // set separator state to default state 24 24 void sepReset( ostype &, bool ); // set separator and default state … … 27 27 bool getNL( ostype & ); // check newline 28 28 void setNL( ostype &, bool ); // saw newline 29 bool getANL( ostype & ); // check auto newline30 bool getPrt( ostype & ); // check ignore auto NL31 void setPrt( ostype &, bool ); // set ignore auto NL29 bool getANL( ostype & ); // get auto newline (on/off) 30 bool getPrt( ostype & ); // get fmt called in output cascade 31 void setPrt( ostype &, bool ); // set fmt called in output cascade 32 32 // public 33 33 void sepOn( ostype & ); // turn separator state on … … 48 48 void close( ostype & os ); 49 49 ostype & write( ostype &, const char *, size_t ); 50 int fmt( ostype &, const char f mt[], ... );50 int fmt( ostype &, const char format[], ... ); 51 51 }; // ostream 52 52 … … 117 117 void ?|?( ostype &, ostype & (*)( ostype & ) ); 118 118 ostype & nl( ostype & ); 119 void nl( ostype & ); 119 120 ostype & nonl( ostype & ); 120 121 ostype & sep( ostype & ); … … 149 150 istype & read( istype &, char *, size_t ); 150 151 istype & ungetc( istype &, char ); 151 int fmt( istype &, const char f mt[], ... );152 int fmt( istype &, const char format[], ... ); 152 153 }; // istream 153 154
Note: See TracChangeset
for help on using the changeset viewer.
