$SAVE NOLIST

rq$create$composite:  PROCEDURE( extension$t,
                                 token$list,
                                 except$ptr ) TOKEN EXTERNAL;

DECLARE extension$t  TOKEN,
        token$list   POINTER,
        except$ptr   POINTER;

END rq$create$composite;

$RESTORE