Source position: xforms.pp line 1302
function fl_set_event_callback(
p1: PFL_APPEVENT_CB;
p2: pointer
):PFL_APPEVENT_CB;