$SAVE NOLIST

rq$send$message:  PROCEDURE( mailbox$t,   
                             object,
                             response,
                             except$ptr ) EXTERNAL;

DECLARE mailbox$t  TOKEN,
        object     TOKEN,
        response   TOKEN,
        except$ptr POINTER;

END rq$send$message;

$RESTORE