Changeset 356189a for src/libcfa
- Timestamp:
- Apr 14, 2016, 5:11:26 PM (9 years ago)
- Branches:
- ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, ctor, deferred_resn, demangler, enum, forall-pointer-decay, gc_noraii, jacob/cs343-translation, jenkins-sandbox, master, memory, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, with_gc
- Children:
- b617e4b
- Parents:
- 70a06f6
- git-author:
- Rob Schluntz <rschlunt@…> (04/14/16 17:10:08)
- git-committer:
- Rob Schluntz <rschlunt@…> (04/14/16 17:11:26)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/libcfa/fstream.c
r70a06f6 r356189a 5 5 // file "LICENCE" distributed with Cforall. 6 6 // 7 // fstream.c -- 7 // fstream.c -- 8 8 // 9 9 // Author : Peter A. Buhr 10 10 // Created On : Wed May 27 17:56:53 2015 11 // Last Modified By : Peter A. Buhr12 // Last Modified On : Wed Apr 6 17:55:27201611 // Last Modified By : Rob Schluntz 12 // Last Modified On : Thu Apr 14 17:04:24 2016 13 13 // Update Count : 176 14 14 // … … 75 75 if ( fclose( (FILE *)(os->file) ) == EOF ) { 76 76 perror( IO_MSG "close output" ); 77 } // if 77 } // if 78 78 } // close 79 79 … … 139 139 if ( fclose( (FILE *)(is->file) ) == EOF ) { 140 140 perror( IO_MSG "close input" ); 141 } // if 141 } // if 142 142 } // close 143 143 … … 154 154 return is; 155 155 } // read 156 156 157 157 ifstream *ungetc( ifstream * is, char c ) { 158 158 if ( fail( is ) ) {
Note:
See TracChangeset
for help on using the changeset viewer.