{
{     The purpose of this request is to close/delete a stack segment
{ being used by ADA tasks.
{
{ MMP$CLOSE_SHARED_STACK (POINTER, SHARED_TASKID_ARRAY, STATUS)
{
{ POINTER: (INPUT/OUTPUT) This parameter specifes the segment to
{                         be deleted. This pointer will be set to
{                         NIL when the request completes.
{
{ SHARED_TASKID_ARRAY: (INPUT) This paramter specifies the array
{                              of taskids for the tasks in which
{                              this segment is being closed/deleted.
{
{ STATUS: (OUTPUT) This parameter specifies the request status.
{
