godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Printf does not return a truth value for failure.

Browse Source 
These -incorrect- tests were replaced by calls to ferror.
This commit is contained in:
keie 1985-01-21 23:58:07 +00:00
parent c4daab57eb
commit 2c3c7efe8c
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lang/basic/lib/write.c
View File

@ -19,14 +19,17 @@ int i;
if(i>0)
if( fputc(' ',_chanwr)==EOF) error(29);
fprintf(_chanwr,"%d",i);
if( ferror(_chanwr) ) error(29);
}
_wrflt(f)
double f;
{
if( fprintf(_chanwr,"%f",f)== EOF) error(29);
fprintf(_chanwr,"%f",f);
if( ferror(_chanwr) ) error(29);
}
_wrstr(s)
String *s;
{
if( fprintf(_chanwr,"\"%s\"",s->strval)== EOF) error(29);
fprintf(_chanwr,"\"%s\"",s->strval);
if( ferror(_chanwr) ) error(29);
}