extrn	b.eof, .bsta, .ordy, .bdump, .bput
;
; Put byte c to buffered file hl^.  Carry for error
; a,f
.bfputc::
	mov	a,m
	ani	b.eof
	stc	! rz;			not a write file, error
	call	.bsta
	ani	.ordy
	cz	.bdump;			make room
	jnc	.bput
	ret;				error occured