$SAVE NOLIST

rq$s$write$move:  PROCEDURE( connection$t,
                             buff$ptr,
                             count,
                             except$ptr ) WORD EXTERNAL;

DECLARE connection$t  TOKEN,
        buff$ptr      POINTER,
        count         WORD,
        except$ptr    POINTER;

END rq$s$write$move;

$RESTORE