

  TYPE
    pmt$max_number_of_tasks = 0 .. pmc$max_number_of_tasks;


{  The following number is based on the maximum number of segment descriptors
{  available in the segment table that can be available for assignment as
{  shared stacks.

  CONST
    pmc$max_number_of_tasks = 4000;
