* Copyright (c) 1990 The Regents of the University of California.
* This code is derived from software contributed to Berkeley by
* %sccs.include.redist.c%
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)fpurge.c 5.2 (Berkeley) %G%";
#endif /* LIBC_SCCS and not lint */
* fpurge: like fflush, but without writing anything: leave the
* given FILE's buffer empty.
fp
->_w
= fp
->_flags
& (__SLBF
|__SNBF
) ? 0 : fp
->_bf
._size
;