/
/ Wait for single event flag.
/ wtse(efn);
/ Returns -1 on error.
/
 
	.globl	wtse
 
wtse:	jsr	r0,__csav
	mov	12(r5),-(sp)
	mov	$41.+[2.<<8.],-(sp)
	emt	377
	mov	_dsw,r0
	jmp	__cret
