From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,446940dda01a26f2
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-03-17 02:10:26 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!logbridge.uoregon.edu!news-FFM2.ecrc.net!news.iks-jena.de!not-for-mail
From: Lutz Donnerhacke <lutz@iks-jena.de>
Newsgroups: comp.lang.ada
Subject: Re: Tasking_Error
Date: Mon, 17 Mar 2003 10:10:25 +0000 (UTC)
Organization: IKS GmbH Jena
Message-ID: <slrnb7b7of.o1.lutz@taranis.iks-jena.de>
References: <r6a25b.1bt.ln@ID-soos.user.dfncis.de>
NNTP-Posting-Host: taranis.iks-jena.de
X-Trace: branwen.iks-jena.de 1047895825 28639 217.17.192.37 (17 Mar 2003
 10:10:25 GMT)
X-Complaints-To: usenet@iks-jena.de
NNTP-Posting-Date: Mon, 17 Mar 2003 10:10:25 +0000 (UTC)
User-Agent: slrn/0.9.7.4 (Linux)
Xref: archiver1.google.com comp.lang.ada:35402
Date: 2003-03-17T10:10:25+00:00
List-Id: <comp.lang.ada>

* Stefan Soos wrote:
> when i run the following program on Linux 2.4.18 with Gnat 3.14p-3 I
> always get the following exception information:
> Exception name: TASKING_ERROR
> Message: Failure during activation

This is caused by the OS, you have. The number of processes is limited and
even if you might using threads, you'll reach the limit.

OTOH the other advice about collecting all rendevouz calls is right, too.

The following excerpt works for me (ulimit 256 tasks, so maximum ist 229).

---CUT HERE---
   Maximum_Tasks : constant := 50;

   task type Called_Task_Type is
      entry Start;
      entry Rendevouz;
   end Called_Task_Type;

   task body Called_Task_Type is
   begin
      accept Start;
      Put ("Tasks waiting so far: ");
      Put (Rendevouz'Count);
      New_Line;
      loop
	 select
	    accept Rendevouz;
	 or terminate;
	 end select;
      end loop;
   end Called_Task_Type;
---CUT HERE---