$SAVE NOLIST

rq$send$units:  PROCEDURE( semaphore$t,
                           units,
                           except$ptr ) EXTERNAL;

DECLARE semaphore$t  TOKEN,
        units        WORD,
        except$ptr   POINTER;

END rq$send$units;

$RESTORE