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