/
/ Clear event flag.
/ clef(efn);
/ Returns dsw.
/
 
	.globl	clef
 
clef:	jsr	r0,__csav
	mov	12(r5),-(sp)
	mov	$31.+[2.<<8.],-(sp)
	emt	377
	mov	_dsw,r0
	jmp	__cret
