;	A0 = pointer to event linked list
	    ;	A1 = pointer to my data segment
	    ;	return new event linked list in D0

	    section text,code

	    xref    _CHandler
	    xdef    _handler

_handler:
	    movem.l A0/A1,-(sp)
	    jsr     _CHandler(pc)
	    movem.l (sp)+,A0/A1
	    rts

	    END