* Copyright (c) 1980 The Regents of the University of California.
* This module is believed to contain source code proprietary to AT&T.
* Use and redistribution is subject to the Berkeley Software License
* Agreement and your Software Agreement with AT&T (Western Electric).
static char sccsid
[] = "@(#)putc_.c 5.2 (Berkeley) 4/12/91";
* write a character to the standard output
* char will be sent to the standard output, usually the terminal
* ierror will be 0 if successful; a system error code otherwise.
#include "../libI77/f_errno.h"
#include "../libI77/fiodefs.h"
extern unit units
[]; /* logical units table from iolib */
return((long)(errno
=F_ERNOPEN
));
if (!lu
->uwrt
&& ! nowwriting(lu
))