#include	"defs.h"

#
/*
 *
 * S. R. Bourne
 * Bell Telephone Laboratories
 *
 */



INT	chkrd(f, a, n)
	INT	f;
	ADR	a;
	INT	n;
{

	REG INT	L;

	L=read(f, a, n);
	if(L>0 && L!=n)
		print("%Eread file error");
	return(L>0);
}

INT	chkwt(f, a, n)
	INT	f;
	ADR	a;
	INT	n;
{

	REG INT	L;

	L=write(f, a, n);
	if(L!=n)
		print("%Ewrite file error");
}