- Timestamp:
- Sep 4, 2024, 11:39:25 AM (3 months ago)
- Branches:
- master
- Children:
- 508cff0
- Parents:
- db19e1d
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libcfa/src/iostream.cfa
rdb19e1d r737bf73 10 10 // Created On : Wed May 27 17:56:53 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Sat Aug 17 12:31:47202413 // Update Count : 20 3812 // Last Modified On : Wed Sep 4 11:30:12 2024 13 // Update Count : 2040 14 14 // 15 15 … … 512 512 if ( cnt == 1 && f.flags.left ) { wd = f.wd; f.wd = maxdig; } // copy f.wd and reset for printing middle chunk 513 513 // printf( "R val:%#lx(%lu) wd:%u pc:%u base:%c neg:%d pc:%d left:%d nobsdp:%d sign:%d pad0:%d\n", 514 // f.val, f.val, f.wd, f.pc, f.base, f.flags.neg, f.flags.pc, f.flags.left, f.flags.nobsdp, f.flags.sign, f.flags.pad0 ); 514 // f.val, f.val, f.wd, f.pc, f.base, f.flags.neg, f.flags.pc, f.flags.left, f.flags.nobsdp, f.flags.sign, f.flags.pad0 ); 515 515 (ostype &)(os | f); 516 516 if ( cnt == 1 ) { … … 554 554 if ( f.flags.neg ) f.val = -f.val; 555 555 // printf( "L val:%#lx(%lu) wd:%u pc:%u base:%c neg:%d pc:%d left:%d nobsdp:%d sign:%d pad0:%d\n", 556 // f.val, f.val, f.wd, f.pc, f.base, f.flags.neg, f.flags.pc, f.flags.left, f.flags.nobsdp, f.flags.sign, f.flags.pad0 ); 556 // f.val, f.val, f.wd, f.pc, f.base, f.flags.neg, f.flags.pc, f.flags.left, f.flags.nobsdp, f.flags.sign, f.flags.pad0 ); 557 557 (ostype &)(os | f); 558 558 … … 597 597 "y", "z", "a", "f", "p", "n", "u", "m", "", 598 598 "K", "M", "G", "T", "P", "E", "Z", "Y" 599 }; 599 }; 600 600 #define SUFFIXES_START (-24) /* Smallest power for which there is a suffix defined. */ 601 601 #define SUFFIXES_END (SUFFIXES_START + (int)((sizeof(suffixes) / sizeof(char *) - 1) * 3)) … … 1064 1064 else args = fmt( is, fmtstr, s, &len ); 1065 1065 // fprintf( stderr, "cstr %s %d %d %d\n", fmtstr, args, len, f.cstr.wd ); 1066 1067 // No data read and eof is on => true eof so raise exception. 1068 if ( len == 0 && eof( is ) ) throwResume ExceptionInst( end_of_file ); 1069 1066 1070 if ( check && len >= rwd && ! eof( is ) ) { // might not fit 1067 1071 char peek; … … 1087 1091 else args = fmt( is, fmtstr, s, &len ); 1088 1092 1093 // No data read and eof is on => true eof so raise exception. 1094 if ( len == 0 && eof( is ) ) throwResume ExceptionInst( end_of_file ); 1095 1089 1096 if ( check && len == rwd && ! eof( is ) ) { // might not fit 1090 1097 char peek; … … 1106 1113 else args = fmt( is, fmtstr, s, &len ); 1107 1114 // fprintf( stderr, "incl/excl %s \"%s\" %d %d %d %d %d %c\n", fmtstr, s, args, wd, len, eof( is ), check, s[wd] ); 1115 1116 // No data read and eof is on => true eof so raise exception. 1117 if ( len == 0 && eof( is ) ) throwResume ExceptionInst( end_of_file ); 1118 1108 1119 if ( check && len == rwd && ! eof( is ) ) { // might not fit 1109 1120 // fprintf( stderr, "overflow\n" );
Note: See TracChangeset
for help on using the changeset viewer.