$SAVE NOLIST rq$signal$interrupt: PROCEDURE( level, except$ptr ) EXTERNAL; DECLARE level WORD, except$ptr POINTER; END rq$signal$interrupt; $RESTORE