; CALL BAck Routine
;
QSR_CB_CALLBACK::
    BRANCHIF   $IPRL_CB_ADDR  &CB_DONE
    GOTOREG    $IPRL_CB_ADDR
CB_DONE:
    RTNQUE